184 lines
5.7 KiB
C
184 lines
5.7 KiB
C
/* This testcase is part of GDB, the GNU debugger.
|
|
|
|
Copyright 2004, 2007-2012 Free Software Foundation, Inc.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
|
void li_stw (void);
|
|
|
|
void stack_check_probe_1 (void);
|
|
void stack_check_probe_2 (void);
|
|
void stack_check_probe_loop_1 (void);
|
|
void stack_check_probe_loop_2 (void);
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
li_stw ();
|
|
stack_check_probe_1 ();
|
|
stack_check_probe_2 ();
|
|
stack_check_probe_loop_1 ();
|
|
stack_check_probe_loop_2 ();
|
|
return 0;
|
|
}
|
|
|
|
/* Asm for procedure li_stw().
|
|
|
|
The purpose of this function is to verify that GDB does not
|
|
include the li insn as part of the function prologue (only part
|
|
of the prologue if part of a pair of insns saving vector registers).
|
|
Similarly, GDB should not include the stw insn following the li insn,
|
|
because the source register is not used for parameter passing. */
|
|
|
|
|
|
asm (" .csect .text[PR]\n"
|
|
" .align 2\n"
|
|
" .lglobl .li_stw\n"
|
|
" .csect li_stw[DS]\n"
|
|
"li_stw:\n"
|
|
" .long .li_stw, TOC[tc0], 0\n"
|
|
" .csect .text[PR]\n"
|
|
".li_stw:\n"
|
|
" stw 31,-4(1)\n"
|
|
" stwu 1,-48(1)\n"
|
|
" mr 31,1\n"
|
|
" stw 11,24(31)\n"
|
|
" li 0,8765\n"
|
|
" stw 0,28(31)\n"
|
|
" lwz 1,0(1)\n"
|
|
" lwz 31,-4(1)\n"
|
|
" blr\n");
|
|
|
|
/* Asm for procedure stack_check_probe_1().
|
|
|
|
The purpose of this function is to verify that GDB can skip the stack
|
|
checking probing at the beginning of the prologue. */
|
|
|
|
asm (" .csect .text[PR]\n"
|
|
" .align 2\n"
|
|
" .globl stack_check_probe_1\n"
|
|
" .globl .stack_check_probe_1\n"
|
|
" .csect stack_check_probe_1[DS]\n"
|
|
"stack_check_probe_1:\n"
|
|
" .long .stack_check_probe_1, TOC[tc0], 0\n"
|
|
" .csect .text[PR]\n"
|
|
".stack_check_probe_1:\n"
|
|
" stw 0,-12336(1)\n"
|
|
" stw 31,-4(1)\n"
|
|
" stwu 1,-48(1)\n"
|
|
" mr 31,1\n"
|
|
" lwz 1,0(1)\n"
|
|
" lwz 31,-4(1)\n"
|
|
" blr\n");
|
|
|
|
/* Asm for procedure stack_check_probe_2 ().
|
|
|
|
Similar to stack_check_probe_1, but with a different probing sequence
|
|
(several probes). */
|
|
|
|
asm (" .csect .text[PR]\n"
|
|
" .align 2\n"
|
|
" .globl stack_check_probe_2\n"
|
|
" .globl .stack_check_probe_2\n"
|
|
" .csect stack_check_probe_2[DS]\n"
|
|
"stack_check_probe_2:\n"
|
|
" .long .stack_check_probe_2, TOC[tc0], 0\n"
|
|
" .csect .text[PR]\n"
|
|
".stack_check_probe_2:\n"
|
|
" stw 0,-16384(1)\n"
|
|
" stw 0,-20480(1)\n"
|
|
" stw 0,-24576(1)\n"
|
|
" stw 0,-28672(1)\n"
|
|
" stw 0,-28752(1)\n"
|
|
" mflr 0\n"
|
|
" stw 31,-4(1)\n"
|
|
" stw 0,8(1)\n"
|
|
" stwu 1,-16464(1)\n"
|
|
" mr 31,1\n"
|
|
" lwz 1,0(1)\n"
|
|
" lwz 0,8(1)\n"
|
|
" mtlr 0\n"
|
|
" lwz 31,-4(1)\n"
|
|
" blr\n");
|
|
|
|
/* Asm for procedure stack_check_probe_loop_1() and stack_check_probe_loop_2().
|
|
|
|
Similar to stack_check_probe_1, but with a different probing sequence
|
|
(probing loop). */
|
|
|
|
asm (" .csect .text[PR]\n"
|
|
" .align 2\n"
|
|
" .globl stack_check_probe_loop_1\n"
|
|
" .globl .stack_check_probe_loop_1\n"
|
|
" .csect stack_check_probe_loop_1[DS]\n"
|
|
"stack_check_probe_loop_1:\n"
|
|
" .long .stack_check_probe_loop_1, TOC[tc0], 0\n"
|
|
" .csect .text[PR]\n"
|
|
".stack_check_probe_loop_1:\n"
|
|
" addi 12,1,-12288\n"
|
|
" lis 0,-8\n"
|
|
" ori 0,0,4096\n"
|
|
" add 0,12,0\n"
|
|
"LPSRL1..0:\n"
|
|
" cmpw 0,12,0\n"
|
|
" beq 0,LPSRE1..0\n"
|
|
" addi 12,12,-4096\n"
|
|
" stw 0,0(12)\n"
|
|
" b LPSRL1..0\n"
|
|
"LPSRE1..0:\n"
|
|
" stw 0,-4080(12)\n"
|
|
" mflr 0\n"
|
|
" stw 31,-4(1)\n"
|
|
" stw 0,8(1)\n"
|
|
" lis 0,0xfff8\n"
|
|
" ori 0,0,16\n"
|
|
" stwux 1,1,0\n"
|
|
" mr 31,1\n"
|
|
" lwz 1,0(1)\n"
|
|
" lwz 0,8(1)\n"
|
|
" mtlr 0\n"
|
|
" lwz 31,-4(1)\n"
|
|
" blr\n");
|
|
|
|
asm (" .csect .text[PR]\n"
|
|
" .align 2\n"
|
|
" .globl stack_check_probe_loop_2\n"
|
|
" .globl .stack_check_probe_loop_2\n"
|
|
" .csect stack_check_probe_loop_2[DS]\n"
|
|
"stack_check_probe_loop_2:\n"
|
|
" .long .stack_check_probe_loop_2, TOC[tc0], 0\n"
|
|
" .csect .text[PR]\n"
|
|
".stack_check_probe_loop_2:\n"
|
|
" addi 12,1,-12288\n"
|
|
" lis 0,-8\n"
|
|
" add 0,12,0\n"
|
|
"LPSRL2..0:\n"
|
|
" cmpw 0,12,0\n"
|
|
" beq 0,LPSRE2..0\n"
|
|
" addi 12,12,-4096\n"
|
|
" stw 0,0(12)\n"
|
|
" b LPSRL2..0\n"
|
|
"LPSRE2..0:\n"
|
|
" mflr 0\n"
|
|
" stw 31,-4(1)\n"
|
|
" stw 0,8(1)\n"
|
|
" lis 0,0xfff8\n"
|
|
" ori 0,0,16\n"
|
|
" stwux 1,1,0\n"
|
|
" mr 31,1\n"
|
|
" lwz 1,0(1)\n"
|
|
" lwz 0,8(1)\n"
|
|
" mtlr 0\n"
|
|
" lwz 31,-4(1)\n"
|
|
" blr\n");
|