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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
// $Id$
#include "global_extern.h"
#include "be_extern.h"
#include "../../tao/Version.h"
int
BE_save_orb_args (int &argc, ACE_TCHAR *argv[])
{
int i = 1;
ACE_TString holder;
while (i < argc)
{
if (ACE_OS::strncmp (argv[i], ACE_TEXT("-ORB"), 4) == 0)
{
holder += ACE_TString (argv[i]);
holder += ACE_TEXT(" ");
// Could be another -ORBxxx arg or an IDL compiler arg.
if (*argv[i + 1] == '-')
{
++i;
continue;
}
// No-copy constructor.
ACE_TString tmp (argv[i + 1],
0,
false);
// If the arg ends with either .idl or .pidl, we're done.
size_t len = tmp.length ();
ssize_t pos = tmp.find (ACE_TEXT(".idl"));
if (len - pos == 4)
{
return 0;
}
pos = tmp.find (ACE_TEXT(".pidl"));
if (len - pos == 5)
{
return 0;
}
// If we're here, the next arg goes with the preceding -ORBxxx.
holder += tmp;
holder += ACE_TEXT(" ");
i += 2;
}
else
{
++i;
}
}
be_global->orb_args (ACE_TEXT_ALWAYS_CHAR(holder.c_str()));
return 0;
}
// 'ac' must be passed in by reference, because it is also
// passed by reference to ORB_init, which may modify it.
// After BE_ifr_init returns to main() the modified argc
// must be passed to DRV_parse_args().
int
BE_ifr_orb_init (int &ac, ACE_TCHAR *av[])
{
try
{
ACE_TCHAR* name = 0;
be_global->orb (CORBA::ORB_init (ac,
av,
name));
}
catch (const CORBA::Exception& ex)
{
ex._tao_print_exception (ACE_TEXT ("BE_ifr_orb_init"));
return 1;
}
return 0;
}
TAO_IFR_BE_Export void
BE_version (void)
{
ORBSVCS_DEBUG ((LM_DEBUG,
"%s %s\n",
ACE_TEXT ("TAO_IFR_BE, version"),
ACE_TEXT (TAO_VERSION)));
}
TAO_IFR_BE_Export int
BE_init (int &argc, ACE_TCHAR *argv[])
{
// Initialize BE global data object.
ACE_NEW_RETURN (be_global,
BE_GlobalData,
-1);
int status = BE_save_orb_args (argc, argv);
if (status != 0)
{
return status;
}
idl_global->using_ifr_backend (true);
return BE_ifr_orb_init (argc, argv);
}
TAO_IFR_BE_Export void
BE_post_init (char *[], long)
{
}
|
