1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
/*
* widgets/webview/javascript.c - webkit webview javascript functions
*
* Copyright © 2010-2012 Mason Larobina <mason.larobina@gmail.com>
*
* 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, see <http://www.gnu.org/licenses/>.
*
*/
#include <stdlib.h>
#include "common/luajs.h"
#include "common/ipc.h"
#include "common/luaserialize.h"
void
run_javascript_finished(const guint8 *msg, guint length)
{
lua_State *L = common.L;
gint top = lua_gettop(L);
gint n = lua_deserialize_range(L, msg, length);
g_assert_cmpint(n, >=, 2);
g_assert_cmpint(n, <=, 4);
/* Lua stack: [page_id, cb], [page_id, cb, nil, err] or [page_id, cb, ret] */
widget_t *w = webview_get_by_id(lua_tointeger(L, -n));
lua_remove(L, -n);
n--;
gpointer cb = lua_touserdata(L, -n);
if(!cb) {
warn("javascript finshed called on non object");
return;
}
lua_remove(L, -n);
n--;
if (n == 2) { /* Nil return value and Error */
g_assert(lua_isnil(L, -2));
g_assert(lua_isstring(L, -1));
}
if (n >= 1 && cb && w) {
luaH_object_push(L, cb);
luaH_dofunction(L, n, 0);
}
if (w && cb) {
g_signal_handlers_disconnect_by_data(w->widget, cb);
luaH_object_unref(L, cb);
}
lua_settop(L, top);
}
static void
run_javascript_webview_closed(WebKitWebView *UNUSED(view), gpointer cb)
{
luaH_object_unref(common.L, cb);
}
static gint
luaH_webview_eval_js(lua_State *L)
{
gpointer cb = NULL;
webview_data_t *d = luaH_checkwvdata(L, 1);
const gchar *script = luaL_checkstring(L, 2);
const gchar *usr_source = NULL;
gchar *source = NULL;
bool no_return = false;
luaH_checktable(L, 3);
gint top = lua_gettop(L);
/* source filename to use in error messages and webinspector */
if (luaH_rawfield(L, 3, "source") && lua_isstring(L, -1))
usr_source = lua_tostring(L, -1);
if (luaH_rawfield(L, 3, "no_return"))
no_return = lua_toboolean(L, -1);
if (luaH_rawfield(L, 3, "callback")) {
luaH_checkfunction(L, -1);
cb = luaH_object_ref(L, -1);
}
lua_settop(L, top);
if (!usr_source)
source = luaH_callerinfo(L);
lua_pushboolean(L, no_return);
lua_pushstring(L, script);
lua_pushstring(L, usr_source ? g_strdup(usr_source) : source);
lua_pushinteger(L, webkit_web_view_get_page_id(d->view));
lua_pushlightuserdata(L, cb);
ipc_send_lua(d->ipc, IPC_TYPE_eval_js, L, -5, -1);
lua_pop(L, 5);
if (cb)
g_signal_connect(d->view, "destroy", G_CALLBACK(run_javascript_webview_closed), cb);
return FALSE;
}
// vim: ft=c:et:sw=4:ts=8:sts=4:tw=80
|
