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:
_______________________________________________
Gnash-commit mailing list
Gnash-commit@gnu.org
http://lists.gnu.org/mailman/listinfo/gnash-commit
