qemu-devel.nongnu.org archive mirror
 help / color / mirror / Atom feed
From: Richard Henderson <rth@twiddle.net>
To: qemu-devel@nongnu.org
Cc: "Vassili Karpov (malc)" <av1474@comtv.ru>,
	aurelien@aurel32.net, Richard Henderson <rth@twiddle.net>
Subject: [Qemu-devel] [PATCH 08/14] tcg-ppc64: Look through a constant function descriptor
Date: Sun,  1 Sep 2013 09:16:07 -0700	[thread overview]
Message-ID: <1378052173-3579-9-git-send-email-rth@twiddle.net> (raw)
In-Reply-To: <1378052173-3579-1-git-send-email-rth@twiddle.net>

Especially in the user-only configurations, a direct branch into
the executable may be in range.

Signed-off-by: Richard Henderson <rth@twiddle.net>
---
 tcg/ppc64/tcg-target.c | 23 +++++++++++++++++++----
 1 file changed, 19 insertions(+), 4 deletions(-)

diff --git a/tcg/ppc64/tcg-target.c b/tcg/ppc64/tcg-target.c
index 033518c..95980ce 100644
--- a/tcg/ppc64/tcg-target.c
+++ b/tcg/ppc64/tcg-target.c
@@ -173,14 +173,17 @@ static const int tcg_target_callee_save_regs[] = {
     TCG_REG_R31
 };
 
+static inline bool in_range_b(tcg_target_long target)
+{
+    return target == sextract64(target, 0, 26);
+}
+
 static uint32_t reloc_pc24_val(void *pc, tcg_target_long target)
 {
     tcg_target_long disp;
 
     disp = target - (tcg_target_long)pc;
-    if ((disp << 38) >> 38 != disp) {
-        tcg_abort();
-    }
+    assert(in_range_b(disp));
 
     return disp & 0x3fffffc;
 }
@@ -694,7 +697,7 @@ static void tcg_out_b(TCGContext *s, int mask, tcg_target_long target)
     tcg_target_long disp;
 
     disp = target - (tcg_target_long)s->code_ptr;
-    if ((disp << 38) >> 38 == disp) {
+    if (in_range_b(disp)) {
         tcg_out32(s, B | (disp & 0x3fffffc) | mask);
     } else {
         tcg_out_movi(s, TCG_TYPE_I64, TCG_REG_R0, (tcg_target_long)target);
@@ -717,6 +720,18 @@ static void tcg_out_call(TCGContext *s, tcg_target_long arg, int const_arg)
     int ofs = 0;
 
     if (const_arg) {
+        /* Look through the descriptor.  If the branch is in range, and we
+           don't have to spend too much effort on building the toc.  */
+        intptr_t tgt = ((intptr_t *)arg)[0];
+        intptr_t toc = ((intptr_t *)arg)[1];
+        intptr_t diff = tgt - (intptr_t)s->code_ptr;
+
+        if (in_range_b(diff) && toc == (uint32_t)toc) {
+            tcg_out_movi(s, TCG_TYPE_I64, TCG_REG_R2, toc);
+            tcg_out_b(s, LK, tgt);
+            return;
+        }
+
         /* Fold the low bits of the constant into the addresses below.  */
         ofs = (int16_t)arg;
         if (ofs + 8 < 0x8000) {
-- 
1.8.3.1

  parent reply	other threads:[~2013-09-01 16:16 UTC|newest]

Thread overview: 15+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-09-01 16:15 [Qemu-devel] [PATCH 00/14] tcg-ppc64 improvements Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 01/14] tcg-ppc64: Reformat tcg-target.c Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 02/14] tcg-ppc64: More use of TAI and SAI helper macros Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 03/14] tcg-ppc64: Use TCG_REG_Rn constants Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 04/14] tcg-ppc64: Use tcg_out64 Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 05/14] tcg-ppc64: Avoid code for nop move Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 06/14] tcg-ppc64: Don't load the static chain from TCG Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 07/14] tcg-ppc64: Fold constant call address into descriptor load Richard Henderson
2013-09-01 16:16 ` Richard Henderson [this message]
2013-09-01 16:16 ` [Qemu-devel] [PATCH 09/14] tcg-ppc64: Tidy register allocation order Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 10/14] tcg-ppc64: Handle long offsets better Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 11/14] tcg-ppc64: Implement tcg_register_jit Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 12/14] tcg-ppc64: Streamline tcg_out_tlb_read Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 13/14] tcg-ppc64: Add _noaddr functions for emitting forward branches Richard Henderson
2013-09-01 16:16 ` [Qemu-devel] [PATCH 14/14] tcg-ppc64: Implement CONFIG_QEMU_LDST_OPTIMIZATION Richard Henderson

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=1378052173-3579-9-git-send-email-rth@twiddle.net \
    --to=rth@twiddle.net \
    --cc=aurelien@aurel32.net \
    --cc=av1474@comtv.ru \
    --cc=qemu-devel@nongnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).