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_daddiu
, insn_daddu
, insn_dins
, insn_dinsm
,
53 insn_divu
, insn_dmfc0
, insn_dmtc0
, insn_drotr
, insn_drotr32
, insn_dsll
,
54 insn_dsll32
, insn_dsra
, insn_dsrl
, insn_dsrl32
, insn_dsubu
, insn_eret
,
55 insn_ext
, insn_ins
, insn_j
, insn_jal
, insn_jalr
, insn_jr
, insn_lb
,
56 insn_ld
, insn_ldx
, insn_lh
, insn_ll
, insn_lld
, insn_lui
, insn_lw
,
57 insn_lwx
, insn_mfc0
, insn_mfhc0
, insn_mfhi
, insn_mflo
, insn_mtc0
,
58 insn_mthc0
, insn_mul
, insn_or
, insn_ori
, insn_pref
, insn_rfe
,
59 insn_rotr
, insn_sc
, insn_scd
, insn_sd
, insn_sll
, insn_sllv
, insn_slt
,
60 insn_sltiu
, insn_sltu
, insn_sra
, insn_srl
, insn_srlv
, insn_subu
,
61 insn_sw
, insn_sync
, insn_syscall
, insn_tlbp
, insn_tlbr
, insn_tlbwi
,
62 insn_tlbwr
, insn_wait
, insn_wsbh
, insn_xor
, insn_xori
, insn_yield
,
71 static inline u32
build_rs(u32 arg
)
73 WARN(arg
& ~RS_MASK
, KERN_WARNING
"Micro-assembler field overflow\n");
75 return (arg
& RS_MASK
) << RS_SH
;
78 static inline u32
build_rt(u32 arg
)
80 WARN(arg
& ~RT_MASK
, KERN_WARNING
"Micro-assembler field overflow\n");
82 return (arg
& RT_MASK
) << RT_SH
;
85 static inline u32
build_rd(u32 arg
)
87 WARN(arg
& ~RD_MASK
, KERN_WARNING
"Micro-assembler field overflow\n");
89 return (arg
& RD_MASK
) << RD_SH
;
92 static inline u32
build_re(u32 arg
)
94 WARN(arg
& ~RE_MASK
, KERN_WARNING
"Micro-assembler field overflow\n");
96 return (arg
& RE_MASK
) << RE_SH
;
99 static inline u32
build_simm(s32 arg
)
101 WARN(arg
> 0x7fff || arg
< -0x8000,
102 KERN_WARNING
"Micro-assembler field overflow\n");
107 static inline u32
build_uimm(u32 arg
)
109 WARN(arg
& ~IMM_MASK
, KERN_WARNING
"Micro-assembler field overflow\n");
111 return arg
& IMM_MASK
;
114 static inline u32
build_scimm(u32 arg
)
116 WARN(arg
& ~SCIMM_MASK
,
117 KERN_WARNING
"Micro-assembler field overflow\n");
119 return (arg
& SCIMM_MASK
) << SCIMM_SH
;
122 static inline u32
build_scimm9(s32 arg
)
124 WARN((arg
> 0xff || arg
< -0x100),
125 KERN_WARNING
"Micro-assembler field overflow\n");
127 return (arg
& SIMM9_MASK
) << SIMM9_SH
;
130 static inline u32
build_func(u32 arg
)
132 WARN(arg
& ~FUNC_MASK
, KERN_WARNING
"Micro-assembler field overflow\n");
134 return arg
& FUNC_MASK
;
137 static inline u32
build_set(u32 arg
)
139 WARN(arg
& ~SET_MASK
, KERN_WARNING
"Micro-assembler field overflow\n");
141 return arg
& SET_MASK
;
144 static void build_insn(u32
**buf
, enum opcode opc
, ...);
146 #define I_u1u2u3(op) \
149 build_insn(buf, insn##op, a, b, c); \
151 UASM_EXPORT_SYMBOL(uasm_i##op);
153 #define I_s3s1s2(op) \
156 build_insn(buf, insn##op, b, c, a); \
158 UASM_EXPORT_SYMBOL(uasm_i##op);
160 #define I_u2u1u3(op) \
163 build_insn(buf, insn##op, b, a, c); \
165 UASM_EXPORT_SYMBOL(uasm_i##op);
167 #define I_u3u2u1(op) \
170 build_insn(buf, insn##op, c, b, a); \
172 UASM_EXPORT_SYMBOL(uasm_i##op);
174 #define I_u3u1u2(op) \
177 build_insn(buf, insn##op, b, c, a); \
179 UASM_EXPORT_SYMBOL(uasm_i##op);
181 #define I_u1u2s3(op) \
184 build_insn(buf, insn##op, a, b, c); \
186 UASM_EXPORT_SYMBOL(uasm_i##op);
188 #define I_u2s3u1(op) \
191 build_insn(buf, insn##op, c, a, b); \
193 UASM_EXPORT_SYMBOL(uasm_i##op);
195 #define I_u2u1s3(op) \
198 build_insn(buf, insn##op, b, a, c); \
200 UASM_EXPORT_SYMBOL(uasm_i##op);
202 #define I_u2u1msbu3(op) \
205 build_insn(buf, insn##op, b, a, c+d-1, c); \
207 UASM_EXPORT_SYMBOL(uasm_i##op);
209 #define I_u2u1msb32u3(op) \
212 build_insn(buf, insn##op, b, a, c+d-33, c); \
214 UASM_EXPORT_SYMBOL(uasm_i##op);
216 #define I_u2u1msbdu3(op) \
219 build_insn(buf, insn##op, b, a, d-1, c); \
221 UASM_EXPORT_SYMBOL(uasm_i##op);
226 build_insn(buf, insn##op, a, b); \
228 UASM_EXPORT_SYMBOL(uasm_i##op);
233 build_insn(buf, insn##op, b, a); \
235 UASM_EXPORT_SYMBOL(uasm_i##op);
240 build_insn(buf, insn##op, a, b); \
242 UASM_EXPORT_SYMBOL(uasm_i##op);
247 build_insn(buf, insn##op, a); \
249 UASM_EXPORT_SYMBOL(uasm_i##op);
254 build_insn(buf, insn##op); \
256 UASM_EXPORT_SYMBOL(uasm_i##op);
332 I_u2u1msb32u3(_dinsm
);
339 #ifdef CONFIG_CPU_CAVIUM_OCTEON
340 #include <asm/octeon/octeon.h>
341 void ISAFUNC(uasm_i_pref
)(u32
**buf
, unsigned int a
, signed int b
,
344 if (CAVIUM_OCTEON_DCACHE_PREFETCH_WAR
&& a
<= 24 && a
!= 5)
346 * As per erratum Core-14449, replace prefetches 0-4,
347 * 6-24 with 'pref 28'.
349 build_insn(buf
, insn_pref
, c
, 28, b
);
351 build_insn(buf
, insn_pref
, c
, a
, b
);
353 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_i_pref
));
359 void ISAFUNC(uasm_build_label
)(struct uasm_label
**lab
, u32
*addr
, int lid
)
365 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_build_label
));
367 int ISAFUNC(uasm_in_compat_space_p
)(long addr
)
369 /* Is this address in 32bit compat space? */
371 return (((addr
) & 0xffffffff00000000L
) == 0xffffffff00000000L
);
376 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_in_compat_space_p
));
378 static int uasm_rel_highest(long val
)
381 return ((((val
+ 0x800080008000L
) >> 48) & 0xffff) ^ 0x8000) - 0x8000;
387 static int uasm_rel_higher(long val
)
390 return ((((val
+ 0x80008000L
) >> 32) & 0xffff) ^ 0x8000) - 0x8000;
396 int ISAFUNC(uasm_rel_hi
)(long val
)
398 return ((((val
+ 0x8000L
) >> 16) & 0xffff) ^ 0x8000) - 0x8000;
400 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_rel_hi
));
402 int ISAFUNC(uasm_rel_lo
)(long val
)
404 return ((val
& 0xffff) ^ 0x8000) - 0x8000;
406 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_rel_lo
));
408 void ISAFUNC(UASM_i_LA_mostly
)(u32
**buf
, unsigned int rs
, long addr
)
410 if (!ISAFUNC(uasm_in_compat_space_p
)(addr
)) {
411 ISAFUNC(uasm_i_lui
)(buf
, rs
, uasm_rel_highest(addr
));
412 if (uasm_rel_higher(addr
))
413 ISAFUNC(uasm_i_daddiu
)(buf
, rs
, rs
, uasm_rel_higher(addr
));
414 if (ISAFUNC(uasm_rel_hi(addr
))) {
415 ISAFUNC(uasm_i_dsll
)(buf
, rs
, rs
, 16);
416 ISAFUNC(uasm_i_daddiu
)(buf
, rs
, rs
,
417 ISAFUNC(uasm_rel_hi
)(addr
));
418 ISAFUNC(uasm_i_dsll
)(buf
, rs
, rs
, 16);
420 ISAFUNC(uasm_i_dsll32
)(buf
, rs
, rs
, 0);
422 ISAFUNC(uasm_i_lui
)(buf
, rs
, ISAFUNC(uasm_rel_hi(addr
)));
424 UASM_EXPORT_SYMBOL(ISAFUNC(UASM_i_LA_mostly
));
426 void ISAFUNC(UASM_i_LA
)(u32
**buf
, unsigned int rs
, long addr
)
428 ISAFUNC(UASM_i_LA_mostly
)(buf
, rs
, addr
);
429 if (ISAFUNC(uasm_rel_lo(addr
))) {
430 if (!ISAFUNC(uasm_in_compat_space_p
)(addr
))
431 ISAFUNC(uasm_i_daddiu
)(buf
, rs
, rs
,
432 ISAFUNC(uasm_rel_lo(addr
)));
434 ISAFUNC(uasm_i_addiu
)(buf
, rs
, rs
,
435 ISAFUNC(uasm_rel_lo(addr
)));
438 UASM_EXPORT_SYMBOL(ISAFUNC(UASM_i_LA
));
440 /* Handle relocations. */
441 void ISAFUNC(uasm_r_mips_pc16
)(struct uasm_reloc
**rel
, u32
*addr
, int lid
)
444 (*rel
)->type
= R_MIPS_PC16
;
448 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_r_mips_pc16
));
450 static inline void __resolve_relocs(struct uasm_reloc
*rel
,
451 struct uasm_label
*lab
);
453 void ISAFUNC(uasm_resolve_relocs
)(struct uasm_reloc
*rel
,
454 struct uasm_label
*lab
)
456 struct uasm_label
*l
;
458 for (; rel
->lab
!= UASM_LABEL_INVALID
; rel
++)
459 for (l
= lab
; l
->lab
!= UASM_LABEL_INVALID
; l
++)
460 if (rel
->lab
== l
->lab
)
461 __resolve_relocs(rel
, l
);
463 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_resolve_relocs
));
465 void ISAFUNC(uasm_move_relocs
)(struct uasm_reloc
*rel
, u32
*first
, u32
*end
,
468 for (; rel
->lab
!= UASM_LABEL_INVALID
; rel
++)
469 if (rel
->addr
>= first
&& rel
->addr
< end
)
472 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_move_relocs
));
474 void ISAFUNC(uasm_move_labels
)(struct uasm_label
*lab
, u32
*first
, u32
*end
,
477 for (; lab
->lab
!= UASM_LABEL_INVALID
; lab
++)
478 if (lab
->addr
>= first
&& lab
->addr
< end
)
481 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_move_labels
));
483 void ISAFUNC(uasm_copy_handler
)(struct uasm_reloc
*rel
, struct uasm_label
*lab
,
484 u32
*first
, u32
*end
, u32
*target
)
486 long off
= (long)(target
- first
);
488 memcpy(target
, first
, (end
- first
) * sizeof(u32
));
490 ISAFUNC(uasm_move_relocs(rel
, first
, end
, off
));
491 ISAFUNC(uasm_move_labels(lab
, first
, end
, off
));
493 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_copy_handler
));
495 int ISAFUNC(uasm_insn_has_bdelay
)(struct uasm_reloc
*rel
, u32
*addr
)
497 for (; rel
->lab
!= UASM_LABEL_INVALID
; rel
++) {
498 if (rel
->addr
== addr
499 && (rel
->type
== R_MIPS_PC16
500 || rel
->type
== R_MIPS_26
))
506 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_insn_has_bdelay
));
508 /* Convenience functions for labeled branches. */
509 void ISAFUNC(uasm_il_bltz
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
512 uasm_r_mips_pc16(r
, *p
, lid
);
513 ISAFUNC(uasm_i_bltz
)(p
, reg
, 0);
515 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_bltz
));
517 void ISAFUNC(uasm_il_b
)(u32
**p
, struct uasm_reloc
**r
, int lid
)
519 uasm_r_mips_pc16(r
, *p
, lid
);
520 ISAFUNC(uasm_i_b
)(p
, 0);
522 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_b
));
524 void ISAFUNC(uasm_il_beq
)(u32
**p
, struct uasm_reloc
**r
, unsigned int r1
,
525 unsigned int r2
, int lid
)
527 uasm_r_mips_pc16(r
, *p
, lid
);
528 ISAFUNC(uasm_i_beq
)(p
, r1
, r2
, 0);
530 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_beq
));
532 void ISAFUNC(uasm_il_beqz
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
535 uasm_r_mips_pc16(r
, *p
, lid
);
536 ISAFUNC(uasm_i_beqz
)(p
, reg
, 0);
538 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_beqz
));
540 void ISAFUNC(uasm_il_beqzl
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
543 uasm_r_mips_pc16(r
, *p
, lid
);
544 ISAFUNC(uasm_i_beqzl
)(p
, reg
, 0);
546 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_beqzl
));
548 void ISAFUNC(uasm_il_bne
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg1
,
549 unsigned int reg2
, int lid
)
551 uasm_r_mips_pc16(r
, *p
, lid
);
552 ISAFUNC(uasm_i_bne
)(p
, reg1
, reg2
, 0);
554 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_bne
));
556 void ISAFUNC(uasm_il_bnez
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
559 uasm_r_mips_pc16(r
, *p
, lid
);
560 ISAFUNC(uasm_i_bnez
)(p
, reg
, 0);
562 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_bnez
));
564 void ISAFUNC(uasm_il_bgezl
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
567 uasm_r_mips_pc16(r
, *p
, lid
);
568 ISAFUNC(uasm_i_bgezl
)(p
, reg
, 0);
570 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_bgezl
));
572 void ISAFUNC(uasm_il_bgez
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
575 uasm_r_mips_pc16(r
, *p
, lid
);
576 ISAFUNC(uasm_i_bgez
)(p
, reg
, 0);
578 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_bgez
));
580 void ISAFUNC(uasm_il_bbit0
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
581 unsigned int bit
, int lid
)
583 uasm_r_mips_pc16(r
, *p
, lid
);
584 ISAFUNC(uasm_i_bbit0
)(p
, reg
, bit
, 0);
586 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_bbit0
));
588 void ISAFUNC(uasm_il_bbit1
)(u32
**p
, struct uasm_reloc
**r
, unsigned int reg
,
589 unsigned int bit
, int lid
)
591 uasm_r_mips_pc16(r
, *p
, lid
);
592 ISAFUNC(uasm_i_bbit1
)(p
, reg
, bit
, 0);
594 UASM_EXPORT_SYMBOL(ISAFUNC(uasm_il_bbit1
));