simgear/nasal/cppbind/NasalObject.cxx

   1 // Object exposed to Nasal including a Nasal hash for data storage.
   2 //
   3 // Copyright (C) 2014  Thomas Geymayer <tomgey@gmail.com>
   4 //
   5 // This library is free software; you can redistribute it and/or
   6 // modify it under the terms of the GNU Library General Public
   7 // License as published by the Free Software Foundation; either
   8 // version 2 of the License, or (at your option) any later version.
   9 //
  10 // This library is distributed in the hope that it will be useful,
  11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13 // Library General Public License for more details.
  14 //
  15 // You should have received a copy of the GNU Library General Public
  16 // License along with this library; if not, write to the Free Software
  17 // Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301, USA
  18
  19 #include "NasalObject.hxx"
  20 #include <simgear/nasal/cppbind/NasalHash.hxx>
  21
  22 namespace nasal
  23 {
  24   //----------------------------------------------------------------------------
  25   Object::Object(naRef impl):
  26     _nasal_impl(impl)
  27   {
  28
  29   }
  30
  31
  32   //----------------------------------------------------------------------------
  33   void Object::setImpl(naRef obj)
  34   {
  35     _nasal_impl.reset(obj);
  36   }
  37
  38   //----------------------------------------------------------------------------
  39   naRef Object::getImpl() const
  40   {
  41     return _nasal_impl.get_naRef();
  42   }
  43
  44   //----------------------------------------------------------------------------
  45   bool Object::_set(naContext c, const std::string& key, naRef val)
  46   {
  47     if( !_nasal_impl.valid() )
  48       _nasal_impl.reset(naNewHash(c));
  49
  50     nasal::Hash(_nasal_impl.get_naRef(), c).set(key, val);
  51     return true;
  52   }
  53
  54   //----------------------------------------------------------------------------
  55   bool Object::_get(naContext c, const std::string& key, naRef& out)
  56   {
  57     if( !_nasal_impl.valid() )
  58       return false;
  59
  60     return naHash_get(_nasal_impl.get_naRef(), to_nasal(c, key), &out);
  61   }
  62
  63   //----------------------------------------------------------------------------
  64   void Object::setupGhost()
  65   {
  66     NasalObject::init("Object")
  67       ._set(&Object::_set)
  68       ._get(&Object::_get)
  69       .member("_impl", &Object::getImpl, &Object::setImpl);
  70   }
  71
  72 } // namespace nasal