src/runtime/PythonNeutralConv.cxx

   1 // Copyright (C) 2006-2013  CEA/DEN, EDF R&D
   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.
   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 "PythonNeutralConv.hxx"
  22 #include "PythonPorts.hxx"
  23
  24 #include <iostream>
  25 #include <sstream>
  26 #include "Any.hxx"
  27
  28 //#define _DEVDEBUG_
  29 #include "YacsTrace.hxx"
  30
  31 using namespace YACS::ENGINE;
  32 using namespace std;
  33
  34 PyNeutral::PyNeutral(InputPort* p)
  35   : ProxyPort(p), DataPort(p->getName(), p->getNode(), p->edGetType()), Port(p->getNode())
  36 {
  37 }
  38
  39 void PyNeutral::put(const void *data) throw(ConversionException)
  40 {
  41   DEBTRACE( " PyNeutral::put(const void *data)" );
  42   put((PyObject *)data);
  43 }
  44
  45 //!Convert received Python (PyObject *) value to Neutral (Any *) value and send it to proxy port
  46  /*!
  47   *   \param data : Python value
  48   */
  49
  50 void PyNeutral::put(PyObject *data) throw(ConversionException)
  51 {
  52   DEBTRACE( "PyNeutral::put " );
  53   YACS::ENGINE::Any *ob;
  54   //Do not need to take the Python GIL as put is called from Python node
  55   ob=convertPyObjectNeutral(edGetType(),data);
  56   YACS::ENGINE::InterpreterSaveThread _loc;
  57   DEBTRACE( "before put refcnt: " << ob->getRefCnt() );
  58   _port->put(ob);
  59   //_port has called incRef
  60   ob->decrRef();
  61   DEBTRACE( "after put refcnt: " << ob->getRefCnt() );
  62 }