# include "config.h"
#endif
-#include <memory>
-#include <string.h>
-
#include "NasalCanvas.hxx"
#include <Canvas/canvas_mgr.hxx>
#include <Main/globals.hxx>
+#include <Scripting/NasalSys.hxx>
-//#include <boost/python.hpp>
-#include <boost/foreach.hpp>
-#include <boost/algorithm/string/case_conv.hpp>
-#include <boost/make_shared.hpp>
#include <osgGA/GUIEventAdapter>
#include <simgear/sg_inlines.h>
extern naRef propNodeGhostCreate(naContext c, SGPropertyNode* n);
-//void initCanvasPython()
-//{
-// using namespace boost::python;
-// class_<simgear::canvas::Canvas>("Canvas");
-//}
-
namespace sc = simgear::canvas;
-naRef canvasGetNode(naContext c, sc::Canvas* canvas)
+template<class Element>
+naRef elementGetNode(naContext c, Element& element)
{
- return propNodeGhostCreate(c, canvas->getProps());
+ return propNodeGhostCreate(c, element.getProps());
}
typedef nasal::Ghost<sc::CanvasPtr> NasalCanvas;
+typedef nasal::Ghost<sc::ElementPtr> NasalElement;
typedef nasal::Ghost<sc::GroupPtr> NasalGroup;
#if 0
{
public:
- NasalCanvasEvent():
- NasalObject("CanvasEvent")
- {
- _members["type"] = &NasalCanvasEvent::getEventType;
- }
-
naRef getEventType(naContext c, const GUIEventPtr& event)
{
#define RET_EVENT_STR(type, str)\
}
};
#endif
-#if 0
-static const char* eventGhostGetMember(naContext c, void* g, naRef field, naRef* out)
+
+SGPropertyNode& requireArg(naContext c, int argc, naRef* args, int index = 0)
{
- const char* fieldName = naStr_data(field);
- osgGA::GUIEventAdapter* gea = (osgGA::GUIEventAdapter*) g;
-
- if (!strcmp(fieldName, "windowX")) *out = naNum(gea->getWindowX());
- else if (!strcmp(fieldName, "windowY")) *out = naNum(gea->getWindowY());
- else if (!strcmp(fieldName, "time")) *out = naNum(gea->getTime());
- else if (!strcmp(fieldName, "button")) *out = naNum(gea->getButton());
- else {
- return 0;
- }
+ if( argc <= index )
+ naRuntimeError(c, "missing argument #%d", index);
- return "";
-}
+ SGPropertyNode* props = ghostToPropNode(args[index]);
+ if( !props )
+ naRuntimeError(c, "arg #%d: not a SGPropertyNode ghost");
-static naRef f_element_addButtonCallback(naContext c, naRef me, int argc, naRef* args)
-{
- simgear::canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addButtonCallback called on non-canvas-element object");
- }
-
- return naNil();
+ return *props;
}
-static naRef f_element_addDragCallback(naContext c, naRef me, int argc, naRef* args)
+CanvasMgr& requireCanvasMgr(naContext c)
{
- simgear::canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addDragCallback called on non-canvas-element object");
- }
-
- return naNil();
-}
+ CanvasMgr* canvas_mgr =
+ static_cast<CanvasMgr*>(globals->get_subsystem("Canvas"));
+ if( !canvas_mgr )
+ naRuntimeError(c, "Failed to get Canvas subsystem");
-static naRef f_element_addMoveCallback(naContext c, naRef me, int argc, naRef* args)
-{
- simgear::canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addMoveCallback called on non-canvas-element object");
- }
-
- return naNil();
+ return *canvas_mgr;
}
-static naRef f_element_addScrollCallback(naContext c, naRef me, int argc, naRef* args)
+/**
+ * Create new Canvas and get ghost for it.
+ */
+static naRef f_createCanvas(naContext c, naRef me, int argc, naRef* args)
{
- simgear::canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addScrollCallback called on non-canvas-element object");
- }
-
- return naNil();
+ return NasalCanvas::create(c, requireCanvasMgr(c).createCanvas());
}
-#endif
-static naRef f_createCanvas(naContext c, naRef me, int argc, naRef* args)
+/**
+ * Get ghost for existing Canvas.
+ */
+static naRef f_getCanvas(naContext c, naRef me, int argc, naRef* args)
{
- CanvasMgr* canvas_mgr =
- static_cast<CanvasMgr*>(globals->get_subsystem("Canvas"));
- if( !canvas_mgr )
- return naNil();
+ SGPropertyNode& props = requireArg(c, argc, args);
+ CanvasMgr& canvas_mgr = requireCanvasMgr(c);
+
+ sc::CanvasPtr canvas;
+ if( canvas_mgr.getPropertyRoot() == props.getParent() )
+ {
+ // get a canvas specified by its root node
+ canvas = canvas_mgr.getCanvas( props.getIndex() );
+ if( !canvas || canvas->getProps() != &props )
+ return naNil();
+ }
+ else
+ {
+ // get a canvas by name
+ if( props.hasValue("name") )
+ canvas = canvas_mgr.getCanvas( props.getStringValue("name") );
+ else if( props.hasValue("index") )
+ canvas = canvas_mgr.getCanvas( props.getIntValue("index") );
+ }
- return NasalCanvas::create(c, canvas_mgr->createCanvas());
+ return NasalCanvas::create(c, canvas);
}
naRef f_canvasCreateGroup( sc::Canvas& canvas,
naRef initNasalCanvas(naRef globals, naContext c, naRef gcSave)
{
-#if 0
- elementPrototype = naNewHash(c);
- hashset(c, gcSave, "elementProto", elementPrototype);
-
- hashset(c, elementPrototype, "addButtonCallback", naNewFunc(c, naNewCCode(c, f_element_addButtonCallback)));
- hashset(c, elementPrototype, "addDragCallback", naNewFunc(c, naNewCCode(c, f_element_addDragCallback)));
- hashset(c, elementPrototype, "addMoveCallback", naNewFunc(c, naNewCCode(c, f_element_addMoveCallback)));
- hashset(c, elementPrototype, "addScrollCallback", naNewFunc(c, naNewCCode(c, f_element_addScrollCallback)));
-#endif
NasalCanvas::init("Canvas")
- .member("_node_ghost", &canvasGetNode)
+ .member("_node_ghost", &elementGetNode<sc::Canvas>)
.member("size_x", &sc::Canvas::getSizeX)
.member("size_y", &sc::Canvas::getSizeY)
- .method<&f_canvasCreateGroup>("createGroup");
- nasal::Ghost<sc::ElementPtr>::init("canvas.Element");
- nasal::Ghost<sc::GroupPtr>::init("canvas.Group")
- .bases<sc::ElementPtr>();
+ .method_func<&f_canvasCreateGroup>("createGroup");
+ NasalElement::init("canvas.Element")
+ .member("_node_ghost", &elementGetNode<sc::Element>);
+ NasalGroup::init("canvas.Group")
+ .bases<NasalElement>();
nasal::Hash globals_module(globals, c),
canvas_module = globals_module.createHash("canvas");
canvas_module.set("_newCanvasGhost", f_createCanvas);
+ canvas_module.set("_getCanvasGhost", f_getCanvas);
return naNil();
}