int
Test_Struct_Sequence::init_parameters (Param_Test_ptr)
{
Generator *gen = GENERATOR::instance (); // value generator
// get some sequence length (not more than 10)
CORBA::ULong len = (CORBA::ULong) (gen->gen_long () % 10) + 1;
// set the length of the sequence
this->in_.length (len);
this->inout_->length (len);
// now set each individual element
for (CORBA::ULong i = 0; i < this->in_.length (); i++)
{
// generate some arbitrary struct to be filled into the ith location in
// the sequence
this->in_[i] = gen->gen_fixed_struct ();
this->inout_[i] = gen->gen_fixed_struct ();
}
return 0;
}
int
Test_Fixed_Struct::init_parameters (Param_Test_ptr /*objref*/
/*env*/)
{
Generator *gen = GENERATOR::instance (); // value generator
//ACE_UNUSED_ARG (objref);
this->in_ = gen->gen_fixed_struct ();
ACE_OS::memset (&this->inout_,
0,
sizeof (Param_Test::Fixed_Struct));
return 0;
}
int
Test_Bounded_Struct_Sequence::init_parameters (Param_Test_ptr /* objref */
/* env */)
{
Generator *gen = GENERATOR::instance (); // value generator
// set the length of the sequence
this->in_.length (MAX_STRUCTSEQ_LEN);
// now set each individual element
for (CORBA::ULong i = 0; i < this->in_.length (); i++)
{
// generate some arbitrary struct to be filled into the ith location in
// the sequence
this->in_[i] = gen->gen_fixed_struct ();
}
this->inout_->length (0);
this->out_->length (0);
this->ret_->length (0);
return 0;
}
int
Test_Any::reset_parameters (void)
{
Generator *gen = GENERATOR::instance (); // value generator
CORBA::ULong index = (counter++ % Test_Any::ANY_LAST_TEST_ITEM);
switch (index)
{
default:
case Test_Any::ANY_SHORT:
{
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_SHORT subtest\n"));
CORBA::Short s;
s = gen->gen_short ();
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG, "setting short = %d\n", s));
this->in_ <<= s;
this->inout_ <<= s;
}
break;
case Test_Any::ANY_STRING:
{
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_STRING subtest\n"));
char *str = gen->gen_string ();
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG, "setting string = %s\n", str));
this->in_ <<= str;
this->inout_ <<= str;
CORBA::string_free (str);
}
break;
case Test_Any::ANY_OBJREF:
{
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_OBJREF subtest\n"));
// insert the coffee object into the Any
this->in_ <<= this->cobj_.in ();
this->inout_ <<= this->cobj_.in ();
}
break;
case Test_Any::ANY_ARRAY:
{
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_ARRAY subtest\n"));
Param_Test::Fixed_Array array;
for (size_t i = 0; i < Param_Test::DIM1; i++)
array[i] = i;
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG, "Setting Fixed_Array\n"));
this->in_ <<= Param_Test::Fixed_Array_forany (array);
this->inout_ <<= Param_Test::Fixed_Array_forany (array);
}
break;
case Test_Any::ANY_SHORT_SEQ:
{
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_SHORT_SEQ subtest\n"));
CORBA::ShortSeq seq;
seq.length (gen->gen_short () % 16);
for (size_t i = 0; i < seq.length (); i++)
seq[i] = gen->gen_short ();
this->in_ <<= seq;
this->inout_ <<= seq;
}
break;
case Test_Any::ANY_BD_SHORT_SEQ:
{
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_BD_SHORT_SEQ subtest\n"));
Param_Test::Bounded_Short_Seq seq;
seq.length (gen->gen_short () % seq.maximum ());
for (size_t i = 0; i < seq.length (); i++)
seq[i] = gen->gen_short ();
this->in_ <<= seq;
this->inout_ <<= seq;
}
break;
case Test_Any::ANY_STRUCT:
{
if (TAO_debug_level > 0)
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_STRUCT subtest\n"));
Param_Test::Fixed_Struct structure;
structure = gen->gen_fixed_struct ();
this->in_ <<= structure;
this->inout_ <<= structure;
}
break;
case Test_Any::ANY_BIG_UNION:
{
CORBA::Long x = gen->gen_long ();
Param_Test::Big_Union the_union;
the_union.the_long (x);
this->in_ <<= the_union;
this->inout_ <<= the_union;
if (TAO_debug_level > 0)
{
Param_Test::Big_Union *bu_in, *bu_inout;
this->in_ >>= bu_in;
this->inout_ >>= bu_inout;
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_BIG_UNION subtest\n"
" in %d\n"
" inout %d\n",
bu_in->the_long (),
bu_inout->the_long ()));
}
}
break;
case Test_Any::ANY_SMALL_UNION:
{
CORBA::Long x = gen->gen_long ();
Param_Test::Small_Union the_union;
the_union.the_long (x);
this->in_ <<= the_union;
this->inout_ <<= the_union;
if (TAO_debug_level > 0)
{
Param_Test::Small_Union *bu_in, *bu_inout;
this->in_ >>= bu_in;
this->inout_ >>= bu_inout;
ACE_DEBUG ((LM_DEBUG,
"Param_Test: ANY_SMALL_UNION subtest\n"
" in %d\n"
" inout %d\n",
bu_in->the_long (),
bu_inout->the_long ()));
}
}