Salome HOME
updated copyright message
[modules/yacs.git] / src / runtime / XMLCORBAConv.cxx
1 // Copyright (C) 2006-2023  CEA, EDF
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License, or (at your option) any later version.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 #include "TypeConversions.hxx"
21 #include "XMLCORBAConv.hxx"
22 #include "CORBAXMLConv.hxx"
23 #include "CORBAPorts.hxx"
24 #include "TypeCode.hxx"
25
26 #include <libxml/parser.h>
27 #include <iostream>
28 #include <sstream>
29
30 //#define _DEVDEBUG_
31 #include "YacsTrace.hxx"
32
33 using namespace YACS::ENGINE;
34 using namespace std;
35
36 XmlCorba::XmlCorba(InputCorbaPort* p)
37   : ProxyPort(p), DataPort(p->getName(), p->getNode(), p->edGetType()), Port(p->getNode())
38 {
39 }
40
41 void XmlCorba::put(const void *data)
42 {
43   DEBTRACE((const char *)data);
44   put((const char *)data);
45 }
46
47 //!Convert a XML (char *) to CORBA::Any  and push it in the proxy port
48  /*!
49   *   \param data : Xml::char *
50   */
51 void XmlCorba::put(const char *data)
52 {
53   DEBTRACE(data);
54   xmlDocPtr doc;
55   xmlNodePtr cur;
56   CORBA::Any *a=NULL;
57   
58   doc = xmlParseMemory(data, strlen(data));
59   if (doc == NULL ) 
60     {
61       stringstream msg;
62       msg << "Problem in conversion: XML Document not parsed successfully ";
63       msg << " (" << __FILE__ << ":" << __LINE__ << ")";
64       throw ConversionException(msg.str());
65     }
66   cur = xmlDocGetRootElement(doc);
67   if (cur == NULL) 
68     {
69       xmlFreeDoc(doc);
70       stringstream msg;
71       msg << "Problem in conversion: empty XML Document";
72       msg << " (" << __FILE__ << ":" << __LINE__ << ")";
73       throw ConversionException(msg.str());
74     }
75   while (cur != NULL)
76     {
77       if ((!xmlStrcmp(cur->name, (const xmlChar *)"value")))
78         {
79           try
80             {
81               a=convertXmlCorba(edGetType(),doc,cur);
82             }
83           catch(ConversionException)
84             {
85               throw;
86             }
87           catch(...)
88             {
89               stringstream msg;
90               msg << "Problem in conversion: kind= " << edGetType()->kind() ;
91               msg << " (" << __FILE__ << ":" << __LINE__ << ")";
92               throw ConversionException(msg.str());
93             }
94           break;
95         }
96       cur = cur->next;
97     }
98   xmlFreeDoc(doc);
99   if(a==NULL)
100     {
101       stringstream msg;
102       msg << "Problem in conversion: incorrect XML value";
103       msg << " (" << __FILE__ << ":" << __LINE__ << ")";
104       throw ConversionException(msg.str());
105     }
106
107   //xmlCleanupParser();
108   _port->put(a);
109   _port->setStringRef(data);
110   //delete Any that has been allocated by convertXmlCorba
111   delete a;
112 }