Loading...
1/*
2 * core.c - Kernel Live Patching Core
3 *
4 * Copyright (C) 2014 Seth Jennings <sjenning@redhat.com>
5 * Copyright (C) 2014 SUSE
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version 2
10 * of the License, or (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, see <http://www.gnu.org/licenses/>.
19 */
20
21#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
22
23#include <linux/module.h>
24#include <linux/kernel.h>
25#include <linux/mutex.h>
26#include <linux/slab.h>
27#include <linux/list.h>
28#include <linux/kallsyms.h>
29#include <linux/livepatch.h>
30#include <linux/elf.h>
31#include <linux/moduleloader.h>
32#include <linux/completion.h>
33#include <asm/cacheflush.h>
34#include "core.h"
35#include "patch.h"
36#include "transition.h"
37
38/*
39 * klp_mutex is a coarse lock which serializes access to klp data. All
40 * accesses to klp-related variables and structures must have mutex protection,
41 * except within the following functions which carefully avoid the need for it:
42 *
43 * - klp_ftrace_handler()
44 * - klp_update_patch_state()
45 */
46DEFINE_MUTEX(klp_mutex);
47
48static LIST_HEAD(klp_patches);
49
50static struct kobject *klp_root_kobj;
51
52static bool klp_is_module(struct klp_object *obj)
53{
54 return obj->name;
55}
56
57/* sets obj->mod if object is not vmlinux and module is found */
58static void klp_find_object_module(struct klp_object *obj)
59{
60 struct module *mod;
61
62 if (!klp_is_module(obj))
63 return;
64
65 mutex_lock(&module_mutex);
66 /*
67 * We do not want to block removal of patched modules and therefore
68 * we do not take a reference here. The patches are removed by
69 * klp_module_going() instead.
70 */
71 mod = find_module(obj->name);
72 /*
73 * Do not mess work of klp_module_coming() and klp_module_going().
74 * Note that the patch might still be needed before klp_module_going()
75 * is called. Module functions can be called even in the GOING state
76 * until mod->exit() finishes. This is especially important for
77 * patches that modify semantic of the functions.
78 */
79 if (mod && mod->klp_alive)
80 obj->mod = mod;
81
82 mutex_unlock(&module_mutex);
83}
84
85static bool klp_is_patch_registered(struct klp_patch *patch)
86{
87 struct klp_patch *mypatch;
88
89 list_for_each_entry(mypatch, &klp_patches, list)
90 if (mypatch == patch)
91 return true;
92
93 return false;
94}
95
96static bool klp_initialized(void)
97{
98 return !!klp_root_kobj;
99}
100
101struct klp_find_arg {
102 const char *objname;
103 const char *name;
104 unsigned long addr;
105 unsigned long count;
106 unsigned long pos;
107};
108
109static int klp_find_callback(void *data, const char *name,
110 struct module *mod, unsigned long addr)
111{
112 struct klp_find_arg *args = data;
113
114 if ((mod && !args->objname) || (!mod && args->objname))
115 return 0;
116
117 if (strcmp(args->name, name))
118 return 0;
119
120 if (args->objname && strcmp(args->objname, mod->name))
121 return 0;
122
123 args->addr = addr;
124 args->count++;
125
126 /*
127 * Finish the search when the symbol is found for the desired position
128 * or the position is not defined for a non-unique symbol.
129 */
130 if ((args->pos && (args->count == args->pos)) ||
131 (!args->pos && (args->count > 1)))
132 return 1;
133
134 return 0;
135}
136
137static int klp_find_object_symbol(const char *objname, const char *name,
138 unsigned long sympos, unsigned long *addr)
139{
140 struct klp_find_arg args = {
141 .objname = objname,
142 .name = name,
143 .addr = 0,
144 .count = 0,
145 .pos = sympos,
146 };
147
148 mutex_lock(&module_mutex);
149 if (objname)
150 module_kallsyms_on_each_symbol(klp_find_callback, &args);
151 else
152 kallsyms_on_each_symbol(klp_find_callback, &args);
153 mutex_unlock(&module_mutex);
154
155 /*
156 * Ensure an address was found. If sympos is 0, ensure symbol is unique;
157 * otherwise ensure the symbol position count matches sympos.
158 */
159 if (args.addr == 0)
160 pr_err("symbol '%s' not found in symbol table\n", name);
161 else if (args.count > 1 && sympos == 0) {
162 pr_err("unresolvable ambiguity for symbol '%s' in object '%s'\n",
163 name, objname);
164 } else if (sympos != args.count && sympos > 0) {
165 pr_err("symbol position %lu for symbol '%s' in object '%s' not found\n",
166 sympos, name, objname ? objname : "vmlinux");
167 } else {
168 *addr = args.addr;
169 return 0;
170 }
171
172 *addr = 0;
173 return -EINVAL;
174}
175
176static int klp_resolve_symbols(Elf_Shdr *relasec, struct module *pmod)
177{
178 int i, cnt, vmlinux, ret;
179 char objname[MODULE_NAME_LEN];
180 char symname[KSYM_NAME_LEN];
181 char *strtab = pmod->core_kallsyms.strtab;
182 Elf_Rela *relas;
183 Elf_Sym *sym;
184 unsigned long sympos, addr;
185
186 /*
187 * Since the field widths for objname and symname in the sscanf()
188 * call are hard-coded and correspond to MODULE_NAME_LEN and
189 * KSYM_NAME_LEN respectively, we must make sure that MODULE_NAME_LEN
190 * and KSYM_NAME_LEN have the values we expect them to have.
191 *
192 * Because the value of MODULE_NAME_LEN can differ among architectures,
193 * we use the smallest/strictest upper bound possible (56, based on
194 * the current definition of MODULE_NAME_LEN) to prevent overflows.
195 */
196 BUILD_BUG_ON(MODULE_NAME_LEN < 56 || KSYM_NAME_LEN != 128);
197
198 relas = (Elf_Rela *) relasec->sh_addr;
199 /* For each rela in this klp relocation section */
200 for (i = 0; i < relasec->sh_size / sizeof(Elf_Rela); i++) {
201 sym = pmod->core_kallsyms.symtab + ELF_R_SYM(relas[i].r_info);
202 if (sym->st_shndx != SHN_LIVEPATCH) {
203 pr_err("symbol %s is not marked as a livepatch symbol\n",
204 strtab + sym->st_name);
205 return -EINVAL;
206 }
207
208 /* Format: .klp.sym.objname.symname,sympos */
209 cnt = sscanf(strtab + sym->st_name,
210 ".klp.sym.%55[^.].%127[^,],%lu",
211 objname, symname, &sympos);
212 if (cnt != 3) {
213 pr_err("symbol %s has an incorrectly formatted name\n",
214 strtab + sym->st_name);
215 return -EINVAL;
216 }
217
218 /* klp_find_object_symbol() treats a NULL objname as vmlinux */
219 vmlinux = !strcmp(objname, "vmlinux");
220 ret = klp_find_object_symbol(vmlinux ? NULL : objname,
221 symname, sympos, &addr);
222 if (ret)
223 return ret;
224
225 sym->st_value = addr;
226 }
227
228 return 0;
229}
230
231static int klp_write_object_relocations(struct module *pmod,
232 struct klp_object *obj)
233{
234 int i, cnt, ret = 0;
235 const char *objname, *secname;
236 char sec_objname[MODULE_NAME_LEN];
237 Elf_Shdr *sec;
238
239 if (WARN_ON(!klp_is_object_loaded(obj)))
240 return -EINVAL;
241
242 objname = klp_is_module(obj) ? obj->name : "vmlinux";
243
244 /* For each klp relocation section */
245 for (i = 1; i < pmod->klp_info->hdr.e_shnum; i++) {
246 sec = pmod->klp_info->sechdrs + i;
247 secname = pmod->klp_info->secstrings + sec->sh_name;
248 if (!(sec->sh_flags & SHF_RELA_LIVEPATCH))
249 continue;
250
251 /*
252 * Format: .klp.rela.sec_objname.section_name
253 * See comment in klp_resolve_symbols() for an explanation
254 * of the selected field width value.
255 */
256 cnt = sscanf(secname, ".klp.rela.%55[^.]", sec_objname);
257 if (cnt != 1) {
258 pr_err("section %s has an incorrectly formatted name\n",
259 secname);
260 ret = -EINVAL;
261 break;
262 }
263
264 if (strcmp(objname, sec_objname))
265 continue;
266
267 ret = klp_resolve_symbols(sec, pmod);
268 if (ret)
269 break;
270
271 ret = apply_relocate_add(pmod->klp_info->sechdrs,
272 pmod->core_kallsyms.strtab,
273 pmod->klp_info->symndx, i, pmod);
274 if (ret)
275 break;
276 }
277
278 return ret;
279}
280
281static int __klp_disable_patch(struct klp_patch *patch)
282{
283 struct klp_object *obj;
284
285 if (WARN_ON(!patch->enabled))
286 return -EINVAL;
287
288 if (klp_transition_patch)
289 return -EBUSY;
290
291 /* enforce stacking: only the last enabled patch can be disabled */
292 if (!list_is_last(&patch->list, &klp_patches) &&
293 list_next_entry(patch, list)->enabled)
294 return -EBUSY;
295
296 klp_init_transition(patch, KLP_UNPATCHED);
297
298 klp_for_each_object(patch, obj)
299 if (obj->patched)
300 klp_pre_unpatch_callback(obj);
301
302 /*
303 * Enforce the order of the func->transition writes in
304 * klp_init_transition() and the TIF_PATCH_PENDING writes in
305 * klp_start_transition(). In the rare case where klp_ftrace_handler()
306 * is called shortly after klp_update_patch_state() switches the task,
307 * this ensures the handler sees that func->transition is set.
308 */
309 smp_wmb();
310
311 klp_start_transition();
312 klp_try_complete_transition();
313 patch->enabled = false;
314
315 return 0;
316}
317
318/**
319 * klp_disable_patch() - disables a registered patch
320 * @patch: The registered, enabled patch to be disabled
321 *
322 * Unregisters the patched functions from ftrace.
323 *
324 * Return: 0 on success, otherwise error
325 */
326int klp_disable_patch(struct klp_patch *patch)
327{
328 int ret;
329
330 mutex_lock(&klp_mutex);
331
332 if (!klp_is_patch_registered(patch)) {
333 ret = -EINVAL;
334 goto err;
335 }
336
337 if (!patch->enabled) {
338 ret = -EINVAL;
339 goto err;
340 }
341
342 ret = __klp_disable_patch(patch);
343
344err:
345 mutex_unlock(&klp_mutex);
346 return ret;
347}
348EXPORT_SYMBOL_GPL(klp_disable_patch);
349
350static int __klp_enable_patch(struct klp_patch *patch)
351{
352 struct klp_object *obj;
353 int ret;
354
355 if (klp_transition_patch)
356 return -EBUSY;
357
358 if (WARN_ON(patch->enabled))
359 return -EINVAL;
360
361 /* enforce stacking: only the first disabled patch can be enabled */
362 if (patch->list.prev != &klp_patches &&
363 !list_prev_entry(patch, list)->enabled)
364 return -EBUSY;
365
366 /*
367 * A reference is taken on the patch module to prevent it from being
368 * unloaded.
369 */
370 if (!try_module_get(patch->mod))
371 return -ENODEV;
372
373 pr_notice("enabling patch '%s'\n", patch->mod->name);
374
375 klp_init_transition(patch, KLP_PATCHED);
376
377 /*
378 * Enforce the order of the func->transition writes in
379 * klp_init_transition() and the ops->func_stack writes in
380 * klp_patch_object(), so that klp_ftrace_handler() will see the
381 * func->transition updates before the handler is registered and the
382 * new funcs become visible to the handler.
383 */
384 smp_wmb();
385
386 klp_for_each_object(patch, obj) {
387 if (!klp_is_object_loaded(obj))
388 continue;
389
390 ret = klp_pre_patch_callback(obj);
391 if (ret) {
392 pr_warn("pre-patch callback failed for object '%s'\n",
393 klp_is_module(obj) ? obj->name : "vmlinux");
394 goto err;
395 }
396
397 ret = klp_patch_object(obj);
398 if (ret) {
399 pr_warn("failed to patch object '%s'\n",
400 klp_is_module(obj) ? obj->name : "vmlinux");
401 goto err;
402 }
403 }
404
405 klp_start_transition();
406 klp_try_complete_transition();
407 patch->enabled = true;
408
409 return 0;
410err:
411 pr_warn("failed to enable patch '%s'\n", patch->mod->name);
412
413 klp_cancel_transition();
414 return ret;
415}
416
417/**
418 * klp_enable_patch() - enables a registered patch
419 * @patch: The registered, disabled patch to be enabled
420 *
421 * Performs the needed symbol lookups and code relocations,
422 * then registers the patched functions with ftrace.
423 *
424 * Return: 0 on success, otherwise error
425 */
426int klp_enable_patch(struct klp_patch *patch)
427{
428 int ret;
429
430 mutex_lock(&klp_mutex);
431
432 if (!klp_is_patch_registered(patch)) {
433 ret = -EINVAL;
434 goto err;
435 }
436
437 ret = __klp_enable_patch(patch);
438
439err:
440 mutex_unlock(&klp_mutex);
441 return ret;
442}
443EXPORT_SYMBOL_GPL(klp_enable_patch);
444
445/*
446 * Sysfs Interface
447 *
448 * /sys/kernel/livepatch
449 * /sys/kernel/livepatch/<patch>
450 * /sys/kernel/livepatch/<patch>/enabled
451 * /sys/kernel/livepatch/<patch>/transition
452 * /sys/kernel/livepatch/<patch>/signal
453 * /sys/kernel/livepatch/<patch>/force
454 * /sys/kernel/livepatch/<patch>/<object>
455 * /sys/kernel/livepatch/<patch>/<object>/<function,sympos>
456 */
457
458static ssize_t enabled_store(struct kobject *kobj, struct kobj_attribute *attr,
459 const char *buf, size_t count)
460{
461 struct klp_patch *patch;
462 int ret;
463 bool enabled;
464
465 ret = kstrtobool(buf, &enabled);
466 if (ret)
467 return ret;
468
469 patch = container_of(kobj, struct klp_patch, kobj);
470
471 mutex_lock(&klp_mutex);
472
473 if (!klp_is_patch_registered(patch)) {
474 /*
475 * Module with the patch could either disappear meanwhile or is
476 * not properly initialized yet.
477 */
478 ret = -EINVAL;
479 goto err;
480 }
481
482 if (patch->enabled == enabled) {
483 /* already in requested state */
484 ret = -EINVAL;
485 goto err;
486 }
487
488 if (patch == klp_transition_patch) {
489 klp_reverse_transition();
490 } else if (enabled) {
491 ret = __klp_enable_patch(patch);
492 if (ret)
493 goto err;
494 } else {
495 ret = __klp_disable_patch(patch);
496 if (ret)
497 goto err;
498 }
499
500 mutex_unlock(&klp_mutex);
501
502 return count;
503
504err:
505 mutex_unlock(&klp_mutex);
506 return ret;
507}
508
509static ssize_t enabled_show(struct kobject *kobj,
510 struct kobj_attribute *attr, char *buf)
511{
512 struct klp_patch *patch;
513
514 patch = container_of(kobj, struct klp_patch, kobj);
515 return snprintf(buf, PAGE_SIZE-1, "%d\n", patch->enabled);
516}
517
518static ssize_t transition_show(struct kobject *kobj,
519 struct kobj_attribute *attr, char *buf)
520{
521 struct klp_patch *patch;
522
523 patch = container_of(kobj, struct klp_patch, kobj);
524 return snprintf(buf, PAGE_SIZE-1, "%d\n",
525 patch == klp_transition_patch);
526}
527
528static ssize_t signal_store(struct kobject *kobj, struct kobj_attribute *attr,
529 const char *buf, size_t count)
530{
531 struct klp_patch *patch;
532 int ret;
533 bool val;
534
535 ret = kstrtobool(buf, &val);
536 if (ret)
537 return ret;
538
539 if (!val)
540 return count;
541
542 mutex_lock(&klp_mutex);
543
544 patch = container_of(kobj, struct klp_patch, kobj);
545 if (patch != klp_transition_patch) {
546 mutex_unlock(&klp_mutex);
547 return -EINVAL;
548 }
549
550 klp_send_signals();
551
552 mutex_unlock(&klp_mutex);
553
554 return count;
555}
556
557static ssize_t force_store(struct kobject *kobj, struct kobj_attribute *attr,
558 const char *buf, size_t count)
559{
560 struct klp_patch *patch;
561 int ret;
562 bool val;
563
564 ret = kstrtobool(buf, &val);
565 if (ret)
566 return ret;
567
568 if (!val)
569 return count;
570
571 mutex_lock(&klp_mutex);
572
573 patch = container_of(kobj, struct klp_patch, kobj);
574 if (patch != klp_transition_patch) {
575 mutex_unlock(&klp_mutex);
576 return -EINVAL;
577 }
578
579 klp_force_transition();
580
581 mutex_unlock(&klp_mutex);
582
583 return count;
584}
585
586static struct kobj_attribute enabled_kobj_attr = __ATTR_RW(enabled);
587static struct kobj_attribute transition_kobj_attr = __ATTR_RO(transition);
588static struct kobj_attribute signal_kobj_attr = __ATTR_WO(signal);
589static struct kobj_attribute force_kobj_attr = __ATTR_WO(force);
590static struct attribute *klp_patch_attrs[] = {
591 &enabled_kobj_attr.attr,
592 &transition_kobj_attr.attr,
593 &signal_kobj_attr.attr,
594 &force_kobj_attr.attr,
595 NULL
596};
597
598static void klp_kobj_release_patch(struct kobject *kobj)
599{
600 struct klp_patch *patch;
601
602 patch = container_of(kobj, struct klp_patch, kobj);
603 complete(&patch->finish);
604}
605
606static struct kobj_type klp_ktype_patch = {
607 .release = klp_kobj_release_patch,
608 .sysfs_ops = &kobj_sysfs_ops,
609 .default_attrs = klp_patch_attrs,
610};
611
612static void klp_kobj_release_object(struct kobject *kobj)
613{
614}
615
616static struct kobj_type klp_ktype_object = {
617 .release = klp_kobj_release_object,
618 .sysfs_ops = &kobj_sysfs_ops,
619};
620
621static void klp_kobj_release_func(struct kobject *kobj)
622{
623}
624
625static struct kobj_type klp_ktype_func = {
626 .release = klp_kobj_release_func,
627 .sysfs_ops = &kobj_sysfs_ops,
628};
629
630/*
631 * Free all functions' kobjects in the array up to some limit. When limit is
632 * NULL, all kobjects are freed.
633 */
634static void klp_free_funcs_limited(struct klp_object *obj,
635 struct klp_func *limit)
636{
637 struct klp_func *func;
638
639 for (func = obj->funcs; func->old_name && func != limit; func++)
640 kobject_put(&func->kobj);
641}
642
643/* Clean up when a patched object is unloaded */
644static void klp_free_object_loaded(struct klp_object *obj)
645{
646 struct klp_func *func;
647
648 obj->mod = NULL;
649
650 klp_for_each_func(obj, func)
651 func->old_addr = 0;
652}
653
654/*
655 * Free all objects' kobjects in the array up to some limit. When limit is
656 * NULL, all kobjects are freed.
657 */
658static void klp_free_objects_limited(struct klp_patch *patch,
659 struct klp_object *limit)
660{
661 struct klp_object *obj;
662
663 for (obj = patch->objs; obj->funcs && obj != limit; obj++) {
664 klp_free_funcs_limited(obj, NULL);
665 kobject_put(&obj->kobj);
666 }
667}
668
669static void klp_free_patch(struct klp_patch *patch)
670{
671 klp_free_objects_limited(patch, NULL);
672 if (!list_empty(&patch->list))
673 list_del(&patch->list);
674}
675
676static int klp_init_func(struct klp_object *obj, struct klp_func *func)
677{
678 if (!func->old_name || !func->new_func)
679 return -EINVAL;
680
681 INIT_LIST_HEAD(&func->stack_node);
682 func->patched = false;
683 func->transition = false;
684
685 /* The format for the sysfs directory is <function,sympos> where sympos
686 * is the nth occurrence of this symbol in kallsyms for the patched
687 * object. If the user selects 0 for old_sympos, then 1 will be used
688 * since a unique symbol will be the first occurrence.
689 */
690 return kobject_init_and_add(&func->kobj, &klp_ktype_func,
691 &obj->kobj, "%s,%lu", func->old_name,
692 func->old_sympos ? func->old_sympos : 1);
693}
694
695/* Arches may override this to finish any remaining arch-specific tasks */
696void __weak arch_klp_init_object_loaded(struct klp_patch *patch,
697 struct klp_object *obj)
698{
699}
700
701/* parts of the initialization that is done only when the object is loaded */
702static int klp_init_object_loaded(struct klp_patch *patch,
703 struct klp_object *obj)
704{
705 struct klp_func *func;
706 int ret;
707
708 module_disable_ro(patch->mod);
709 ret = klp_write_object_relocations(patch->mod, obj);
710 if (ret) {
711 module_enable_ro(patch->mod, true);
712 return ret;
713 }
714
715 arch_klp_init_object_loaded(patch, obj);
716 module_enable_ro(patch->mod, true);
717
718 klp_for_each_func(obj, func) {
719 ret = klp_find_object_symbol(obj->name, func->old_name,
720 func->old_sympos,
721 &func->old_addr);
722 if (ret)
723 return ret;
724
725 ret = kallsyms_lookup_size_offset(func->old_addr,
726 &func->old_size, NULL);
727 if (!ret) {
728 pr_err("kallsyms size lookup failed for '%s'\n",
729 func->old_name);
730 return -ENOENT;
731 }
732
733 ret = kallsyms_lookup_size_offset((unsigned long)func->new_func,
734 &func->new_size, NULL);
735 if (!ret) {
736 pr_err("kallsyms size lookup failed for '%s' replacement\n",
737 func->old_name);
738 return -ENOENT;
739 }
740 }
741
742 return 0;
743}
744
745static int klp_init_object(struct klp_patch *patch, struct klp_object *obj)
746{
747 struct klp_func *func;
748 int ret;
749 const char *name;
750
751 if (!obj->funcs)
752 return -EINVAL;
753
754 obj->patched = false;
755 obj->mod = NULL;
756
757 klp_find_object_module(obj);
758
759 name = klp_is_module(obj) ? obj->name : "vmlinux";
760 ret = kobject_init_and_add(&obj->kobj, &klp_ktype_object,
761 &patch->kobj, "%s", name);
762 if (ret)
763 return ret;
764
765 klp_for_each_func(obj, func) {
766 ret = klp_init_func(obj, func);
767 if (ret)
768 goto free;
769 }
770
771 if (klp_is_object_loaded(obj)) {
772 ret = klp_init_object_loaded(patch, obj);
773 if (ret)
774 goto free;
775 }
776
777 return 0;
778
779free:
780 klp_free_funcs_limited(obj, func);
781 kobject_put(&obj->kobj);
782 return ret;
783}
784
785static int klp_init_patch(struct klp_patch *patch)
786{
787 struct klp_object *obj;
788 int ret;
789
790 if (!patch->objs)
791 return -EINVAL;
792
793 mutex_lock(&klp_mutex);
794
795 patch->enabled = false;
796 init_completion(&patch->finish);
797
798 ret = kobject_init_and_add(&patch->kobj, &klp_ktype_patch,
799 klp_root_kobj, "%s", patch->mod->name);
800 if (ret) {
801 mutex_unlock(&klp_mutex);
802 return ret;
803 }
804
805 klp_for_each_object(patch, obj) {
806 ret = klp_init_object(patch, obj);
807 if (ret)
808 goto free;
809 }
810
811 list_add_tail(&patch->list, &klp_patches);
812
813 mutex_unlock(&klp_mutex);
814
815 return 0;
816
817free:
818 klp_free_objects_limited(patch, obj);
819
820 mutex_unlock(&klp_mutex);
821
822 kobject_put(&patch->kobj);
823 wait_for_completion(&patch->finish);
824
825 return ret;
826}
827
828/**
829 * klp_unregister_patch() - unregisters a patch
830 * @patch: Disabled patch to be unregistered
831 *
832 * Frees the data structures and removes the sysfs interface.
833 *
834 * Return: 0 on success, otherwise error
835 */
836int klp_unregister_patch(struct klp_patch *patch)
837{
838 int ret;
839
840 mutex_lock(&klp_mutex);
841
842 if (!klp_is_patch_registered(patch)) {
843 ret = -EINVAL;
844 goto err;
845 }
846
847 if (patch->enabled) {
848 ret = -EBUSY;
849 goto err;
850 }
851
852 klp_free_patch(patch);
853
854 mutex_unlock(&klp_mutex);
855
856 kobject_put(&patch->kobj);
857 wait_for_completion(&patch->finish);
858
859 return 0;
860err:
861 mutex_unlock(&klp_mutex);
862 return ret;
863}
864EXPORT_SYMBOL_GPL(klp_unregister_patch);
865
866/**
867 * klp_register_patch() - registers a patch
868 * @patch: Patch to be registered
869 *
870 * Initializes the data structure associated with the patch and
871 * creates the sysfs interface.
872 *
873 * There is no need to take the reference on the patch module here. It is done
874 * later when the patch is enabled.
875 *
876 * Return: 0 on success, otherwise error
877 */
878int klp_register_patch(struct klp_patch *patch)
879{
880 if (!patch || !patch->mod)
881 return -EINVAL;
882
883 if (!is_livepatch_module(patch->mod)) {
884 pr_err("module %s is not marked as a livepatch module\n",
885 patch->mod->name);
886 return -EINVAL;
887 }
888
889 if (!klp_initialized())
890 return -ENODEV;
891
892 if (!klp_have_reliable_stack()) {
893 pr_err("This architecture doesn't have support for the livepatch consistency model.\n");
894 return -ENOSYS;
895 }
896
897 return klp_init_patch(patch);
898}
899EXPORT_SYMBOL_GPL(klp_register_patch);
900
901/*
902 * Remove parts of patches that touch a given kernel module. The list of
903 * patches processed might be limited. When limit is NULL, all patches
904 * will be handled.
905 */
906static void klp_cleanup_module_patches_limited(struct module *mod,
907 struct klp_patch *limit)
908{
909 struct klp_patch *patch;
910 struct klp_object *obj;
911
912 list_for_each_entry(patch, &klp_patches, list) {
913 if (patch == limit)
914 break;
915
916 klp_for_each_object(patch, obj) {
917 if (!klp_is_module(obj) || strcmp(obj->name, mod->name))
918 continue;
919
920 /*
921 * Only unpatch the module if the patch is enabled or
922 * is in transition.
923 */
924 if (patch->enabled || patch == klp_transition_patch) {
925
926 if (patch != klp_transition_patch)
927 klp_pre_unpatch_callback(obj);
928
929 pr_notice("reverting patch '%s' on unloading module '%s'\n",
930 patch->mod->name, obj->mod->name);
931 klp_unpatch_object(obj);
932
933 klp_post_unpatch_callback(obj);
934 }
935
936 klp_free_object_loaded(obj);
937 break;
938 }
939 }
940}
941
942int klp_module_coming(struct module *mod)
943{
944 int ret;
945 struct klp_patch *patch;
946 struct klp_object *obj;
947
948 if (WARN_ON(mod->state != MODULE_STATE_COMING))
949 return -EINVAL;
950
951 mutex_lock(&klp_mutex);
952 /*
953 * Each module has to know that klp_module_coming()
954 * has been called. We never know what module will
955 * get patched by a new patch.
956 */
957 mod->klp_alive = true;
958
959 list_for_each_entry(patch, &klp_patches, list) {
960 klp_for_each_object(patch, obj) {
961 if (!klp_is_module(obj) || strcmp(obj->name, mod->name))
962 continue;
963
964 obj->mod = mod;
965
966 ret = klp_init_object_loaded(patch, obj);
967 if (ret) {
968 pr_warn("failed to initialize patch '%s' for module '%s' (%d)\n",
969 patch->mod->name, obj->mod->name, ret);
970 goto err;
971 }
972
973 /*
974 * Only patch the module if the patch is enabled or is
975 * in transition.
976 */
977 if (!patch->enabled && patch != klp_transition_patch)
978 break;
979
980 pr_notice("applying patch '%s' to loading module '%s'\n",
981 patch->mod->name, obj->mod->name);
982
983 ret = klp_pre_patch_callback(obj);
984 if (ret) {
985 pr_warn("pre-patch callback failed for object '%s'\n",
986 obj->name);
987 goto err;
988 }
989
990 ret = klp_patch_object(obj);
991 if (ret) {
992 pr_warn("failed to apply patch '%s' to module '%s' (%d)\n",
993 patch->mod->name, obj->mod->name, ret);
994
995 klp_post_unpatch_callback(obj);
996 goto err;
997 }
998
999 if (patch != klp_transition_patch)
1000 klp_post_patch_callback(obj);
1001
1002 break;
1003 }
1004 }
1005
1006 mutex_unlock(&klp_mutex);
1007
1008 return 0;
1009
1010err:
1011 /*
1012 * If a patch is unsuccessfully applied, return
1013 * error to the module loader.
1014 */
1015 pr_warn("patch '%s' failed for module '%s', refusing to load module '%s'\n",
1016 patch->mod->name, obj->mod->name, obj->mod->name);
1017 mod->klp_alive = false;
1018 klp_cleanup_module_patches_limited(mod, patch);
1019 mutex_unlock(&klp_mutex);
1020
1021 return ret;
1022}
1023
1024void klp_module_going(struct module *mod)
1025{
1026 if (WARN_ON(mod->state != MODULE_STATE_GOING &&
1027 mod->state != MODULE_STATE_COMING))
1028 return;
1029
1030 mutex_lock(&klp_mutex);
1031 /*
1032 * Each module has to know that klp_module_going()
1033 * has been called. We never know what module will
1034 * get patched by a new patch.
1035 */
1036 mod->klp_alive = false;
1037
1038 klp_cleanup_module_patches_limited(mod, NULL);
1039
1040 mutex_unlock(&klp_mutex);
1041}
1042
1043static int __init klp_init(void)
1044{
1045 int ret;
1046
1047 ret = klp_check_compiler_support();
1048 if (ret) {
1049 pr_info("Your compiler is too old; turning off.\n");
1050 return -EINVAL;
1051 }
1052
1053 klp_root_kobj = kobject_create_and_add("livepatch", kernel_kobj);
1054 if (!klp_root_kobj)
1055 return -ENOMEM;
1056
1057 return 0;
1058}
1059
1060module_init(klp_init);
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * core.c - Kernel Live Patching Core
4 *
5 * Copyright (C) 2014 Seth Jennings <sjenning@redhat.com>
6 * Copyright (C) 2014 SUSE
7 */
8
9#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
10
11#include <linux/module.h>
12#include <linux/kernel.h>
13#include <linux/mutex.h>
14#include <linux/slab.h>
15#include <linux/list.h>
16#include <linux/kallsyms.h>
17#include <linux/livepatch.h>
18#include <linux/elf.h>
19#include <linux/moduleloader.h>
20#include <linux/completion.h>
21#include <linux/memory.h>
22#include <asm/cacheflush.h>
23#include "core.h"
24#include "patch.h"
25#include "state.h"
26#include "transition.h"
27
28/*
29 * klp_mutex is a coarse lock which serializes access to klp data. All
30 * accesses to klp-related variables and structures must have mutex protection,
31 * except within the following functions which carefully avoid the need for it:
32 *
33 * - klp_ftrace_handler()
34 * - klp_update_patch_state()
35 */
36DEFINE_MUTEX(klp_mutex);
37
38/*
39 * Actively used patches: enabled or in transition. Note that replaced
40 * or disabled patches are not listed even though the related kernel
41 * module still can be loaded.
42 */
43LIST_HEAD(klp_patches);
44
45static struct kobject *klp_root_kobj;
46
47static bool klp_is_module(struct klp_object *obj)
48{
49 return obj->name;
50}
51
52/* sets obj->mod if object is not vmlinux and module is found */
53static void klp_find_object_module(struct klp_object *obj)
54{
55 struct module *mod;
56
57 if (!klp_is_module(obj))
58 return;
59
60 mutex_lock(&module_mutex);
61 /*
62 * We do not want to block removal of patched modules and therefore
63 * we do not take a reference here. The patches are removed by
64 * klp_module_going() instead.
65 */
66 mod = find_module(obj->name);
67 /*
68 * Do not mess work of klp_module_coming() and klp_module_going().
69 * Note that the patch might still be needed before klp_module_going()
70 * is called. Module functions can be called even in the GOING state
71 * until mod->exit() finishes. This is especially important for
72 * patches that modify semantic of the functions.
73 */
74 if (mod && mod->klp_alive)
75 obj->mod = mod;
76
77 mutex_unlock(&module_mutex);
78}
79
80static bool klp_initialized(void)
81{
82 return !!klp_root_kobj;
83}
84
85static struct klp_func *klp_find_func(struct klp_object *obj,
86 struct klp_func *old_func)
87{
88 struct klp_func *func;
89
90 klp_for_each_func(obj, func) {
91 if ((strcmp(old_func->old_name, func->old_name) == 0) &&
92 (old_func->old_sympos == func->old_sympos)) {
93 return func;
94 }
95 }
96
97 return NULL;
98}
99
100static struct klp_object *klp_find_object(struct klp_patch *patch,
101 struct klp_object *old_obj)
102{
103 struct klp_object *obj;
104
105 klp_for_each_object(patch, obj) {
106 if (klp_is_module(old_obj)) {
107 if (klp_is_module(obj) &&
108 strcmp(old_obj->name, obj->name) == 0) {
109 return obj;
110 }
111 } else if (!klp_is_module(obj)) {
112 return obj;
113 }
114 }
115
116 return NULL;
117}
118
119struct klp_find_arg {
120 const char *objname;
121 const char *name;
122 unsigned long addr;
123 unsigned long count;
124 unsigned long pos;
125};
126
127static int klp_find_callback(void *data, const char *name,
128 struct module *mod, unsigned long addr)
129{
130 struct klp_find_arg *args = data;
131
132 if ((mod && !args->objname) || (!mod && args->objname))
133 return 0;
134
135 if (strcmp(args->name, name))
136 return 0;
137
138 if (args->objname && strcmp(args->objname, mod->name))
139 return 0;
140
141 args->addr = addr;
142 args->count++;
143
144 /*
145 * Finish the search when the symbol is found for the desired position
146 * or the position is not defined for a non-unique symbol.
147 */
148 if ((args->pos && (args->count == args->pos)) ||
149 (!args->pos && (args->count > 1)))
150 return 1;
151
152 return 0;
153}
154
155static int klp_find_object_symbol(const char *objname, const char *name,
156 unsigned long sympos, unsigned long *addr)
157{
158 struct klp_find_arg args = {
159 .objname = objname,
160 .name = name,
161 .addr = 0,
162 .count = 0,
163 .pos = sympos,
164 };
165
166 mutex_lock(&module_mutex);
167 if (objname)
168 module_kallsyms_on_each_symbol(klp_find_callback, &args);
169 else
170 kallsyms_on_each_symbol(klp_find_callback, &args);
171 mutex_unlock(&module_mutex);
172
173 /*
174 * Ensure an address was found. If sympos is 0, ensure symbol is unique;
175 * otherwise ensure the symbol position count matches sympos.
176 */
177 if (args.addr == 0)
178 pr_err("symbol '%s' not found in symbol table\n", name);
179 else if (args.count > 1 && sympos == 0) {
180 pr_err("unresolvable ambiguity for symbol '%s' in object '%s'\n",
181 name, objname);
182 } else if (sympos != args.count && sympos > 0) {
183 pr_err("symbol position %lu for symbol '%s' in object '%s' not found\n",
184 sympos, name, objname ? objname : "vmlinux");
185 } else {
186 *addr = args.addr;
187 return 0;
188 }
189
190 *addr = 0;
191 return -EINVAL;
192}
193
194static int klp_resolve_symbols(Elf64_Shdr *sechdrs, const char *strtab,
195 unsigned int symndx, Elf_Shdr *relasec,
196 const char *sec_objname)
197{
198 int i, cnt, ret;
199 char sym_objname[MODULE_NAME_LEN];
200 char sym_name[KSYM_NAME_LEN];
201 Elf_Rela *relas;
202 Elf_Sym *sym;
203 unsigned long sympos, addr;
204 bool sym_vmlinux;
205 bool sec_vmlinux = !strcmp(sec_objname, "vmlinux");
206
207 /*
208 * Since the field widths for sym_objname and sym_name in the sscanf()
209 * call are hard-coded and correspond to MODULE_NAME_LEN and
210 * KSYM_NAME_LEN respectively, we must make sure that MODULE_NAME_LEN
211 * and KSYM_NAME_LEN have the values we expect them to have.
212 *
213 * Because the value of MODULE_NAME_LEN can differ among architectures,
214 * we use the smallest/strictest upper bound possible (56, based on
215 * the current definition of MODULE_NAME_LEN) to prevent overflows.
216 */
217 BUILD_BUG_ON(MODULE_NAME_LEN < 56 || KSYM_NAME_LEN != 128);
218
219 relas = (Elf_Rela *) relasec->sh_addr;
220 /* For each rela in this klp relocation section */
221 for (i = 0; i < relasec->sh_size / sizeof(Elf_Rela); i++) {
222 sym = (Elf64_Sym *)sechdrs[symndx].sh_addr + ELF_R_SYM(relas[i].r_info);
223 if (sym->st_shndx != SHN_LIVEPATCH) {
224 pr_err("symbol %s is not marked as a livepatch symbol\n",
225 strtab + sym->st_name);
226 return -EINVAL;
227 }
228
229 /* Format: .klp.sym.sym_objname.sym_name,sympos */
230 cnt = sscanf(strtab + sym->st_name,
231 ".klp.sym.%55[^.].%127[^,],%lu",
232 sym_objname, sym_name, &sympos);
233 if (cnt != 3) {
234 pr_err("symbol %s has an incorrectly formatted name\n",
235 strtab + sym->st_name);
236 return -EINVAL;
237 }
238
239 sym_vmlinux = !strcmp(sym_objname, "vmlinux");
240
241 /*
242 * Prevent module-specific KLP rela sections from referencing
243 * vmlinux symbols. This helps prevent ordering issues with
244 * module special section initializations. Presumably such
245 * symbols are exported and normal relas can be used instead.
246 */
247 if (!sec_vmlinux && sym_vmlinux) {
248 pr_err("invalid access to vmlinux symbol '%s' from module-specific livepatch relocation section",
249 sym_name);
250 return -EINVAL;
251 }
252
253 /* klp_find_object_symbol() treats a NULL objname as vmlinux */
254 ret = klp_find_object_symbol(sym_vmlinux ? NULL : sym_objname,
255 sym_name, sympos, &addr);
256 if (ret)
257 return ret;
258
259 sym->st_value = addr;
260 }
261
262 return 0;
263}
264
265/*
266 * At a high-level, there are two types of klp relocation sections: those which
267 * reference symbols which live in vmlinux; and those which reference symbols
268 * which live in other modules. This function is called for both types:
269 *
270 * 1) When a klp module itself loads, the module code calls this function to
271 * write vmlinux-specific klp relocations (.klp.rela.vmlinux.* sections).
272 * These relocations are written to the klp module text to allow the patched
273 * code/data to reference unexported vmlinux symbols. They're written as
274 * early as possible to ensure that other module init code (.e.g.,
275 * jump_label_apply_nops) can access any unexported vmlinux symbols which
276 * might be referenced by the klp module's special sections.
277 *
278 * 2) When a to-be-patched module loads -- or is already loaded when a
279 * corresponding klp module loads -- klp code calls this function to write
280 * module-specific klp relocations (.klp.rela.{module}.* sections). These
281 * are written to the klp module text to allow the patched code/data to
282 * reference symbols which live in the to-be-patched module or one of its
283 * module dependencies. Exported symbols are supported, in addition to
284 * unexported symbols, in order to enable late module patching, which allows
285 * the to-be-patched module to be loaded and patched sometime *after* the
286 * klp module is loaded.
287 */
288int klp_apply_section_relocs(struct module *pmod, Elf_Shdr *sechdrs,
289 const char *shstrtab, const char *strtab,
290 unsigned int symndx, unsigned int secndx,
291 const char *objname)
292{
293 int cnt, ret;
294 char sec_objname[MODULE_NAME_LEN];
295 Elf_Shdr *sec = sechdrs + secndx;
296
297 /*
298 * Format: .klp.rela.sec_objname.section_name
299 * See comment in klp_resolve_symbols() for an explanation
300 * of the selected field width value.
301 */
302 cnt = sscanf(shstrtab + sec->sh_name, ".klp.rela.%55[^.]",
303 sec_objname);
304 if (cnt != 1) {
305 pr_err("section %s has an incorrectly formatted name\n",
306 shstrtab + sec->sh_name);
307 return -EINVAL;
308 }
309
310 if (strcmp(objname ? objname : "vmlinux", sec_objname))
311 return 0;
312
313 ret = klp_resolve_symbols(sechdrs, strtab, symndx, sec, sec_objname);
314 if (ret)
315 return ret;
316
317 return apply_relocate_add(sechdrs, strtab, symndx, secndx, pmod);
318}
319
320/*
321 * Sysfs Interface
322 *
323 * /sys/kernel/livepatch
324 * /sys/kernel/livepatch/<patch>
325 * /sys/kernel/livepatch/<patch>/enabled
326 * /sys/kernel/livepatch/<patch>/transition
327 * /sys/kernel/livepatch/<patch>/force
328 * /sys/kernel/livepatch/<patch>/<object>
329 * /sys/kernel/livepatch/<patch>/<object>/<function,sympos>
330 */
331static int __klp_disable_patch(struct klp_patch *patch);
332
333static ssize_t enabled_store(struct kobject *kobj, struct kobj_attribute *attr,
334 const char *buf, size_t count)
335{
336 struct klp_patch *patch;
337 int ret;
338 bool enabled;
339
340 ret = kstrtobool(buf, &enabled);
341 if (ret)
342 return ret;
343
344 patch = container_of(kobj, struct klp_patch, kobj);
345
346 mutex_lock(&klp_mutex);
347
348 if (patch->enabled == enabled) {
349 /* already in requested state */
350 ret = -EINVAL;
351 goto out;
352 }
353
354 /*
355 * Allow to reverse a pending transition in both ways. It might be
356 * necessary to complete the transition without forcing and breaking
357 * the system integrity.
358 *
359 * Do not allow to re-enable a disabled patch.
360 */
361 if (patch == klp_transition_patch)
362 klp_reverse_transition();
363 else if (!enabled)
364 ret = __klp_disable_patch(patch);
365 else
366 ret = -EINVAL;
367
368out:
369 mutex_unlock(&klp_mutex);
370
371 if (ret)
372 return ret;
373 return count;
374}
375
376static ssize_t enabled_show(struct kobject *kobj,
377 struct kobj_attribute *attr, char *buf)
378{
379 struct klp_patch *patch;
380
381 patch = container_of(kobj, struct klp_patch, kobj);
382 return snprintf(buf, PAGE_SIZE-1, "%d\n", patch->enabled);
383}
384
385static ssize_t transition_show(struct kobject *kobj,
386 struct kobj_attribute *attr, char *buf)
387{
388 struct klp_patch *patch;
389
390 patch = container_of(kobj, struct klp_patch, kobj);
391 return snprintf(buf, PAGE_SIZE-1, "%d\n",
392 patch == klp_transition_patch);
393}
394
395static ssize_t force_store(struct kobject *kobj, struct kobj_attribute *attr,
396 const char *buf, size_t count)
397{
398 struct klp_patch *patch;
399 int ret;
400 bool val;
401
402 ret = kstrtobool(buf, &val);
403 if (ret)
404 return ret;
405
406 if (!val)
407 return count;
408
409 mutex_lock(&klp_mutex);
410
411 patch = container_of(kobj, struct klp_patch, kobj);
412 if (patch != klp_transition_patch) {
413 mutex_unlock(&klp_mutex);
414 return -EINVAL;
415 }
416
417 klp_force_transition();
418
419 mutex_unlock(&klp_mutex);
420
421 return count;
422}
423
424static struct kobj_attribute enabled_kobj_attr = __ATTR_RW(enabled);
425static struct kobj_attribute transition_kobj_attr = __ATTR_RO(transition);
426static struct kobj_attribute force_kobj_attr = __ATTR_WO(force);
427static struct attribute *klp_patch_attrs[] = {
428 &enabled_kobj_attr.attr,
429 &transition_kobj_attr.attr,
430 &force_kobj_attr.attr,
431 NULL
432};
433ATTRIBUTE_GROUPS(klp_patch);
434
435static void klp_free_object_dynamic(struct klp_object *obj)
436{
437 kfree(obj->name);
438 kfree(obj);
439}
440
441static void klp_init_func_early(struct klp_object *obj,
442 struct klp_func *func);
443static void klp_init_object_early(struct klp_patch *patch,
444 struct klp_object *obj);
445
446static struct klp_object *klp_alloc_object_dynamic(const char *name,
447 struct klp_patch *patch)
448{
449 struct klp_object *obj;
450
451 obj = kzalloc(sizeof(*obj), GFP_KERNEL);
452 if (!obj)
453 return NULL;
454
455 if (name) {
456 obj->name = kstrdup(name, GFP_KERNEL);
457 if (!obj->name) {
458 kfree(obj);
459 return NULL;
460 }
461 }
462
463 klp_init_object_early(patch, obj);
464 obj->dynamic = true;
465
466 return obj;
467}
468
469static void klp_free_func_nop(struct klp_func *func)
470{
471 kfree(func->old_name);
472 kfree(func);
473}
474
475static struct klp_func *klp_alloc_func_nop(struct klp_func *old_func,
476 struct klp_object *obj)
477{
478 struct klp_func *func;
479
480 func = kzalloc(sizeof(*func), GFP_KERNEL);
481 if (!func)
482 return NULL;
483
484 if (old_func->old_name) {
485 func->old_name = kstrdup(old_func->old_name, GFP_KERNEL);
486 if (!func->old_name) {
487 kfree(func);
488 return NULL;
489 }
490 }
491
492 klp_init_func_early(obj, func);
493 /*
494 * func->new_func is same as func->old_func. These addresses are
495 * set when the object is loaded, see klp_init_object_loaded().
496 */
497 func->old_sympos = old_func->old_sympos;
498 func->nop = true;
499
500 return func;
501}
502
503static int klp_add_object_nops(struct klp_patch *patch,
504 struct klp_object *old_obj)
505{
506 struct klp_object *obj;
507 struct klp_func *func, *old_func;
508
509 obj = klp_find_object(patch, old_obj);
510
511 if (!obj) {
512 obj = klp_alloc_object_dynamic(old_obj->name, patch);
513 if (!obj)
514 return -ENOMEM;
515 }
516
517 klp_for_each_func(old_obj, old_func) {
518 func = klp_find_func(obj, old_func);
519 if (func)
520 continue;
521
522 func = klp_alloc_func_nop(old_func, obj);
523 if (!func)
524 return -ENOMEM;
525 }
526
527 return 0;
528}
529
530/*
531 * Add 'nop' functions which simply return to the caller to run
532 * the original function. The 'nop' functions are added to a
533 * patch to facilitate a 'replace' mode.
534 */
535static int klp_add_nops(struct klp_patch *patch)
536{
537 struct klp_patch *old_patch;
538 struct klp_object *old_obj;
539
540 klp_for_each_patch(old_patch) {
541 klp_for_each_object(old_patch, old_obj) {
542 int err;
543
544 err = klp_add_object_nops(patch, old_obj);
545 if (err)
546 return err;
547 }
548 }
549
550 return 0;
551}
552
553static void klp_kobj_release_patch(struct kobject *kobj)
554{
555 struct klp_patch *patch;
556
557 patch = container_of(kobj, struct klp_patch, kobj);
558 complete(&patch->finish);
559}
560
561static struct kobj_type klp_ktype_patch = {
562 .release = klp_kobj_release_patch,
563 .sysfs_ops = &kobj_sysfs_ops,
564 .default_groups = klp_patch_groups,
565};
566
567static void klp_kobj_release_object(struct kobject *kobj)
568{
569 struct klp_object *obj;
570
571 obj = container_of(kobj, struct klp_object, kobj);
572
573 if (obj->dynamic)
574 klp_free_object_dynamic(obj);
575}
576
577static struct kobj_type klp_ktype_object = {
578 .release = klp_kobj_release_object,
579 .sysfs_ops = &kobj_sysfs_ops,
580};
581
582static void klp_kobj_release_func(struct kobject *kobj)
583{
584 struct klp_func *func;
585
586 func = container_of(kobj, struct klp_func, kobj);
587
588 if (func->nop)
589 klp_free_func_nop(func);
590}
591
592static struct kobj_type klp_ktype_func = {
593 .release = klp_kobj_release_func,
594 .sysfs_ops = &kobj_sysfs_ops,
595};
596
597static void __klp_free_funcs(struct klp_object *obj, bool nops_only)
598{
599 struct klp_func *func, *tmp_func;
600
601 klp_for_each_func_safe(obj, func, tmp_func) {
602 if (nops_only && !func->nop)
603 continue;
604
605 list_del(&func->node);
606 kobject_put(&func->kobj);
607 }
608}
609
610/* Clean up when a patched object is unloaded */
611static void klp_free_object_loaded(struct klp_object *obj)
612{
613 struct klp_func *func;
614
615 obj->mod = NULL;
616
617 klp_for_each_func(obj, func) {
618 func->old_func = NULL;
619
620 if (func->nop)
621 func->new_func = NULL;
622 }
623}
624
625static void __klp_free_objects(struct klp_patch *patch, bool nops_only)
626{
627 struct klp_object *obj, *tmp_obj;
628
629 klp_for_each_object_safe(patch, obj, tmp_obj) {
630 __klp_free_funcs(obj, nops_only);
631
632 if (nops_only && !obj->dynamic)
633 continue;
634
635 list_del(&obj->node);
636 kobject_put(&obj->kobj);
637 }
638}
639
640static void klp_free_objects(struct klp_patch *patch)
641{
642 __klp_free_objects(patch, false);
643}
644
645static void klp_free_objects_dynamic(struct klp_patch *patch)
646{
647 __klp_free_objects(patch, true);
648}
649
650/*
651 * This function implements the free operations that can be called safely
652 * under klp_mutex.
653 *
654 * The operation must be completed by calling klp_free_patch_finish()
655 * outside klp_mutex.
656 */
657static void klp_free_patch_start(struct klp_patch *patch)
658{
659 if (!list_empty(&patch->list))
660 list_del(&patch->list);
661
662 klp_free_objects(patch);
663}
664
665/*
666 * This function implements the free part that must be called outside
667 * klp_mutex.
668 *
669 * It must be called after klp_free_patch_start(). And it has to be
670 * the last function accessing the livepatch structures when the patch
671 * gets disabled.
672 */
673static void klp_free_patch_finish(struct klp_patch *patch)
674{
675 /*
676 * Avoid deadlock with enabled_store() sysfs callback by
677 * calling this outside klp_mutex. It is safe because
678 * this is called when the patch gets disabled and it
679 * cannot get enabled again.
680 */
681 kobject_put(&patch->kobj);
682 wait_for_completion(&patch->finish);
683
684 /* Put the module after the last access to struct klp_patch. */
685 if (!patch->forced)
686 module_put(patch->mod);
687}
688
689/*
690 * The livepatch might be freed from sysfs interface created by the patch.
691 * This work allows to wait until the interface is destroyed in a separate
692 * context.
693 */
694static void klp_free_patch_work_fn(struct work_struct *work)
695{
696 struct klp_patch *patch =
697 container_of(work, struct klp_patch, free_work);
698
699 klp_free_patch_finish(patch);
700}
701
702void klp_free_patch_async(struct klp_patch *patch)
703{
704 klp_free_patch_start(patch);
705 schedule_work(&patch->free_work);
706}
707
708void klp_free_replaced_patches_async(struct klp_patch *new_patch)
709{
710 struct klp_patch *old_patch, *tmp_patch;
711
712 klp_for_each_patch_safe(old_patch, tmp_patch) {
713 if (old_patch == new_patch)
714 return;
715 klp_free_patch_async(old_patch);
716 }
717}
718
719static int klp_init_func(struct klp_object *obj, struct klp_func *func)
720{
721 if (!func->old_name)
722 return -EINVAL;
723
724 /*
725 * NOPs get the address later. The patched module must be loaded,
726 * see klp_init_object_loaded().
727 */
728 if (!func->new_func && !func->nop)
729 return -EINVAL;
730
731 if (strlen(func->old_name) >= KSYM_NAME_LEN)
732 return -EINVAL;
733
734 INIT_LIST_HEAD(&func->stack_node);
735 func->patched = false;
736 func->transition = false;
737
738 /* The format for the sysfs directory is <function,sympos> where sympos
739 * is the nth occurrence of this symbol in kallsyms for the patched
740 * object. If the user selects 0 for old_sympos, then 1 will be used
741 * since a unique symbol will be the first occurrence.
742 */
743 return kobject_add(&func->kobj, &obj->kobj, "%s,%lu",
744 func->old_name,
745 func->old_sympos ? func->old_sympos : 1);
746}
747
748static int klp_apply_object_relocs(struct klp_patch *patch,
749 struct klp_object *obj)
750{
751 int i, ret;
752 struct klp_modinfo *info = patch->mod->klp_info;
753
754 for (i = 1; i < info->hdr.e_shnum; i++) {
755 Elf_Shdr *sec = info->sechdrs + i;
756
757 if (!(sec->sh_flags & SHF_RELA_LIVEPATCH))
758 continue;
759
760 ret = klp_apply_section_relocs(patch->mod, info->sechdrs,
761 info->secstrings,
762 patch->mod->core_kallsyms.strtab,
763 info->symndx, i, obj->name);
764 if (ret)
765 return ret;
766 }
767
768 return 0;
769}
770
771/* parts of the initialization that is done only when the object is loaded */
772static int klp_init_object_loaded(struct klp_patch *patch,
773 struct klp_object *obj)
774{
775 struct klp_func *func;
776 int ret;
777
778 if (klp_is_module(obj)) {
779 /*
780 * Only write module-specific relocations here
781 * (.klp.rela.{module}.*). vmlinux-specific relocations were
782 * written earlier during the initialization of the klp module
783 * itself.
784 */
785 ret = klp_apply_object_relocs(patch, obj);
786 if (ret)
787 return ret;
788 }
789
790 klp_for_each_func(obj, func) {
791 ret = klp_find_object_symbol(obj->name, func->old_name,
792 func->old_sympos,
793 (unsigned long *)&func->old_func);
794 if (ret)
795 return ret;
796
797 ret = kallsyms_lookup_size_offset((unsigned long)func->old_func,
798 &func->old_size, NULL);
799 if (!ret) {
800 pr_err("kallsyms size lookup failed for '%s'\n",
801 func->old_name);
802 return -ENOENT;
803 }
804
805 if (func->nop)
806 func->new_func = func->old_func;
807
808 ret = kallsyms_lookup_size_offset((unsigned long)func->new_func,
809 &func->new_size, NULL);
810 if (!ret) {
811 pr_err("kallsyms size lookup failed for '%s' replacement\n",
812 func->old_name);
813 return -ENOENT;
814 }
815 }
816
817 return 0;
818}
819
820static int klp_init_object(struct klp_patch *patch, struct klp_object *obj)
821{
822 struct klp_func *func;
823 int ret;
824 const char *name;
825
826 if (klp_is_module(obj) && strlen(obj->name) >= MODULE_NAME_LEN)
827 return -EINVAL;
828
829 obj->patched = false;
830 obj->mod = NULL;
831
832 klp_find_object_module(obj);
833
834 name = klp_is_module(obj) ? obj->name : "vmlinux";
835 ret = kobject_add(&obj->kobj, &patch->kobj, "%s", name);
836 if (ret)
837 return ret;
838
839 klp_for_each_func(obj, func) {
840 ret = klp_init_func(obj, func);
841 if (ret)
842 return ret;
843 }
844
845 if (klp_is_object_loaded(obj))
846 ret = klp_init_object_loaded(patch, obj);
847
848 return ret;
849}
850
851static void klp_init_func_early(struct klp_object *obj,
852 struct klp_func *func)
853{
854 kobject_init(&func->kobj, &klp_ktype_func);
855 list_add_tail(&func->node, &obj->func_list);
856}
857
858static void klp_init_object_early(struct klp_patch *patch,
859 struct klp_object *obj)
860{
861 INIT_LIST_HEAD(&obj->func_list);
862 kobject_init(&obj->kobj, &klp_ktype_object);
863 list_add_tail(&obj->node, &patch->obj_list);
864}
865
866static int klp_init_patch_early(struct klp_patch *patch)
867{
868 struct klp_object *obj;
869 struct klp_func *func;
870
871 if (!patch->objs)
872 return -EINVAL;
873
874 INIT_LIST_HEAD(&patch->list);
875 INIT_LIST_HEAD(&patch->obj_list);
876 kobject_init(&patch->kobj, &klp_ktype_patch);
877 patch->enabled = false;
878 patch->forced = false;
879 INIT_WORK(&patch->free_work, klp_free_patch_work_fn);
880 init_completion(&patch->finish);
881
882 klp_for_each_object_static(patch, obj) {
883 if (!obj->funcs)
884 return -EINVAL;
885
886 klp_init_object_early(patch, obj);
887
888 klp_for_each_func_static(obj, func) {
889 klp_init_func_early(obj, func);
890 }
891 }
892
893 if (!try_module_get(patch->mod))
894 return -ENODEV;
895
896 return 0;
897}
898
899static int klp_init_patch(struct klp_patch *patch)
900{
901 struct klp_object *obj;
902 int ret;
903
904 ret = kobject_add(&patch->kobj, klp_root_kobj, "%s", patch->mod->name);
905 if (ret)
906 return ret;
907
908 if (patch->replace) {
909 ret = klp_add_nops(patch);
910 if (ret)
911 return ret;
912 }
913
914 klp_for_each_object(patch, obj) {
915 ret = klp_init_object(patch, obj);
916 if (ret)
917 return ret;
918 }
919
920 list_add_tail(&patch->list, &klp_patches);
921
922 return 0;
923}
924
925static int __klp_disable_patch(struct klp_patch *patch)
926{
927 struct klp_object *obj;
928
929 if (WARN_ON(!patch->enabled))
930 return -EINVAL;
931
932 if (klp_transition_patch)
933 return -EBUSY;
934
935 klp_init_transition(patch, KLP_UNPATCHED);
936
937 klp_for_each_object(patch, obj)
938 if (obj->patched)
939 klp_pre_unpatch_callback(obj);
940
941 /*
942 * Enforce the order of the func->transition writes in
943 * klp_init_transition() and the TIF_PATCH_PENDING writes in
944 * klp_start_transition(). In the rare case where klp_ftrace_handler()
945 * is called shortly after klp_update_patch_state() switches the task,
946 * this ensures the handler sees that func->transition is set.
947 */
948 smp_wmb();
949
950 klp_start_transition();
951 patch->enabled = false;
952 klp_try_complete_transition();
953
954 return 0;
955}
956
957static int __klp_enable_patch(struct klp_patch *patch)
958{
959 struct klp_object *obj;
960 int ret;
961
962 if (klp_transition_patch)
963 return -EBUSY;
964
965 if (WARN_ON(patch->enabled))
966 return -EINVAL;
967
968 pr_notice("enabling patch '%s'\n", patch->mod->name);
969
970 klp_init_transition(patch, KLP_PATCHED);
971
972 /*
973 * Enforce the order of the func->transition writes in
974 * klp_init_transition() and the ops->func_stack writes in
975 * klp_patch_object(), so that klp_ftrace_handler() will see the
976 * func->transition updates before the handler is registered and the
977 * new funcs become visible to the handler.
978 */
979 smp_wmb();
980
981 klp_for_each_object(patch, obj) {
982 if (!klp_is_object_loaded(obj))
983 continue;
984
985 ret = klp_pre_patch_callback(obj);
986 if (ret) {
987 pr_warn("pre-patch callback failed for object '%s'\n",
988 klp_is_module(obj) ? obj->name : "vmlinux");
989 goto err;
990 }
991
992 ret = klp_patch_object(obj);
993 if (ret) {
994 pr_warn("failed to patch object '%s'\n",
995 klp_is_module(obj) ? obj->name : "vmlinux");
996 goto err;
997 }
998 }
999
1000 klp_start_transition();
1001 patch->enabled = true;
1002 klp_try_complete_transition();
1003
1004 return 0;
1005err:
1006 pr_warn("failed to enable patch '%s'\n", patch->mod->name);
1007
1008 klp_cancel_transition();
1009 return ret;
1010}
1011
1012/**
1013 * klp_enable_patch() - enable the livepatch
1014 * @patch: patch to be enabled
1015 *
1016 * Initializes the data structure associated with the patch, creates the sysfs
1017 * interface, performs the needed symbol lookups and code relocations,
1018 * registers the patched functions with ftrace.
1019 *
1020 * This function is supposed to be called from the livepatch module_init()
1021 * callback.
1022 *
1023 * Return: 0 on success, otherwise error
1024 */
1025int klp_enable_patch(struct klp_patch *patch)
1026{
1027 int ret;
1028
1029 if (!patch || !patch->mod)
1030 return -EINVAL;
1031
1032 if (!is_livepatch_module(patch->mod)) {
1033 pr_err("module %s is not marked as a livepatch module\n",
1034 patch->mod->name);
1035 return -EINVAL;
1036 }
1037
1038 if (!klp_initialized())
1039 return -ENODEV;
1040
1041 if (!klp_have_reliable_stack()) {
1042 pr_warn("This architecture doesn't have support for the livepatch consistency model.\n");
1043 pr_warn("The livepatch transition may never complete.\n");
1044 }
1045
1046 mutex_lock(&klp_mutex);
1047
1048 if (!klp_is_patch_compatible(patch)) {
1049 pr_err("Livepatch patch (%s) is not compatible with the already installed livepatches.\n",
1050 patch->mod->name);
1051 mutex_unlock(&klp_mutex);
1052 return -EINVAL;
1053 }
1054
1055 ret = klp_init_patch_early(patch);
1056 if (ret) {
1057 mutex_unlock(&klp_mutex);
1058 return ret;
1059 }
1060
1061 ret = klp_init_patch(patch);
1062 if (ret)
1063 goto err;
1064
1065 ret = __klp_enable_patch(patch);
1066 if (ret)
1067 goto err;
1068
1069 mutex_unlock(&klp_mutex);
1070
1071 return 0;
1072
1073err:
1074 klp_free_patch_start(patch);
1075
1076 mutex_unlock(&klp_mutex);
1077
1078 klp_free_patch_finish(patch);
1079
1080 return ret;
1081}
1082EXPORT_SYMBOL_GPL(klp_enable_patch);
1083
1084/*
1085 * This function unpatches objects from the replaced livepatches.
1086 *
1087 * We could be pretty aggressive here. It is called in the situation where
1088 * these structures are no longer accessed from the ftrace handler.
1089 * All functions are redirected by the klp_transition_patch. They
1090 * use either a new code or they are in the original code because
1091 * of the special nop function patches.
1092 *
1093 * The only exception is when the transition was forced. In this case,
1094 * klp_ftrace_handler() might still see the replaced patch on the stack.
1095 * Fortunately, it is carefully designed to work with removed functions
1096 * thanks to RCU. We only have to keep the patches on the system. Also
1097 * this is handled transparently by patch->module_put.
1098 */
1099void klp_unpatch_replaced_patches(struct klp_patch *new_patch)
1100{
1101 struct klp_patch *old_patch;
1102
1103 klp_for_each_patch(old_patch) {
1104 if (old_patch == new_patch)
1105 return;
1106
1107 old_patch->enabled = false;
1108 klp_unpatch_objects(old_patch);
1109 }
1110}
1111
1112/*
1113 * This function removes the dynamically allocated 'nop' functions.
1114 *
1115 * We could be pretty aggressive. NOPs do not change the existing
1116 * behavior except for adding unnecessary delay by the ftrace handler.
1117 *
1118 * It is safe even when the transition was forced. The ftrace handler
1119 * will see a valid ops->func_stack entry thanks to RCU.
1120 *
1121 * We could even free the NOPs structures. They must be the last entry
1122 * in ops->func_stack. Therefore unregister_ftrace_function() is called.
1123 * It does the same as klp_synchronize_transition() to make sure that
1124 * nobody is inside the ftrace handler once the operation finishes.
1125 *
1126 * IMPORTANT: It must be called right after removing the replaced patches!
1127 */
1128void klp_discard_nops(struct klp_patch *new_patch)
1129{
1130 klp_unpatch_objects_dynamic(klp_transition_patch);
1131 klp_free_objects_dynamic(klp_transition_patch);
1132}
1133
1134/*
1135 * Remove parts of patches that touch a given kernel module. The list of
1136 * patches processed might be limited. When limit is NULL, all patches
1137 * will be handled.
1138 */
1139static void klp_cleanup_module_patches_limited(struct module *mod,
1140 struct klp_patch *limit)
1141{
1142 struct klp_patch *patch;
1143 struct klp_object *obj;
1144
1145 klp_for_each_patch(patch) {
1146 if (patch == limit)
1147 break;
1148
1149 klp_for_each_object(patch, obj) {
1150 if (!klp_is_module(obj) || strcmp(obj->name, mod->name))
1151 continue;
1152
1153 if (patch != klp_transition_patch)
1154 klp_pre_unpatch_callback(obj);
1155
1156 pr_notice("reverting patch '%s' on unloading module '%s'\n",
1157 patch->mod->name, obj->mod->name);
1158 klp_unpatch_object(obj);
1159
1160 klp_post_unpatch_callback(obj);
1161
1162 klp_free_object_loaded(obj);
1163 break;
1164 }
1165 }
1166}
1167
1168int klp_module_coming(struct module *mod)
1169{
1170 int ret;
1171 struct klp_patch *patch;
1172 struct klp_object *obj;
1173
1174 if (WARN_ON(mod->state != MODULE_STATE_COMING))
1175 return -EINVAL;
1176
1177 if (!strcmp(mod->name, "vmlinux")) {
1178 pr_err("vmlinux.ko: invalid module name");
1179 return -EINVAL;
1180 }
1181
1182 mutex_lock(&klp_mutex);
1183 /*
1184 * Each module has to know that klp_module_coming()
1185 * has been called. We never know what module will
1186 * get patched by a new patch.
1187 */
1188 mod->klp_alive = true;
1189
1190 klp_for_each_patch(patch) {
1191 klp_for_each_object(patch, obj) {
1192 if (!klp_is_module(obj) || strcmp(obj->name, mod->name))
1193 continue;
1194
1195 obj->mod = mod;
1196
1197 ret = klp_init_object_loaded(patch, obj);
1198 if (ret) {
1199 pr_warn("failed to initialize patch '%s' for module '%s' (%d)\n",
1200 patch->mod->name, obj->mod->name, ret);
1201 goto err;
1202 }
1203
1204 pr_notice("applying patch '%s' to loading module '%s'\n",
1205 patch->mod->name, obj->mod->name);
1206
1207 ret = klp_pre_patch_callback(obj);
1208 if (ret) {
1209 pr_warn("pre-patch callback failed for object '%s'\n",
1210 obj->name);
1211 goto err;
1212 }
1213
1214 ret = klp_patch_object(obj);
1215 if (ret) {
1216 pr_warn("failed to apply patch '%s' to module '%s' (%d)\n",
1217 patch->mod->name, obj->mod->name, ret);
1218
1219 klp_post_unpatch_callback(obj);
1220 goto err;
1221 }
1222
1223 if (patch != klp_transition_patch)
1224 klp_post_patch_callback(obj);
1225
1226 break;
1227 }
1228 }
1229
1230 mutex_unlock(&klp_mutex);
1231
1232 return 0;
1233
1234err:
1235 /*
1236 * If a patch is unsuccessfully applied, return
1237 * error to the module loader.
1238 */
1239 pr_warn("patch '%s' failed for module '%s', refusing to load module '%s'\n",
1240 patch->mod->name, obj->mod->name, obj->mod->name);
1241 mod->klp_alive = false;
1242 obj->mod = NULL;
1243 klp_cleanup_module_patches_limited(mod, patch);
1244 mutex_unlock(&klp_mutex);
1245
1246 return ret;
1247}
1248
1249void klp_module_going(struct module *mod)
1250{
1251 if (WARN_ON(mod->state != MODULE_STATE_GOING &&
1252 mod->state != MODULE_STATE_COMING))
1253 return;
1254
1255 mutex_lock(&klp_mutex);
1256 /*
1257 * Each module has to know that klp_module_going()
1258 * has been called. We never know what module will
1259 * get patched by a new patch.
1260 */
1261 mod->klp_alive = false;
1262
1263 klp_cleanup_module_patches_limited(mod, NULL);
1264
1265 mutex_unlock(&klp_mutex);
1266}
1267
1268static int __init klp_init(void)
1269{
1270 klp_root_kobj = kobject_create_and_add("livepatch", kernel_kobj);
1271 if (!klp_root_kobj)
1272 return -ENOMEM;
1273
1274 return 0;
1275}
1276
1277module_init(klp_init);