2 * This file is subject to the terms and conditions of the GNU General Public
3 * License. See the file "COPYING" in the main directory of this archive
6 * A small micro-assembler. It is intentionally kept simple, does only
7 * support a subset of instructions, and does not try to hide pipeline
8 * effects like branch delay slots.
10 * Copyright (C) 2004, 2005, 2006, 2008 Thiemo Seufer
11 * Copyright (C) 2005, 2007 Maciej W. Rozycki
12 * Copyright (C) 2006 Ralf Baechle (ralf@linux-mips.org)
13 * Copyright (C) 2012, 2013 MIPS Technologies, Inc. All rights reserved.
37 #define IMM_MASK 0xffff
39 #define JIMM_MASK 0x3ffffff
41 #define FUNC_MASK 0x3f
46 #define SIMM9_MASK 0x1ff
50 insn_addiu, insn_addu, insn_and, insn_andi, insn_bbit0, insn_bbit1,
51 insn_beq, insn_beql, insn_bgez, insn_bgezl, insn_bltz, insn_bltzl,
52 insn_bne, insn_cache, insn_cfc1, insn_cfcmsa, insn_ctc1, insn_ctcmsa,
53 insn_daddiu, insn_daddu, insn_di, insn_dins, insn_dinsm, insn_divu,
54 insn_dmfc0, insn_dmtc0, insn_drotr, insn_drotr32, insn_dsll,
55 insn_dsll32, insn_dsra, insn_dsrl, insn_dsrl32, insn_dsubu, insn_eret,
56 insn_ext, insn_ins, insn_j, insn_jal, insn_jalr, insn_jr, insn_lb,
57 insn_ld, insn_ldx, insn_lh, insn_ll, insn_lld, insn_lui, insn_lw,
58 insn_lwx, insn_mfc0, insn_mfhc0, insn_mfhi, insn_mflo, insn_mtc0,
59 insn_mthc0, insn_mthi, insn_mtlo, insn_mul, insn_or, insn_ori,
60 insn_pref, insn_rfe, insn_rotr, insn_sc, insn_scd, insn_sd, insn_sll,
61 insn_sllv, insn_slt, insn_sltiu, insn_sltu, insn_sra, insn_srl,
62 insn_srlv, insn_subu, insn_sw, insn_sync, insn_syscall, insn_tlbp,
63 insn_tlbr, insn_tlbwi, insn_tlbwr, insn_wait, insn_wsbh, insn_xor,
64 insn_xori, insn_yield, insn_lddir, insn_ldpte, insn_lhu,
73 static inline u32 build_rs(u32 arg)
75 WARN(arg & ~RS_MASK, KERN_WARNING "Micro-assembler field overflow\n");
77 return (arg & RS_MASK) << RS_SH;
80 static inline u32 build_rt(u32 arg)
82 WARN(arg & ~RT_MASK, KERN_WARNING "Micro-assembler field overflow\n");
84 return (arg & RT_MASK) << RT_SH;
87 static inline u32 build_rd(u32 arg)
89 WARN(arg & ~RD_MASK, KERN_WARNING "Micro-assembler field overflow\n");
91 return (arg & RD_MASK) << RD_SH;
94 static inline u32 build_re(u32 arg)
96 WARN(arg & ~RE_MASK, KERN_WARNING "Micro-assembler field overflow\n");
98 return (arg & RE_MASK) << RE_SH;
101 static inline u32 build_simm(s32 arg)
103 WARN(arg > 0x7fff || arg < -0x8000,
104 KERN_WARNING "Micro-assembler field overflow\n");
109 static inline u32 build_uimm(u32 arg)
111 WARN(arg & ~IMM_MASK, KERN_WARNING "Micro-assembler field overflow\n");
113 return arg & IMM_MASK;
116 static inline u32 build_scimm(u32 arg)
118 WARN(arg & ~SCIMM_MASK,
119 KERN_WARNING "Micro-assembler field overflow\n");
121 return (arg & SCIMM_MASK) << SCIMM_SH;
124 static inline u32 build_scimm9(s32 arg)
126 WARN((arg > 0xff || arg < -0x100),
127 KERN_WARNING "Micro-assembler field overflow\n");
129 return (arg & SIMM9_MASK) << SIMM9_SH;
132 static inline u32 build_func(u32 arg)
134 WARN(arg & ~FUNC_MASK, KERN_WARNING "Micro-assembler field overflow\n");
136 return arg & FUNC_MASK;
139 static inline u32 build_set(u32 arg)
141 WARN(arg & ~SET_MASK, KERN_WARNING "Micro-assembler field overflow\n");
143 return arg & SET_MASK;
146 static void build_insn(u32 **buf, enum opcode opc, ...);
148 #define I_u1u2u3(op) \
151 build_insn(buf, insn##op, a, b, c); \
153 UASM_EXPORT_SYMBOL(uasm_i##op);
155 #define I_s3s1s2(op) \
158 build_insn(buf, insn##op, b, c, a); \
160 UASM_EXPORT_SYMBOL(uasm_i##op);
162 #define I_u2u1u3(op) \
165 build_insn(buf, insn##op, b, a, c); \
167 UASM_EXPORT_SYMBOL(uasm_i##op);
169 #define I_u3u2u1(op) \
172 build_insn(buf, insn##op, c, b, a); \
174 UASM_EXPORT_SYMBOL(uasm_i##op);
176 #define I_u3u1u2(op) \
179 build_insn(buf, insn##op, b, c, a); \
181 UASM_EXPORT_SYMBOL(uasm_i##op);
183 #define I_u1u2s3(op) \
186 build_insn(buf, insn##op, a, b, c); \
188 UASM_EXPORT_SYMBOL(uasm_i##op);
190 #define I_u2s3u1(op) \
193 build_insn(buf, insn##op, c, a, b); \
195 UASM_EXPORT_SYMBOL(uasm_i##op);
197 #define I_u2u1s3(op) \
200 build_insn(buf, insn##op, b, a, c); \
202 UASM_EXPORT_SYMBOL(uasm_i##op);
204 #define I_u2u1msbu3(op) \
207 build_insn(buf, insn##op, b, a, c+d-1, c); \
209 UASM_EXPORT_SYMBOL(uasm_i##op);
211 #define I_u2u1msb32u3(op) \
214 build_insn(buf, insn##op, b, a, c+d-33, c); \
216 UASM_EXPORT_SYMBOL(uasm_i##op);
218 #define I_u2u1msbdu3(op) \
221 build_insn(buf, insn##op, b, a, d-1, c); \
223 UASM_EXPORT_SYMBOL(uasm_i##op);
228 build_insn(buf, insn##op, a, b); \
230 UASM_EXPORT_SYMBOL(uasm_i##op);
235 build_insn(buf, insn##op, b, a); \
237 UASM_EXPORT_SYMBOL(uasm_i##op);
242 build_insn(buf, insn##op, a, b); \
244 UASM_EXPORT_SYMBOL(uasm_i##op);
249 build_insn(buf, insn##op, a); \
251 UASM_EXPORT_SYMBOL(uasm_i##op);
256 build_insn(buf, insn##op); \
258 UASM_EXPORT_SYMBOL(uasm_i##op);
342 I_u2u1msb32u3(_dinsm);
351 #ifdef CONFIG_CPU_CAVIUM_OCTEON
352 #include <asm/octeon/octeon.h>
353 void uasm_i_pref(u32 **buf, unsigned int a, signed int b,
356 if (CAVIUM_OCTEON_DCACHE_PREFETCH_WAR && a <= 24 && a != 5)
358 * As per erratum Core-14449, replace prefetches 0-4,
359 * 6-24 with 'pref 28'.
361 build_insn(buf, insn_pref, c, 28, b);
363 build_insn(buf, insn_pref, c, a, b);
365 UASM_EXPORT_SYMBOL(uasm_i_pref);
371 void uasm_build_label(struct uasm_label **lab, u32 *addr, int lid)
377 UASM_EXPORT_SYMBOL(uasm_build_label);
379 int uasm_in_compat_space_p(long addr)
381 /* Is this address in 32bit compat space? */
382 return addr == (int)addr;
384 UASM_EXPORT_SYMBOL(uasm_in_compat_space_p);
386 static int uasm_rel_highest(long val)
389 return ((((val + 0x800080008000L) >> 48) & 0xffff) ^ 0x8000) - 0x8000;
395 static int uasm_rel_higher(long val)
398 return ((((val + 0x80008000L) >> 32) & 0xffff) ^ 0x8000) - 0x8000;
404 int uasm_rel_hi(long val)
406 return ((((val + 0x8000L) >> 16) & 0xffff) ^ 0x8000) - 0x8000;
408 UASM_EXPORT_SYMBOL(uasm_rel_hi);
410 int uasm_rel_lo(long val)
412 return ((val & 0xffff) ^ 0x8000) - 0x8000;
414 UASM_EXPORT_SYMBOL(uasm_rel_lo);
416 void UASM_i_LA_mostly(u32 **buf, unsigned int rs, long addr)
418 if (!uasm_in_compat_space_p(addr)) {
419 uasm_i_lui(buf, rs, uasm_rel_highest(addr));
420 if (uasm_rel_higher(addr))
421 uasm_i_daddiu(buf, rs, rs, uasm_rel_higher(addr));
422 if (uasm_rel_hi(addr)) {
423 uasm_i_dsll(buf, rs, rs, 16);
424 uasm_i_daddiu(buf, rs, rs,
426 uasm_i_dsll(buf, rs, rs, 16);
428 uasm_i_dsll32(buf, rs, rs, 0);
430 uasm_i_lui(buf, rs, uasm_rel_hi(addr));
432 UASM_EXPORT_SYMBOL(UASM_i_LA_mostly);
434 void UASM_i_LA(u32 **buf, unsigned int rs, long addr)
436 UASM_i_LA_mostly(buf, rs, addr);
437 if (uasm_rel_lo(addr)) {
438 if (!uasm_in_compat_space_p(addr))
439 uasm_i_daddiu(buf, rs, rs,
442 uasm_i_addiu(buf, rs, rs,
446 UASM_EXPORT_SYMBOL(UASM_i_LA);
448 /* Handle relocations. */
449 void uasm_r_mips_pc16(struct uasm_reloc **rel, u32 *addr, int lid)
452 (*rel)->type = R_MIPS_PC16;
456 UASM_EXPORT_SYMBOL(uasm_r_mips_pc16);
458 static inline void __resolve_relocs(struct uasm_reloc *rel,
459 struct uasm_label *lab);
461 void uasm_resolve_relocs(struct uasm_reloc *rel,
462 struct uasm_label *lab)
464 struct uasm_label *l;
466 for (; rel->lab != UASM_LABEL_INVALID; rel++)
467 for (l = lab; l->lab != UASM_LABEL_INVALID; l++)
468 if (rel->lab == l->lab)
469 __resolve_relocs(rel, l);
471 UASM_EXPORT_SYMBOL(uasm_resolve_relocs);
473 void uasm_move_relocs(struct uasm_reloc *rel, u32 *first, u32 *end,
476 for (; rel->lab != UASM_LABEL_INVALID; rel++)
477 if (rel->addr >= first && rel->addr < end)
480 UASM_EXPORT_SYMBOL(uasm_move_relocs);
482 void uasm_move_labels(struct uasm_label *lab, u32 *first, u32 *end,
485 for (; lab->lab != UASM_LABEL_INVALID; lab++)
486 if (lab->addr >= first && lab->addr < end)
489 UASM_EXPORT_SYMBOL(uasm_move_labels);
491 void uasm_copy_handler(struct uasm_reloc *rel, struct uasm_label *lab,
492 u32 *first, u32 *end, u32 *target)
494 long off = (long)(target - first);
496 memcpy(target, first, (end - first) * sizeof(u32));
498 uasm_move_relocs(rel, first, end, off);
499 uasm_move_labels(lab, first, end, off);
501 UASM_EXPORT_SYMBOL(uasm_copy_handler);
503 int uasm_insn_has_bdelay(struct uasm_reloc *rel, u32 *addr)
505 for (; rel->lab != UASM_LABEL_INVALID; rel++) {
506 if (rel->addr == addr
507 && (rel->type == R_MIPS_PC16
508 || rel->type == R_MIPS_26))
514 UASM_EXPORT_SYMBOL(uasm_insn_has_bdelay);
516 /* Convenience functions for labeled branches. */
517 void uasm_il_bltz(u32 **p, struct uasm_reloc **r, unsigned int reg,
520 uasm_r_mips_pc16(r, *p, lid);
521 uasm_i_bltz(p, reg, 0);
523 UASM_EXPORT_SYMBOL(uasm_il_bltz);
525 void uasm_il_b(u32 **p, struct uasm_reloc **r, int lid)
527 uasm_r_mips_pc16(r, *p, lid);
530 UASM_EXPORT_SYMBOL(uasm_il_b);
532 void uasm_il_beq(u32 **p, struct uasm_reloc **r, unsigned int r1,
533 unsigned int r2, int lid)
535 uasm_r_mips_pc16(r, *p, lid);
536 uasm_i_beq(p, r1, r2, 0);
538 UASM_EXPORT_SYMBOL(uasm_il_beq);
540 void uasm_il_beqz(u32 **p, struct uasm_reloc **r, unsigned int reg,
543 uasm_r_mips_pc16(r, *p, lid);
544 uasm_i_beqz(p, reg, 0);
546 UASM_EXPORT_SYMBOL(uasm_il_beqz);
548 void uasm_il_beqzl(u32 **p, struct uasm_reloc **r, unsigned int reg,
551 uasm_r_mips_pc16(r, *p, lid);
552 uasm_i_beqzl(p, reg, 0);
554 UASM_EXPORT_SYMBOL(uasm_il_beqzl);
556 void uasm_il_bne(u32 **p, struct uasm_reloc **r, unsigned int reg1,
557 unsigned int reg2, int lid)
559 uasm_r_mips_pc16(r, *p, lid);
560 uasm_i_bne(p, reg1, reg2, 0);
562 UASM_EXPORT_SYMBOL(uasm_il_bne);
564 void uasm_il_bnez(u32 **p, struct uasm_reloc **r, unsigned int reg,
567 uasm_r_mips_pc16(r, *p, lid);
568 uasm_i_bnez(p, reg, 0);
570 UASM_EXPORT_SYMBOL(uasm_il_bnez);
572 void uasm_il_bgezl(u32 **p, struct uasm_reloc **r, unsigned int reg,
575 uasm_r_mips_pc16(r, *p, lid);
576 uasm_i_bgezl(p, reg, 0);
578 UASM_EXPORT_SYMBOL(uasm_il_bgezl);
580 void uasm_il_bgez(u32 **p, struct uasm_reloc **r, unsigned int reg,
583 uasm_r_mips_pc16(r, *p, lid);
584 uasm_i_bgez(p, reg, 0);
586 UASM_EXPORT_SYMBOL(uasm_il_bgez);
588 void uasm_il_bbit0(u32 **p, struct uasm_reloc **r, unsigned int reg,
589 unsigned int bit, int lid)
591 uasm_r_mips_pc16(r, *p, lid);
592 uasm_i_bbit0(p, reg, bit, 0);
594 UASM_EXPORT_SYMBOL(uasm_il_bbit0);
596 void uasm_il_bbit1(u32 **p, struct uasm_reloc **r, unsigned int reg,
597 unsigned int bit, int lid)
599 uasm_r_mips_pc16(r, *p, lid);
600 uasm_i_bbit1(p, reg, bit, 0);
602 UASM_EXPORT_SYMBOL(uasm_il_bbit1);