mirror of https://github.com/xemu-project/xemu.git
Some cleanups after dyngen removal
this patch removes some now unused things after dyngen removal.
1. dyngen-exec.h: op_param, op _jmp and some associated macros
are now unused;
2. Makefile.target: tcg-dyngen is not needed anymore
2. tcg/tcg-op.h, tcg/tcg-opc.h: gen-op.h is dead
3. tcg.c:
- INDEX_op_end is now the first op
- CONFIG_DYNGEN_OP is never defined
4. tcg.h: dyngen_op not needed anymore
5. exec-all.h: remove some ASM macros.
Signed-off-by: Laurent Desnogues <laurent.desnogues@gmail.com>
Signed-off-by: Aurelien Jarno <aurelien@aurel32.net>
git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@5922 c046a42c-6fe2-441c-8c8c-71466251a162
This commit is contained in:
aurel32
parent
0b97134b29
commit
49516bc0d6
|
|
@ -186,7 +186,7 @@ all: $(PROGS)
|
||||||
LIBOBJS=exec.o kqemu.o translate-all.o cpu-exec.o\
|
LIBOBJS=exec.o kqemu.o translate-all.o cpu-exec.o\
|
||||||
translate.o host-utils.o
|
translate.o host-utils.o
|
||||||
# TCG code generator
|
# TCG code generator
|
||||||
LIBOBJS+= tcg/tcg.o tcg/tcg-dyngen.o tcg/tcg-runtime.o
|
LIBOBJS+= tcg/tcg.o tcg/tcg-runtime.o
|
||||||
CPPFLAGS+=-I$(SRC_PATH)/tcg -I$(SRC_PATH)/tcg/$(ARCH)
|
CPPFLAGS+=-I$(SRC_PATH)/tcg -I$(SRC_PATH)/tcg/$(ARCH)
|
||||||
ifeq ($(ARCH),sparc64)
|
ifeq ($(ARCH),sparc64)
|
||||||
CPPFLAGS+=-I$(SRC_PATH)/tcg/sparc
|
CPPFLAGS+=-I$(SRC_PATH)/tcg/sparc
|
||||||
|
|
|
||||||
|
|
@ -201,10 +201,6 @@ extern int printf(const char *, ...);
|
||||||
/* force GCC to generate only one epilog at the end of the function */
|
/* force GCC to generate only one epilog at the end of the function */
|
||||||
#define FORCE_RET() __asm__ __volatile__("" : : : "memory");
|
#define FORCE_RET() __asm__ __volatile__("" : : : "memory");
|
||||||
|
|
||||||
#ifndef OPPROTO
|
|
||||||
#define OPPROTO
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#define xglue(x, y) x ## y
|
#define xglue(x, y) x ## y
|
||||||
#define glue(x, y) xglue(x, y)
|
#define glue(x, y) xglue(x, y)
|
||||||
#define stringify(s) tostring(s)
|
#define stringify(s) tostring(s)
|
||||||
|
|
@ -217,79 +213,6 @@ extern int printf(const char *, ...);
|
||||||
#define __hidden
|
#define __hidden
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#if defined(__alpha__)
|
|
||||||
/* Suggested by Richard Henderson. This will result in code like
|
|
||||||
ldah $0,__op_param1($29) !gprelhigh
|
|
||||||
lda $0,__op_param1($0) !gprellow
|
|
||||||
We can then conveniently change $29 to $31 and adapt the offsets to
|
|
||||||
emit the appropriate constant. */
|
|
||||||
extern int __op_param1 __hidden;
|
|
||||||
extern int __op_param2 __hidden;
|
|
||||||
extern int __op_param3 __hidden;
|
|
||||||
#define PARAM1 ({ int _r; asm("" : "=r"(_r) : "0" (&__op_param1)); _r; })
|
|
||||||
#define PARAM2 ({ int _r; asm("" : "=r"(_r) : "0" (&__op_param2)); _r; })
|
|
||||||
#define PARAM3 ({ int _r; asm("" : "=r"(_r) : "0" (&__op_param3)); _r; })
|
|
||||||
#elif defined(__s390__)
|
|
||||||
extern int __op_param1 __hidden;
|
|
||||||
extern int __op_param2 __hidden;
|
|
||||||
extern int __op_param3 __hidden;
|
|
||||||
#define PARAM1 ({ int _r; asm("bras %0,8; .long " ASM_NAME(__op_param1) "; l %0,0(%0)" : "=r"(_r) : ); _r; })
|
|
||||||
#define PARAM2 ({ int _r; asm("bras %0,8; .long " ASM_NAME(__op_param2) "; l %0,0(%0)" : "=r"(_r) : ); _r; })
|
|
||||||
#define PARAM3 ({ int _r; asm("bras %0,8; .long " ASM_NAME(__op_param3) "; l %0,0(%0)" : "=r"(_r) : ); _r; })
|
|
||||||
#else
|
|
||||||
#if defined(__APPLE__)
|
|
||||||
static int __op_param1, __op_param2, __op_param3;
|
|
||||||
#else
|
|
||||||
extern int __op_param1, __op_param2, __op_param3;
|
|
||||||
#endif
|
|
||||||
#define PARAM1 ((long)(&__op_param1))
|
|
||||||
#define PARAM2 ((long)(&__op_param2))
|
|
||||||
#define PARAM3 ((long)(&__op_param3))
|
|
||||||
#endif /* !defined(__alpha__) */
|
|
||||||
|
|
||||||
extern int __op_jmp0, __op_jmp1, __op_jmp2, __op_jmp3;
|
|
||||||
|
|
||||||
#if defined(_WIN32) || defined(__APPLE__)
|
|
||||||
#define ASM_NAME(x) "_" #x
|
|
||||||
#else
|
|
||||||
#define ASM_NAME(x) #x
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#if defined(__i386__)
|
|
||||||
#define EXIT_TB() asm volatile ("ret")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("jmp " ASM_NAME(__op_gen_label) #n)
|
|
||||||
#elif defined(__x86_64__)
|
|
||||||
#define EXIT_TB() asm volatile ("ret")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("jmp " ASM_NAME(__op_gen_label) #n)
|
|
||||||
#elif defined(__powerpc__)
|
|
||||||
#define EXIT_TB() asm volatile ("blr")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("b " ASM_NAME(__op_gen_label) #n)
|
|
||||||
#elif defined(__s390__)
|
|
||||||
#define EXIT_TB() asm volatile ("br %r14")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("larl %r7,12; l %r7,0(%r7); br %r7; .long " ASM_NAME(__op_gen_label) #n)
|
|
||||||
#elif defined(__alpha__)
|
|
||||||
#define EXIT_TB() asm volatile ("ret")
|
|
||||||
#elif defined(__ia64__)
|
|
||||||
#define EXIT_TB() asm volatile ("br.ret.sptk.many b0;;")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("br.sptk.many " \
|
|
||||||
ASM_NAME(__op_gen_label) #n)
|
|
||||||
#elif defined(__sparc__)
|
|
||||||
#define EXIT_TB() asm volatile ("jmpl %i0 + 8, %g0; nop")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("ba " ASM_NAME(__op_gen_label) #n ";nop")
|
|
||||||
#elif defined(__arm__)
|
|
||||||
#define EXIT_TB() asm volatile ("b exec_loop")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("b " ASM_NAME(__op_gen_label) #n)
|
|
||||||
#elif defined(__mc68000)
|
|
||||||
#define EXIT_TB() asm volatile ("rts")
|
|
||||||
#elif defined(__mips__)
|
|
||||||
#define EXIT_TB() asm volatile ("jr $ra")
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile (".set noat; la $1, " ASM_NAME(__op_gen_label) #n "; jr $1; .set at")
|
|
||||||
#elif defined(__hppa__)
|
|
||||||
#define GOTO_LABEL_PARAM(n) asm volatile ("b,n " ASM_NAME(__op_gen_label) #n)
|
|
||||||
#else
|
|
||||||
#error unsupported CPU
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* The return address may point to the start of the next instruction.
|
/* The return address may point to the start of the next instruction.
|
||||||
Subtracting one gets us the call instruction itself. */
|
Subtracting one gets us the call instruction itself. */
|
||||||
#if defined(__s390__)
|
#if defined(__s390__)
|
||||||
|
|
|
||||||
14
exec-all.h
14
exec-all.h
|
|
@ -267,20 +267,6 @@ static inline void tb_add_jump(TranslationBlock *tb, int n,
|
||||||
|
|
||||||
TranslationBlock *tb_find_pc(unsigned long pc_ptr);
|
TranslationBlock *tb_find_pc(unsigned long pc_ptr);
|
||||||
|
|
||||||
#if defined(_WIN32)
|
|
||||||
#define ASM_DATA_SECTION ".section \".data\"\n"
|
|
||||||
#define ASM_PREVIOUS_SECTION ".section .text\n"
|
|
||||||
#elif defined(__APPLE__)
|
|
||||||
#define ASM_DATA_SECTION ".data\n"
|
|
||||||
#define ASM_PREVIOUS_SECTION ".text\n"
|
|
||||||
#else
|
|
||||||
#define ASM_DATA_SECTION ".section \".data\"\n"
|
|
||||||
#define ASM_PREVIOUS_SECTION ".previous\n"
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#define ASM_OP_LABEL_NAME(n, opname) \
|
|
||||||
ASM_NAME(__op_label) #n "." ASM_NAME(opname)
|
|
||||||
|
|
||||||
extern CPUWriteMemoryFunc *io_mem_write[IO_MEM_NB_ENTRIES][4];
|
extern CPUWriteMemoryFunc *io_mem_write[IO_MEM_NB_ENTRIES][4];
|
||||||
extern CPUReadMemoryFunc *io_mem_read[IO_MEM_NB_ENTRIES][4];
|
extern CPUReadMemoryFunc *io_mem_read[IO_MEM_NB_ENTRIES][4];
|
||||||
extern void *io_mem_opaque[IO_MEM_NB_ENTRIES];
|
extern void *io_mem_opaque[IO_MEM_NB_ENTRIES];
|
||||||
|
|
|
||||||
431
tcg/tcg-dyngen.c
431
tcg/tcg-dyngen.c
|
|
@ -1,431 +0,0 @@
|
||||||
/*
|
|
||||||
* Tiny Code Generator for QEMU
|
|
||||||
*
|
|
||||||
* Copyright (c) 2008 Fabrice Bellard
|
|
||||||
*
|
|
||||||
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
||||||
* of this software and associated documentation files (the "Software"), to deal
|
|
||||||
* in the Software without restriction, including without limitation the rights
|
|
||||||
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
||||||
* copies of the Software, and to permit persons to whom the Software is
|
|
||||||
* furnished to do so, subject to the following conditions:
|
|
||||||
*
|
|
||||||
* The above copyright notice and this permission notice shall be included in
|
|
||||||
* all copies or substantial portions of the Software.
|
|
||||||
*
|
|
||||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
||||||
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
||||||
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
||||||
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
||||||
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
||||||
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
|
||||||
* THE SOFTWARE.
|
|
||||||
*/
|
|
||||||
#include <assert.h>
|
|
||||||
#include <stdarg.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <string.h>
|
|
||||||
#include <inttypes.h>
|
|
||||||
|
|
||||||
#include "config.h"
|
|
||||||
#include "osdep.h"
|
|
||||||
|
|
||||||
#include "tcg.h"
|
|
||||||
|
|
||||||
int __op_param1, __op_param2, __op_param3;
|
|
||||||
#if defined(__sparc__) || defined(__arm__)
|
|
||||||
void __op_gen_label1(){}
|
|
||||||
void __op_gen_label2(){}
|
|
||||||
void __op_gen_label3(){}
|
|
||||||
#else
|
|
||||||
int __op_gen_label1, __op_gen_label2, __op_gen_label3;
|
|
||||||
#endif
|
|
||||||
int __op_jmp0, __op_jmp1, __op_jmp2, __op_jmp3;
|
|
||||||
|
|
||||||
#if 0
|
|
||||||
#if defined(__s390__)
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
}
|
|
||||||
#elif defined(__ia64__)
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
while (start < stop) {
|
|
||||||
asm volatile ("fc %0" :: "r"(start));
|
|
||||||
start += 32;
|
|
||||||
}
|
|
||||||
asm volatile (";;sync.i;;srlz.i;;");
|
|
||||||
}
|
|
||||||
#elif defined(__powerpc__)
|
|
||||||
|
|
||||||
#define MIN_CACHE_LINE_SIZE 8 /* conservative value */
|
|
||||||
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
unsigned long p;
|
|
||||||
|
|
||||||
start &= ~(MIN_CACHE_LINE_SIZE - 1);
|
|
||||||
stop = (stop + MIN_CACHE_LINE_SIZE - 1) & ~(MIN_CACHE_LINE_SIZE - 1);
|
|
||||||
|
|
||||||
for (p = start; p < stop; p += MIN_CACHE_LINE_SIZE) {
|
|
||||||
asm volatile ("dcbst 0,%0" : : "r"(p) : "memory");
|
|
||||||
}
|
|
||||||
asm volatile ("sync" : : : "memory");
|
|
||||||
for (p = start; p < stop; p += MIN_CACHE_LINE_SIZE) {
|
|
||||||
asm volatile ("icbi 0,%0" : : "r"(p) : "memory");
|
|
||||||
}
|
|
||||||
asm volatile ("sync" : : : "memory");
|
|
||||||
asm volatile ("isync" : : : "memory");
|
|
||||||
}
|
|
||||||
#elif defined(__alpha__)
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
asm ("imb");
|
|
||||||
}
|
|
||||||
#elif defined(__sparc__)
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
unsigned long p;
|
|
||||||
|
|
||||||
p = start & ~(8UL - 1UL);
|
|
||||||
stop = (stop + (8UL - 1UL)) & ~(8UL - 1UL);
|
|
||||||
|
|
||||||
for (; p < stop; p += 8)
|
|
||||||
__asm__ __volatile__("flush\t%0" : : "r" (p));
|
|
||||||
}
|
|
||||||
#elif defined(__arm__)
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
register unsigned long _beg __asm ("a1") = start;
|
|
||||||
register unsigned long _end __asm ("a2") = stop;
|
|
||||||
register unsigned long _flg __asm ("a3") = 0;
|
|
||||||
__asm __volatile__ ("swi 0x9f0002" : : "r" (_beg), "r" (_end), "r" (_flg));
|
|
||||||
}
|
|
||||||
#elif defined(__mc68000)
|
|
||||||
|
|
||||||
# include <asm/cachectl.h>
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
cacheflush(start,FLUSH_SCOPE_LINE,FLUSH_CACHE_BOTH,stop-start+16);
|
|
||||||
}
|
|
||||||
#elif defined(__mips__)
|
|
||||||
|
|
||||||
#include <sys/cachectl.h>
|
|
||||||
static inline void flush_icache_range(unsigned long start, unsigned long stop)
|
|
||||||
{
|
|
||||||
_flush_cache ((void *)start, stop - start, BCACHE);
|
|
||||||
}
|
|
||||||
#else
|
|
||||||
#error unsupported CPU
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#ifdef __alpha__
|
|
||||||
|
|
||||||
register int gp asm("$29");
|
|
||||||
|
|
||||||
static inline void immediate_ldah(void *p, int val) {
|
|
||||||
uint32_t *dest = p;
|
|
||||||
long high = ((val >> 16) + ((val >> 15) & 1)) & 0xffff;
|
|
||||||
|
|
||||||
*dest &= ~0xffff;
|
|
||||||
*dest |= high;
|
|
||||||
*dest |= 31 << 16;
|
|
||||||
}
|
|
||||||
static inline void immediate_lda(void *dest, int val) {
|
|
||||||
*(uint16_t *) dest = val;
|
|
||||||
}
|
|
||||||
void fix_bsr(void *p, int offset) {
|
|
||||||
uint32_t *dest = p;
|
|
||||||
*dest &= ~((1 << 21) - 1);
|
|
||||||
*dest |= (offset >> 2) & ((1 << 21) - 1);
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif /* __alpha__ */
|
|
||||||
|
|
||||||
#ifdef __ia64
|
|
||||||
|
|
||||||
/* Patch instruction with "val" where "mask" has 1 bits. */
|
|
||||||
static inline void ia64_patch (uint64_t insn_addr, uint64_t mask, uint64_t val)
|
|
||||||
{
|
|
||||||
uint64_t m0, m1, v0, v1, b0, b1, *b = (uint64_t *) (insn_addr & -16);
|
|
||||||
# define insn_mask ((1UL << 41) - 1)
|
|
||||||
unsigned long shift;
|
|
||||||
|
|
||||||
b0 = b[0]; b1 = b[1];
|
|
||||||
shift = 5 + 41 * (insn_addr % 16); /* 5 template, 3 x 41-bit insns */
|
|
||||||
if (shift >= 64) {
|
|
||||||
m1 = mask << (shift - 64);
|
|
||||||
v1 = val << (shift - 64);
|
|
||||||
} else {
|
|
||||||
m0 = mask << shift; m1 = mask >> (64 - shift);
|
|
||||||
v0 = val << shift; v1 = val >> (64 - shift);
|
|
||||||
b[0] = (b0 & ~m0) | (v0 & m0);
|
|
||||||
}
|
|
||||||
b[1] = (b1 & ~m1) | (v1 & m1);
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline void ia64_patch_imm60 (uint64_t insn_addr, uint64_t val)
|
|
||||||
{
|
|
||||||
ia64_patch(insn_addr,
|
|
||||||
0x011ffffe000UL,
|
|
||||||
( ((val & 0x0800000000000000UL) >> 23) /* bit 59 -> 36 */
|
|
||||||
| ((val & 0x00000000000fffffUL) << 13) /* bit 0 -> 13 */));
|
|
||||||
ia64_patch(insn_addr - 1, 0x1fffffffffcUL, val >> 18);
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline void ia64_imm64 (void *insn, uint64_t val)
|
|
||||||
{
|
|
||||||
/* Ignore the slot number of the relocation; GCC and Intel
|
|
||||||
toolchains differed for some time on whether IMM64 relocs are
|
|
||||||
against slot 1 (Intel) or slot 2 (GCC). */
|
|
||||||
uint64_t insn_addr = (uint64_t) insn & ~3UL;
|
|
||||||
|
|
||||||
ia64_patch(insn_addr + 2,
|
|
||||||
0x01fffefe000UL,
|
|
||||||
( ((val & 0x8000000000000000UL) >> 27) /* bit 63 -> 36 */
|
|
||||||
| ((val & 0x0000000000200000UL) << 0) /* bit 21 -> 21 */
|
|
||||||
| ((val & 0x00000000001f0000UL) << 6) /* bit 16 -> 22 */
|
|
||||||
| ((val & 0x000000000000ff80UL) << 20) /* bit 7 -> 27 */
|
|
||||||
| ((val & 0x000000000000007fUL) << 13) /* bit 0 -> 13 */)
|
|
||||||
);
|
|
||||||
ia64_patch(insn_addr + 1, 0x1ffffffffffUL, val >> 22);
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline void ia64_imm60b (void *insn, uint64_t val)
|
|
||||||
{
|
|
||||||
/* Ignore the slot number of the relocation; GCC and Intel
|
|
||||||
toolchains differed for some time on whether IMM64 relocs are
|
|
||||||
against slot 1 (Intel) or slot 2 (GCC). */
|
|
||||||
uint64_t insn_addr = (uint64_t) insn & ~3UL;
|
|
||||||
|
|
||||||
if (val + ((uint64_t) 1 << 59) >= (1UL << 60))
|
|
||||||
fprintf(stderr, "%s: value %ld out of IMM60 range\n",
|
|
||||||
__FUNCTION__, (int64_t) val);
|
|
||||||
ia64_patch_imm60(insn_addr + 2, val);
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline void ia64_imm22 (void *insn, uint64_t val)
|
|
||||||
{
|
|
||||||
if (val + (1 << 21) >= (1 << 22))
|
|
||||||
fprintf(stderr, "%s: value %li out of IMM22 range\n",
|
|
||||||
__FUNCTION__, (int64_t)val);
|
|
||||||
ia64_patch((uint64_t) insn, 0x01fffcfe000UL,
|
|
||||||
( ((val & 0x200000UL) << 15) /* bit 21 -> 36 */
|
|
||||||
| ((val & 0x1f0000UL) << 6) /* bit 16 -> 22 */
|
|
||||||
| ((val & 0x00ff80UL) << 20) /* bit 7 -> 27 */
|
|
||||||
| ((val & 0x00007fUL) << 13) /* bit 0 -> 13 */));
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Like ia64_imm22(), but also clear bits 20-21. For addl, this has
|
|
||||||
the effect of turning "addl rX=imm22,rY" into "addl
|
|
||||||
rX=imm22,r0". */
|
|
||||||
static inline void ia64_imm22_r0 (void *insn, uint64_t val)
|
|
||||||
{
|
|
||||||
if (val + (1 << 21) >= (1 << 22))
|
|
||||||
fprintf(stderr, "%s: value %li out of IMM22 range\n",
|
|
||||||
__FUNCTION__, (int64_t)val);
|
|
||||||
ia64_patch((uint64_t) insn, 0x01fffcfe000UL | (0x3UL << 20),
|
|
||||||
( ((val & 0x200000UL) << 15) /* bit 21 -> 36 */
|
|
||||||
| ((val & 0x1f0000UL) << 6) /* bit 16 -> 22 */
|
|
||||||
| ((val & 0x00ff80UL) << 20) /* bit 7 -> 27 */
|
|
||||||
| ((val & 0x00007fUL) << 13) /* bit 0 -> 13 */));
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline void ia64_imm21b (void *insn, uint64_t val)
|
|
||||||
{
|
|
||||||
if (val + (1 << 20) >= (1 << 21))
|
|
||||||
fprintf(stderr, "%s: value %li out of IMM21b range\n",
|
|
||||||
__FUNCTION__, (int64_t)val);
|
|
||||||
ia64_patch((uint64_t) insn, 0x11ffffe000UL,
|
|
||||||
( ((val & 0x100000UL) << 16) /* bit 20 -> 36 */
|
|
||||||
| ((val & 0x0fffffUL) << 13) /* bit 0 -> 13 */));
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline void ia64_nop_b (void *insn)
|
|
||||||
{
|
|
||||||
ia64_patch((uint64_t) insn, (1UL << 41) - 1, 2UL << 37);
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline void ia64_ldxmov(void *insn, uint64_t val)
|
|
||||||
{
|
|
||||||
if (val + (1 << 21) < (1 << 22))
|
|
||||||
ia64_patch((uint64_t) insn, 0x1fff80fe000UL, 8UL << 37);
|
|
||||||
}
|
|
||||||
|
|
||||||
static inline int ia64_patch_ltoff(void *insn, uint64_t val,
|
|
||||||
int relaxable)
|
|
||||||
{
|
|
||||||
if (relaxable && (val + (1 << 21) < (1 << 22))) {
|
|
||||||
ia64_imm22_r0(insn, val);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
struct ia64_fixup {
|
|
||||||
struct ia64_fixup *next;
|
|
||||||
void *addr; /* address that needs to be patched */
|
|
||||||
long value;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define IA64_PLT(insn, plt_index) \
|
|
||||||
do { \
|
|
||||||
struct ia64_fixup *fixup = alloca(sizeof(*fixup)); \
|
|
||||||
fixup->next = plt_fixes; \
|
|
||||||
plt_fixes = fixup; \
|
|
||||||
fixup->addr = (insn); \
|
|
||||||
fixup->value = (plt_index); \
|
|
||||||
plt_offset[(plt_index)] = 1; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define IA64_LTOFF(insn, val, relaxable) \
|
|
||||||
do { \
|
|
||||||
if (ia64_patch_ltoff(insn, val, relaxable)) { \
|
|
||||||
struct ia64_fixup *fixup = alloca(sizeof(*fixup)); \
|
|
||||||
fixup->next = ltoff_fixes; \
|
|
||||||
ltoff_fixes = fixup; \
|
|
||||||
fixup->addr = (insn); \
|
|
||||||
fixup->value = (val); \
|
|
||||||
} \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
static inline void ia64_apply_fixes (uint8_t **gen_code_pp,
|
|
||||||
struct ia64_fixup *ltoff_fixes,
|
|
||||||
uint64_t gp,
|
|
||||||
struct ia64_fixup *plt_fixes,
|
|
||||||
int num_plts,
|
|
||||||
unsigned long *plt_target,
|
|
||||||
unsigned int *plt_offset)
|
|
||||||
{
|
|
||||||
static const uint8_t plt_bundle[] = {
|
|
||||||
0x04, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, /* nop 0; movl r1=GP */
|
|
||||||
0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x60,
|
|
||||||
|
|
||||||
0x05, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, /* nop 0; brl IP */
|
|
||||||
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xc0
|
|
||||||
};
|
|
||||||
uint8_t *gen_code_ptr = *gen_code_pp, *plt_start, *got_start;
|
|
||||||
uint64_t *vp;
|
|
||||||
struct ia64_fixup *fixup;
|
|
||||||
unsigned int offset = 0;
|
|
||||||
struct fdesc {
|
|
||||||
long ip;
|
|
||||||
long gp;
|
|
||||||
} *fdesc;
|
|
||||||
int i;
|
|
||||||
|
|
||||||
if (plt_fixes) {
|
|
||||||
plt_start = gen_code_ptr;
|
|
||||||
|
|
||||||
for (i = 0; i < num_plts; ++i) {
|
|
||||||
if (plt_offset[i]) {
|
|
||||||
plt_offset[i] = offset;
|
|
||||||
offset += sizeof(plt_bundle);
|
|
||||||
|
|
||||||
fdesc = (struct fdesc *) plt_target[i];
|
|
||||||
memcpy(gen_code_ptr, plt_bundle, sizeof(plt_bundle));
|
|
||||||
ia64_imm64 (gen_code_ptr + 0x02, fdesc->gp);
|
|
||||||
ia64_imm60b(gen_code_ptr + 0x12,
|
|
||||||
(fdesc->ip - (long) (gen_code_ptr + 0x10)) >> 4);
|
|
||||||
gen_code_ptr += sizeof(plt_bundle);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
for (fixup = plt_fixes; fixup; fixup = fixup->next)
|
|
||||||
ia64_imm21b(fixup->addr,
|
|
||||||
((long) plt_start + plt_offset[fixup->value]
|
|
||||||
- ((long) fixup->addr & ~0xf)) >> 4);
|
|
||||||
}
|
|
||||||
|
|
||||||
got_start = gen_code_ptr;
|
|
||||||
|
|
||||||
/* First, create the GOT: */
|
|
||||||
for (fixup = ltoff_fixes; fixup; fixup = fixup->next) {
|
|
||||||
/* first check if we already have this value in the GOT: */
|
|
||||||
for (vp = (uint64_t *) got_start; vp < (uint64_t *) gen_code_ptr; ++vp)
|
|
||||||
if (*vp == fixup->value)
|
|
||||||
break;
|
|
||||||
if (vp == (uint64_t *) gen_code_ptr) {
|
|
||||||
/* Nope, we need to put the value in the GOT: */
|
|
||||||
*vp = fixup->value;
|
|
||||||
gen_code_ptr += 8;
|
|
||||||
}
|
|
||||||
ia64_imm22(fixup->addr, (long) vp - gp);
|
|
||||||
}
|
|
||||||
/* Keep code ptr aligned. */
|
|
||||||
if ((long) gen_code_ptr & 15)
|
|
||||||
gen_code_ptr += 8;
|
|
||||||
*gen_code_pp = gen_code_ptr;
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#ifdef CONFIG_DYNGEN_OP
|
|
||||||
|
|
||||||
#if defined __hppa__
|
|
||||||
struct hppa_branch_stub {
|
|
||||||
uint32_t *location;
|
|
||||||
long target;
|
|
||||||
struct hppa_branch_stub *next;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define HPPA_RECORD_BRANCH(LIST, LOC, TARGET) \
|
|
||||||
do { \
|
|
||||||
struct hppa_branch_stub *stub = alloca(sizeof(struct hppa_branch_stub)); \
|
|
||||||
stub->location = LOC; \
|
|
||||||
stub->target = TARGET; \
|
|
||||||
stub->next = LIST; \
|
|
||||||
LIST = stub; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
static inline void hppa_process_stubs(struct hppa_branch_stub *stub,
|
|
||||||
uint8_t **gen_code_pp)
|
|
||||||
{
|
|
||||||
uint32_t *s = (uint32_t *)*gen_code_pp;
|
|
||||||
uint32_t *p = s + 1;
|
|
||||||
|
|
||||||
if (!stub) return;
|
|
||||||
|
|
||||||
for (; stub != NULL; stub = stub->next) {
|
|
||||||
unsigned long l = (unsigned long)p;
|
|
||||||
/* stub:
|
|
||||||
* ldil L'target, %r1
|
|
||||||
* be,n R'target(%sr4,%r1)
|
|
||||||
*/
|
|
||||||
*p++ = 0x20200000 | reassemble_21(lrsel(stub->target, 0));
|
|
||||||
*p++ = 0xe0202002 | (reassemble_17(rrsel(stub->target, 0) >> 2));
|
|
||||||
hppa_patch17f(stub->location, l, 0);
|
|
||||||
}
|
|
||||||
/* b,l,n stub,%r0 */
|
|
||||||
*s = 0xe8000002 | reassemble_17((p - s) - 2);
|
|
||||||
*gen_code_pp = (uint8_t *)p;
|
|
||||||
}
|
|
||||||
#endif /* __hppa__ */
|
|
||||||
|
|
||||||
const TCGArg *dyngen_op(TCGContext *s, int opc, const TCGArg *opparam_ptr)
|
|
||||||
{
|
|
||||||
uint8_t *gen_code_ptr;
|
|
||||||
|
|
||||||
#ifdef __hppa__
|
|
||||||
struct hppa_branch_stub *hppa_stubs = NULL;
|
|
||||||
#endif
|
|
||||||
|
|
||||||
gen_code_ptr = s->code_ptr;
|
|
||||||
switch(opc) {
|
|
||||||
|
|
||||||
/* op.h is dynamically generated by dyngen.c from op.c */
|
|
||||||
#include "op.h"
|
|
||||||
|
|
||||||
default:
|
|
||||||
tcg_abort();
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifdef __hppa__
|
|
||||||
hppa_process_stubs(hppa_stubs, &gen_code_ptr);
|
|
||||||
#endif
|
|
||||||
|
|
||||||
s->code_ptr = gen_code_ptr;
|
|
||||||
return opparam_ptr;
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
|
|
@ -23,11 +23,6 @@
|
||||||
*/
|
*/
|
||||||
#include "tcg.h"
|
#include "tcg.h"
|
||||||
|
|
||||||
#ifdef CONFIG_DYNGEN_OP
|
|
||||||
/* legacy dyngen operations */
|
|
||||||
#include "gen-op.h"
|
|
||||||
#endif
|
|
||||||
|
|
||||||
int gen_new_label(void);
|
int gen_new_label(void);
|
||||||
|
|
||||||
static inline void tcg_gen_op1_i32(int opc, TCGv_i32 arg1)
|
static inline void tcg_gen_op1_i32(int opc, TCGv_i32 arg1)
|
||||||
|
|
|
||||||
|
|
@ -21,10 +21,6 @@
|
||||||
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
||||||
* THE SOFTWARE.
|
* THE SOFTWARE.
|
||||||
*/
|
*/
|
||||||
#ifdef CONFIG_DYNGEN_OP
|
|
||||||
#include "dyngen-opc.h"
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#ifndef DEF2
|
#ifndef DEF2
|
||||||
#define DEF2(name, oargs, iargs, cargs, flags) DEF(name, oargs + iargs + cargs, 0)
|
#define DEF2(name, oargs, iargs, cargs, flags) DEF(name, oargs + iargs + cargs, 0)
|
||||||
#endif
|
#endif
|
||||||
|
|
|
||||||
105
tcg/tcg.c
105
tcg/tcg.c
|
|
@ -1198,57 +1198,50 @@ static void tcg_liveness_analysis(TCGContext *s)
|
||||||
break;
|
break;
|
||||||
/* XXX: optimize by hardcoding common cases (e.g. triadic ops) */
|
/* XXX: optimize by hardcoding common cases (e.g. triadic ops) */
|
||||||
default:
|
default:
|
||||||
if (op > INDEX_op_end) {
|
args -= def->nb_args;
|
||||||
args -= def->nb_args;
|
nb_iargs = def->nb_iargs;
|
||||||
nb_iargs = def->nb_iargs;
|
nb_oargs = def->nb_oargs;
|
||||||
nb_oargs = def->nb_oargs;
|
|
||||||
|
|
||||||
/* Test if the operation can be removed because all
|
/* Test if the operation can be removed because all
|
||||||
its outputs are dead. We assume that nb_oargs == 0
|
its outputs are dead. We assume that nb_oargs == 0
|
||||||
implies side effects */
|
implies side effects */
|
||||||
if (!(def->flags & TCG_OPF_SIDE_EFFECTS) && nb_oargs != 0) {
|
if (!(def->flags & TCG_OPF_SIDE_EFFECTS) && nb_oargs != 0) {
|
||||||
for(i = 0; i < nb_oargs; i++) {
|
for(i = 0; i < nb_oargs; i++) {
|
||||||
arg = args[i];
|
arg = args[i];
|
||||||
if (!dead_temps[arg])
|
if (!dead_temps[arg])
|
||||||
goto do_not_remove;
|
goto do_not_remove;
|
||||||
}
|
|
||||||
tcg_set_nop(s, gen_opc_buf + op_index, args, def->nb_args);
|
|
||||||
#ifdef CONFIG_PROFILER
|
|
||||||
s->del_op_count++;
|
|
||||||
#endif
|
|
||||||
} else {
|
|
||||||
do_not_remove:
|
|
||||||
|
|
||||||
/* output args are dead */
|
|
||||||
for(i = 0; i < nb_oargs; i++) {
|
|
||||||
arg = args[i];
|
|
||||||
dead_temps[arg] = 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* if end of basic block, update */
|
|
||||||
if (def->flags & TCG_OPF_BB_END) {
|
|
||||||
tcg_la_bb_end(s, dead_temps);
|
|
||||||
} else if (def->flags & TCG_OPF_CALL_CLOBBER) {
|
|
||||||
/* globals are live */
|
|
||||||
memset(dead_temps, 0, s->nb_globals);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* input args are live */
|
|
||||||
dead_iargs = 0;
|
|
||||||
for(i = 0; i < nb_iargs; i++) {
|
|
||||||
arg = args[i + nb_oargs];
|
|
||||||
if (dead_temps[arg]) {
|
|
||||||
dead_iargs |= (1 << i);
|
|
||||||
}
|
|
||||||
dead_temps[arg] = 0;
|
|
||||||
}
|
|
||||||
s->op_dead_iargs[op_index] = dead_iargs;
|
|
||||||
}
|
}
|
||||||
|
tcg_set_nop(s, gen_opc_buf + op_index, args, def->nb_args);
|
||||||
|
#ifdef CONFIG_PROFILER
|
||||||
|
s->del_op_count++;
|
||||||
|
#endif
|
||||||
} else {
|
} else {
|
||||||
/* legacy dyngen operations */
|
do_not_remove:
|
||||||
args -= def->nb_args;
|
|
||||||
/* mark end of basic block */
|
/* output args are dead */
|
||||||
tcg_la_bb_end(s, dead_temps);
|
for(i = 0; i < nb_oargs; i++) {
|
||||||
|
arg = args[i];
|
||||||
|
dead_temps[arg] = 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* if end of basic block, update */
|
||||||
|
if (def->flags & TCG_OPF_BB_END) {
|
||||||
|
tcg_la_bb_end(s, dead_temps);
|
||||||
|
} else if (def->flags & TCG_OPF_CALL_CLOBBER) {
|
||||||
|
/* globals are live */
|
||||||
|
memset(dead_temps, 0, s->nb_globals);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* input args are live */
|
||||||
|
dead_iargs = 0;
|
||||||
|
for(i = 0; i < nb_iargs; i++) {
|
||||||
|
arg = args[i + nb_oargs];
|
||||||
|
if (dead_temps[arg]) {
|
||||||
|
dead_iargs |= (1 << i);
|
||||||
|
}
|
||||||
|
dead_temps[arg] = 0;
|
||||||
|
}
|
||||||
|
s->op_dead_iargs[op_index] = dead_iargs;
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
|
|
@ -2015,22 +2008,6 @@ static inline int tcg_gen_code_common(TCGContext *s, uint8_t *gen_code_buf,
|
||||||
goto next;
|
goto next;
|
||||||
case INDEX_op_end:
|
case INDEX_op_end:
|
||||||
goto the_end;
|
goto the_end;
|
||||||
|
|
||||||
#ifdef CONFIG_DYNGEN_OP
|
|
||||||
case 0 ... INDEX_op_end - 1:
|
|
||||||
/* legacy dyngen ops */
|
|
||||||
#ifdef CONFIG_PROFILER
|
|
||||||
s->old_op_count++;
|
|
||||||
#endif
|
|
||||||
tcg_reg_alloc_bb_end(s, s->reserved_regs);
|
|
||||||
if (search_pc >= 0) {
|
|
||||||
s->code_ptr += def->copy_size;
|
|
||||||
args += def->nb_args;
|
|
||||||
} else {
|
|
||||||
args = dyngen_op(s, opc, args);
|
|
||||||
}
|
|
||||||
goto next;
|
|
||||||
#endif
|
|
||||||
default:
|
default:
|
||||||
/* Note: in order to speed up the code, it would be much
|
/* Note: in order to speed up the code, it would be much
|
||||||
faster to have specialized register allocator functions for
|
faster to have specialized register allocator functions for
|
||||||
|
|
|
||||||
|
|
@ -449,8 +449,6 @@ void tcg_out_reloc(TCGContext *s, uint8_t *code_ptr, int type,
|
||||||
const TCGArg *tcg_gen_code_op(TCGContext *s, int opc, const TCGArg *args1,
|
const TCGArg *tcg_gen_code_op(TCGContext *s, int opc, const TCGArg *args1,
|
||||||
unsigned int dead_iargs);
|
unsigned int dead_iargs);
|
||||||
|
|
||||||
const TCGArg *dyngen_op(TCGContext *s, int opc, const TCGArg *opparam_ptr);
|
|
||||||
|
|
||||||
/* tcg-runtime.c */
|
/* tcg-runtime.c */
|
||||||
int64_t tcg_helper_shl_i64(int64_t arg1, int64_t arg2);
|
int64_t tcg_helper_shl_i64(int64_t arg1, int64_t arg2);
|
||||||
int64_t tcg_helper_shr_i64(int64_t arg1, int64_t arg2);
|
int64_t tcg_helper_shr_i64(int64_t arg1, int64_t arg2);
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue