# include "config.h"
#endif
-#include <string.h>
-
#include "NasalCanvas.hxx"
-
-#include <boost/foreach.hpp>
-#include <boost/algorithm/string/case_conv.hpp>
+#include <Canvas/canvas_mgr.hxx>
+#include <Main/globals.hxx>
+#include <Scripting/NasalSys.hxx>
#include <osgGA/GUIEventAdapter>
#include <simgear/sg_inlines.h>
-#include <Canvas/canvas.hxx>
-#include <Canvas/elements/element.hxx>
-
-static naRef canvasPrototype;
-static naRef elementPrototype;
-static naRef eventPrototype;
+#include <simgear/canvas/Canvas.hxx>
+#include <simgear/canvas/elements/CanvasElement.hxx>
+#include <simgear/canvas/elements/CanvasText.hxx>
+#include <simgear/canvas/MouseEvent.hxx>
-static void canvasGhostDestroy(void* g);
-static void elementGhostDestroy(void* g);
-static void eventGhostDestroy(void* g);
+#include <simgear/nasal/cppbind/from_nasal.hxx>
+#include <simgear/nasal/cppbind/to_nasal.hxx>
+#include <simgear/nasal/cppbind/NasalHash.hxx>
+#include <simgear/nasal/cppbind/Ghost.hxx>
-static const char* canvasGhostGetMember(naContext c, void* g, naRef field, naRef* out);
-naGhostType CanvasGhostType = { canvasGhostDestroy, "canvas", canvasGhostGetMember, 0 };
+extern naRef propNodeGhostCreate(naContext c, SGPropertyNode* n);
-static const char* elementGhostGetMember(naContext c, void* g, naRef field, naRef* out);
-static void elementGhostSetMember(naContext c, void* g, naRef field, naRef value);
-naGhostType ElementGhostType = { elementGhostDestroy, "canvas.element",
- elementGhostGetMember, elementGhostSetMember };
+namespace sc = simgear::canvas;
-static const char* eventGhostGetMember(naContext c, void* g, naRef field, naRef* out);
-naGhostType EventGhostType = { eventGhostDestroy, "ga-event", eventGhostGetMember, 0 };
-
-static void hashset(naContext c, naRef hash, const char* key, naRef val)
+template<class Element>
+naRef elementGetNode(naContext c, Element& element)
{
- naRef s = naNewString(c);
- naStr_fromdata(s, (char*)key, strlen(key));
- naHash_set(hash, s, val);
+ return propNodeGhostCreate(c, element.getProps());
}
-static naRef stringToNasal(naContext c, const std::string& s)
-{
- return naStr_fromdata(naNewString(c),
- const_cast<char *>(s.c_str()),
- s.length());
-}
+typedef nasal::Ghost<sc::EventPtr> NasalEvent;
+typedef nasal::Ghost<sc::MouseEventPtr> NasalMouseEvent;
+typedef nasal::Ghost<sc::CanvasPtr> NasalCanvas;
+typedef nasal::Ghost<sc::ElementPtr> NasalElement;
+typedef nasal::Ghost<sc::GroupPtr> NasalGroup;
+typedef nasal::Ghost<sc::TextPtr> NasalText;
-static naRef eventTypeToNasal(naContext c, osgGA::GUIEventAdapter::EventType ty)
+SGPropertyNode* from_nasal_helper(naContext c, naRef ref, SGPropertyNode**)
{
- switch (ty) {
- case osgGA::GUIEventAdapter::PUSH: return stringToNasal(c, "push");
- case osgGA::GUIEventAdapter::RELEASE: return stringToNasal(c, "release");
- case osgGA::GUIEventAdapter::DOUBLECLICK: return stringToNasal(c, "double-click");
- case osgGA::GUIEventAdapter::DRAG: return stringToNasal(c, "drag");
- case osgGA::GUIEventAdapter::MOVE: return stringToNasal(c, "move");
- case osgGA::GUIEventAdapter::SCROLL: return stringToNasal(c, "scroll");
- case osgGA::GUIEventAdapter::KEYUP: return stringToNasal(c, "key-up");
- case osgGA::GUIEventAdapter::KEYDOWN: return stringToNasal(c, "key-down");
-
- default:
- ; // fall through
- }
-
- return naNil();
-}
+ SGPropertyNode* props = ghostToPropNode(ref);
+ if( !props )
+ naRuntimeError(c, "Not a SGPropertyNode ghost.");
-static canvas::Element* elementGhost(naRef r)
-{
- if (naGhost_type(r) == &ElementGhostType)
- return (canvas::Element*) naGhost_ptr(r);
- return 0;
+ return props;
}
-static Canvas* canvasGhost(naRef r)
+CanvasMgr& requireCanvasMgr(naContext c)
{
- if (naGhost_type(r) == &CanvasGhostType)
- return (Canvas*) naGhost_ptr(r);
- return 0;
-}
+ CanvasMgr* canvas_mgr =
+ static_cast<CanvasMgr*>(globals->get_subsystem("Canvas"));
+ if( !canvas_mgr )
+ naRuntimeError(c, "Failed to get Canvas subsystem");
-static void elementGhostDestroy(void* g)
-{
+ return *canvas_mgr;
}
-static void canvasGhostDestroy(void* g)
+/**
+ * Create new Canvas and get ghost for it.
+ */
+static naRef f_createCanvas(naContext c, naRef me, int argc, naRef* args)
{
+ return NasalCanvas::create(c, requireCanvasMgr(c).createCanvas());
}
-static void eventGhostDestroy(void* g)
+/**
+ * Get ghost for existing Canvas.
+ */
+static naRef f_getCanvas(naContext c, naRef me, int argc, naRef* args)
{
- osgGA::GUIEventAdapter* gea = static_cast<osgGA::GUIEventAdapter*>(g);
- gea->unref();
-}
+ nasal::CallContext ctx(c, argc, args);
+ SGPropertyNode& props = *ctx.requireArg<SGPropertyNode*>(0);
+ CanvasMgr& canvas_mgr = requireCanvasMgr(c);
-static const char* eventGhostGetMember(naContext c, void* g, naRef field, naRef* out)
-{
- const char* fieldName = naStr_data(field);
- osgGA::GUIEventAdapter* gea = (osgGA::GUIEventAdapter*) g;
-
- if (!strcmp(fieldName, "parents")) {
- *out = naNewVector(c);
- naVec_append(*out, eventPrototype);
- } else if (!strcmp(fieldName, "type")) *out = eventTypeToNasal(c, gea->getEventType());
- else 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;
+ 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();
}
-
- return "";
-}
-
-static const char* canvasGhostGetMember(naContext c, void* g, naRef field, naRef* out)
-{
- const char* fieldName = naStr_data(field);
- Canvas* cvs = (Canvas*) g;
-
- if (!strcmp(fieldName, "parents")) {
- *out = naNewVector(c);
- naVec_append(*out, canvasPrototype);
- } else if (!strcmp(fieldName, "sizeX")) *out = naNum(cvs->getSizeX());
- else if (!strcmp(fieldName, "sizeY")) *out = naNum(cvs->getSizeY());
- else {
- return 0;
+ 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 "";
+
+ return NasalCanvas::create(c, canvas);
}
-static const char* elementGhostGetMember(naContext c, void* g, naRef field, naRef* out)
+naRef f_canvasCreateGroup(sc::Canvas& canvas, const nasal::CallContext& ctx)
{
- const char* fieldName = naStr_data(field);
- canvas::Element* e = (canvas::Element*) g;
-
- if (!strcmp(fieldName, "parents")) {
- *out = naNewVector(c);
- naVec_append(*out, elementPrototype);
- } else {
- return 0;
- }
-
- return "";
+ return NasalGroup::create
+ (
+ ctx.c,
+ canvas.createGroup( ctx.getArg<std::string>(0) )
+ );
}
-static void elementGhostSetMember(naContext c, void* g, naRef field, naRef value)
+naRef f_elementGetTransformedBounds(sc::Element& el, const nasal::CallContext& ctx)
{
- const char* fieldName = naStr_data(field);
- canvas::Element* e = (canvas::Element*) g;
-}
+ osg::BoundingBox bb = el.getTransformedBounds( osg::Matrix::identity() );
+ std::vector<float> bb_vec(4);
+ bb_vec[0] = bb._min.x();
+ bb_vec[1] = bb._min.y();
+ bb_vec[2] = bb._max.x();
+ bb_vec[3] = bb._max.y();
+
+ return nasal::to_nasal(ctx.c, bb_vec);
+}
-static naRef f_canvas_getElement(naContext c, naRef me, int argc, naRef* args)
+naRef f_groupCreateChild(sc::Group& group, const nasal::CallContext& ctx)
{
- Canvas* cvs = canvasGhost(me);
- if (!cvs) {
- naRuntimeError(c, "canvas.getElement called on non-canvas object");
- }
-
- return naNil();
+ return NasalElement::create
+ (
+ ctx.c,
+ group.createChild( ctx.requireArg<std::string>(0),
+ ctx.getArg<std::string>(1) )
+ );
}
-static naRef f_element_addButtonCallback(naContext c, naRef me, int argc, naRef* args)
+naRef f_groupGetChild(sc::Group& group, const nasal::CallContext& ctx)
{
- canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addButtonCallback called on non-canvas-element object");
- }
-
- return naNil();
+ return NasalElement::create
+ (
+ ctx.c,
+ group.getChild( ctx.requireArg<SGPropertyNode*>(0) )
+ );
}
-static naRef f_element_addDragCallback(naContext c, naRef me, int argc, naRef* args)
+naRef f_groupGetElementById(sc::Group& group, const nasal::CallContext& ctx)
{
- canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addDragCallback called on non-canvas-element object");
- }
-
- return naNil();
+ return NasalElement::create
+ (
+ ctx.c,
+ group.getElementById( ctx.requireArg<std::string>(0) )
+ );
}
-static naRef f_element_addMoveCallback(naContext c, naRef me, int argc, naRef* args)
+naRef f_textGetNearestCursor(sc::Text& text, const nasal::CallContext& ctx)
{
- canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addMoveCallback called on non-canvas-element object");
- }
-
- return naNil();
+ return nasal::to_nasal
+ (
+ ctx.c,
+ text.getNearestCursor( ctx.requireArg<osg::Vec2>(0) )
+ );
}
-static naRef f_element_addScrollCallback(naContext c, naRef me, int argc, naRef* args)
+naRef f_eventGetTarget(naContext c, sc::Event& event)
{
- canvas::Element* e = elementGhost(me);
- if (!e) {
- naRuntimeError(c, "element.addScrollCallback called on non-canvas-element object");
- }
-
- return naNil();
+ return NasalElement::create(c, event.getTarget().lock());
}
-static naRef f_canvas(naContext c, naRef me, int argc, naRef* args)
+// TODO allow directly exposing functions without parameters and return type
+naRef f_eventStopPropagation(sc::Event& event, const nasal::CallContext& ctx)
{
+ if( ctx.argc != 0 )
+ naRuntimeError(ctx.c, "Event::stopPropagation no argument expected");
+ event.stopPropagation();
return naNil();
}
-// Table of extension functions. Terminate with zeros.
-static struct { const char* name; naCFunction func; } funcs[] = {
- { "getCanvas", f_canvas },
- { 0, 0 }
-};
-
naRef initNasalCanvas(naRef globals, naContext c, naRef gcSave)
{
- canvasPrototype = naNewHash(c);
- hashset(c, gcSave, "canvasProto", canvasPrototype);
-
- hashset(c, canvasPrototype, "getElement", naNewFunc(c, naNewCCode(c, f_canvas_getElement)));
-
- eventPrototype = naNewHash(c);
- hashset(c, gcSave, "eventProto", eventPrototype);
- // set any event methods
-
- 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)));
-
- for(int i=0; funcs[i].name; i++) {
- hashset(c, globals, funcs[i].name,
- naNewFunc(c, naNewCCode(c, funcs[i].func)));
- }
-
+ NasalEvent::init("canvas.Event")
+ .member("type", &sc::Event::getTypeString)
+ .member("target", &f_eventGetTarget)
+ .method_func<&f_eventStopPropagation>("stopPropagation");
+ NasalMouseEvent::init("canvas.MouseEvent")
+ .bases<NasalEvent>()
+ .member("screenX", &sc::MouseEvent::getScreenX)
+ .member("screenY", &sc::MouseEvent::getScreenY)
+ .member("clientX", &sc::MouseEvent::getClientX)
+ .member("clientY", &sc::MouseEvent::getClientY)
+ .member("deltaX", &sc::MouseEvent::getDeltaX)
+ .member("deltaY", &sc::MouseEvent::getDeltaY)
+ .member("click_count", &sc::MouseEvent::getCurrentClickCount);
+ NasalCanvas::init("Canvas")
+ .member("_node_ghost", &elementGetNode<sc::Canvas>)
+ .member("size_x", &sc::Canvas::getSizeX)
+ .member("size_y", &sc::Canvas::getSizeY)
+ .method_func<&f_canvasCreateGroup>("_createGroup")
+ .method<&sc::Canvas::addEventListener>("addEventListener");
+ NasalElement::init("canvas.Element")
+ .member("_node_ghost", &elementGetNode<sc::Element>)
+ .method<&sc::Element::addEventListener>("addEventListener")
+ .method_func<&f_elementGetTransformedBounds>("getTransformedBounds");
+ NasalGroup::init("canvas.Group")
+ .bases<NasalElement>()
+ .method_func<&f_groupCreateChild>("_createChild")
+ .method_func<&f_groupGetChild>("_getChild")
+ .method_func<&f_groupGetElementById>("_getElementById");
+ NasalText::init("canvas.Text")
+ .bases<NasalElement>()
+ .method_func<&f_textGetNearestCursor>("getNearestCursor");
+
+ 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();
}