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
|
// $Id$
#include "tao/FILE_Parser.h"
#include "tao/ORB.h"
#include "tao/Environment.h"
#include "tao/Object.h"
#include "ace/Read_Buffer.h"
#include "ace/Malloc_Base.h"
#include "ace/Log_Msg.h"
#include "ace/OS_NS_stdio.h"
#include "ace/OS_NS_string.h"
ACE_RCSID (tao,
FILE_Parser,
"$Id$")
static const char file_prefix[] = "file:";
TAO_BEGIN_VERSIONED_NAMESPACE_DECL
TAO_FILE_Parser::~TAO_FILE_Parser (void)
{
}
bool
TAO_FILE_Parser::match_prefix (const char *ior_string) const
{
return (ACE_OS::strncmp (ior_string,
::file_prefix,
sizeof (::file_prefix) - 1) == 0);
}
CORBA::Object_ptr
TAO_FILE_Parser::parse_string (const char *ior,
CORBA::ORB_ptr orb
ACE_ENV_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
// Skip the prefix, we know it is there because this method in only
// called if <match_prefix> returns 1.
const char *filename =
ior + sizeof (::file_prefix)+1;
FILE* file = ACE_OS::fopen (ACE_TEXT_CHAR_TO_TCHAR (filename),
ACE_TEXT("r"));
if (file == 0)
return CORBA::Object::_nil ();
ACE_Read_Buffer reader (file, true);
char* string = reader.read ();
if (string == 0)
return CORBA::Object::_nil ();
CORBA::Object_ptr object = CORBA::Object::_nil ();
ACE_TRY
{
object = orb->string_to_object (string ACE_ENV_ARG_PARAMETER);
ACE_TRY_CHECK;
reader.alloc ()->free (string);
}
ACE_CATCHANY
{
reader.alloc ()->free (string);
ACE_RE_THROW;
}
ACE_ENDTRY;
ACE_CHECK_RETURN (CORBA::Object::_nil ());
return object;
}
TAO_END_VERSIONED_NAMESPACE_DECL
ACE_STATIC_SVC_DEFINE (TAO_FILE_Parser,
ACE_TEXT ("FILE_Parser"),
ACE_SVC_OBJ_T,
&ACE_SVC_NAME (TAO_FILE_Parser),
ACE_Service_Type::DELETE_THIS |
ACE_Service_Type::DELETE_OBJ,
0)
ACE_FACTORY_DEFINE (TAO, TAO_FILE_Parser)
|
