262 lines
5.1 KiB
C
262 lines
5.1 KiB
C
/* This tests passing of structs. */
|
|
|
|
#include "defines.h"
|
|
#include "args.h"
|
|
#include <complex.h>
|
|
|
|
struct IntegerRegisters iregs;
|
|
struct FloatRegisters fregs;
|
|
unsigned int num_iregs, num_fregs;
|
|
|
|
struct int_struct
|
|
{
|
|
int i;
|
|
};
|
|
|
|
struct long_struct
|
|
{
|
|
long l;
|
|
};
|
|
|
|
struct long2_struct
|
|
{
|
|
long l1, l2;
|
|
};
|
|
|
|
struct long3_struct
|
|
{
|
|
long l1, l2, l3;
|
|
};
|
|
|
|
|
|
/* Check that the struct is passed as the individual members in iregs. */
|
|
void
|
|
check_struct_passing1 (struct int_struct is ATTRIBUTE_UNUSED)
|
|
{
|
|
check_int_arguments;
|
|
}
|
|
|
|
void
|
|
check_struct_passing2 (struct long_struct ls ATTRIBUTE_UNUSED)
|
|
{
|
|
check_int_arguments;
|
|
}
|
|
|
|
void
|
|
check_struct_passing3 (struct long2_struct ls ATTRIBUTE_UNUSED)
|
|
{
|
|
check_int_arguments;
|
|
}
|
|
|
|
void
|
|
check_struct_passing4 (struct long3_struct ls ATTRIBUTE_UNUSED)
|
|
{
|
|
/* Check the passing on the stack by comparing the address of the
|
|
stack elements to the expected place on the stack. */
|
|
assert ((unsigned long)&ls.l1 == rsp+8);
|
|
assert ((unsigned long)&ls.l2 == rsp+16);
|
|
assert ((unsigned long)&ls.l3 == rsp+24);
|
|
}
|
|
|
|
#ifdef CHECK_M64_M128
|
|
struct m128_struct
|
|
{
|
|
__m128 x;
|
|
};
|
|
|
|
struct m128_2_struct
|
|
{
|
|
__m128 x1, x2;
|
|
};
|
|
|
|
/* Check that the struct is passed as the individual members in fregs. */
|
|
void
|
|
check_struct_passing5 (struct m128_struct ms1 ATTRIBUTE_UNUSED,
|
|
struct m128_struct ms2 ATTRIBUTE_UNUSED,
|
|
struct m128_struct ms3 ATTRIBUTE_UNUSED,
|
|
struct m128_struct ms4 ATTRIBUTE_UNUSED,
|
|
struct m128_struct ms5 ATTRIBUTE_UNUSED,
|
|
struct m128_struct ms6 ATTRIBUTE_UNUSED,
|
|
struct m128_struct ms7 ATTRIBUTE_UNUSED,
|
|
struct m128_struct ms8 ATTRIBUTE_UNUSED)
|
|
{
|
|
check_m128_arguments;
|
|
}
|
|
|
|
void
|
|
check_struct_passing6 (struct m128_2_struct ms ATTRIBUTE_UNUSED)
|
|
{
|
|
/* Check the passing on the stack by comparing the address of the
|
|
stack elements to the expected place on the stack. */
|
|
assert ((unsigned long)&ms.x1 == rsp+8);
|
|
assert ((unsigned long)&ms.x2 == rsp+24);
|
|
}
|
|
#endif
|
|
|
|
struct flex1_struct
|
|
{
|
|
long i;
|
|
long flex[];
|
|
};
|
|
|
|
struct flex2_struct
|
|
{
|
|
long i;
|
|
long flex[0];
|
|
};
|
|
|
|
void
|
|
check_struct_passing7 (struct flex1_struct is ATTRIBUTE_UNUSED)
|
|
{
|
|
check_int_arguments;
|
|
}
|
|
|
|
void
|
|
check_struct_passing8 (struct flex2_struct is ATTRIBUTE_UNUSED)
|
|
{
|
|
check_int_arguments;
|
|
}
|
|
|
|
struct complex1_struct
|
|
{
|
|
int c;
|
|
__complex__ float x;
|
|
};
|
|
|
|
struct complex1a_struct
|
|
{
|
|
long l;
|
|
float f;
|
|
};
|
|
|
|
struct complex2_struct
|
|
{
|
|
int c;
|
|
__complex__ float x;
|
|
float y;
|
|
};
|
|
|
|
struct complex2a_struct
|
|
{
|
|
long l;
|
|
double d;
|
|
};
|
|
|
|
void
|
|
check_struct_passing9 (struct complex1_struct is ATTRIBUTE_UNUSED)
|
|
{
|
|
check_int_arguments;
|
|
check_float_arguments;
|
|
}
|
|
|
|
void
|
|
check_struct_passing10 (struct complex2_struct is ATTRIBUTE_UNUSED)
|
|
{
|
|
check_int_arguments;
|
|
check_double_arguments;
|
|
}
|
|
|
|
static struct flex1_struct f1s = { 60, { } };
|
|
static struct flex2_struct f2s = { 61, { } };
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
struct int_struct is = { 48 };
|
|
struct long_struct ls = { 49 };
|
|
#ifdef CHECK_LARGER_STRUCTS
|
|
struct long2_struct l2s = { 50, 51 };
|
|
struct long3_struct l3s = { 52, 53, 54 };
|
|
#endif
|
|
#ifdef CHECK_M64_M128
|
|
struct m128_struct m128s[8];
|
|
struct m128_2_struct m128_2s = {
|
|
{ 48.394, 39.3, -397.9, 3484.9 },
|
|
{ -8.394, -93.3, 7.9, 84.94 }
|
|
};
|
|
int i;
|
|
#endif
|
|
struct complex1_struct c1s = { 4, ( -13.4 + 3.5*I ) };
|
|
union
|
|
{
|
|
struct complex1_struct c;
|
|
struct complex1a_struct u;
|
|
} c1u;
|
|
struct complex2_struct c2s = { 4, ( -13.4 + 3.5*I ), -34.5 };
|
|
union
|
|
{
|
|
struct complex2_struct c;
|
|
struct complex2a_struct u;
|
|
} c2u;
|
|
|
|
clear_struct_registers;
|
|
iregs.I0 = is.i;
|
|
num_iregs = 1;
|
|
clear_int_hardware_registers;
|
|
WRAP_CALL (check_struct_passing1)(is);
|
|
|
|
clear_struct_registers;
|
|
iregs.I0 = ls.l;
|
|
num_iregs = 1;
|
|
clear_int_hardware_registers;
|
|
WRAP_CALL (check_struct_passing2)(ls);
|
|
|
|
#ifdef CHECK_LARGER_STRUCTS
|
|
clear_struct_registers;
|
|
iregs.I0 = l2s.l1;
|
|
iregs.I1 = l2s.l2;
|
|
num_iregs = 2;
|
|
clear_int_hardware_registers;
|
|
WRAP_CALL (check_struct_passing3)(l2s);
|
|
WRAP_CALL (check_struct_passing4)(l3s);
|
|
#endif
|
|
|
|
#ifdef CHECK_M64_M128
|
|
clear_struct_registers;
|
|
for (i = 0; i < 8; i++)
|
|
{
|
|
m128s[i].x = (__m128){32+i, 0, i, 0};
|
|
fregs.xmm0._m128[i] = m128s[i].x;
|
|
}
|
|
num_fregs = 8;
|
|
clear_float_hardware_registers;
|
|
WRAP_CALL (check_struct_passing5)(m128s[0], m128s[1], m128s[2], m128s[3],
|
|
m128s[4], m128s[5], m128s[6], m128s[7]);
|
|
WRAP_CALL (check_struct_passing6)(m128_2s);
|
|
#endif
|
|
|
|
clear_struct_registers;
|
|
iregs.I0 = f1s.i;
|
|
num_iregs = 1;
|
|
clear_int_hardware_registers;
|
|
WRAP_CALL (check_struct_passing7)(f1s);
|
|
|
|
clear_struct_registers;
|
|
iregs.I0 = f2s.i;
|
|
num_iregs = 1;
|
|
clear_int_hardware_registers;
|
|
WRAP_CALL (check_struct_passing8)(f2s);
|
|
|
|
clear_struct_registers;
|
|
c1u.c = c1s;
|
|
iregs.I0 = c1u.u.l;
|
|
num_iregs = 1;
|
|
fregs.xmm0._float [0] = c1u.u.f;
|
|
num_fregs = 1;
|
|
clear_int_hardware_registers;
|
|
clear_float_hardware_registers;
|
|
WRAP_CALL (check_struct_passing9)(c1s);
|
|
|
|
clear_struct_registers;
|
|
c2u.c = c2s;
|
|
iregs.I0 = c2u.u.l;
|
|
num_iregs = 1;
|
|
fregs.xmm0._double[0] = c2u.u.d;
|
|
num_fregs = 1;
|
|
clear_int_hardware_registers;
|
|
clear_float_hardware_registers;
|
|
WRAP_CALL (check_struct_passing10)(c2s);
|
|
|
|
return 0;
|
|
}
|