1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
//
// $Id$
//
#include "Process_Factory.h"
#include "ace/Process_Manager.h"
ACE_RCSID(Client_Leaks, Process_Factory, "$Id$")
Process_Factory::Process_Factory (CORBA::ORB_ptr orb)
: orb_ (CORBA::ORB::_duplicate (orb))
{
}
Test::Process_ptr
Process_Factory::create_new_process (CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((CORBA::SystemException,Test::Spawn_Failed))
{
ACE_Process_Options options;
static const char* argv[] = {
"child",
"-o",
"child.ior",
0};
options.command_line (argv);
(void) ACE_OS::unlink ("child.ior");
pid_t pid =
ACE_Process_Manager::instance ()->spawn (options);
// Good chance to wait for older processes
ACE_Time_Value interval (0, 10000);
(void) ACE_Process_Manager::instance ()->wait (interval);
if (pid == -1)
{
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Process_Factory::create_new_process, "
" spawn call failed (%d)\n",
errno));
ACE_THROW_RETURN (Test::Spawn_Failed (), Test::Process::_nil ());
}
for (int i = 0; i != 500; ++i)
{
if (ACE_OS::access ("child.ior", R_OK) == 0)
break;
ACE_OS::sleep (interval);
}
ACE_OS::sleep (interval);
if (ACE_OS::access ("child.ior", R_OK) != 0)
{
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Process_Factory::create_new_process, "
" can't find child.ior file\n"));
ACE_THROW_RETURN (Test::Spawn_Failed (), Test::Process::_nil
());
}
CORBA::Object_var object =
this->orb_->string_to_object ("file://child.ior", ACE_TRY_ENV);
ACE_CHECK_RETURN (Test::Process::_nil ());
Test::Process_var process =
Test::Process::_narrow (object.in (), ACE_TRY_ENV);
ACE_CHECK_RETURN (Test::Process::_nil ());
if (CORBA::is_nil (process.in ()))
ACE_THROW_RETURN (Test::Spawn_Failed (), Test::Process::_nil ());
(void) ACE_OS::unlink ("child.ior");
return process._retn ();
}
void
Process_Factory::shutdown (CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((CORBA::SystemException))
{
this->orb_->shutdown (0, ACE_TRY_ENV);
ACE_CHECK;
}
|