gplugin/gplugin

The gjs .pc now correctly adds mozjs. Also update for the testing option removal
feature/gjs-cc
2018-05-06, Gary Kramlich
63b929558f43
The gjs .pc now correctly adds mozjs. Also update for the testing option removal
/*
* Copyright (C) 2011-2014 Gary Kramlich <grim@reaperworld.com>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, see <http://www.gnu.org/licenses/>.
*/
#include "gplugin-gjs-loader.h"
#include "gplugin-gjs-plugin.h"
#include <glib/gi18n.h>
#include <gio/gio.h>
#include <gjs/gjs-module.h>
#include <gi/object.h>
#include <jsapi.h>
#include <jspubtd.h>
/******************************************************************************
* Globals
*****************************************************************************/
static GObjectClass *parent_class = NULL;
static GType type_real = 0;
/******************************************************************************
* Helpers
*****************************************************************************/
static JSFunction *
gplugin_gjs_loader_find_function(JSContext *jsctx, JSObject *parent,
const gchar *name, GError **error)
{
jsval value = JSVAL_VOID;
g_message("ctx: %p", jsctx);
g_message("parent: %p", parent);
g_message("name: %s", name);
if(!JS_GetProperty(jsctx, parent, name, &value)) {
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0,
"Failed to find the function '%s'", name);
}
return NULL;
}
if(JSVAL_IS_VOID(value)) {
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0, "failed to find %s", name);
}
return NULL;
}
if(JSVAL_IS_OBJECT(value) && !JSVAL_IS_NULL(value)) {
return JS_ValueToFunction(jsctx, value);
}
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0,
"'%s' is not a function", name);
}
return NULL;
}
static gboolean
_gplugin_gjs_loader_eval(GjsContext *ctx, JSObject **scope,
const gchar *content, gsize content_length,
const gchar *filename, gint *exit_code,
GError **error)
{
JSContext *jsctx = NULL;
JSObject *global = NULL;
jsval retval;
gboolean ret = TRUE;
jsctx = (JSContext *)gjs_context_get_native_context(ctx);
global = gjs_get_global_object(jsctx);
JSAutoCompartment ac(jsctx, global);
JSAutoRequest ar(jsctx);
*scope = JS_NewObject(jsctx, NULL, NULL, NULL);
if(!gjs_eval_with_scope(jsctx, *scope, content, content_length,
filename, &retval))
{
gjs_log_exception(jsctx);
g_set_error(error, GPLUGIN_DOMAIN, 0,
"JS_EvaluateScript() failed");
return FALSE;
}
if(exit_code) {
if(JSVAL_IS_INT(retval)) {
gint ret_code;
if(JS_ValueToInt32(jsctx, retval, &ret_code)) {
*exit_code = ret_code;
}
} else {
*exit_code = 0;
};
}
return ret;
}
static gboolean
_gplugin_gjs_loader_eval_file(GjsContext *ctx, JSObject **scope,
const char *filename, GError **error)
{
GFile *file = NULL;
gchar *contents = NULL;
gsize content_length;
gboolean ret = FALSE;
file = g_file_new_for_commandline_arg(filename);
if(!g_file_query_exists(file, NULL)) {
g_object_unref(G_OBJECT(file));
return FALSE;
}
if(!g_file_load_contents(file, NULL, &contents, &content_length, NULL, error)) {
g_object_unref(G_OBJECT(file));
return FALSE;
}
ret = _gplugin_gjs_loader_eval(ctx, scope, contents, content_length,
filename, NULL, error);
g_object_unref(G_OBJECT(file));
g_free(contents);
return ret;
}
/******************************************************************************
* GPluginLoaderInterface API
*****************************************************************************/
static GSList *
gplugin_gjs_loader_class_supported_extensions(GPLUGIN_UNUSED const GPluginLoaderClass *klass) {
return g_slist_append(NULL, (gpointer)"js");
}
static GPluginPlugin *
gplugin_gjs_loader_query(GPluginLoader *loader,
const gchar *filename,
GError **error)
{
GObject *gobj = NULL;
GPluginPluginInfo *info = NULL;
GjsContext *context = NULL;
JSContext *jsctx = NULL;
JSObject *scope = NULL, *jsobj = NULL;
JSFunction *query = NULL;
jsval value;
context = gjs_context_new();
if(!_gplugin_gjs_loader_eval_file(context, &scope, filename, error)) {
g_object_unref(G_OBJECT(context));
return NULL;
}
/* grab our context since we're going to pass it to find_function */
jsctx = (JSContext *)gjs_context_get_native_context(context);
/* find the query function */
// query = gplugin_gjs_loader_find_function(jsctx, scope, "gplugin_query",
// error);
// g_message("query: %p", query);
// if(query == NULL) {
// g_object_unref(G_OBJECT(context));
// return NULL;
// }
// g_message("querying plugin");
JS::AutoValueVector argv(jsctx);
/* now call the query function */
if(!JS_CallFunctionName(jsctx, scope, "gplugin_query", 0, argv.begin(), &value)) {
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0,
"Failed to call the query function");
}
g_object_unref(G_OBJECT(context));
return NULL;
}
/* now grab the plugin info */
if(!JS_ValueToObject(jsctx, value, &jsobj)) {
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0,
"Query function did not return a GObject");
}
g_object_unref(G_OBJECT(context));
return NULL;
}
gobj = gjs_g_object_from_object(jsctx, jsobj);
if(!GPLUGIN_IS_PLUGIN_INFO(gobj)) {
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0,
"Query function did not return a "
"GPluginPluginInfo object");
}
g_object_unref(G_OBJECT(context));
return NULL;
}
info = GPLUGIN_PLUGIN_INFO(gobj);
return (GPluginPlugin *)g_object_new(GPLUGIN_TYPE_GJS_PLUGIN,
"filename", filename,
"loader", loader,
"info", info,
"context", context,
"js-context", jsctx,
"global", scope,
NULL);
}
static gboolean
gplugin_gjs_loader_load_unload(GPLUGIN_UNUSED GPluginLoader *loader,
GPluginPlugin *plugin,
gboolean load,
GPLUGIN_UNUSED GError **error)
{
JSContext *jsctx = NULL;
JSFunction *func = NULL;
JSObject *global = NULL, *js_plugin = NULL;
JSBool ret = FALSE;
jsval args[1];
jsval rval;
const gchar *func_name = (load) ? "gplugin_load" : "gplugin_unload";
gchar *filename = NULL;
g_object_get(G_OBJECT(plugin),
"js-context", &jsctx,
"global", &global,
"filename", &filename,
NULL);
func = gplugin_gjs_loader_find_function(jsctx, global, func_name, error);
if(func == NULL) {
g_free(filename);
return FALSE;
}
js_plugin = gjs_object_from_g_object(jsctx, G_OBJECT(plugin));
args[0] = OBJECT_TO_JSVAL(js_plugin);
if(!JS_CallFunction(jsctx, global, func, 1, args, &rval)) {
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0,
"Failed to %s %s",
(load) ? "load" : "unload", filename);
}
g_free(filename);
return FALSE;
}
ret = JSVAL_TO_BOOLEAN(rval);
if(!ret) {
if(error) {
*error = g_error_new(GPLUGIN_DOMAIN, 0,
"Failed to %s %s",
(load) ? "load" : "unload", filename);
}
g_free(filename);
return FALSE;
}
g_free(filename);
return TRUE;
}
static gboolean
gplugin_gjs_loader_load(GPluginLoader *loader, GPluginPlugin *plugin,
GError **error)
{
return gplugin_gjs_loader_load_unload(loader, plugin, TRUE, error);
}
static gboolean
gplugin_gjs_loader_unload(GPluginLoader *loader, GPluginPlugin *plugin,
GError **error)
{
return gplugin_gjs_loader_load_unload(loader, plugin, FALSE, error);
}
/******************************************************************************
* GObject Stuff
*****************************************************************************/
static void
gplugin_gjs_loader_class_init(GPluginGjsLoaderClass *klass) {
GPluginLoaderClass *loader_class = GPLUGIN_LOADER_CLASS(klass);
parent_class = (GObjectClass*)g_type_class_peek_parent(klass);
loader_class->supported_extensions =
gplugin_gjs_loader_class_supported_extensions;
loader_class->query = gplugin_gjs_loader_query;
loader_class->load = gplugin_gjs_loader_load;
loader_class->unload = gplugin_gjs_loader_unload;
}
/******************************************************************************
* API
*****************************************************************************/
void
gplugin_gjs_loader_register(GPluginNativePlugin *plugin) {
if(g_once_init_enter(&type_real)) {
GType type = 0;
static GTypeInfo info;
info.class_size = sizeof(GPluginGjsLoaderClass);
info.class_init = (GClassInitFunc)gplugin_gjs_loader_class_init;
info.instance_size = sizeof(GPluginGjsLoader);
type = gplugin_native_plugin_register_type(plugin,
GPLUGIN_TYPE_LOADER,
"GPluginGjsLoader",
&info,
(GTypeFlags)0);
g_once_init_leave(&type_real, type);
}
}
GType
gplugin_gjs_loader_get_type(void) {
if(G_UNLIKELY(type_real == 0)) {
g_warning("gplugin_gjs_loader_get_type was called before "
"the type was registered!\n");
}
return type_real;
}