[PATCH, GCC/ARM, 8/10] Do lazy store & load inline when calling nscall function
authorMihail Ionescu <mihail.ionescu@arm.com>
Wed, 15 Jan 2020 11:35:21 +0000 (11:35 +0000)
committerMihail Ionescu <mihail.ionescu@arm.com>
Thu, 16 Jan 2020 15:12:01 +0000 (15:12 +0000)
This patch adds two new patterns for the VLSTM and VLLDM instructions.
cmse_nonsecure_call_inline_register_clear is then modified to
generate VLSTM and VLLDM respectively before and after calls to
functions with the cmse_nonsecure_call attribute in order to have lazy
saving, clearing and restoring of VFP registers. Since these
instructions do not do writeback of the base register, the stack is adjusted
prior the lazy store and after the lazy load with appropriate frame
debug notes to describe the effect on the CFA register.

As with CLRM, VSCCLRM and VSTR/VLDR, the instruction is modeled as an
unspecified operation to the memory pointed to by the base register.

*** gcc/ChangeLog ***

2020-01-16  Mihail-Calin Ionescu  <mihail.ionescu@arm.com>
2020-01-16  Thomas Preud'homme  <thomas.preudhomme@arm.com>

* config/arm/arm.c (arm_add_cfa_adjust_cfa_note): Declare early.
(cmse_nonsecure_call_inline_register_clear): Define new lazy_fpclear
variable as true when floating-point ABI is not hard.  Replace
check against TARGET_HARD_FLOAT_ABI by checks against lazy_fpclear.
Generate VLSTM and VLLDM instruction respectively before and
after a function call to cmse_nonsecure_call function.
* config/arm/unspecs.md (VUNSPEC_VLSTM): Define unspec.
(VUNSPEC_VLLDM): Likewise.
* config/arm/vfp.md (lazy_store_multiple_insn): New define_insn.
(lazy_load_multiple_insn): Likewise.

*** gcc/testsuite/ChangeLog ***

2020-01-16  Mihail-Calin Ionescu  <mihail.ionescu@arm.com>
2020-01-16  Thomas Preud'homme  <thomas.preudhomme@arm.com>

* gcc.target/arm/cmse/mainline/8_1m/soft/cmse-13.c: Add check for VLSTM and
VLLDM.
* gcc.target/arm/cmse/mainline/8_1m/soft/cmse-7.c: Likewise.
* gcc.target/arm/cmse/mainline/8_1m/soft/cmse-8.c: Likewise.
* gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-13.c: Likewise.
* gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-7.c: Likewise.
* gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-8.c: Likewise.
* gcc.target/arm/cmse/mainline/8_1m/softfp-sp/cmse-7.c: Likewise.
* gcc.target/arm/cmse/mainline/8_1m/softfp-sp/cmse-8.c: Likewise.

13 files changed:
gcc/ChangeLog
gcc/config/arm/arm.c
gcc/config/arm/unspecs.md
gcc/config/arm/vfp.md
gcc/testsuite/ChangeLog
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/soft/cmse-13.c
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/soft/cmse-7.c
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/soft/cmse-8.c
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/softfp-sp/cmse-7.c
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/softfp-sp/cmse-8.c
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-13.c
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-7.c
gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-8.c

index 11938ef2432779fcbf22a50cd7390020ff717e9b..fac36a41debaa8fb0e2c6873a915d8cde671e5e5 100644 (file)
@@ -1,6 +1,20 @@
 2020-01-16  Mihail-Calin Ionescu <mihail.ionescu@arm.com>
 2020-01-16  Thomas Preud'homme <thomas.preudhomme@arm.com>
 
+       * config/arm/arm.c (arm_add_cfa_adjust_cfa_note): Declare early.
+       (cmse_nonsecure_call_inline_register_clear): Define new lazy_fpclear
+       variable as true when floating-point ABI is not hard.  Replace
+       check against TARGET_HARD_FLOAT_ABI by checks against lazy_fpclear.
+       Generate VLSTM and VLLDM instruction respectively before and
+       after a function call to cmse_nonsecure_call function.
+       * config/arm/unspecs.md (VUNSPEC_VLSTM): Define unspec.
+       (VUNSPEC_VLLDM): Likewise.
+       * config/arm/vfp.md (lazy_store_multiple_insn): New define_insn.
+       (lazy_load_multiple_insn): Likewise.
+
+2020-01-16  Mihail-Calin Ionescu  <mihail.ionescu@arm.com>
+2020-01-16  Thomas Preud'homme  <thomas.preudhomme@arm.com>
+
        * config/arm/arm.c (vfp_emit_fstmd): Declare early.
        (arm_emit_vfp_multi_reg_pop): Likewise.
        (cmse_nonsecure_call_inline_register_clear): Abstract number of VFP
index 2cb2b8ec84b17d35ff446cd17fc15968bb53acaf..5e93f52f856d31fece589577dff8dac644200662 100644 (file)
@@ -186,6 +186,7 @@ static int arm_register_move_cost (machine_mode, reg_class_t, reg_class_t);
 static int arm_memory_move_cost (machine_mode, reg_class_t, bool);
 static void emit_constant_insn (rtx cond, rtx pattern);
 static rtx_insn *emit_set_insn (rtx, rtx);
+static void arm_add_cfa_adjust_cfa_note (rtx, int, rtx, rtx);
 static rtx emit_multi_reg_push (unsigned long, unsigned long);
 static void arm_emit_multi_reg_pop (unsigned long);
 static int vfp_emit_fstmd (int, int);
@@ -18283,6 +18284,9 @@ cmse_nonsecure_call_inline_register_clear (void)
       FOR_BB_INSNS (bb, insn)
        {
          bool clear_callee_saved = TARGET_HAVE_FPCXT_CMSE;
+         /* frame = VFP regs + FPSCR + VPR.  */
+         unsigned lazy_store_stack_frame_size
+           = (LAST_VFP_REGNUM - FIRST_VFP_REGNUM + 1 + 2) * UNITS_PER_WORD;
          unsigned long callee_saved_mask
            = ((1 << (LAST_HI_REGNUM + 1)) - 1)
            & ~((1 << (LAST_ARG_REGNUM + 1)) - 1);
@@ -18300,7 +18304,7 @@ cmse_nonsecure_call_inline_register_clear (void)
          CUMULATIVE_ARGS args_so_far_v;
          cumulative_args_t args_so_far;
          tree arg_type, fntype;
-         bool first_param = true;
+         bool first_param = true, lazy_fpclear = !TARGET_HARD_FLOAT_ABI;
          function_args_iterator args_iter;
          uint32_t padding_bits_to_clear[4] = {0U, 0U, 0U, 0U};
 
@@ -18334,7 +18338,7 @@ cmse_nonsecure_call_inline_register_clear (void)
             -mfloat-abi=hard.  For -mfloat-abi=softfp we will be using the
             lazy store and loads which clear both caller- and callee-saved
             registers.  */
-         if (TARGET_HARD_FLOAT_ABI)
+         if (!lazy_fpclear)
            {
              auto_sbitmap float_bitmap (maxregno + 1);
 
@@ -18418,8 +18422,23 @@ cmse_nonsecure_call_inline_register_clear (void)
                 disabled for pop (see below).  */
              RTX_FRAME_RELATED_P (push_insn) = 0;
 
+             /* Lazy store multiple.  */
+             if (lazy_fpclear)
+               {
+                 rtx imm;
+                 rtx_insn *add_insn;
+
+                 imm = gen_int_mode (- lazy_store_stack_frame_size, SImode);
+                 add_insn = emit_insn (gen_addsi3 (stack_pointer_rtx,
+                                                   stack_pointer_rtx, imm));
+                 arm_add_cfa_adjust_cfa_note (add_insn,
+                                              - lazy_store_stack_frame_size,
+                                              stack_pointer_rtx,
+                                              stack_pointer_rtx);
+                 emit_insn (gen_lazy_store_multiple_insn (stack_pointer_rtx));
+               }
              /* Save VFP callee-saved registers.  */
-             if (TARGET_HARD_FLOAT_ABI)
+             else
                {
                  vfp_emit_fstmd (D7_VFP_REGNUM + 1,
                                  (max_fp_regno - D7_VFP_REGNUM) / 2);
@@ -18445,8 +18464,21 @@ cmse_nonsecure_call_inline_register_clear (void)
 
              start_sequence ();
 
+             /* Lazy load multiple done as part of libcall in Armv8-M.  */
+             if (lazy_fpclear)
+               {
+                 rtx imm = gen_int_mode (lazy_store_stack_frame_size, SImode);
+                 emit_insn (gen_lazy_load_multiple_insn (stack_pointer_rtx));
+                 rtx_insn *add_insn =
+                   emit_insn (gen_addsi3 (stack_pointer_rtx,
+                                          stack_pointer_rtx, imm));
+                 arm_add_cfa_adjust_cfa_note (add_insn,
+                                              lazy_store_stack_frame_size,
+                                              stack_pointer_rtx,
+                                              stack_pointer_rtx);
+               }
              /* Restore VFP callee-saved registers.  */
-             if (TARGET_HARD_FLOAT_ABI)
+             else
                {
                  int nb_callee_saved_vfp_regs =
                    (max_fp_regno - D7_VFP_REGNUM) / 2;
index 22a1491923082d6ebe7af1b56c2c90a95bb65cfc..8f4a705f43efdb6baf03b39cee589cf728620687 100644 (file)
   VUNSPEC_CLRM_APSR    ; Represent the clearing of APSR with clrm instruction.
   VUNSPEC_VSCCLRM_VPR  ; Represent the clearing of VPR with vscclrm
                        ; instruction.
+  VUNSPEC_VLSTM                ; Represent the lazy store multiple with vlstm
+                       ; instruction.
+  VUNSPEC_VLLDM                ; Represent the lazy load multiple with vlldm
+                       ; instruction.
 ])
 
 ;; Enumerators for NEON unspecs.
index 92e8d8fbd8f31834fcb776008fbd12f0dcc80ca4..930ef462947bd7a3138b90d75b11fab2fd87f87a 100644 (file)
    (set_attr "type" "mov_reg")]
 )
 
+(define_insn "lazy_store_multiple_insn"
+  [(set (match_operand:SI 0 "s_register_operand" "+&rk")
+       (post_dec:SI (match_dup 0)))
+   (unspec_volatile [(const_int 0)
+                    (mem:SI (post_dec:SI (match_dup 0)))]
+                   VUNSPEC_VLSTM)]
+  "use_cmse && reload_completed"
+  "vlstm%?\\t%0"
+  [(set_attr "predicable" "yes")
+   (set_attr "type" "store_4")]
+)
+
+(define_insn "lazy_load_multiple_insn"
+  [(set (match_operand:SI 0 "s_register_operand" "+&rk")
+       (post_inc:SI (match_dup 0)))
+   (unspec_volatile:SI [(const_int 0)
+                       (mem:SI (match_dup 0))]
+                      VUNSPEC_VLLDM)]
+  "use_cmse && reload_completed"
+  "vlldm%?\\t%0"
+  [(set_attr "predicable" "yes")
+   (set_attr "type" "load_4")]
+)
+
 (define_insn_and_split "*cmpsf_split_vfp"
   [(set (reg:CCFP CC_REGNUM)
        (compare:CCFP (match_operand:SF 0 "s_register_operand"  "t")
index 24ebfcb913c35e4c036ae8c9e44d3a8598ca145d..6653b728a1549cb173871f3a754e110feff88216 100644 (file)
@@ -1,6 +1,19 @@
 2020-01-16  Mihail-Calin Ionescu <mihail.ionescu@arm.com>
 2020-01-16  Thomas Preud'homme <thomas.preudhomme@arm.com>
 
+       * gcc.target/arm/cmse/mainline/8_1m/soft/cmse-13.c: Add check for VLSTM and
+       VLLDM.
+       * gcc.target/arm/cmse/mainline/8_1m/soft/cmse-7.c: Likewise.
+       * gcc.target/arm/cmse/mainline/8_1m/soft/cmse-8.c: Likewise.
+       * gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-13.c: Likewise.
+       * gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-7.c: Likewise.
+       * gcc.target/arm/cmse/mainline/8_1m/softfp/cmse-8.c: Likewise.
+       * gcc.target/arm/cmse/mainline/8_1m/softfp-sp/cmse-7.c: Likewise.
+       * gcc.target/arm/cmse/mainline/8_1m/softfp-sp/cmse-8.c: Likewise.
+
+2020-01-16  Mihail-Calin Ionescu  <mihail.ionescu@arm.com>
+2020-01-16  Thomas Preud'homme  <thomas.preudhomme@arm.com>
+
        * gcc.target/arm/cmse/mainline/8_1m/hard-sp/cmse-13.c: Add check for
        VPUSH and VPOP and update expectation for VSCCLRM.
        * gcc.target/arm/cmse/mainline/8_1m/hard-sp/cmse-7.c: Likewise.
index 07a6719b4f1a260a3461f7408e278dd6e71f60d3..52d22427de79c6a76fbe32b8df7f76b4b286249c 100644 (file)
@@ -11,7 +11,9 @@
 /* { dg-final { scan-assembler-not "mov\tr2, r4" } } */
 /* { dg-final { scan-assembler-not "mov\tr3, r4" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r1, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 /* { dg-final { scan-assembler-not "vmov" } } */
 /* { dg-final { scan-assembler-not "vmsr" } } */
index ca2961ac18ccacec6907b1d1d217c6c2e28072e7..40026d5ee1cc62b4acf48be9619ccd69ef4ead7b 100644 (file)
@@ -8,7 +8,9 @@
 /* { dg-final { scan-assembler "lsrs\tr4, r4, #1" } } */
 /* { dg-final { scan-assembler "lsls\tr4, r4, #1" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r0, r1, r2, r3, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 /* { dg-final { scan-assembler-not "vmov" } } */
 /* { dg-final { scan-assembler-not "vmsr" } } */
index 7a1abb51fcf9a62a24583e792953845f21bbed49..6edc1f6ed7e6bc27024056375db4a2d30c3ea3c4 100644 (file)
@@ -10,7 +10,9 @@
 /* { dg-final { scan-assembler-not "mov\tr0, r4" } } */
 /* { dg-final { scan-assembler-not "mov\tr1, r4" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r2, r3, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 /* { dg-final { scan-assembler-not "vmov" } } */
 /* { dg-final { scan-assembler-not "vmsr" } } */
index 90aadffb7aa14ceeea22232148c11e9543eee0e7..8d05576add940c277e5a13f7aab99e6807c1553d 100644 (file)
@@ -9,7 +9,9 @@
 /* { dg-final { scan-assembler "lsrs\tr4, r4, #1" } } */
 /* { dg-final { scan-assembler "lsls\tr4, r4, #1" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r0, r1, r2, r3, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 
 /* Now we check that we use the correct intrinsic to call.  */
index 28f2e86dfaa89902d1c04fc2890c5445b5bb0af5..1f0a14742781b7340685338901dbfab9b700b779 100644 (file)
@@ -11,7 +11,9 @@
 /* { dg-final { scan-assembler-not "mov\tr0, r4" } } */
 /* { dg-final { scan-assembler-not "mov\tr1, r4" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r2, r3, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 
 /* Now we check that we use the correct intrinsic to call.  */
index 15d3b682c798dd6635ed6b90d9aa8e705fefa265..842794181087ddbd5ce59680035a0cb61ce5682e 100644 (file)
@@ -12,7 +12,9 @@
 /* { dg-final { scan-assembler-not "mov\tr2, r4" } } */
 /* { dg-final { scan-assembler-not "mov\tr3, r4" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r1, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 
 /* Now we check that we use the correct intrinsic to call.  */
index 3d48859028ab8dd22d9ffed7c95ece59c2ed937e..38c9d5457034d2427413bcce7e7be6bad80f7a67 100644 (file)
@@ -9,7 +9,9 @@
 /* { dg-final { scan-assembler "lsrs\tr4, r4, #1" } } */
 /* { dg-final { scan-assembler "lsls\tr4, r4, #1" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r0, r1, r2, r3, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 
 /* Now we check that we use the correct intrinsic to call.  */
index 0e2dcae36927d2c7187ca2b60c935504268476bc..6a17bd322fcc4e7e00ea289ee7373db9d8c37a87 100644 (file)
@@ -11,7 +11,9 @@
 /* { dg-final { scan-assembler-not "mov\tr0, r4" } } */
 /* { dg-final { scan-assembler-not "mov\tr1, r4" } } */
 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
+/* { dg-final { scan-assembler "vlstm\tsp" } } */
 /* { dg-final { scan-assembler "clrm\t\{r2, r3, r5, r6, r7, r8, r9, r10, fp, ip, APSR\}" } } */
+/* { dg-final { scan-assembler "vlldm\tsp" } } */
 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
 
 /* Now we check that we use the correct intrinsic to call.  */