From patchwork Wed Jan 4 18:36:39 2012 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: Andrew Pinski X-Patchwork-Id: 134315 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Received: from sourceware.org (server1.sourceware.org [209.132.180.131]) by ozlabs.org (Postfix) with SMTP id 04DCB1007D6 for ; Thu, 5 Jan 2012 05:37:04 +1100 (EST) Comment: DKIM? See http://www.dkim.org DKIM-Signature: v=1; a=rsa-sha1; c=relaxed/relaxed; d=gcc.gnu.org; s=default; x=1326307026; h=Comment: DomainKey-Signature:Received:Received:Received:Received: MIME-Version:Received:Received:In-Reply-To:References:Date: Message-ID:Subject:From:To:Content-Type:Mailing-List:Precedence: List-Id:List-Unsubscribe:List-Archive:List-Post:List-Help:Sender: Delivered-To; bh=wBzGdRZ/KbuMDmWVR4RG0O3cjKU=; b=aKBzo8b5bp8Ff+K Ui9EIrr2cIGMIrXwGSYeE7RTyNmuU0DpMGAjRB/N5J9pnFWHZz2NNBBIiIx0b9mL vtbAUMAD5/8wttA8Kg//D41kTaGwN8N9jtiUnUr5J2lDTlNFkJwu71XKK+YLggKy aEkALUr6Z7VpscQBIOGDFfFy3ka8= Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws; s=default; d=gcc.gnu.org; h=Received:Received:X-SWARE-Spam-Status:X-Spam-Check-By:Received:Received:MIME-Version:Received:Received:In-Reply-To:References:Date:Message-ID:Subject:From:To:Content-Type:X-IsSubscribed:Mailing-List:Precedence:List-Id:List-Unsubscribe:List-Archive:List-Post:List-Help:Sender:Delivered-To; b=C/8goUVN2lRmAJU5Tkp66zVXunb+fgI1LXJt9X4P7MJMVel9ZYzurxem7zsBwz Zw06TeDATnM1RZtVDsmqk5Hxs8Ns5gtK650/+jzc9E9aAdtkxWAkZFwecWGvYFr6 o/c4+JUJXdYiHPqq9n8LBaqfFkzdCtE3v/mFlnOw9GxLc=; Received: (qmail 23623 invoked by alias); 4 Jan 2012 18:37:00 -0000 Received: (qmail 23123 invoked by uid 22791); 4 Jan 2012 18:36:56 -0000 X-SWARE-Spam-Status: No, hits=-2.4 required=5.0 tests=AWL, BAYES_00, DKIM_SIGNED, DKIM_VALID, FREEMAIL_FROM, RCVD_IN_DNSWL_LOW, TW_LW, TW_MG, TW_WX X-Spam-Check-By: sourceware.org Received: from mail-vx0-f175.google.com (HELO mail-vx0-f175.google.com) (209.85.220.175) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Wed, 04 Jan 2012 18:36:40 +0000 Received: by vcbf1 with SMTP id f1so13564858vcb.20 for ; Wed, 04 Jan 2012 10:36:39 -0800 (PST) MIME-Version: 1.0 Received: by 10.220.38.5 with SMTP id z5mr33201673vcd.63.1325702199430; Wed, 04 Jan 2012 10:36:39 -0800 (PST) Received: by 10.220.118.201 with HTTP; Wed, 4 Jan 2012 10:36:39 -0800 (PST) In-Reply-To: <87ty4zo3ko.fsf@firetop.home> References: <87ty4zo3ko.fsf@firetop.home> Date: Wed, 4 Jan 2012 10:36:39 -0800 Message-ID: Subject: Re: [PATCH] Add Octeon2 indexed load instruction support (and also DSP64 LDX support) From: Andrew Pinski To: Andrew Pinski , GCC Patches , rdsandiford@googlemail.com X-IsSubscribed: yes Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Delivered-To: mailing list gcc-patches@gcc.gnu.org On Sat, Dec 17, 2011 at 3:11 AM, Richard Sandiford wrote: > Andrew Pinski writes: >> Index: testsuite/gcc.target/mips/octeon2-lx-1.c >> =================================================================== >> --- testsuite/gcc.target/mips/octeon2-lx-1.c  (revision 0) >> +++ testsuite/gcc.target/mips/octeon2-lx-1.c  (revision 0) >> @@ -0,0 +1,18 @@ >> +/* { dg-do compile } */ >> +/* { dg-options "-march=octeon2 -O -mgp64" } */ >> + >> +#define TEST(N, R, T) \ >> +  T f##N (T j, R *b, long long i) { return j + b[i]; } \ >> +  T g##N (T j, unsigned R *b, long long i) { return j + b[i]; } >> + >> +TEST (1, char, int) >> +TEST (2, char, long long) >> +/* { dg-final { scan-assembler-times "\tlbx\t" 2 } } */ >> +/* { dg-final { scan-assembler-times "\tlbux\t" 2 } } */ >> +TEST (3, short, int) >> +TEST (4, short, long long) >> +/* { dg-final { scan-assembler-times "\tlhx\t" 2 } } */ >> +/* { dg-final { scan-assembler-times "\tlhux\t" 2 } } */ >> +TEST (5, int, long long) >> +/* { dg-final { scan-assembler-times "\tlwx\t" 1 } } */ >> +/* { dg-final { scan-assembler-times "\tlwux\t" 1 } } */ > > There's obviously nothing wrong with testing long long indices, > but it doesn't seem very typical.  I'd prefer the attached, which > tests both "long long" and "int".  (I checked that it works for > -mabi=n32 and -mabi=64 on mips64-linux-gnu.) > >> -(define_insn "mips_lwx_" >> -  [(set (match_operand:SI 0 "register_operand" "=d") >> -     (mem:SI (plus:P (match_operand:P 1 "register_operand" "d") >> -                     (match_operand:P 2 "register_operand" "d"))))] >> -  "ISA_HAS_DSP" >> -  "lwx\t%0,%2(%1)" > > (Reviewing the patch made me realise that this ought to be using IMOVE32, > just like lwxs does.  But that's something for another time.) > >> +(define_expand "mips_ldx" >> +  [(match_operand:DI 0 "register_operand") >> +   (match_operand 1 "pmode_register_operand") >> +   (match_operand:SI 2 "register_operand")] >> +  "ISA_HAS_DSP && TARGET_64BIT" >> +{ >> +  operands[2] = convert_to_mode (Pmode, operands[2], false); >> +  emit_insn (PMODE_INSN (gen_mips_ldx, >> +                      (operands[0], operands[1], operands[2]))); >> +  DONE; >> +}) > > Seems like this and lwx could be combined using :GPR. > >> -;; This attribute gives the length suffix for a sign- or zero-extension >> -;; instruction. >> -(define_mode_attr size [(QI "b") (HI "h")]) >> +;; This attribute gives the length suffix for a sign-, zero-extension >> +;; load and store instruction. >> +(define_mode_attr size [(QI "b") (HI "h") (SI "w") (DI "d")]) >> +(define_mode_attr SIZE [(QI "B") (HI "H") (SI "W") (DI "D")]) > > ;; This attribute gives the length suffix for a load or store instruction. > ;; The same suffixes work for zero and sign extensions. > >> Index: config/mips/mips.c >> =================================================================== >> --- config/mips/mips.c        (revision 182342) >> +++ config/mips/mips.c        (working copy) >> @@ -2159,6 +2159,29 @@ mips_lwxs_address_p (rtx addr) >>      } >>    return false; >>  } >> + >> +/* Return true if ADDR matches the pattern for the L{B,H,W,D}{,U}X load >> +   indexed address instruction.  Note that such addresses are >> +   not considered legitimate in the TARGET_LEGITIMATE_ADDRESS_P >> +   sense, because their use is so restricted.  */ >> + >> +static bool >> +mips_loadindexed_address_p (rtx addr, enum machine_mode mode) > > Nitlet, but I'd prefer mips_lx_address_p or mips_load_indexed_address_p. > >> @@ -3552,6 +3575,11 @@ mips_rtx_costs (rtx x, int code, int out >>         *total = COSTS_N_INSNS (2); >>         return true; >>       } >> +      if (mips_loadindexed_address_p (addr, mode)) >> +     { >> +       *total = COSTS_N_INSNS (2); >> +       return true; >> +     } > > Please combine this with the lwxs condition. > >> @@ -12959,6 +12988,9 @@ static const struct mips_builtin_descrip >>    DIRECT_BUILTIN (mult, MIPS_DI_FTYPE_SI_SI, dsp_32), >>    DIRECT_BUILTIN (multu, MIPS_DI_FTYPE_USI_USI, dsp_32), >> >> +  /* Built-in functions for the DSP ASE (64-bit only).  */ >> +  DIRECT_BUILTIN (ldx, MIPS_DI_FTYPE_POINTER_SI, dsp_64), >> + >>    /* The following are for the MIPS DSP ASE REV 2 (32-bit only).  */ >>    DIRECT_BUILTIN (dpa_w_ph, MIPS_DI_FTYPE_DI_V2HI_V2HI, dspr2_32), >>    DIRECT_BUILTIN (dps_w_ph, MIPS_DI_FTYPE_DI_V2HI_V2HI, dspr2_32), > > You need to add this to the list in extend.texi too. > >> +#define ISA_HAS_LDX          ((ISA_HAS_DSP || TARGET_OCTEON2) && TARGET_64BIT) > > Long line: > > #define ISA_HAS_LDX             ((ISA_HAS_DSP || TARGET_OCTEON2) \ >                                 && TARGET_64BIT) > > OK otherwise, thanks. Here is the patch which I committed after a bootstrap/test on mips64-linux-gnu. Thanks, Andrew Pinski gcc/ChangeLog: * config/mips/mips.md (size): Add SI and DI. (SIZE): New mode attribute. (U): New code attribute. * config/mips/mips-dsp.md (mips_lbux): Use gen_mips_lbux_extsi. (mips_lbux_): Delete. (mips_lx_ext_): New pattern. (mips_lhx): Use gen_mips_lhx_extsi. (mips_lhx_): Delete. (mips_lwx): Delete. (mips_lx): New expand. (mips_lwx_): Delete. (mips_lx_): New pattern. (*mips_lwx__ext): Likewise. * config/mips/mips-ftypes.def: Add DI f(POINTER, SI) function type. * config/mips/mips.c (mips_lx_address_p): New function. (mips_rtx_costs ): Call mips_lx_address_p. (dsp64): New availability predicate. (mips_builtins): Add an entry for __builtin_mips_ldx. * config/mips/mips.h (ISA_HAS_LBX): New define. (ISA_HAS_LBUX): Likewise. (ISA_HAS_LHX): Likewise. (ISA_HAS_LHUX): Likewise. (ISA_HAS_LWX): Likewise. (ISA_HAS_LWUX): Likewise. (ISA_HAS_LDX): Likewise. * doc/extend.texi (__builtin_mips_ldx): Document. gcc/testsuite/ChangeLog: * gcc.target/mips/mips64-dsp-ldx1.c: New test. * gcc.target/mips/octeon2-lx-1.c: New test. * gcc.target/mips/mips64-dsp-ldx.c: New test. * gcc.target/mips/octeon2-lx-2.c: New test. * gcc.target/mips/octeon2-lx-3.c: New test. > > Richard > > > /* { dg-do compile } */ > /* { dg-options "-march=octeon2 -O -mgp64" } */ > > #define TEST(N, R, T) \ >  T fll##N (T j, R *b, long long i) { return j + b[i]; } \ >  T gll##N (T j, unsigned R *b, long long i) { return j + b[i]; } \ >  T fi##N (T j, R *b, int i) { return j + b[i]; } \ >  T gi##N (T j, unsigned R *b, int i) { return j + b[i]; } \ > > TEST (1, char, int) > TEST (2, char, long long) > /* { dg-final { scan-assembler-times "\tlbx\t" 4 } } */ > /* { dg-final { scan-assembler-times "\tlbux\t" 4 } } */ > TEST (3, short, int) > TEST (4, short, long long) > /* { dg-final { scan-assembler-times "\tlhx\t" 4 } } */ > /* { dg-final { scan-assembler-times "\tlhux\t" 4 } } */ > TEST (5, int, long long) > /* { dg-final { scan-assembler-times "\tlwx\t" 2 } } */ > /* { dg-final { scan-assembler-times "\tlwux\t" 2 } } */ Index: doc/extend.texi =================================================================== --- doc/extend.texi (revision 182883) +++ doc/extend.texi (working copy) @@ -1,5 +1,5 @@ @c Copyright (C) 1988, 1989, 1992, 1993, 1994, 1996, 1998, 1999, 2000, 2001, -@c 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 +@c 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012 @c Free Software Foundation, Inc. @c This is part of the GCC manual. @@ -10537,6 +10537,7 @@ i32 __builtin_mips_rddsp (imm0_63) i32 __builtin_mips_lbux (void *, i32) i32 __builtin_mips_lhx (void *, i32) i32 __builtin_mips_lwx (void *, i32) +a64 __builtin_mips_ldx (void *, i32) [MIPS64 only] i32 __builtin_mips_bposge32 (void) a64 __builtin_mips_madd (a64, i32, i32); a64 __builtin_mips_maddu (a64, ui32, ui32); Index: testsuite/gcc.target/mips/mips64-dsp-ldx1.c =================================================================== --- testsuite/gcc.target/mips/mips64-dsp-ldx1.c (revision 0) +++ testsuite/gcc.target/mips/mips64-dsp-ldx1.c (revision 0) @@ -0,0 +1,10 @@ +/* Test MIPS64 DSP instructions */ +/* { dg-do compile } */ +/* { dg-options "-mgp64 -mdsp" } */ + +/* { dg-final { scan-assembler "\tldx\t" } } */ + +NOMIPS16 signed long long test (signed long long *a, int index) +{ + return __builtin_mips_ldx (a, index); +} Index: testsuite/gcc.target/mips/octeon2-lx-1.c =================================================================== --- testsuite/gcc.target/mips/octeon2-lx-1.c (revision 0) +++ testsuite/gcc.target/mips/octeon2-lx-1.c (revision 0) @@ -0,0 +1,20 @@ +/* { dg-do compile } */ +/* { dg-options "-march=octeon2 -O -mgp64" } */ + +#define TEST(N, R, T) \ + T fll##N (T j, R *b, long long i) { return j + b[i]; } \ + T gll##N (T j, unsigned R *b, long long i) { return j + b[i]; } \ + T fi##N (T j, R *b, int i) { return j + b[i]; } \ + T gi##N (T j, unsigned R *b, int i) { return j + b[i]; } \ + +TEST (1, char, int) +TEST (2, char, long long) +/* { dg-final { scan-assembler-times "\tlbx\t" 4 } } */ +/* { dg-final { scan-assembler-times "\tlbux\t" 4 } } */ +TEST (3, short, int) +TEST (4, short, long long) +/* { dg-final { scan-assembler-times "\tlhx\t" 4 } } */ +/* { dg-final { scan-assembler-times "\tlhux\t" 4 } } */ +TEST (5, int, long long) +/* { dg-final { scan-assembler-times "\tlwx\t" 2 } } */ +/* { dg-final { scan-assembler-times "\tlwux\t" 2 } } */ Index: testsuite/gcc.target/mips/mips64-dsp-ldx.c =================================================================== --- testsuite/gcc.target/mips/mips64-dsp-ldx.c (revision 0) +++ testsuite/gcc.target/mips/mips64-dsp-ldx.c (revision 0) @@ -0,0 +1,10 @@ +/* Test MIPS64 DSP instructions */ +/* { dg-do compile } */ +/* { dg-options "-mgp64 -mdsp -O" } */ + +/* { dg-final { scan-assembler "\tldx\t" } } */ + +NOMIPS16 signed long long test (signed long long *a, int index) +{ + return a[index]; +} Index: testsuite/gcc.target/mips/octeon2-lx-2.c =================================================================== --- testsuite/gcc.target/mips/octeon2-lx-2.c (revision 0) +++ testsuite/gcc.target/mips/octeon2-lx-2.c (revision 0) @@ -0,0 +1,15 @@ +/* { dg-do compile } */ +/* { dg-options "-march=octeon2 -O -mgp64" } */ + +#define TEST(N, T) \ + T f##N (T *p, int i) { return p[i]; } \ + unsigned T g##N (unsigned T *p, int i) { return p[i]; } + +TEST (1, char) +/* { dg-final { scan-assembler-times "\tlbu?x\t" 2 } } */ +TEST (2, short) +/* { dg-final { scan-assembler-times "\tlhu?x\t" 2 } } */ +TEST (3, int) +/* { dg-final { scan-assembler-times "\tlwx\t" 2 } } */ +TEST (4, long long) +/* { dg-final { scan-assembler-times "\tldx\t" 2 } } */ Index: testsuite/gcc.target/mips/octeon2-lx-3.c =================================================================== --- testsuite/gcc.target/mips/octeon2-lx-3.c (revision 0) +++ testsuite/gcc.target/mips/octeon2-lx-3.c (revision 0) @@ -0,0 +1,13 @@ +/* { dg-do compile } */ +/* { dg-options "-march=octeon2 -O -mgp32" } */ + +#define TEST(N, T) \ + T f##N (T *p, int i) { return p[i]; } \ + unsigned T g##N (unsigned T *p, int i) { return p[i]; } + +TEST (1, char) +/* { dg-final { scan-assembler-times "\tlbu?x\t" 2 } } */ +TEST (2, short) +/* { dg-final { scan-assembler-times "\tlhu?x\t" 2 } } */ +TEST (3, int) +/* { dg-final { scan-assembler-times "\tlwx\t" 2 } } */ Index: config/mips/mips-dsp.md =================================================================== --- config/mips/mips-dsp.md (revision 182883) +++ config/mips/mips-dsp.md (working copy) @@ -1,4 +1,5 @@ -;; Copyright (C) 2005, 2006, 2007, 2008, 2010 Free Software Foundation, Inc. +;; Copyright (C) 2005, 2006, 2007, 2008, 2010, 2011, 2012 +;; Free Software Foundation, Inc. ;; ;; This file is part of GCC. ;; @@ -1105,20 +1106,21 @@ (define_expand "mips_lbux" "ISA_HAS_DSP" { operands[2] = convert_to_mode (Pmode, operands[2], false); - emit_insn (PMODE_INSN (gen_mips_lbux, + emit_insn (PMODE_INSN (gen_mips_lbux_extsi, (operands[0], operands[1], operands[2]))); DONE; }) -(define_insn "mips_lbux_" - [(set (match_operand:SI 0 "register_operand" "=d") - (zero_extend:SI - (mem:QI (plus:P (match_operand:P 1 "register_operand" "d") - (match_operand:P 2 "register_operand" "d")))))] - "ISA_HAS_DSP" - "lbux\t%0,%2(%1)" +(define_insn "mips_lx_ext_" + [(set (match_operand:GPR 0 "register_operand" "=d") + (any_extend:GPR + (mem:SHORT (plus:P (match_operand:P 1 "register_operand" "d") + (match_operand:P 2 "register_operand" "d")))))] + "ISA_HAS_LX" + "lx\t%0,%2(%1)" [(set_attr "type" "load") - (set_attr "mode" "SI")]) + (set_attr "mode" "") + (set_attr "length" "4")]) (define_expand "mips_lhx" [(match_operand:SI 0 "register_operand") @@ -1127,41 +1129,43 @@ (define_expand "mips_lhx" "ISA_HAS_DSP" { operands[2] = convert_to_mode (Pmode, operands[2], false); - emit_insn (PMODE_INSN (gen_mips_lhx, + emit_insn (PMODE_INSN (gen_mips_lhx_extsi, (operands[0], operands[1], operands[2]))); DONE; }) -(define_insn "mips_lhx_" - [(set (match_operand:SI 0 "register_operand" "=d") - (sign_extend:SI - (mem:HI (plus:P (match_operand:P 1 "register_operand" "d") - (match_operand:P 2 "register_operand" "d")))))] - "ISA_HAS_DSP" - "lhx\t%0,%2(%1)" - [(set_attr "type" "load") - (set_attr "mode" "SI")]) - -(define_expand "mips_lwx" - [(match_operand:SI 0 "register_operand") +(define_expand "mips_lx" + [(match_operand:GPR 0 "register_operand") (match_operand 1 "pmode_register_operand") (match_operand:SI 2 "register_operand")] "ISA_HAS_DSP" { operands[2] = convert_to_mode (Pmode, operands[2], false); - emit_insn (PMODE_INSN (gen_mips_lwx, + emit_insn (PMODE_INSN (gen_mips_lx, (operands[0], operands[1], operands[2]))); DONE; }) -(define_insn "mips_lwx_" - [(set (match_operand:SI 0 "register_operand" "=d") - (mem:SI (plus:P (match_operand:P 1 "register_operand" "d") - (match_operand:P 2 "register_operand" "d"))))] - "ISA_HAS_DSP" - "lwx\t%0,%2(%1)" +(define_insn "mips_lx_" + [(set (match_operand:GPR 0 "register_operand" "=d") + (mem:GPR (plus:P (match_operand:P 1 "register_operand" "d") + (match_operand:P 2 "register_operand" "d"))))] + "ISA_HAS_LX" + "lx\t%0,%2(%1)" [(set_attr "type" "load") - (set_attr "mode" "SI")]) + (set_attr "mode" "") + (set_attr "length" "4")]) + +(define_insn "*mips_lwx__ext" + [(set (match_operand:DI 0 "register_operand" "=d") + (any_extend:DI + (mem:SI (plus:P (match_operand:P 1 "register_operand" "d") + (match_operand:P 2 "register_operand" "d")))))] + "ISA_HAS_LWX && TARGET_64BIT" + "lwx\t%0,%2(%1)" + [(set_attr "type" "load") + (set_attr "mode" "DI") + (set_attr "length" "4")]) ;; Table 2-8. MIPS DSP ASE Instructions: Branch ;; BPOSGE32 Index: config/mips/mips-ftypes.def =================================================================== --- config/mips/mips-ftypes.def (revision 182883) +++ config/mips/mips-ftypes.def (working copy) @@ -1,5 +1,5 @@ /* Definitions of prototypes for MIPS built-in functions. -*- C -*- - Copyright (C) 2007, 2008 + Copyright (C) 2007, 2008, 2012 Free Software Foundation, Inc. This file is part of GCC. @@ -53,6 +53,7 @@ DEF_MIPS_FTYPE (4, (INT, V2SF, V2SF, V2S DEF_MIPS_FTYPE (2, (SI, DI, SI)) DEF_MIPS_FTYPE (2, (SI, POINTER, SI)) +DEF_MIPS_FTYPE (2, (DI, POINTER, SI)) DEF_MIPS_FTYPE (1, (SI, SI)) DEF_MIPS_FTYPE (2, (SI, SI, SI)) DEF_MIPS_FTYPE (3, (SI, SI, SI, SI)) Index: config/mips/mips.md =================================================================== --- config/mips/mips.md (revision 182883) +++ config/mips/mips.md (working copy) @@ -1,6 +1,7 @@ ;; Mips.md Machine Description for MIPS based processors ;; Copyright (C) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, -;; 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 +;; 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, +;; 2011, 2012 ;; Free Software Foundation, Inc. ;; Contributed by A. Lichnewsky, lich@inria.inria.fr ;; Changes by Michael Meissner, meissner@osf.org @@ -668,9 +669,10 @@ (define_mode_attr D [(SI "") (DI "D") (HA "") (SA "") (DA "D") (UHA "") (USA "") (UDA "D")]) -;; This attribute gives the length suffix for a sign- or zero-extension -;; instruction. -(define_mode_attr size [(QI "b") (HI "h")]) +;; This attribute gives the length suffix for a load or store instruction. +;; The same suffixes work for zero and sign extensions. +(define_mode_attr size [(QI "b") (HI "h") (SI "w") (DI "d")]) +(define_mode_attr SIZE [(QI "B") (HI "H") (SI "W") (DI "D")]) ;; This attributes gives the mode mask of a SHORT. (define_mode_attr mask [(QI "0x00ff") (HI "0xffff")]) @@ -790,6 +792,9 @@ (define_code_attr u [(sign_extend "") (z (lt "") (ltu "u") (le "") (leu "u")]) +;; is like except uppercase. +(define_code_attr U [(sign_extend "") (zero_extend "U")]) + ;; is like , but the signed form expands to "s" rather than "". (define_code_attr su [(sign_extend "s") (zero_extend "u")]) Index: config/mips/mips.c =================================================================== --- config/mips/mips.c (revision 182883) +++ config/mips/mips.c (working copy) @@ -1,7 +1,7 @@ /* Subroutines used for MIPS code generation. Copyright (C) 1989, 1990, 1991, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, - 2011 + 2011, 2012 Free Software Foundation, Inc. Contributed by A. Lichnewsky, lich@inria.inria.fr. Changes by Michael Meissner, meissner@osf.org. @@ -2159,6 +2159,29 @@ mips_lwxs_address_p (rtx addr) } return false; } + +/* Return true if ADDR matches the pattern for the L{B,H,W,D}{,U}X load + indexed address instruction. Note that such addresses are + not considered legitimate in the TARGET_LEGITIMATE_ADDRESS_P + sense, because their use is so restricted. */ + +static bool +mips_lx_address_p (rtx addr, enum machine_mode mode) +{ + if (GET_CODE (addr) != PLUS + || !REG_P (XEXP (addr, 0)) + || !REG_P (XEXP (addr, 1))) + return false; + if (ISA_HAS_LBX && mode == QImode) + return true; + if (ISA_HAS_LHX && mode == HImode) + return true; + if (ISA_HAS_LWX && mode == SImode) + return true; + if (ISA_HAS_LDX && mode == DImode) + return true; + return false; +} /* Return true if a value at OFFSET bytes from base register BASE can be accessed using an unextended MIPS16 instruction. MODE is the mode of @@ -3547,7 +3570,8 @@ mips_rtx_costs (rtx x, int code, int out return true; } /* Check for a scaled indexed address. */ - if (mips_lwxs_address_p (addr)) + if (mips_lwxs_address_p (addr) + || mips_lx_address_p (addr, mode)) { *total = COSTS_N_INSNS (2); return true; @@ -12720,6 +12744,7 @@ AVAIL_NON_MIPS16 (mips3d, TARGET_MIPS3D) AVAIL_NON_MIPS16 (dsp, TARGET_DSP) AVAIL_NON_MIPS16 (dspr2, TARGET_DSPR2) AVAIL_NON_MIPS16 (dsp_32, !TARGET_64BIT && TARGET_DSP) +AVAIL_NON_MIPS16 (dsp_64, TARGET_64BIT && TARGET_DSP) AVAIL_NON_MIPS16 (dspr2_32, !TARGET_64BIT && TARGET_DSPR2) AVAIL_NON_MIPS16 (loongson, TARGET_LOONGSON_VECTORS) AVAIL_NON_MIPS16 (cache, TARGET_CACHE_BUILTIN) @@ -13046,6 +13071,9 @@ static const struct mips_builtin_descrip DIRECT_BUILTIN (mult, MIPS_DI_FTYPE_SI_SI, dsp_32), DIRECT_BUILTIN (multu, MIPS_DI_FTYPE_USI_USI, dsp_32), + /* Built-in functions for the DSP ASE (64-bit only). */ + DIRECT_BUILTIN (ldx, MIPS_DI_FTYPE_POINTER_SI, dsp_64), + /* The following are for the MIPS DSP ASE REV 2 (32-bit only). */ DIRECT_BUILTIN (dpa_w_ph, MIPS_DI_FTYPE_DI_V2HI_V2HI, dspr2_32), DIRECT_BUILTIN (dps_w_ph, MIPS_DI_FTYPE_DI_V2HI_V2HI, dspr2_32), Index: config/mips/mips.h =================================================================== --- config/mips/mips.h (revision 182883) +++ config/mips/mips.h (working copy) @@ -1,6 +1,7 @@ /* Definitions of target machine for GNU compiler. MIPS version. Copyright (C) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008, 2009, 2010, 2011 + 2012 Free Software Foundation, Inc. Contributed by A. Lichnewsky (lich@inria.inria.fr). Changed by Michael Meissner (meissner@osf.org). @@ -996,6 +997,16 @@ struct mips_cpu_info { /* ISA has lwxs instruction (load w/scaled index address. */ #define ISA_HAS_LWXS (TARGET_SMARTMIPS && !TARGET_MIPS16) +/* ISA has lbx, lbux, lhx, lhx, lhux, lwx, lwux, or ldx instruction. */ +#define ISA_HAS_LBX (TARGET_OCTEON2) +#define ISA_HAS_LBUX (ISA_HAS_DSP || TARGET_OCTEON2) +#define ISA_HAS_LHX (ISA_HAS_DSP || TARGET_OCTEON2) +#define ISA_HAS_LHUX (TARGET_OCTEON2) +#define ISA_HAS_LWX (ISA_HAS_DSP || TARGET_OCTEON2) +#define ISA_HAS_LWUX (TARGET_OCTEON2 && TARGET_64BIT) +#define ISA_HAS_LDX ((ISA_HAS_DSP || TARGET_OCTEON2) \ + && TARGET_64BIT) + /* The DSP ASE is available. */ #define ISA_HAS_DSP (TARGET_DSP && !TARGET_MIPS16)