27001c664d
* lib/<emc-support.exp trace-support.exp}: New files.
* configure.in: add new test directory gdb.trace.
* gdb.trace/{configure configure.in Makefile.in}: New files.
* gdb.trace/{actions.c actions.exp gdb_c_test.c}: New files.
* gdb.trace/{circ.c circ.exp limits.c limits.exp}: New files.
* gdb.trace/{collection.c collection.exp tfind.exp }: New files.
* gdb.trace/{backtrace.exp deltrace.exp infotrace.exp}: New files.
* gdb.trace/{packetlen.exp passc-dyn.exp passcount.exp}: New files.
* gdb.trace/{report.exp save-trace.exp tracecmd.exp}: New files.
* gdb.trace/{while-dyn.exp while-stepping.exp}: New files.
134 lines
3.7 KiB
C
134 lines
3.7 KiB
C
/*
|
|
* Test program for trace action commands
|
|
*/
|
|
|
|
static char gdb_char_test;
|
|
static short gdb_short_test;
|
|
static long gdb_long_test;
|
|
static char gdb_arr_test[25];
|
|
static struct GDB_STRUCT_TEST
|
|
{
|
|
char c;
|
|
short s;
|
|
long l;
|
|
int bfield : 11; /* collect bitfield */
|
|
char arr[25];
|
|
struct GDB_STRUCT_TEST *next;
|
|
} gdb_struct1_test, gdb_struct2_test, *gdb_structp_test, **gdb_structpp_test;
|
|
|
|
static union GDB_UNION_TEST
|
|
{
|
|
char c;
|
|
short s;
|
|
long l;
|
|
int bfield : 11; /* collect bitfield */
|
|
char arr[4];
|
|
union GDB_UNION_TEST *next;
|
|
} gdb_union1_test;
|
|
|
|
void gdb_recursion_test (int, int, int, int, int, int, int);
|
|
|
|
void gdb_recursion_test (int depth,
|
|
int q1,
|
|
int q2,
|
|
int q3,
|
|
int q4,
|
|
int q5,
|
|
int q6)
|
|
{ /* gdb_recursion_test line 0 */
|
|
int q = q1; /* gdbtestline 1 */
|
|
|
|
q1 = q2; /* gdbtestline 2 */
|
|
q2 = q3; /* gdbtestline 3 */
|
|
q3 = q4; /* gdbtestline 4 */
|
|
q4 = q5; /* gdbtestline 5 */
|
|
q5 = q6; /* gdbtestline 6 */
|
|
q6 = q; /* gdbtestline 7 */
|
|
if (depth--) /* gdbtestline 8 */
|
|
gdb_recursion_test (depth, q1, q2, q3, q4, q5, q6); /* gdbtestline 9 */
|
|
}
|
|
|
|
|
|
unsigned long gdb_c_test( unsigned long *parm )
|
|
|
|
{
|
|
char *p = "gdb_c_test";
|
|
char *rediculously_long_variable_name_with_equally_long_string_assignment;
|
|
register long local_reg = 7;
|
|
static unsigned long local_static, local_static_sizeof;
|
|
long local_long;
|
|
unsigned long *stack_ptr;
|
|
unsigned long end_of_stack;
|
|
|
|
rediculously_long_variable_name_with_equally_long_string_assignment =
|
|
"rediculously long variable name with equally long string assignment";
|
|
local_static = 9;
|
|
local_static_sizeof = sizeof (struct GDB_STRUCT_TEST);
|
|
local_long = local_reg + 1;
|
|
stack_ptr = (unsigned long *) &local_long;
|
|
end_of_stack =
|
|
(unsigned long) &stack_ptr + sizeof(stack_ptr) + sizeof(end_of_stack) - 1;
|
|
|
|
gdb_char_test = gdb_struct1_test.c = (char) ((long) parm[1] & 0xff);
|
|
gdb_short_test = gdb_struct1_test.s = (short) ((long) parm[2] & 0xffff);
|
|
gdb_long_test = gdb_struct1_test.l = (long) ((long) parm[3] & 0xffffffff);
|
|
gdb_union1_test.l = (long) parm[4];
|
|
gdb_arr_test[0] = gdb_struct1_test.arr[0] = (char) ((long) parm[1] & 0xff);
|
|
gdb_arr_test[1] = gdb_struct1_test.arr[1] = (char) ((long) parm[2] & 0xff);
|
|
gdb_arr_test[2] = gdb_struct1_test.arr[2] = (char) ((long) parm[3] & 0xff);
|
|
gdb_arr_test[3] = gdb_struct1_test.arr[3] = (char) ((long) parm[4] & 0xff);
|
|
gdb_arr_test[4] = gdb_struct1_test.arr[4] = (char) ((long) parm[5] & 0xff);
|
|
gdb_arr_test[5] = gdb_struct1_test.arr[5] = (char) ((long) parm[6] & 0xff);
|
|
gdb_struct1_test.bfield = 144;
|
|
gdb_struct1_test.next = &gdb_struct2_test;
|
|
gdb_structp_test = &gdb_struct1_test;
|
|
gdb_structpp_test = &gdb_structp_test;
|
|
|
|
gdb_recursion_test (3, (long) parm[1], (long) parm[2], (long) parm[3],
|
|
(long) parm[4], (long) parm[5], (long) parm[6]);
|
|
|
|
gdb_char_test = gdb_short_test = gdb_long_test = 0;
|
|
gdb_structp_test = (void *) 0;
|
|
gdb_structpp_test = (void *) 0;
|
|
memset ((char *) &gdb_struct1_test, 0, sizeof (gdb_struct1_test));
|
|
memset ((char *) &gdb_struct2_test, 0, sizeof (gdb_struct2_test));
|
|
local_static_sizeof = 0;
|
|
local_static = 0;
|
|
return ( (unsigned long) 0 );
|
|
}
|
|
|
|
static void gdb_asm_test (void)
|
|
{
|
|
}
|
|
|
|
static void begin () /* called before anything else */
|
|
{
|
|
}
|
|
|
|
static void end () /* called after everything else */
|
|
{
|
|
}
|
|
|
|
int
|
|
main (argc, argv, envp)
|
|
int argc;
|
|
char *argv[], **envp;
|
|
{
|
|
int i;
|
|
unsigned long myparms[10];
|
|
|
|
#ifdef usestubs
|
|
set_debug_traps ();
|
|
breakpoint ();
|
|
#endif
|
|
|
|
begin ();
|
|
for (i = 0; i < sizeof (myparms) / sizeof (myparms[0]); i++)
|
|
myparms[i] = i;
|
|
|
|
gdb_c_test (&myparms[0]);
|
|
|
|
end ();
|
|
return 0;
|
|
}
|
|
|