[Gnash-commit] gnash/extensions/lirc lirc_ext.cpp

[Rob Savoye]

CVSROOT:        /sources/gnash
Module name:    gnash
Changes by:     Rob Savoye <rsavoye>    07/09/20 17:40:28

Added files:
        extensions/lirc: lirc_ext.cpp 

Log message:
        Oops, this should have been added last week.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/extensions/lirc/lirc_ext.cpp?cvsroot=gnash&rev=1.1

Patches:
Index: lirc_ext.cpp
===================================================================
RCS file: lirc_ext.cpp
diff -N lirc_ext.cpp
--- /dev/null   1 Jan 1970 00:00:00 -0000
+++ lirc_ext.cpp        20 Sep 2007 17:40:27 -0000      1.1
@@ -0,0 +1,164 @@
+// 
+//   Copyright (C) 2005, 2006, 2007 Free Software Foundation, Inc.
+// 
+// This program is free software; you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 3 of the License, or
+// (at your option) any later version.
+// 
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+// 
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+//
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <iostream>
+
+#include <cstdarg>
+#include <cstdio>
+#include <cstdlib>
+
+#include <string>
+#include "log.h"
+#include "lirc.h"
+#include "lirc_ext.h"
+#include "fn_call.h"
+#include "as_object.h"
+#include "builtin_function.h" // need builtin_function
+
+using namespace std;
+
+namespace gnash
+{
+struct lirc_config *config;
+as_value lirc_ext_init(const fn_call& fn);
+as_value lirc_ext_getkey(const fn_call& fn);
+as_value lirc_ext_getbutton(const fn_call& fn);
+
+class lirc_as_object : public as_object
+{
+public:
+    Lirc obj;
+};
+
+static void
+attachInterface(as_object *obj)
+{
+    GNASH_REPORT_FUNCTION;
+    obj->init_member("lirc_init", new builtin_function(lirc_ext_init));
+    obj->init_member("lirc_getKey", new builtin_function(lirc_ext_getkey));
+    obj->init_member("lirc_getButton", new 
builtin_function(lirc_ext_getbutton));
+}
+
+static as_object*
+getInterface()
+{
+    GNASH_REPORT_FUNCTION;
+    static boost::intrusive_ptr<as_object> o;
+    if (o == NULL) {
+       o = new as_object();
+    }
+    return o.get();
+}
+
+static as_value
+lirc_ctor(const fn_call& /* fn */)
+{
+    GNASH_REPORT_FUNCTION;
+    lirc_as_object* obj = new lirc_as_object();
+
+    attachInterface(obj);
+    return as_value(obj); // will keep alive
+//    printf ("Hello World from %s !!!\n", __PRETTY_FUNCTION__);
+}
+
+
+Lirc::Lirc() 
+{
+    GNASH_REPORT_FUNCTION;
+}
+
+Lirc::~Lirc()
+{
+    GNASH_REPORT_FUNCTION;
+}
+
+as_value
+lirc_ext_init(const fn_call& fn)
+{
+    GNASH_REPORT_FUNCTION;
+    boost::intrusive_ptr<lirc_as_object> ptr = 
ensureType<lirc_as_object>(fn.this_ptr);
+    
+    if (fn.nargs > 0) {
+       string text = fn.arg(0).to_string();
+       return as_value(ptr->obj.init(text.c_str()));
+    }
+    return as_value(false);
+}
+
+as_value
+lirc_ext_getkey(const fn_call& fn)
+{
+    GNASH_REPORT_FUNCTION;
+    boost::intrusive_ptr<lirc_as_object> ptr = 
ensureType<lirc_as_object>(fn.this_ptr);
+    
+    if (fn.nargs == 0) {
+      key::code key = ptr->obj.getKey();
+      return as_value(key);
+    }
+    return as_value(false);
+}
+
+as_value
+lirc_ext_getbutton(const fn_call& fn)
+{
+  //    GNASH_REPORT_FUNCTION;
+    boost::intrusive_ptr<lirc_as_object> ptr = 
ensureType<lirc_as_object>(fn.this_ptr);
+    
+    if (fn.nargs == 0) {
+      const char *button = ptr->obj.getButton();
+      return as_value(button);
+    }
+    return as_value(false);
+}
+
+std::auto_ptr<as_object>
+init_lirc_instance()
+{
+    return std::auto_ptr<as_object>(new lirc_as_object());
+}
+
+// const char *lirc_setmode(struct lirc_config *config, const char *mode);
+extern "C" {
+    void
+    lirc_class_init(as_object &obj)
+    {
+//     GNASH_REPORT_FUNCTION;
+       // This is going to be the global "class"/"function"
+       static boost::intrusive_ptr<builtin_function> cl;
+       if (cl == NULL) {
+           cl = new builtin_function(&lirc_ctor, getInterface());
+//         // replicate all interface to class, to be able to access
+//         // all methods as static functions
+           attachInterface(cl.get());
+       }
+       
+       obj.init_member("Lirc", cl.get());
+    }
+} // end of extern C
+
+
+} // end of gnash namespace
+
+// Local Variables:
+// mode: C++
+// indent-tabs-mode: t
+// End: