objtool: UNWIND_HINT_RET_OFFSET should not check registers
[platform/kernel/linux-rpi.git] / tools / objtool / check.c
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * Copyright (C) 2015-2017 Josh Poimboeuf <jpoimboe@redhat.com>
4  */
5
6 #include <string.h>
7 #include <stdlib.h>
8
9 #include "builtin.h"
10 #include "check.h"
11 #include "elf.h"
12 #include "special.h"
13 #include "arch.h"
14 #include "warn.h"
15
16 #include <linux/hashtable.h>
17 #include <linux/kernel.h>
18
19 #define FAKE_JUMP_OFFSET -1
20
21 #define C_JUMP_TABLE_SECTION ".rodata..c_jump_table"
22
23 struct alternative {
24         struct list_head list;
25         struct instruction *insn;
26         bool skip_orig;
27 };
28
29 const char *objname;
30 struct cfi_init_state initial_func_cfi;
31
32 struct instruction *find_insn(struct objtool_file *file,
33                               struct section *sec, unsigned long offset)
34 {
35         struct instruction *insn;
36
37         hash_for_each_possible(file->insn_hash, insn, hash, sec_offset_hash(sec, offset)) {
38                 if (insn->sec == sec && insn->offset == offset)
39                         return insn;
40         }
41
42         return NULL;
43 }
44
45 static struct instruction *next_insn_same_sec(struct objtool_file *file,
46                                               struct instruction *insn)
47 {
48         struct instruction *next = list_next_entry(insn, list);
49
50         if (!next || &next->list == &file->insn_list || next->sec != insn->sec)
51                 return NULL;
52
53         return next;
54 }
55
56 static struct instruction *next_insn_same_func(struct objtool_file *file,
57                                                struct instruction *insn)
58 {
59         struct instruction *next = list_next_entry(insn, list);
60         struct symbol *func = insn->func;
61
62         if (!func)
63                 return NULL;
64
65         if (&next->list != &file->insn_list && next->func == func)
66                 return next;
67
68         /* Check if we're already in the subfunction: */
69         if (func == func->cfunc)
70                 return NULL;
71
72         /* Move to the subfunction: */
73         return find_insn(file, func->cfunc->sec, func->cfunc->offset);
74 }
75
76 #define func_for_each_insn(file, func, insn)                            \
77         for (insn = find_insn(file, func->sec, func->offset);           \
78              insn;                                                      \
79              insn = next_insn_same_func(file, insn))
80
81 #define sym_for_each_insn(file, sym, insn)                              \
82         for (insn = find_insn(file, sym->sec, sym->offset);             \
83              insn && &insn->list != &file->insn_list &&                 \
84                 insn->sec == sym->sec &&                                \
85                 insn->offset < sym->offset + sym->len;                  \
86              insn = list_next_entry(insn, list))
87
88 #define sym_for_each_insn_continue_reverse(file, sym, insn)             \
89         for (insn = list_prev_entry(insn, list);                        \
90              &insn->list != &file->insn_list &&                         \
91                 insn->sec == sym->sec && insn->offset >= sym->offset;   \
92              insn = list_prev_entry(insn, list))
93
94 #define sec_for_each_insn_from(file, insn)                              \
95         for (; insn; insn = next_insn_same_sec(file, insn))
96
97 #define sec_for_each_insn_continue(file, insn)                          \
98         for (insn = next_insn_same_sec(file, insn); insn;               \
99              insn = next_insn_same_sec(file, insn))
100
101 static bool is_static_jump(struct instruction *insn)
102 {
103         return insn->type == INSN_JUMP_CONDITIONAL ||
104                insn->type == INSN_JUMP_UNCONDITIONAL;
105 }
106
107 static bool is_sibling_call(struct instruction *insn)
108 {
109         /* An indirect jump is either a sibling call or a jump to a table. */
110         if (insn->type == INSN_JUMP_DYNAMIC)
111                 return list_empty(&insn->alts);
112
113         if (!is_static_jump(insn))
114                 return false;
115
116         /* add_jump_destinations() sets insn->call_dest for sibling calls. */
117         return !!insn->call_dest;
118 }
119
120 /*
121  * This checks to see if the given function is a "noreturn" function.
122  *
123  * For global functions which are outside the scope of this object file, we
124  * have to keep a manual list of them.
125  *
126  * For local functions, we have to detect them manually by simply looking for
127  * the lack of a return instruction.
128  */
129 static bool __dead_end_function(struct objtool_file *file, struct symbol *func,
130                                 int recursion)
131 {
132         int i;
133         struct instruction *insn;
134         bool empty = true;
135
136         /*
137          * Unfortunately these have to be hard coded because the noreturn
138          * attribute isn't provided in ELF data.
139          */
140         static const char * const global_noreturns[] = {
141                 "__stack_chk_fail",
142                 "panic",
143                 "do_exit",
144                 "do_task_dead",
145                 "__module_put_and_exit",
146                 "complete_and_exit",
147                 "__reiserfs_panic",
148                 "lbug_with_loc",
149                 "fortify_panic",
150                 "usercopy_abort",
151                 "machine_real_restart",
152                 "rewind_stack_do_exit",
153                 "kunit_try_catch_throw",
154         };
155
156         if (!func)
157                 return false;
158
159         if (func->bind == STB_WEAK)
160                 return false;
161
162         if (func->bind == STB_GLOBAL)
163                 for (i = 0; i < ARRAY_SIZE(global_noreturns); i++)
164                         if (!strcmp(func->name, global_noreturns[i]))
165                                 return true;
166
167         if (!func->len)
168                 return false;
169
170         insn = find_insn(file, func->sec, func->offset);
171         if (!insn->func)
172                 return false;
173
174         func_for_each_insn(file, func, insn) {
175                 empty = false;
176
177                 if (insn->type == INSN_RETURN)
178                         return false;
179         }
180
181         if (empty)
182                 return false;
183
184         /*
185          * A function can have a sibling call instead of a return.  In that
186          * case, the function's dead-end status depends on whether the target
187          * of the sibling call returns.
188          */
189         func_for_each_insn(file, func, insn) {
190                 if (is_sibling_call(insn)) {
191                         struct instruction *dest = insn->jump_dest;
192
193                         if (!dest)
194                                 /* sibling call to another file */
195                                 return false;
196
197                         /* local sibling call */
198                         if (recursion == 5) {
199                                 /*
200                                  * Infinite recursion: two functions have
201                                  * sibling calls to each other.  This is a very
202                                  * rare case.  It means they aren't dead ends.
203                                  */
204                                 return false;
205                         }
206
207                         return __dead_end_function(file, dest->func, recursion+1);
208                 }
209         }
210
211         return true;
212 }
213
214 static bool dead_end_function(struct objtool_file *file, struct symbol *func)
215 {
216         return __dead_end_function(file, func, 0);
217 }
218
219 static void init_cfi_state(struct cfi_state *cfi)
220 {
221         int i;
222
223         for (i = 0; i < CFI_NUM_REGS; i++) {
224                 cfi->regs[i].base = CFI_UNDEFINED;
225                 cfi->vals[i].base = CFI_UNDEFINED;
226         }
227         cfi->cfa.base = CFI_UNDEFINED;
228         cfi->drap_reg = CFI_UNDEFINED;
229         cfi->drap_offset = -1;
230 }
231
232 static void init_insn_state(struct insn_state *state, struct section *sec)
233 {
234         memset(state, 0, sizeof(*state));
235         init_cfi_state(&state->cfi);
236
237         /*
238          * We need the full vmlinux for noinstr validation, otherwise we can
239          * not correctly determine insn->call_dest->sec (external symbols do
240          * not have a section).
241          */
242         if (vmlinux && sec)
243                 state->noinstr = sec->noinstr;
244 }
245
246 /*
247  * Call the arch-specific instruction decoder for all the instructions and add
248  * them to the global instruction list.
249  */
250 static int decode_instructions(struct objtool_file *file)
251 {
252         struct section *sec;
253         struct symbol *func;
254         unsigned long offset;
255         struct instruction *insn;
256         unsigned long nr_insns = 0;
257         int ret;
258
259         for_each_sec(file, sec) {
260
261                 if (!(sec->sh.sh_flags & SHF_EXECINSTR))
262                         continue;
263
264                 if (strcmp(sec->name, ".altinstr_replacement") &&
265                     strcmp(sec->name, ".altinstr_aux") &&
266                     strncmp(sec->name, ".discard.", 9))
267                         sec->text = true;
268
269                 if (!strcmp(sec->name, ".noinstr.text") ||
270                     !strcmp(sec->name, ".entry.text"))
271                         sec->noinstr = true;
272
273                 for (offset = 0; offset < sec->len; offset += insn->len) {
274                         insn = malloc(sizeof(*insn));
275                         if (!insn) {
276                                 WARN("malloc failed");
277                                 return -1;
278                         }
279                         memset(insn, 0, sizeof(*insn));
280                         INIT_LIST_HEAD(&insn->alts);
281                         INIT_LIST_HEAD(&insn->stack_ops);
282                         init_cfi_state(&insn->cfi);
283
284                         insn->sec = sec;
285                         insn->offset = offset;
286
287                         ret = arch_decode_instruction(file->elf, sec, offset,
288                                                       sec->len - offset,
289                                                       &insn->len, &insn->type,
290                                                       &insn->immediate,
291                                                       &insn->stack_ops);
292                         if (ret)
293                                 goto err;
294
295                         hash_add(file->insn_hash, &insn->hash, sec_offset_hash(sec, insn->offset));
296                         list_add_tail(&insn->list, &file->insn_list);
297                         nr_insns++;
298                 }
299
300                 list_for_each_entry(func, &sec->symbol_list, list) {
301                         if (func->type != STT_FUNC || func->alias != func)
302                                 continue;
303
304                         if (!find_insn(file, sec, func->offset)) {
305                                 WARN("%s(): can't find starting instruction",
306                                      func->name);
307                                 return -1;
308                         }
309
310                         sym_for_each_insn(file, func, insn)
311                                 insn->func = func;
312                 }
313         }
314
315         if (stats)
316                 printf("nr_insns: %lu\n", nr_insns);
317
318         return 0;
319
320 err:
321         free(insn);
322         return ret;
323 }
324
325 /*
326  * Mark "ud2" instructions and manually annotated dead ends.
327  */
328 static int add_dead_ends(struct objtool_file *file)
329 {
330         struct section *sec;
331         struct rela *rela;
332         struct instruction *insn;
333         bool found;
334
335         /*
336          * By default, "ud2" is a dead end unless otherwise annotated, because
337          * GCC 7 inserts it for certain divide-by-zero cases.
338          */
339         for_each_insn(file, insn)
340                 if (insn->type == INSN_BUG)
341                         insn->dead_end = true;
342
343         /*
344          * Check for manually annotated dead ends.
345          */
346         sec = find_section_by_name(file->elf, ".rela.discard.unreachable");
347         if (!sec)
348                 goto reachable;
349
350         list_for_each_entry(rela, &sec->rela_list, list) {
351                 if (rela->sym->type != STT_SECTION) {
352                         WARN("unexpected relocation symbol type in %s", sec->name);
353                         return -1;
354                 }
355                 insn = find_insn(file, rela->sym->sec, rela->addend);
356                 if (insn)
357                         insn = list_prev_entry(insn, list);
358                 else if (rela->addend == rela->sym->sec->len) {
359                         found = false;
360                         list_for_each_entry_reverse(insn, &file->insn_list, list) {
361                                 if (insn->sec == rela->sym->sec) {
362                                         found = true;
363                                         break;
364                                 }
365                         }
366
367                         if (!found) {
368                                 WARN("can't find unreachable insn at %s+0x%x",
369                                      rela->sym->sec->name, rela->addend);
370                                 return -1;
371                         }
372                 } else {
373                         WARN("can't find unreachable insn at %s+0x%x",
374                              rela->sym->sec->name, rela->addend);
375                         return -1;
376                 }
377
378                 insn->dead_end = true;
379         }
380
381 reachable:
382         /*
383          * These manually annotated reachable checks are needed for GCC 4.4,
384          * where the Linux unreachable() macro isn't supported.  In that case
385          * GCC doesn't know the "ud2" is fatal, so it generates code as if it's
386          * not a dead end.
387          */
388         sec = find_section_by_name(file->elf, ".rela.discard.reachable");
389         if (!sec)
390                 return 0;
391
392         list_for_each_entry(rela, &sec->rela_list, list) {
393                 if (rela->sym->type != STT_SECTION) {
394                         WARN("unexpected relocation symbol type in %s", sec->name);
395                         return -1;
396                 }
397                 insn = find_insn(file, rela->sym->sec, rela->addend);
398                 if (insn)
399                         insn = list_prev_entry(insn, list);
400                 else if (rela->addend == rela->sym->sec->len) {
401                         found = false;
402                         list_for_each_entry_reverse(insn, &file->insn_list, list) {
403                                 if (insn->sec == rela->sym->sec) {
404                                         found = true;
405                                         break;
406                                 }
407                         }
408
409                         if (!found) {
410                                 WARN("can't find reachable insn at %s+0x%x",
411                                      rela->sym->sec->name, rela->addend);
412                                 return -1;
413                         }
414                 } else {
415                         WARN("can't find reachable insn at %s+0x%x",
416                              rela->sym->sec->name, rela->addend);
417                         return -1;
418                 }
419
420                 insn->dead_end = false;
421         }
422
423         return 0;
424 }
425
426 /*
427  * Warnings shouldn't be reported for ignored functions.
428  */
429 static void add_ignores(struct objtool_file *file)
430 {
431         struct instruction *insn;
432         struct section *sec;
433         struct symbol *func;
434         struct rela *rela;
435
436         sec = find_section_by_name(file->elf, ".rela.discard.func_stack_frame_non_standard");
437         if (!sec)
438                 return;
439
440         list_for_each_entry(rela, &sec->rela_list, list) {
441                 switch (rela->sym->type) {
442                 case STT_FUNC:
443                         func = rela->sym;
444                         break;
445
446                 case STT_SECTION:
447                         func = find_func_by_offset(rela->sym->sec, rela->addend);
448                         if (!func)
449                                 continue;
450                         break;
451
452                 default:
453                         WARN("unexpected relocation symbol type in %s: %d", sec->name, rela->sym->type);
454                         continue;
455                 }
456
457                 func_for_each_insn(file, func, insn)
458                         insn->ignore = true;
459         }
460 }
461
462 /*
463  * This is a whitelist of functions that is allowed to be called with AC set.
464  * The list is meant to be minimal and only contains compiler instrumentation
465  * ABI and a few functions used to implement *_{to,from}_user() functions.
466  *
467  * These functions must not directly change AC, but may PUSHF/POPF.
468  */
469 static const char *uaccess_safe_builtin[] = {
470         /* KASAN */
471         "kasan_report",
472         "check_memory_region",
473         /* KASAN out-of-line */
474         "__asan_loadN_noabort",
475         "__asan_load1_noabort",
476         "__asan_load2_noabort",
477         "__asan_load4_noabort",
478         "__asan_load8_noabort",
479         "__asan_load16_noabort",
480         "__asan_storeN_noabort",
481         "__asan_store1_noabort",
482         "__asan_store2_noabort",
483         "__asan_store4_noabort",
484         "__asan_store8_noabort",
485         "__asan_store16_noabort",
486         /* KASAN in-line */
487         "__asan_report_load_n_noabort",
488         "__asan_report_load1_noabort",
489         "__asan_report_load2_noabort",
490         "__asan_report_load4_noabort",
491         "__asan_report_load8_noabort",
492         "__asan_report_load16_noabort",
493         "__asan_report_store_n_noabort",
494         "__asan_report_store1_noabort",
495         "__asan_report_store2_noabort",
496         "__asan_report_store4_noabort",
497         "__asan_report_store8_noabort",
498         "__asan_report_store16_noabort",
499         /* KCOV */
500         "write_comp_data",
501         "__sanitizer_cov_trace_pc",
502         "__sanitizer_cov_trace_const_cmp1",
503         "__sanitizer_cov_trace_const_cmp2",
504         "__sanitizer_cov_trace_const_cmp4",
505         "__sanitizer_cov_trace_const_cmp8",
506         "__sanitizer_cov_trace_cmp1",
507         "__sanitizer_cov_trace_cmp2",
508         "__sanitizer_cov_trace_cmp4",
509         "__sanitizer_cov_trace_cmp8",
510         "__sanitizer_cov_trace_switch",
511         /* UBSAN */
512         "ubsan_type_mismatch_common",
513         "__ubsan_handle_type_mismatch",
514         "__ubsan_handle_type_mismatch_v1",
515         "__ubsan_handle_shift_out_of_bounds",
516         /* misc */
517         "csum_partial_copy_generic",
518         "__memcpy_mcsafe",
519         "mcsafe_handle_tail",
520         "ftrace_likely_update", /* CONFIG_TRACE_BRANCH_PROFILING */
521         NULL
522 };
523
524 static void add_uaccess_safe(struct objtool_file *file)
525 {
526         struct symbol *func;
527         const char **name;
528
529         if (!uaccess)
530                 return;
531
532         for (name = uaccess_safe_builtin; *name; name++) {
533                 func = find_symbol_by_name(file->elf, *name);
534                 if (!func)
535                         continue;
536
537                 func->uaccess_safe = true;
538         }
539 }
540
541 /*
542  * FIXME: For now, just ignore any alternatives which add retpolines.  This is
543  * a temporary hack, as it doesn't allow ORC to unwind from inside a retpoline.
544  * But it at least allows objtool to understand the control flow *around* the
545  * retpoline.
546  */
547 static int add_ignore_alternatives(struct objtool_file *file)
548 {
549         struct section *sec;
550         struct rela *rela;
551         struct instruction *insn;
552
553         sec = find_section_by_name(file->elf, ".rela.discard.ignore_alts");
554         if (!sec)
555                 return 0;
556
557         list_for_each_entry(rela, &sec->rela_list, list) {
558                 if (rela->sym->type != STT_SECTION) {
559                         WARN("unexpected relocation symbol type in %s", sec->name);
560                         return -1;
561                 }
562
563                 insn = find_insn(file, rela->sym->sec, rela->addend);
564                 if (!insn) {
565                         WARN("bad .discard.ignore_alts entry");
566                         return -1;
567                 }
568
569                 insn->ignore_alts = true;
570         }
571
572         return 0;
573 }
574
575 /*
576  * Find the destination instructions for all jumps.
577  */
578 static int add_jump_destinations(struct objtool_file *file)
579 {
580         struct instruction *insn;
581         struct rela *rela;
582         struct section *dest_sec;
583         unsigned long dest_off;
584
585         for_each_insn(file, insn) {
586                 if (!is_static_jump(insn))
587                         continue;
588
589                 if (insn->ignore || insn->offset == FAKE_JUMP_OFFSET)
590                         continue;
591
592                 rela = find_rela_by_dest_range(file->elf, insn->sec,
593                                                insn->offset, insn->len);
594                 if (!rela) {
595                         dest_sec = insn->sec;
596                         dest_off = arch_jump_destination(insn);
597                 } else if (rela->sym->type == STT_SECTION) {
598                         dest_sec = rela->sym->sec;
599                         dest_off = arch_dest_rela_offset(rela->addend);
600                 } else if (rela->sym->sec->idx) {
601                         dest_sec = rela->sym->sec;
602                         dest_off = rela->sym->sym.st_value +
603                                    arch_dest_rela_offset(rela->addend);
604                 } else if (strstr(rela->sym->name, "_indirect_thunk_")) {
605                         /*
606                          * Retpoline jumps are really dynamic jumps in
607                          * disguise, so convert them accordingly.
608                          */
609                         if (insn->type == INSN_JUMP_UNCONDITIONAL)
610                                 insn->type = INSN_JUMP_DYNAMIC;
611                         else
612                                 insn->type = INSN_JUMP_DYNAMIC_CONDITIONAL;
613
614                         insn->retpoline_safe = true;
615                         continue;
616                 } else {
617                         /* external sibling call */
618                         insn->call_dest = rela->sym;
619                         continue;
620                 }
621
622                 insn->jump_dest = find_insn(file, dest_sec, dest_off);
623                 if (!insn->jump_dest) {
624
625                         /*
626                          * This is a special case where an alt instruction
627                          * jumps past the end of the section.  These are
628                          * handled later in handle_group_alt().
629                          */
630                         if (!strcmp(insn->sec->name, ".altinstr_replacement"))
631                                 continue;
632
633                         WARN_FUNC("can't find jump dest instruction at %s+0x%lx",
634                                   insn->sec, insn->offset, dest_sec->name,
635                                   dest_off);
636                         return -1;
637                 }
638
639                 /*
640                  * Cross-function jump.
641                  */
642                 if (insn->func && insn->jump_dest->func &&
643                     insn->func != insn->jump_dest->func) {
644
645                         /*
646                          * For GCC 8+, create parent/child links for any cold
647                          * subfunctions.  This is _mostly_ redundant with a
648                          * similar initialization in read_symbols().
649                          *
650                          * If a function has aliases, we want the *first* such
651                          * function in the symbol table to be the subfunction's
652                          * parent.  In that case we overwrite the
653                          * initialization done in read_symbols().
654                          *
655                          * However this code can't completely replace the
656                          * read_symbols() code because this doesn't detect the
657                          * case where the parent function's only reference to a
658                          * subfunction is through a jump table.
659                          */
660                         if (!strstr(insn->func->name, ".cold.") &&
661                             strstr(insn->jump_dest->func->name, ".cold.")) {
662                                 insn->func->cfunc = insn->jump_dest->func;
663                                 insn->jump_dest->func->pfunc = insn->func;
664
665                         } else if (insn->jump_dest->func->pfunc != insn->func->pfunc &&
666                                    insn->jump_dest->offset == insn->jump_dest->func->offset) {
667
668                                 /* internal sibling call */
669                                 insn->call_dest = insn->jump_dest->func;
670                         }
671                 }
672         }
673
674         return 0;
675 }
676
677 /*
678  * Find the destination instructions for all calls.
679  */
680 static int add_call_destinations(struct objtool_file *file)
681 {
682         struct instruction *insn;
683         unsigned long dest_off;
684         struct rela *rela;
685
686         for_each_insn(file, insn) {
687                 if (insn->type != INSN_CALL)
688                         continue;
689
690                 rela = find_rela_by_dest_range(file->elf, insn->sec,
691                                                insn->offset, insn->len);
692                 if (!rela) {
693                         dest_off = arch_jump_destination(insn);
694                         insn->call_dest = find_func_by_offset(insn->sec, dest_off);
695                         if (!insn->call_dest)
696                                 insn->call_dest = find_symbol_by_offset(insn->sec, dest_off);
697
698                         if (insn->ignore)
699                                 continue;
700
701                         if (!insn->call_dest) {
702                                 WARN_FUNC("unsupported intra-function call",
703                                           insn->sec, insn->offset);
704                                 if (retpoline)
705                                         WARN("If this is a retpoline, please patch it in with alternatives and annotate it with ANNOTATE_NOSPEC_ALTERNATIVE.");
706                                 return -1;
707                         }
708
709                         if (insn->func && insn->call_dest->type != STT_FUNC) {
710                                 WARN_FUNC("unsupported call to non-function",
711                                           insn->sec, insn->offset);
712                                 return -1;
713                         }
714
715                 } else if (rela->sym->type == STT_SECTION) {
716                         dest_off = arch_dest_rela_offset(rela->addend);
717                         insn->call_dest = find_func_by_offset(rela->sym->sec,
718                                                               dest_off);
719                         if (!insn->call_dest) {
720                                 WARN_FUNC("can't find call dest symbol at %s+0x%lx",
721                                           insn->sec, insn->offset,
722                                           rela->sym->sec->name,
723                                           dest_off);
724                                 return -1;
725                         }
726                 } else
727                         insn->call_dest = rela->sym;
728         }
729
730         return 0;
731 }
732
733 /*
734  * The .alternatives section requires some extra special care, over and above
735  * what other special sections require:
736  *
737  * 1. Because alternatives are patched in-place, we need to insert a fake jump
738  *    instruction at the end so that validate_branch() skips all the original
739  *    replaced instructions when validating the new instruction path.
740  *
741  * 2. An added wrinkle is that the new instruction length might be zero.  In
742  *    that case the old instructions are replaced with noops.  We simulate that
743  *    by creating a fake jump as the only new instruction.
744  *
745  * 3. In some cases, the alternative section includes an instruction which
746  *    conditionally jumps to the _end_ of the entry.  We have to modify these
747  *    jumps' destinations to point back to .text rather than the end of the
748  *    entry in .altinstr_replacement.
749  */
750 static int handle_group_alt(struct objtool_file *file,
751                             struct special_alt *special_alt,
752                             struct instruction *orig_insn,
753                             struct instruction **new_insn)
754 {
755         static unsigned int alt_group_next_index = 1;
756         struct instruction *last_orig_insn, *last_new_insn, *insn, *fake_jump = NULL;
757         unsigned int alt_group = alt_group_next_index++;
758         unsigned long dest_off;
759
760         last_orig_insn = NULL;
761         insn = orig_insn;
762         sec_for_each_insn_from(file, insn) {
763                 if (insn->offset >= special_alt->orig_off + special_alt->orig_len)
764                         break;
765
766                 insn->alt_group = alt_group;
767                 last_orig_insn = insn;
768         }
769
770         if (next_insn_same_sec(file, last_orig_insn)) {
771                 fake_jump = malloc(sizeof(*fake_jump));
772                 if (!fake_jump) {
773                         WARN("malloc failed");
774                         return -1;
775                 }
776                 memset(fake_jump, 0, sizeof(*fake_jump));
777                 INIT_LIST_HEAD(&fake_jump->alts);
778                 INIT_LIST_HEAD(&fake_jump->stack_ops);
779                 init_cfi_state(&fake_jump->cfi);
780
781                 fake_jump->sec = special_alt->new_sec;
782                 fake_jump->offset = FAKE_JUMP_OFFSET;
783                 fake_jump->type = INSN_JUMP_UNCONDITIONAL;
784                 fake_jump->jump_dest = list_next_entry(last_orig_insn, list);
785                 fake_jump->func = orig_insn->func;
786         }
787
788         if (!special_alt->new_len) {
789                 if (!fake_jump) {
790                         WARN("%s: empty alternative at end of section",
791                              special_alt->orig_sec->name);
792                         return -1;
793                 }
794
795                 *new_insn = fake_jump;
796                 return 0;
797         }
798
799         last_new_insn = NULL;
800         alt_group = alt_group_next_index++;
801         insn = *new_insn;
802         sec_for_each_insn_from(file, insn) {
803                 if (insn->offset >= special_alt->new_off + special_alt->new_len)
804                         break;
805
806                 last_new_insn = insn;
807
808                 insn->ignore = orig_insn->ignore_alts;
809                 insn->func = orig_insn->func;
810                 insn->alt_group = alt_group;
811
812                 /*
813                  * Since alternative replacement code is copy/pasted by the
814                  * kernel after applying relocations, generally such code can't
815                  * have relative-address relocation references to outside the
816                  * .altinstr_replacement section, unless the arch's
817                  * alternatives code can adjust the relative offsets
818                  * accordingly.
819                  *
820                  * The x86 alternatives code adjusts the offsets only when it
821                  * encounters a branch instruction at the very beginning of the
822                  * replacement group.
823                  */
824                 if ((insn->offset != special_alt->new_off ||
825                     (insn->type != INSN_CALL && !is_static_jump(insn))) &&
826                     find_rela_by_dest_range(file->elf, insn->sec, insn->offset, insn->len)) {
827
828                         WARN_FUNC("unsupported relocation in alternatives section",
829                                   insn->sec, insn->offset);
830                         return -1;
831                 }
832
833                 if (!is_static_jump(insn))
834                         continue;
835
836                 if (!insn->immediate)
837                         continue;
838
839                 dest_off = arch_jump_destination(insn);
840                 if (dest_off == special_alt->new_off + special_alt->new_len) {
841                         if (!fake_jump) {
842                                 WARN("%s: alternative jump to end of section",
843                                      special_alt->orig_sec->name);
844                                 return -1;
845                         }
846                         insn->jump_dest = fake_jump;
847                 }
848
849                 if (!insn->jump_dest) {
850                         WARN_FUNC("can't find alternative jump destination",
851                                   insn->sec, insn->offset);
852                         return -1;
853                 }
854         }
855
856         if (!last_new_insn) {
857                 WARN_FUNC("can't find last new alternative instruction",
858                           special_alt->new_sec, special_alt->new_off);
859                 return -1;
860         }
861
862         if (fake_jump)
863                 list_add(&fake_jump->list, &last_new_insn->list);
864
865         return 0;
866 }
867
868 /*
869  * A jump table entry can either convert a nop to a jump or a jump to a nop.
870  * If the original instruction is a jump, make the alt entry an effective nop
871  * by just skipping the original instruction.
872  */
873 static int handle_jump_alt(struct objtool_file *file,
874                            struct special_alt *special_alt,
875                            struct instruction *orig_insn,
876                            struct instruction **new_insn)
877 {
878         if (orig_insn->type == INSN_NOP)
879                 return 0;
880
881         if (orig_insn->type != INSN_JUMP_UNCONDITIONAL) {
882                 WARN_FUNC("unsupported instruction at jump label",
883                           orig_insn->sec, orig_insn->offset);
884                 return -1;
885         }
886
887         *new_insn = list_next_entry(orig_insn, list);
888         return 0;
889 }
890
891 /*
892  * Read all the special sections which have alternate instructions which can be
893  * patched in or redirected to at runtime.  Each instruction having alternate
894  * instruction(s) has them added to its insn->alts list, which will be
895  * traversed in validate_branch().
896  */
897 static int add_special_section_alts(struct objtool_file *file)
898 {
899         struct list_head special_alts;
900         struct instruction *orig_insn, *new_insn;
901         struct special_alt *special_alt, *tmp;
902         struct alternative *alt;
903         int ret;
904
905         ret = special_get_alts(file->elf, &special_alts);
906         if (ret)
907                 return ret;
908
909         list_for_each_entry_safe(special_alt, tmp, &special_alts, list) {
910
911                 orig_insn = find_insn(file, special_alt->orig_sec,
912                                       special_alt->orig_off);
913                 if (!orig_insn) {
914                         WARN_FUNC("special: can't find orig instruction",
915                                   special_alt->orig_sec, special_alt->orig_off);
916                         ret = -1;
917                         goto out;
918                 }
919
920                 new_insn = NULL;
921                 if (!special_alt->group || special_alt->new_len) {
922                         new_insn = find_insn(file, special_alt->new_sec,
923                                              special_alt->new_off);
924                         if (!new_insn) {
925                                 WARN_FUNC("special: can't find new instruction",
926                                           special_alt->new_sec,
927                                           special_alt->new_off);
928                                 ret = -1;
929                                 goto out;
930                         }
931                 }
932
933                 if (special_alt->group) {
934                         if (!special_alt->orig_len) {
935                                 WARN_FUNC("empty alternative entry",
936                                           orig_insn->sec, orig_insn->offset);
937                                 continue;
938                         }
939
940                         ret = handle_group_alt(file, special_alt, orig_insn,
941                                                &new_insn);
942                         if (ret)
943                                 goto out;
944                 } else if (special_alt->jump_or_nop) {
945                         ret = handle_jump_alt(file, special_alt, orig_insn,
946                                               &new_insn);
947                         if (ret)
948                                 goto out;
949                 }
950
951                 alt = malloc(sizeof(*alt));
952                 if (!alt) {
953                         WARN("malloc failed");
954                         ret = -1;
955                         goto out;
956                 }
957
958                 alt->insn = new_insn;
959                 alt->skip_orig = special_alt->skip_orig;
960                 orig_insn->ignore_alts |= special_alt->skip_alt;
961                 list_add_tail(&alt->list, &orig_insn->alts);
962
963                 list_del(&special_alt->list);
964                 free(special_alt);
965         }
966
967 out:
968         return ret;
969 }
970
971 static int add_jump_table(struct objtool_file *file, struct instruction *insn,
972                             struct rela *table)
973 {
974         struct rela *rela = table;
975         struct instruction *dest_insn;
976         struct alternative *alt;
977         struct symbol *pfunc = insn->func->pfunc;
978         unsigned int prev_offset = 0;
979
980         /*
981          * Each @rela is a switch table relocation which points to the target
982          * instruction.
983          */
984         list_for_each_entry_from(rela, &table->sec->rela_list, list) {
985
986                 /* Check for the end of the table: */
987                 if (rela != table && rela->jump_table_start)
988                         break;
989
990                 /* Make sure the table entries are consecutive: */
991                 if (prev_offset && rela->offset != prev_offset + 8)
992                         break;
993
994                 /* Detect function pointers from contiguous objects: */
995                 if (rela->sym->sec == pfunc->sec &&
996                     rela->addend == pfunc->offset)
997                         break;
998
999                 dest_insn = find_insn(file, rela->sym->sec, rela->addend);
1000                 if (!dest_insn)
1001                         break;
1002
1003                 /* Make sure the destination is in the same function: */
1004                 if (!dest_insn->func || dest_insn->func->pfunc != pfunc)
1005                         break;
1006
1007                 alt = malloc(sizeof(*alt));
1008                 if (!alt) {
1009                         WARN("malloc failed");
1010                         return -1;
1011                 }
1012
1013                 alt->insn = dest_insn;
1014                 list_add_tail(&alt->list, &insn->alts);
1015                 prev_offset = rela->offset;
1016         }
1017
1018         if (!prev_offset) {
1019                 WARN_FUNC("can't find switch jump table",
1020                           insn->sec, insn->offset);
1021                 return -1;
1022         }
1023
1024         return 0;
1025 }
1026
1027 /*
1028  * find_jump_table() - Given a dynamic jump, find the switch jump table in
1029  * .rodata associated with it.
1030  *
1031  * There are 3 basic patterns:
1032  *
1033  * 1. jmpq *[rodata addr](,%reg,8)
1034  *
1035  *    This is the most common case by far.  It jumps to an address in a simple
1036  *    jump table which is stored in .rodata.
1037  *
1038  * 2. jmpq *[rodata addr](%rip)
1039  *
1040  *    This is caused by a rare GCC quirk, currently only seen in three driver
1041  *    functions in the kernel, only with certain obscure non-distro configs.
1042  *
1043  *    As part of an optimization, GCC makes a copy of an existing switch jump
1044  *    table, modifies it, and then hard-codes the jump (albeit with an indirect
1045  *    jump) to use a single entry in the table.  The rest of the jump table and
1046  *    some of its jump targets remain as dead code.
1047  *
1048  *    In such a case we can just crudely ignore all unreachable instruction
1049  *    warnings for the entire object file.  Ideally we would just ignore them
1050  *    for the function, but that would require redesigning the code quite a
1051  *    bit.  And honestly that's just not worth doing: unreachable instruction
1052  *    warnings are of questionable value anyway, and this is such a rare issue.
1053  *
1054  * 3. mov [rodata addr],%reg1
1055  *    ... some instructions ...
1056  *    jmpq *(%reg1,%reg2,8)
1057  *
1058  *    This is a fairly uncommon pattern which is new for GCC 6.  As of this
1059  *    writing, there are 11 occurrences of it in the allmodconfig kernel.
1060  *
1061  *    As of GCC 7 there are quite a few more of these and the 'in between' code
1062  *    is significant. Esp. with KASAN enabled some of the code between the mov
1063  *    and jmpq uses .rodata itself, which can confuse things.
1064  *
1065  *    TODO: Once we have DWARF CFI and smarter instruction decoding logic,
1066  *    ensure the same register is used in the mov and jump instructions.
1067  *
1068  *    NOTE: RETPOLINE made it harder still to decode dynamic jumps.
1069  */
1070 static struct rela *find_jump_table(struct objtool_file *file,
1071                                       struct symbol *func,
1072                                       struct instruction *insn)
1073 {
1074         struct rela *text_rela, *table_rela;
1075         struct instruction *dest_insn, *orig_insn = insn;
1076         struct section *table_sec;
1077         unsigned long table_offset;
1078
1079         /*
1080          * Backward search using the @first_jump_src links, these help avoid
1081          * much of the 'in between' code. Which avoids us getting confused by
1082          * it.
1083          */
1084         for (;
1085              &insn->list != &file->insn_list && insn->func && insn->func->pfunc == func;
1086              insn = insn->first_jump_src ?: list_prev_entry(insn, list)) {
1087
1088                 if (insn != orig_insn && insn->type == INSN_JUMP_DYNAMIC)
1089                         break;
1090
1091                 /* allow small jumps within the range */
1092                 if (insn->type == INSN_JUMP_UNCONDITIONAL &&
1093                     insn->jump_dest &&
1094                     (insn->jump_dest->offset <= insn->offset ||
1095                      insn->jump_dest->offset > orig_insn->offset))
1096                     break;
1097
1098                 /* look for a relocation which references .rodata */
1099                 text_rela = find_rela_by_dest_range(file->elf, insn->sec,
1100                                                     insn->offset, insn->len);
1101                 if (!text_rela || text_rela->sym->type != STT_SECTION ||
1102                     !text_rela->sym->sec->rodata)
1103                         continue;
1104
1105                 table_offset = text_rela->addend;
1106                 table_sec = text_rela->sym->sec;
1107
1108                 if (text_rela->type == R_X86_64_PC32)
1109                         table_offset += 4;
1110
1111                 /*
1112                  * Make sure the .rodata address isn't associated with a
1113                  * symbol.  GCC jump tables are anonymous data.
1114                  *
1115                  * Also support C jump tables which are in the same format as
1116                  * switch jump tables.  For objtool to recognize them, they
1117                  * need to be placed in the C_JUMP_TABLE_SECTION section.  They
1118                  * have symbols associated with them.
1119                  */
1120                 if (find_symbol_containing(table_sec, table_offset) &&
1121                     strcmp(table_sec->name, C_JUMP_TABLE_SECTION))
1122                         continue;
1123
1124                 /*
1125                  * Each table entry has a rela associated with it.  The rela
1126                  * should reference text in the same function as the original
1127                  * instruction.
1128                  */
1129                 table_rela = find_rela_by_dest(file->elf, table_sec, table_offset);
1130                 if (!table_rela)
1131                         continue;
1132                 dest_insn = find_insn(file, table_rela->sym->sec, table_rela->addend);
1133                 if (!dest_insn || !dest_insn->func || dest_insn->func->pfunc != func)
1134                         continue;
1135
1136                 /*
1137                  * Use of RIP-relative switch jumps is quite rare, and
1138                  * indicates a rare GCC quirk/bug which can leave dead code
1139                  * behind.
1140                  */
1141                 if (text_rela->type == R_X86_64_PC32)
1142                         file->ignore_unreachables = true;
1143
1144                 return table_rela;
1145         }
1146
1147         return NULL;
1148 }
1149
1150 /*
1151  * First pass: Mark the head of each jump table so that in the next pass,
1152  * we know when a given jump table ends and the next one starts.
1153  */
1154 static void mark_func_jump_tables(struct objtool_file *file,
1155                                     struct symbol *func)
1156 {
1157         struct instruction *insn, *last = NULL;
1158         struct rela *rela;
1159
1160         func_for_each_insn(file, func, insn) {
1161                 if (!last)
1162                         last = insn;
1163
1164                 /*
1165                  * Store back-pointers for unconditional forward jumps such
1166                  * that find_jump_table() can back-track using those and
1167                  * avoid some potentially confusing code.
1168                  */
1169                 if (insn->type == INSN_JUMP_UNCONDITIONAL && insn->jump_dest &&
1170                     insn->offset > last->offset &&
1171                     insn->jump_dest->offset > insn->offset &&
1172                     !insn->jump_dest->first_jump_src) {
1173
1174                         insn->jump_dest->first_jump_src = insn;
1175                         last = insn->jump_dest;
1176                 }
1177
1178                 if (insn->type != INSN_JUMP_DYNAMIC)
1179                         continue;
1180
1181                 rela = find_jump_table(file, func, insn);
1182                 if (rela) {
1183                         rela->jump_table_start = true;
1184                         insn->jump_table = rela;
1185                 }
1186         }
1187 }
1188
1189 static int add_func_jump_tables(struct objtool_file *file,
1190                                   struct symbol *func)
1191 {
1192         struct instruction *insn;
1193         int ret;
1194
1195         func_for_each_insn(file, func, insn) {
1196                 if (!insn->jump_table)
1197                         continue;
1198
1199                 ret = add_jump_table(file, insn, insn->jump_table);
1200                 if (ret)
1201                         return ret;
1202         }
1203
1204         return 0;
1205 }
1206
1207 /*
1208  * For some switch statements, gcc generates a jump table in the .rodata
1209  * section which contains a list of addresses within the function to jump to.
1210  * This finds these jump tables and adds them to the insn->alts lists.
1211  */
1212 static int add_jump_table_alts(struct objtool_file *file)
1213 {
1214         struct section *sec;
1215         struct symbol *func;
1216         int ret;
1217
1218         if (!file->rodata)
1219                 return 0;
1220
1221         for_each_sec(file, sec) {
1222                 list_for_each_entry(func, &sec->symbol_list, list) {
1223                         if (func->type != STT_FUNC)
1224                                 continue;
1225
1226                         mark_func_jump_tables(file, func);
1227                         ret = add_func_jump_tables(file, func);
1228                         if (ret)
1229                                 return ret;
1230                 }
1231         }
1232
1233         return 0;
1234 }
1235
1236 static int read_unwind_hints(struct objtool_file *file)
1237 {
1238         struct section *sec, *relasec;
1239         struct rela *rela;
1240         struct unwind_hint *hint;
1241         struct instruction *insn;
1242         struct cfi_reg *cfa;
1243         int i;
1244
1245         sec = find_section_by_name(file->elf, ".discard.unwind_hints");
1246         if (!sec)
1247                 return 0;
1248
1249         relasec = sec->rela;
1250         if (!relasec) {
1251                 WARN("missing .rela.discard.unwind_hints section");
1252                 return -1;
1253         }
1254
1255         if (sec->len % sizeof(struct unwind_hint)) {
1256                 WARN("struct unwind_hint size mismatch");
1257                 return -1;
1258         }
1259
1260         file->hints = true;
1261
1262         for (i = 0; i < sec->len / sizeof(struct unwind_hint); i++) {
1263                 hint = (struct unwind_hint *)sec->data->d_buf + i;
1264
1265                 rela = find_rela_by_dest(file->elf, sec, i * sizeof(*hint));
1266                 if (!rela) {
1267                         WARN("can't find rela for unwind_hints[%d]", i);
1268                         return -1;
1269                 }
1270
1271                 insn = find_insn(file, rela->sym->sec, rela->addend);
1272                 if (!insn) {
1273                         WARN("can't find insn for unwind_hints[%d]", i);
1274                         return -1;
1275                 }
1276
1277                 cfa = &insn->cfi.cfa;
1278
1279                 if (hint->type == UNWIND_HINT_TYPE_RET_OFFSET) {
1280                         insn->ret_offset = hint->sp_offset;
1281                         continue;
1282                 }
1283
1284                 insn->hint = true;
1285
1286                 switch (hint->sp_reg) {
1287                 case ORC_REG_UNDEFINED:
1288                         cfa->base = CFI_UNDEFINED;
1289                         break;
1290                 case ORC_REG_SP:
1291                         cfa->base = CFI_SP;
1292                         break;
1293                 case ORC_REG_BP:
1294                         cfa->base = CFI_BP;
1295                         break;
1296                 case ORC_REG_SP_INDIRECT:
1297                         cfa->base = CFI_SP_INDIRECT;
1298                         break;
1299                 case ORC_REG_R10:
1300                         cfa->base = CFI_R10;
1301                         break;
1302                 case ORC_REG_R13:
1303                         cfa->base = CFI_R13;
1304                         break;
1305                 case ORC_REG_DI:
1306                         cfa->base = CFI_DI;
1307                         break;
1308                 case ORC_REG_DX:
1309                         cfa->base = CFI_DX;
1310                         break;
1311                 default:
1312                         WARN_FUNC("unsupported unwind_hint sp base reg %d",
1313                                   insn->sec, insn->offset, hint->sp_reg);
1314                         return -1;
1315                 }
1316
1317                 cfa->offset = hint->sp_offset;
1318                 insn->cfi.type = hint->type;
1319                 insn->cfi.end = hint->end;
1320         }
1321
1322         return 0;
1323 }
1324
1325 static int read_retpoline_hints(struct objtool_file *file)
1326 {
1327         struct section *sec;
1328         struct instruction *insn;
1329         struct rela *rela;
1330
1331         sec = find_section_by_name(file->elf, ".rela.discard.retpoline_safe");
1332         if (!sec)
1333                 return 0;
1334
1335         list_for_each_entry(rela, &sec->rela_list, list) {
1336                 if (rela->sym->type != STT_SECTION) {
1337                         WARN("unexpected relocation symbol type in %s", sec->name);
1338                         return -1;
1339                 }
1340
1341                 insn = find_insn(file, rela->sym->sec, rela->addend);
1342                 if (!insn) {
1343                         WARN("bad .discard.retpoline_safe entry");
1344                         return -1;
1345                 }
1346
1347                 if (insn->type != INSN_JUMP_DYNAMIC &&
1348                     insn->type != INSN_CALL_DYNAMIC) {
1349                         WARN_FUNC("retpoline_safe hint not an indirect jump/call",
1350                                   insn->sec, insn->offset);
1351                         return -1;
1352                 }
1353
1354                 insn->retpoline_safe = true;
1355         }
1356
1357         return 0;
1358 }
1359
1360 static int read_instr_hints(struct objtool_file *file)
1361 {
1362         struct section *sec;
1363         struct instruction *insn;
1364         struct rela *rela;
1365
1366         sec = find_section_by_name(file->elf, ".rela.discard.instr_end");
1367         if (!sec)
1368                 return 0;
1369
1370         list_for_each_entry(rela, &sec->rela_list, list) {
1371                 if (rela->sym->type != STT_SECTION) {
1372                         WARN("unexpected relocation symbol type in %s", sec->name);
1373                         return -1;
1374                 }
1375
1376                 insn = find_insn(file, rela->sym->sec, rela->addend);
1377                 if (!insn) {
1378                         WARN("bad .discard.instr_end entry");
1379                         return -1;
1380                 }
1381
1382                 insn->instr--;
1383         }
1384
1385         sec = find_section_by_name(file->elf, ".rela.discard.instr_begin");
1386         if (!sec)
1387                 return 0;
1388
1389         list_for_each_entry(rela, &sec->rela_list, list) {
1390                 if (rela->sym->type != STT_SECTION) {
1391                         WARN("unexpected relocation symbol type in %s", sec->name);
1392                         return -1;
1393                 }
1394
1395                 insn = find_insn(file, rela->sym->sec, rela->addend);
1396                 if (!insn) {
1397                         WARN("bad .discard.instr_begin entry");
1398                         return -1;
1399                 }
1400
1401                 insn->instr++;
1402         }
1403
1404         return 0;
1405 }
1406
1407 static void mark_rodata(struct objtool_file *file)
1408 {
1409         struct section *sec;
1410         bool found = false;
1411
1412         /*
1413          * Search for the following rodata sections, each of which can
1414          * potentially contain jump tables:
1415          *
1416          * - .rodata: can contain GCC switch tables
1417          * - .rodata.<func>: same, if -fdata-sections is being used
1418          * - .rodata..c_jump_table: contains C annotated jump tables
1419          *
1420          * .rodata.str1.* sections are ignored; they don't contain jump tables.
1421          */
1422         for_each_sec(file, sec) {
1423                 if (!strncmp(sec->name, ".rodata", 7) &&
1424                     !strstr(sec->name, ".str1.")) {
1425                         sec->rodata = true;
1426                         found = true;
1427                 }
1428         }
1429
1430         file->rodata = found;
1431 }
1432
1433 static int decode_sections(struct objtool_file *file)
1434 {
1435         int ret;
1436
1437         mark_rodata(file);
1438
1439         ret = decode_instructions(file);
1440         if (ret)
1441                 return ret;
1442
1443         ret = add_dead_ends(file);
1444         if (ret)
1445                 return ret;
1446
1447         add_ignores(file);
1448         add_uaccess_safe(file);
1449
1450         ret = add_ignore_alternatives(file);
1451         if (ret)
1452                 return ret;
1453
1454         ret = add_jump_destinations(file);
1455         if (ret)
1456                 return ret;
1457
1458         ret = add_special_section_alts(file);
1459         if (ret)
1460                 return ret;
1461
1462         ret = add_call_destinations(file);
1463         if (ret)
1464                 return ret;
1465
1466         ret = add_jump_table_alts(file);
1467         if (ret)
1468                 return ret;
1469
1470         ret = read_unwind_hints(file);
1471         if (ret)
1472                 return ret;
1473
1474         ret = read_retpoline_hints(file);
1475         if (ret)
1476                 return ret;
1477
1478         ret = read_instr_hints(file);
1479         if (ret)
1480                 return ret;
1481
1482         return 0;
1483 }
1484
1485 static bool is_fentry_call(struct instruction *insn)
1486 {
1487         if (insn->type == INSN_CALL && insn->call_dest &&
1488             insn->call_dest->type == STT_NOTYPE &&
1489             !strcmp(insn->call_dest->name, "__fentry__"))
1490                 return true;
1491
1492         return false;
1493 }
1494
1495 static bool has_modified_stack_frame(struct instruction *insn, struct insn_state *state)
1496 {
1497         u8 ret_offset = insn->ret_offset;
1498         struct cfi_state *cfi = &state->cfi;
1499         int i;
1500
1501         if (cfi->cfa.base != initial_func_cfi.cfa.base || cfi->drap)
1502                 return true;
1503
1504         if (cfi->cfa.offset != initial_func_cfi.cfa.offset + ret_offset)
1505                 return true;
1506
1507         if (cfi->stack_size != initial_func_cfi.cfa.offset + ret_offset)
1508                 return true;
1509
1510         /*
1511          * If there is a ret offset hint then don't check registers
1512          * because a callee-saved register might have been pushed on
1513          * the stack.
1514          */
1515         if (ret_offset)
1516                 return false;
1517
1518         for (i = 0; i < CFI_NUM_REGS; i++) {
1519                 if (cfi->regs[i].base != initial_func_cfi.regs[i].base ||
1520                     cfi->regs[i].offset != initial_func_cfi.regs[i].offset)
1521                         return true;
1522         }
1523
1524         return false;
1525 }
1526
1527 static bool has_valid_stack_frame(struct insn_state *state)
1528 {
1529         struct cfi_state *cfi = &state->cfi;
1530
1531         if (cfi->cfa.base == CFI_BP && cfi->regs[CFI_BP].base == CFI_CFA &&
1532             cfi->regs[CFI_BP].offset == -16)
1533                 return true;
1534
1535         if (cfi->drap && cfi->regs[CFI_BP].base == CFI_BP)
1536                 return true;
1537
1538         return false;
1539 }
1540
1541 static int update_cfi_state_regs(struct instruction *insn,
1542                                   struct cfi_state *cfi,
1543                                   struct stack_op *op)
1544 {
1545         struct cfi_reg *cfa = &cfi->cfa;
1546
1547         if (cfa->base != CFI_SP)
1548                 return 0;
1549
1550         /* push */
1551         if (op->dest.type == OP_DEST_PUSH || op->dest.type == OP_DEST_PUSHF)
1552                 cfa->offset += 8;
1553
1554         /* pop */
1555         if (op->src.type == OP_SRC_POP || op->src.type == OP_SRC_POPF)
1556                 cfa->offset -= 8;
1557
1558         /* add immediate to sp */
1559         if (op->dest.type == OP_DEST_REG && op->src.type == OP_SRC_ADD &&
1560             op->dest.reg == CFI_SP && op->src.reg == CFI_SP)
1561                 cfa->offset -= op->src.offset;
1562
1563         return 0;
1564 }
1565
1566 static void save_reg(struct cfi_state *cfi, unsigned char reg, int base, int offset)
1567 {
1568         if (arch_callee_saved_reg(reg) &&
1569             cfi->regs[reg].base == CFI_UNDEFINED) {
1570                 cfi->regs[reg].base = base;
1571                 cfi->regs[reg].offset = offset;
1572         }
1573 }
1574
1575 static void restore_reg(struct cfi_state *cfi, unsigned char reg)
1576 {
1577         cfi->regs[reg].base = initial_func_cfi.regs[reg].base;
1578         cfi->regs[reg].offset = initial_func_cfi.regs[reg].offset;
1579 }
1580
1581 /*
1582  * A note about DRAP stack alignment:
1583  *
1584  * GCC has the concept of a DRAP register, which is used to help keep track of
1585  * the stack pointer when aligning the stack.  r10 or r13 is used as the DRAP
1586  * register.  The typical DRAP pattern is:
1587  *
1588  *   4c 8d 54 24 08             lea    0x8(%rsp),%r10
1589  *   48 83 e4 c0                and    $0xffffffffffffffc0,%rsp
1590  *   41 ff 72 f8                pushq  -0x8(%r10)
1591  *   55                         push   %rbp
1592  *   48 89 e5                   mov    %rsp,%rbp
1593  *                              (more pushes)
1594  *   41 52                      push   %r10
1595  *                              ...
1596  *   41 5a                      pop    %r10
1597  *                              (more pops)
1598  *   5d                         pop    %rbp
1599  *   49 8d 62 f8                lea    -0x8(%r10),%rsp
1600  *   c3                         retq
1601  *
1602  * There are some variations in the epilogues, like:
1603  *
1604  *   5b                         pop    %rbx
1605  *   41 5a                      pop    %r10
1606  *   41 5c                      pop    %r12
1607  *   41 5d                      pop    %r13
1608  *   41 5e                      pop    %r14
1609  *   c9                         leaveq
1610  *   49 8d 62 f8                lea    -0x8(%r10),%rsp
1611  *   c3                         retq
1612  *
1613  * and:
1614  *
1615  *   4c 8b 55 e8                mov    -0x18(%rbp),%r10
1616  *   48 8b 5d e0                mov    -0x20(%rbp),%rbx
1617  *   4c 8b 65 f0                mov    -0x10(%rbp),%r12
1618  *   4c 8b 6d f8                mov    -0x8(%rbp),%r13
1619  *   c9                         leaveq
1620  *   49 8d 62 f8                lea    -0x8(%r10),%rsp
1621  *   c3                         retq
1622  *
1623  * Sometimes r13 is used as the DRAP register, in which case it's saved and
1624  * restored beforehand:
1625  *
1626  *   41 55                      push   %r13
1627  *   4c 8d 6c 24 10             lea    0x10(%rsp),%r13
1628  *   48 83 e4 f0                and    $0xfffffffffffffff0,%rsp
1629  *                              ...
1630  *   49 8d 65 f0                lea    -0x10(%r13),%rsp
1631  *   41 5d                      pop    %r13
1632  *   c3                         retq
1633  */
1634 static int update_cfi_state(struct instruction *insn, struct cfi_state *cfi,
1635                              struct stack_op *op)
1636 {
1637         struct cfi_reg *cfa = &cfi->cfa;
1638         struct cfi_reg *regs = cfi->regs;
1639
1640         /* stack operations don't make sense with an undefined CFA */
1641         if (cfa->base == CFI_UNDEFINED) {
1642                 if (insn->func) {
1643                         WARN_FUNC("undefined stack state", insn->sec, insn->offset);
1644                         return -1;
1645                 }
1646                 return 0;
1647         }
1648
1649         if (cfi->type == ORC_TYPE_REGS || cfi->type == ORC_TYPE_REGS_IRET)
1650                 return update_cfi_state_regs(insn, cfi, op);
1651
1652         switch (op->dest.type) {
1653
1654         case OP_DEST_REG:
1655                 switch (op->src.type) {
1656
1657                 case OP_SRC_REG:
1658                         if (op->src.reg == CFI_SP && op->dest.reg == CFI_BP &&
1659                             cfa->base == CFI_SP &&
1660                             regs[CFI_BP].base == CFI_CFA &&
1661                             regs[CFI_BP].offset == -cfa->offset) {
1662
1663                                 /* mov %rsp, %rbp */
1664                                 cfa->base = op->dest.reg;
1665                                 cfi->bp_scratch = false;
1666                         }
1667
1668                         else if (op->src.reg == CFI_SP &&
1669                                  op->dest.reg == CFI_BP && cfi->drap) {
1670
1671                                 /* drap: mov %rsp, %rbp */
1672                                 regs[CFI_BP].base = CFI_BP;
1673                                 regs[CFI_BP].offset = -cfi->stack_size;
1674                                 cfi->bp_scratch = false;
1675                         }
1676
1677                         else if (op->src.reg == CFI_SP && cfa->base == CFI_SP) {
1678
1679                                 /*
1680                                  * mov %rsp, %reg
1681                                  *
1682                                  * This is needed for the rare case where GCC
1683                                  * does:
1684                                  *
1685                                  *   mov    %rsp, %rax
1686                                  *   ...
1687                                  *   mov    %rax, %rsp
1688                                  */
1689                                 cfi->vals[op->dest.reg].base = CFI_CFA;
1690                                 cfi->vals[op->dest.reg].offset = -cfi->stack_size;
1691                         }
1692
1693                         else if (op->src.reg == CFI_BP && op->dest.reg == CFI_SP &&
1694                                  cfa->base == CFI_BP) {
1695
1696                                 /*
1697                                  * mov %rbp, %rsp
1698                                  *
1699                                  * Restore the original stack pointer (Clang).
1700                                  */
1701                                 cfi->stack_size = -cfi->regs[CFI_BP].offset;
1702                         }
1703
1704                         else if (op->dest.reg == cfa->base) {
1705
1706                                 /* mov %reg, %rsp */
1707                                 if (cfa->base == CFI_SP &&
1708                                     cfi->vals[op->src.reg].base == CFI_CFA) {
1709
1710                                         /*
1711                                          * This is needed for the rare case
1712                                          * where GCC does something dumb like:
1713                                          *
1714                                          *   lea    0x8(%rsp), %rcx
1715                                          *   ...
1716                                          *   mov    %rcx, %rsp
1717                                          */
1718                                         cfa->offset = -cfi->vals[op->src.reg].offset;
1719                                         cfi->stack_size = cfa->offset;
1720
1721                                 } else {
1722                                         cfa->base = CFI_UNDEFINED;
1723                                         cfa->offset = 0;
1724                                 }
1725                         }
1726
1727                         break;
1728
1729                 case OP_SRC_ADD:
1730                         if (op->dest.reg == CFI_SP && op->src.reg == CFI_SP) {
1731
1732                                 /* add imm, %rsp */
1733                                 cfi->stack_size -= op->src.offset;
1734                                 if (cfa->base == CFI_SP)
1735                                         cfa->offset -= op->src.offset;
1736                                 break;
1737                         }
1738
1739                         if (op->dest.reg == CFI_SP && op->src.reg == CFI_BP) {
1740
1741                                 /* lea disp(%rbp), %rsp */
1742                                 cfi->stack_size = -(op->src.offset + regs[CFI_BP].offset);
1743                                 break;
1744                         }
1745
1746                         if (op->src.reg == CFI_SP && cfa->base == CFI_SP) {
1747
1748                                 /* drap: lea disp(%rsp), %drap */
1749                                 cfi->drap_reg = op->dest.reg;
1750
1751                                 /*
1752                                  * lea disp(%rsp), %reg
1753                                  *
1754                                  * This is needed for the rare case where GCC
1755                                  * does something dumb like:
1756                                  *
1757                                  *   lea    0x8(%rsp), %rcx
1758                                  *   ...
1759                                  *   mov    %rcx, %rsp
1760                                  */
1761                                 cfi->vals[op->dest.reg].base = CFI_CFA;
1762                                 cfi->vals[op->dest.reg].offset = \
1763                                         -cfi->stack_size + op->src.offset;
1764
1765                                 break;
1766                         }
1767
1768                         if (cfi->drap && op->dest.reg == CFI_SP &&
1769                             op->src.reg == cfi->drap_reg) {
1770
1771                                  /* drap: lea disp(%drap), %rsp */
1772                                 cfa->base = CFI_SP;
1773                                 cfa->offset = cfi->stack_size = -op->src.offset;
1774                                 cfi->drap_reg = CFI_UNDEFINED;
1775                                 cfi->drap = false;
1776                                 break;
1777                         }
1778
1779                         if (op->dest.reg == cfi->cfa.base) {
1780                                 WARN_FUNC("unsupported stack register modification",
1781                                           insn->sec, insn->offset);
1782                                 return -1;
1783                         }
1784
1785                         break;
1786
1787                 case OP_SRC_AND:
1788                         if (op->dest.reg != CFI_SP ||
1789                             (cfi->drap_reg != CFI_UNDEFINED && cfa->base != CFI_SP) ||
1790                             (cfi->drap_reg == CFI_UNDEFINED && cfa->base != CFI_BP)) {
1791                                 WARN_FUNC("unsupported stack pointer realignment",
1792                                           insn->sec, insn->offset);
1793                                 return -1;
1794                         }
1795
1796                         if (cfi->drap_reg != CFI_UNDEFINED) {
1797                                 /* drap: and imm, %rsp */
1798                                 cfa->base = cfi->drap_reg;
1799                                 cfa->offset = cfi->stack_size = 0;
1800                                 cfi->drap = true;
1801                         }
1802
1803                         /*
1804                          * Older versions of GCC (4.8ish) realign the stack
1805                          * without DRAP, with a frame pointer.
1806                          */
1807
1808                         break;
1809
1810                 case OP_SRC_POP:
1811                 case OP_SRC_POPF:
1812                         if (!cfi->drap && op->dest.reg == cfa->base) {
1813
1814                                 /* pop %rbp */
1815                                 cfa->base = CFI_SP;
1816                         }
1817
1818                         if (cfi->drap && cfa->base == CFI_BP_INDIRECT &&
1819                             op->dest.reg == cfi->drap_reg &&
1820                             cfi->drap_offset == -cfi->stack_size) {
1821
1822                                 /* drap: pop %drap */
1823                                 cfa->base = cfi->drap_reg;
1824                                 cfa->offset = 0;
1825                                 cfi->drap_offset = -1;
1826
1827                         } else if (regs[op->dest.reg].offset == -cfi->stack_size) {
1828
1829                                 /* pop %reg */
1830                                 restore_reg(cfi, op->dest.reg);
1831                         }
1832
1833                         cfi->stack_size -= 8;
1834                         if (cfa->base == CFI_SP)
1835                                 cfa->offset -= 8;
1836
1837                         break;
1838
1839                 case OP_SRC_REG_INDIRECT:
1840                         if (cfi->drap && op->src.reg == CFI_BP &&
1841                             op->src.offset == cfi->drap_offset) {
1842
1843                                 /* drap: mov disp(%rbp), %drap */
1844                                 cfa->base = cfi->drap_reg;
1845                                 cfa->offset = 0;
1846                                 cfi->drap_offset = -1;
1847                         }
1848
1849                         if (cfi->drap && op->src.reg == CFI_BP &&
1850                             op->src.offset == regs[op->dest.reg].offset) {
1851
1852                                 /* drap: mov disp(%rbp), %reg */
1853                                 restore_reg(cfi, op->dest.reg);
1854
1855                         } else if (op->src.reg == cfa->base &&
1856                             op->src.offset == regs[op->dest.reg].offset + cfa->offset) {
1857
1858                                 /* mov disp(%rbp), %reg */
1859                                 /* mov disp(%rsp), %reg */
1860                                 restore_reg(cfi, op->dest.reg);
1861                         }
1862
1863                         break;
1864
1865                 default:
1866                         WARN_FUNC("unknown stack-related instruction",
1867                                   insn->sec, insn->offset);
1868                         return -1;
1869                 }
1870
1871                 break;
1872
1873         case OP_DEST_PUSH:
1874         case OP_DEST_PUSHF:
1875                 cfi->stack_size += 8;
1876                 if (cfa->base == CFI_SP)
1877                         cfa->offset += 8;
1878
1879                 if (op->src.type != OP_SRC_REG)
1880                         break;
1881
1882                 if (cfi->drap) {
1883                         if (op->src.reg == cfa->base && op->src.reg == cfi->drap_reg) {
1884
1885                                 /* drap: push %drap */
1886                                 cfa->base = CFI_BP_INDIRECT;
1887                                 cfa->offset = -cfi->stack_size;
1888
1889                                 /* save drap so we know when to restore it */
1890                                 cfi->drap_offset = -cfi->stack_size;
1891
1892                         } else if (op->src.reg == CFI_BP && cfa->base == cfi->drap_reg) {
1893
1894                                 /* drap: push %rbp */
1895                                 cfi->stack_size = 0;
1896
1897                         } else if (regs[op->src.reg].base == CFI_UNDEFINED) {
1898
1899                                 /* drap: push %reg */
1900                                 save_reg(cfi, op->src.reg, CFI_BP, -cfi->stack_size);
1901                         }
1902
1903                 } else {
1904
1905                         /* push %reg */
1906                         save_reg(cfi, op->src.reg, CFI_CFA, -cfi->stack_size);
1907                 }
1908
1909                 /* detect when asm code uses rbp as a scratch register */
1910                 if (!no_fp && insn->func && op->src.reg == CFI_BP &&
1911                     cfa->base != CFI_BP)
1912                         cfi->bp_scratch = true;
1913                 break;
1914
1915         case OP_DEST_REG_INDIRECT:
1916
1917                 if (cfi->drap) {
1918                         if (op->src.reg == cfa->base && op->src.reg == cfi->drap_reg) {
1919
1920                                 /* drap: mov %drap, disp(%rbp) */
1921                                 cfa->base = CFI_BP_INDIRECT;
1922                                 cfa->offset = op->dest.offset;
1923
1924                                 /* save drap offset so we know when to restore it */
1925                                 cfi->drap_offset = op->dest.offset;
1926                         }
1927
1928                         else if (regs[op->src.reg].base == CFI_UNDEFINED) {
1929
1930                                 /* drap: mov reg, disp(%rbp) */
1931                                 save_reg(cfi, op->src.reg, CFI_BP, op->dest.offset);
1932                         }
1933
1934                 } else if (op->dest.reg == cfa->base) {
1935
1936                         /* mov reg, disp(%rbp) */
1937                         /* mov reg, disp(%rsp) */
1938                         save_reg(cfi, op->src.reg, CFI_CFA,
1939                                  op->dest.offset - cfi->cfa.offset);
1940                 }
1941
1942                 break;
1943
1944         case OP_DEST_LEAVE:
1945                 if ((!cfi->drap && cfa->base != CFI_BP) ||
1946                     (cfi->drap && cfa->base != cfi->drap_reg)) {
1947                         WARN_FUNC("leave instruction with modified stack frame",
1948                                   insn->sec, insn->offset);
1949                         return -1;
1950                 }
1951
1952                 /* leave (mov %rbp, %rsp; pop %rbp) */
1953
1954                 cfi->stack_size = -cfi->regs[CFI_BP].offset - 8;
1955                 restore_reg(cfi, CFI_BP);
1956
1957                 if (!cfi->drap) {
1958                         cfa->base = CFI_SP;
1959                         cfa->offset -= 8;
1960                 }
1961
1962                 break;
1963
1964         case OP_DEST_MEM:
1965                 if (op->src.type != OP_SRC_POP && op->src.type != OP_SRC_POPF) {
1966                         WARN_FUNC("unknown stack-related memory operation",
1967                                   insn->sec, insn->offset);
1968                         return -1;
1969                 }
1970
1971                 /* pop mem */
1972                 cfi->stack_size -= 8;
1973                 if (cfa->base == CFI_SP)
1974                         cfa->offset -= 8;
1975
1976                 break;
1977
1978         default:
1979                 WARN_FUNC("unknown stack-related instruction",
1980                           insn->sec, insn->offset);
1981                 return -1;
1982         }
1983
1984         return 0;
1985 }
1986
1987 static int handle_insn_ops(struct instruction *insn, struct insn_state *state)
1988 {
1989         struct stack_op *op;
1990
1991         list_for_each_entry(op, &insn->stack_ops, list) {
1992                 int res;
1993
1994                 if (insn->alt_group) {
1995                         WARN_FUNC("alternative modifies stack", insn->sec, insn->offset);
1996                         return -1;
1997                 }
1998
1999                 res = update_cfi_state(insn, &state->cfi, op);
2000                 if (res)
2001                         return res;
2002
2003                 if (op->dest.type == OP_DEST_PUSHF) {
2004                         if (!state->uaccess_stack) {
2005                                 state->uaccess_stack = 1;
2006                         } else if (state->uaccess_stack >> 31) {
2007                                 WARN_FUNC("PUSHF stack exhausted",
2008                                           insn->sec, insn->offset);
2009                                 return 1;
2010                         }
2011                         state->uaccess_stack <<= 1;
2012                         state->uaccess_stack  |= state->uaccess;
2013                 }
2014
2015                 if (op->src.type == OP_SRC_POPF) {
2016                         if (state->uaccess_stack) {
2017                                 state->uaccess = state->uaccess_stack & 1;
2018                                 state->uaccess_stack >>= 1;
2019                                 if (state->uaccess_stack == 1)
2020                                         state->uaccess_stack = 0;
2021                         }
2022                 }
2023         }
2024
2025         return 0;
2026 }
2027
2028 static bool insn_cfi_match(struct instruction *insn, struct cfi_state *cfi2)
2029 {
2030         struct cfi_state *cfi1 = &insn->cfi;
2031         int i;
2032
2033         if (memcmp(&cfi1->cfa, &cfi2->cfa, sizeof(cfi1->cfa))) {
2034
2035                 WARN_FUNC("stack state mismatch: cfa1=%d%+d cfa2=%d%+d",
2036                           insn->sec, insn->offset,
2037                           cfi1->cfa.base, cfi1->cfa.offset,
2038                           cfi2->cfa.base, cfi2->cfa.offset);
2039
2040         } else if (memcmp(&cfi1->regs, &cfi2->regs, sizeof(cfi1->regs))) {
2041                 for (i = 0; i < CFI_NUM_REGS; i++) {
2042                         if (!memcmp(&cfi1->regs[i], &cfi2->regs[i],
2043                                     sizeof(struct cfi_reg)))
2044                                 continue;
2045
2046                         WARN_FUNC("stack state mismatch: reg1[%d]=%d%+d reg2[%d]=%d%+d",
2047                                   insn->sec, insn->offset,
2048                                   i, cfi1->regs[i].base, cfi1->regs[i].offset,
2049                                   i, cfi2->regs[i].base, cfi2->regs[i].offset);
2050                         break;
2051                 }
2052
2053         } else if (cfi1->type != cfi2->type) {
2054
2055                 WARN_FUNC("stack state mismatch: type1=%d type2=%d",
2056                           insn->sec, insn->offset, cfi1->type, cfi2->type);
2057
2058         } else if (cfi1->drap != cfi2->drap ||
2059                    (cfi1->drap && cfi1->drap_reg != cfi2->drap_reg) ||
2060                    (cfi1->drap && cfi1->drap_offset != cfi2->drap_offset)) {
2061
2062                 WARN_FUNC("stack state mismatch: drap1=%d(%d,%d) drap2=%d(%d,%d)",
2063                           insn->sec, insn->offset,
2064                           cfi1->drap, cfi1->drap_reg, cfi1->drap_offset,
2065                           cfi2->drap, cfi2->drap_reg, cfi2->drap_offset);
2066
2067         } else
2068                 return true;
2069
2070         return false;
2071 }
2072
2073 static inline bool func_uaccess_safe(struct symbol *func)
2074 {
2075         if (func)
2076                 return func->uaccess_safe;
2077
2078         return false;
2079 }
2080
2081 static inline const char *call_dest_name(struct instruction *insn)
2082 {
2083         if (insn->call_dest)
2084                 return insn->call_dest->name;
2085
2086         return "{dynamic}";
2087 }
2088
2089 static int validate_call(struct instruction *insn, struct insn_state *state)
2090 {
2091         if (state->noinstr && state->instr <= 0 &&
2092             (!insn->call_dest || !insn->call_dest->sec->noinstr)) {
2093                 WARN_FUNC("call to %s() leaves .noinstr.text section",
2094                                 insn->sec, insn->offset, call_dest_name(insn));
2095                 return 1;
2096         }
2097
2098         if (state->uaccess && !func_uaccess_safe(insn->call_dest)) {
2099                 WARN_FUNC("call to %s() with UACCESS enabled",
2100                                 insn->sec, insn->offset, call_dest_name(insn));
2101                 return 1;
2102         }
2103
2104         if (state->df) {
2105                 WARN_FUNC("call to %s() with DF set",
2106                                 insn->sec, insn->offset, call_dest_name(insn));
2107                 return 1;
2108         }
2109
2110         return 0;
2111 }
2112
2113 static int validate_sibling_call(struct instruction *insn, struct insn_state *state)
2114 {
2115         if (has_modified_stack_frame(insn, state)) {
2116                 WARN_FUNC("sibling call from callable instruction with modified stack frame",
2117                                 insn->sec, insn->offset);
2118                 return 1;
2119         }
2120
2121         return validate_call(insn, state);
2122 }
2123
2124 static int validate_return(struct symbol *func, struct instruction *insn, struct insn_state *state)
2125 {
2126         if (state->noinstr && state->instr > 0) {
2127                 WARN_FUNC("return with instrumentation enabled",
2128                           insn->sec, insn->offset);
2129                 return 1;
2130         }
2131
2132         if (state->uaccess && !func_uaccess_safe(func)) {
2133                 WARN_FUNC("return with UACCESS enabled",
2134                           insn->sec, insn->offset);
2135                 return 1;
2136         }
2137
2138         if (!state->uaccess && func_uaccess_safe(func)) {
2139                 WARN_FUNC("return with UACCESS disabled from a UACCESS-safe function",
2140                           insn->sec, insn->offset);
2141                 return 1;
2142         }
2143
2144         if (state->df) {
2145                 WARN_FUNC("return with DF set",
2146                           insn->sec, insn->offset);
2147                 return 1;
2148         }
2149
2150         if (func && has_modified_stack_frame(insn, state)) {
2151                 WARN_FUNC("return with modified stack frame",
2152                           insn->sec, insn->offset);
2153                 return 1;
2154         }
2155
2156         if (state->cfi.bp_scratch) {
2157                 WARN_FUNC("BP used as a scratch register",
2158                           insn->sec, insn->offset);
2159                 return 1;
2160         }
2161
2162         return 0;
2163 }
2164
2165 /*
2166  * Alternatives should not contain any ORC entries, this in turn means they
2167  * should not contain any CFI ops, which implies all instructions should have
2168  * the same same CFI state.
2169  *
2170  * It is possible to constuct alternatives that have unreachable holes that go
2171  * unreported (because they're NOPs), such holes would result in CFI_UNDEFINED
2172  * states which then results in ORC entries, which we just said we didn't want.
2173  *
2174  * Avoid them by copying the CFI entry of the first instruction into the whole
2175  * alternative.
2176  */
2177 static void fill_alternative_cfi(struct objtool_file *file, struct instruction *insn)
2178 {
2179         struct instruction *first_insn = insn;
2180         int alt_group = insn->alt_group;
2181
2182         sec_for_each_insn_continue(file, insn) {
2183                 if (insn->alt_group != alt_group)
2184                         break;
2185                 insn->cfi = first_insn->cfi;
2186         }
2187 }
2188
2189 /*
2190  * Follow the branch starting at the given instruction, and recursively follow
2191  * any other branches (jumps).  Meanwhile, track the frame pointer state at
2192  * each instruction and validate all the rules described in
2193  * tools/objtool/Documentation/stack-validation.txt.
2194  */
2195 static int validate_branch(struct objtool_file *file, struct symbol *func,
2196                            struct instruction *insn, struct insn_state state)
2197 {
2198         struct alternative *alt;
2199         struct instruction *next_insn;
2200         struct section *sec;
2201         u8 visited;
2202         int ret;
2203
2204         sec = insn->sec;
2205
2206         while (1) {
2207                 next_insn = next_insn_same_sec(file, insn);
2208
2209                 if (file->c_file && func && insn->func && func != insn->func->pfunc) {
2210                         WARN("%s() falls through to next function %s()",
2211                              func->name, insn->func->name);
2212                         return 1;
2213                 }
2214
2215                 if (func && insn->ignore) {
2216                         WARN_FUNC("BUG: why am I validating an ignored function?",
2217                                   sec, insn->offset);
2218                         return 1;
2219                 }
2220
2221                 visited = 1 << state.uaccess;
2222                 if (insn->visited) {
2223                         if (!insn->hint && !insn_cfi_match(insn, &state.cfi))
2224                                 return 1;
2225
2226                         if (insn->visited & visited)
2227                                 return 0;
2228                 }
2229
2230                 if (state.noinstr)
2231                         state.instr += insn->instr;
2232
2233                 if (insn->hint)
2234                         state.cfi = insn->cfi;
2235                 else
2236                         insn->cfi = state.cfi;
2237
2238                 insn->visited |= visited;
2239
2240                 if (!insn->ignore_alts && !list_empty(&insn->alts)) {
2241                         bool skip_orig = false;
2242
2243                         list_for_each_entry(alt, &insn->alts, list) {
2244                                 if (alt->skip_orig)
2245                                         skip_orig = true;
2246
2247                                 ret = validate_branch(file, func, alt->insn, state);
2248                                 if (ret) {
2249                                         if (backtrace)
2250                                                 BT_FUNC("(alt)", insn);
2251                                         return ret;
2252                                 }
2253                         }
2254
2255                         if (insn->alt_group)
2256                                 fill_alternative_cfi(file, insn);
2257
2258                         if (skip_orig)
2259                                 return 0;
2260                 }
2261
2262                 switch (insn->type) {
2263
2264                 case INSN_RETURN:
2265                         return validate_return(func, insn, &state);
2266
2267                 case INSN_CALL:
2268                 case INSN_CALL_DYNAMIC:
2269                         ret = validate_call(insn, &state);
2270                         if (ret)
2271                                 return ret;
2272
2273                         if (!no_fp && func && !is_fentry_call(insn) &&
2274                             !has_valid_stack_frame(&state)) {
2275                                 WARN_FUNC("call without frame pointer save/setup",
2276                                           sec, insn->offset);
2277                                 return 1;
2278                         }
2279
2280                         if (dead_end_function(file, insn->call_dest))
2281                                 return 0;
2282
2283                         break;
2284
2285                 case INSN_JUMP_CONDITIONAL:
2286                 case INSN_JUMP_UNCONDITIONAL:
2287                         if (func && is_sibling_call(insn)) {
2288                                 ret = validate_sibling_call(insn, &state);
2289                                 if (ret)
2290                                         return ret;
2291
2292                         } else if (insn->jump_dest) {
2293                                 ret = validate_branch(file, func,
2294                                                       insn->jump_dest, state);
2295                                 if (ret) {
2296                                         if (backtrace)
2297                                                 BT_FUNC("(branch)", insn);
2298                                         return ret;
2299                                 }
2300                         }
2301
2302                         if (insn->type == INSN_JUMP_UNCONDITIONAL)
2303                                 return 0;
2304
2305                         break;
2306
2307                 case INSN_JUMP_DYNAMIC:
2308                 case INSN_JUMP_DYNAMIC_CONDITIONAL:
2309                         if (func && is_sibling_call(insn)) {
2310                                 ret = validate_sibling_call(insn, &state);
2311                                 if (ret)
2312                                         return ret;
2313                         }
2314
2315                         if (insn->type == INSN_JUMP_DYNAMIC)
2316                                 return 0;
2317
2318                         break;
2319
2320                 case INSN_EXCEPTION_RETURN:
2321                         if (handle_insn_ops(insn, &state))
2322                                 return 1;
2323
2324                         /*
2325                          * This handles x86's sync_core() case, where we use an
2326                          * IRET to self. All 'normal' IRET instructions are in
2327                          * STT_NOTYPE entry symbols.
2328                          */
2329                         if (func)
2330                                 break;
2331
2332                         return 0;
2333
2334                 case INSN_CONTEXT_SWITCH:
2335                         if (func && (!next_insn || !next_insn->hint)) {
2336                                 WARN_FUNC("unsupported instruction in callable function",
2337                                           sec, insn->offset);
2338                                 return 1;
2339                         }
2340                         return 0;
2341
2342                 case INSN_STACK:
2343                         if (handle_insn_ops(insn, &state))
2344                                 return 1;
2345                         break;
2346
2347                 case INSN_STAC:
2348                         if (state.uaccess) {
2349                                 WARN_FUNC("recursive UACCESS enable", sec, insn->offset);
2350                                 return 1;
2351                         }
2352
2353                         state.uaccess = true;
2354                         break;
2355
2356                 case INSN_CLAC:
2357                         if (!state.uaccess && func) {
2358                                 WARN_FUNC("redundant UACCESS disable", sec, insn->offset);
2359                                 return 1;
2360                         }
2361
2362                         if (func_uaccess_safe(func) && !state.uaccess_stack) {
2363                                 WARN_FUNC("UACCESS-safe disables UACCESS", sec, insn->offset);
2364                                 return 1;
2365                         }
2366
2367                         state.uaccess = false;
2368                         break;
2369
2370                 case INSN_STD:
2371                         if (state.df)
2372                                 WARN_FUNC("recursive STD", sec, insn->offset);
2373
2374                         state.df = true;
2375                         break;
2376
2377                 case INSN_CLD:
2378                         if (!state.df && func)
2379                                 WARN_FUNC("redundant CLD", sec, insn->offset);
2380
2381                         state.df = false;
2382                         break;
2383
2384                 default:
2385                         break;
2386                 }
2387
2388                 if (insn->dead_end)
2389                         return 0;
2390
2391                 if (!next_insn) {
2392                         if (state.cfi.cfa.base == CFI_UNDEFINED)
2393                                 return 0;
2394                         WARN("%s: unexpected end of section", sec->name);
2395                         return 1;
2396                 }
2397
2398                 insn = next_insn;
2399         }
2400
2401         return 0;
2402 }
2403
2404 static int validate_unwind_hints(struct objtool_file *file, struct section *sec)
2405 {
2406         struct instruction *insn;
2407         struct insn_state state;
2408         int ret, warnings = 0;
2409
2410         if (!file->hints)
2411                 return 0;
2412
2413         init_insn_state(&state, sec);
2414
2415         if (sec) {
2416                 insn = find_insn(file, sec, 0);
2417                 if (!insn)
2418                         return 0;
2419         } else {
2420                 insn = list_first_entry(&file->insn_list, typeof(*insn), list);
2421         }
2422
2423         while (&insn->list != &file->insn_list && (!sec || insn->sec == sec)) {
2424                 if (insn->hint && !insn->visited) {
2425                         ret = validate_branch(file, insn->func, insn, state);
2426                         if (ret && backtrace)
2427                                 BT_FUNC("<=== (hint)", insn);
2428                         warnings += ret;
2429                 }
2430
2431                 insn = list_next_entry(insn, list);
2432         }
2433
2434         return warnings;
2435 }
2436
2437 static int validate_retpoline(struct objtool_file *file)
2438 {
2439         struct instruction *insn;
2440         int warnings = 0;
2441
2442         for_each_insn(file, insn) {
2443                 if (insn->type != INSN_JUMP_DYNAMIC &&
2444                     insn->type != INSN_CALL_DYNAMIC)
2445                         continue;
2446
2447                 if (insn->retpoline_safe)
2448                         continue;
2449
2450                 /*
2451                  * .init.text code is ran before userspace and thus doesn't
2452                  * strictly need retpolines, except for modules which are
2453                  * loaded late, they very much do need retpoline in their
2454                  * .init.text
2455                  */
2456                 if (!strcmp(insn->sec->name, ".init.text") && !module)
2457                         continue;
2458
2459                 WARN_FUNC("indirect %s found in RETPOLINE build",
2460                           insn->sec, insn->offset,
2461                           insn->type == INSN_JUMP_DYNAMIC ? "jump" : "call");
2462
2463                 warnings++;
2464         }
2465
2466         return warnings;
2467 }
2468
2469 static bool is_kasan_insn(struct instruction *insn)
2470 {
2471         return (insn->type == INSN_CALL &&
2472                 !strcmp(insn->call_dest->name, "__asan_handle_no_return"));
2473 }
2474
2475 static bool is_ubsan_insn(struct instruction *insn)
2476 {
2477         return (insn->type == INSN_CALL &&
2478                 !strcmp(insn->call_dest->name,
2479                         "__ubsan_handle_builtin_unreachable"));
2480 }
2481
2482 static bool ignore_unreachable_insn(struct instruction *insn)
2483 {
2484         int i;
2485
2486         if (insn->ignore || insn->type == INSN_NOP)
2487                 return true;
2488
2489         /*
2490          * Ignore any unused exceptions.  This can happen when a whitelisted
2491          * function has an exception table entry.
2492          *
2493          * Also ignore alternative replacement instructions.  This can happen
2494          * when a whitelisted function uses one of the ALTERNATIVE macros.
2495          */
2496         if (!strcmp(insn->sec->name, ".fixup") ||
2497             !strcmp(insn->sec->name, ".altinstr_replacement") ||
2498             !strcmp(insn->sec->name, ".altinstr_aux"))
2499                 return true;
2500
2501         if (!insn->func)
2502                 return false;
2503
2504         /*
2505          * CONFIG_UBSAN_TRAP inserts a UD2 when it sees
2506          * __builtin_unreachable().  The BUG() macro has an unreachable() after
2507          * the UD2, which causes GCC's undefined trap logic to emit another UD2
2508          * (or occasionally a JMP to UD2).
2509          */
2510         if (list_prev_entry(insn, list)->dead_end &&
2511             (insn->type == INSN_BUG ||
2512              (insn->type == INSN_JUMP_UNCONDITIONAL &&
2513               insn->jump_dest && insn->jump_dest->type == INSN_BUG)))
2514                 return true;
2515
2516         /*
2517          * Check if this (or a subsequent) instruction is related to
2518          * CONFIG_UBSAN or CONFIG_KASAN.
2519          *
2520          * End the search at 5 instructions to avoid going into the weeds.
2521          */
2522         for (i = 0; i < 5; i++) {
2523
2524                 if (is_kasan_insn(insn) || is_ubsan_insn(insn))
2525                         return true;
2526
2527                 if (insn->type == INSN_JUMP_UNCONDITIONAL) {
2528                         if (insn->jump_dest &&
2529                             insn->jump_dest->func == insn->func) {
2530                                 insn = insn->jump_dest;
2531                                 continue;
2532                         }
2533
2534                         break;
2535                 }
2536
2537                 if (insn->offset + insn->len >= insn->func->offset + insn->func->len)
2538                         break;
2539
2540                 insn = list_next_entry(insn, list);
2541         }
2542
2543         return false;
2544 }
2545
2546 static int validate_symbol(struct objtool_file *file, struct section *sec,
2547                            struct symbol *sym, struct insn_state *state)
2548 {
2549         struct instruction *insn;
2550         int ret;
2551
2552         if (!sym->len) {
2553                 WARN("%s() is missing an ELF size annotation", sym->name);
2554                 return 1;
2555         }
2556
2557         if (sym->pfunc != sym || sym->alias != sym)
2558                 return 0;
2559
2560         insn = find_insn(file, sec, sym->offset);
2561         if (!insn || insn->ignore || insn->visited)
2562                 return 0;
2563
2564         state->uaccess = sym->uaccess_safe;
2565
2566         ret = validate_branch(file, insn->func, insn, *state);
2567         if (ret && backtrace)
2568                 BT_FUNC("<=== (sym)", insn);
2569         return ret;
2570 }
2571
2572 static int validate_section(struct objtool_file *file, struct section *sec)
2573 {
2574         struct insn_state state;
2575         struct symbol *func;
2576         int warnings = 0;
2577
2578         list_for_each_entry(func, &sec->symbol_list, list) {
2579                 if (func->type != STT_FUNC)
2580                         continue;
2581
2582                 init_insn_state(&state, sec);
2583                 state.cfi.cfa = initial_func_cfi.cfa;
2584                 memcpy(&state.cfi.regs, &initial_func_cfi.regs,
2585                        CFI_NUM_REGS * sizeof(struct cfi_reg));
2586                 state.cfi.stack_size = initial_func_cfi.cfa.offset;
2587
2588                 warnings += validate_symbol(file, sec, func, &state);
2589         }
2590
2591         return warnings;
2592 }
2593
2594 static int validate_vmlinux_functions(struct objtool_file *file)
2595 {
2596         struct section *sec;
2597         int warnings = 0;
2598
2599         sec = find_section_by_name(file->elf, ".noinstr.text");
2600         if (sec) {
2601                 warnings += validate_section(file, sec);
2602                 warnings += validate_unwind_hints(file, sec);
2603         }
2604
2605         sec = find_section_by_name(file->elf, ".entry.text");
2606         if (sec) {
2607                 warnings += validate_section(file, sec);
2608                 warnings += validate_unwind_hints(file, sec);
2609         }
2610
2611         return warnings;
2612 }
2613
2614 static int validate_functions(struct objtool_file *file)
2615 {
2616         struct section *sec;
2617         int warnings = 0;
2618
2619         for_each_sec(file, sec) {
2620                 if (!(sec->sh.sh_flags & SHF_EXECINSTR))
2621                         continue;
2622
2623                 warnings += validate_section(file, sec);
2624         }
2625
2626         return warnings;
2627 }
2628
2629 static int validate_reachable_instructions(struct objtool_file *file)
2630 {
2631         struct instruction *insn;
2632
2633         if (file->ignore_unreachables)
2634                 return 0;
2635
2636         for_each_insn(file, insn) {
2637                 if (insn->visited || ignore_unreachable_insn(insn))
2638                         continue;
2639
2640                 WARN_FUNC("unreachable instruction", insn->sec, insn->offset);
2641                 return 1;
2642         }
2643
2644         return 0;
2645 }
2646
2647 static struct objtool_file file;
2648
2649 int check(const char *_objname, bool orc)
2650 {
2651         int ret, warnings = 0;
2652
2653         objname = _objname;
2654
2655         file.elf = elf_open_read(objname, orc ? O_RDWR : O_RDONLY);
2656         if (!file.elf)
2657                 return 1;
2658
2659         INIT_LIST_HEAD(&file.insn_list);
2660         hash_init(file.insn_hash);
2661         file.c_file = find_section_by_name(file.elf, ".comment");
2662         file.ignore_unreachables = no_unreachable;
2663         file.hints = false;
2664
2665         arch_initial_func_cfi_state(&initial_func_cfi);
2666
2667         ret = decode_sections(&file);
2668         if (ret < 0)
2669                 goto out;
2670         warnings += ret;
2671
2672         if (list_empty(&file.insn_list))
2673                 goto out;
2674
2675         if (vmlinux && !validate_dup) {
2676                 ret = validate_vmlinux_functions(&file);
2677                 if (ret < 0)
2678                         goto out;
2679
2680                 warnings += ret;
2681                 goto out;
2682         }
2683
2684         if (retpoline) {
2685                 ret = validate_retpoline(&file);
2686                 if (ret < 0)
2687                         return ret;
2688                 warnings += ret;
2689         }
2690
2691         ret = validate_functions(&file);
2692         if (ret < 0)
2693                 goto out;
2694         warnings += ret;
2695
2696         ret = validate_unwind_hints(&file, NULL);
2697         if (ret < 0)
2698                 goto out;
2699         warnings += ret;
2700
2701         if (!warnings) {
2702                 ret = validate_reachable_instructions(&file);
2703                 if (ret < 0)
2704                         goto out;
2705                 warnings += ret;
2706         }
2707
2708         if (orc) {
2709                 ret = create_orc(&file);
2710                 if (ret < 0)
2711                         goto out;
2712
2713                 ret = create_orc_sections(&file);
2714                 if (ret < 0)
2715                         goto out;
2716
2717                 ret = elf_write(file.elf);
2718                 if (ret < 0)
2719                         goto out;
2720         }
2721
2722 out:
2723         if (ret < 0) {
2724                 /*
2725                  *  Fatal error.  The binary is corrupt or otherwise broken in
2726                  *  some way, or objtool itself is broken.  Fail the kernel
2727                  *  build.
2728                  */
2729                 return ret;
2730         }
2731
2732         return 0;
2733 }