3 ; object definitions ...
5 (in-module "WebKitGtk")
6 (parent "GtkContainer")
7 (c-name "WebKitWebView")
8 (gtype-id "WEBKIT_TYPE_WEB_VIEW")
11 ;; waiting for upstream header fix
13 (in-module "WebKitGtk")
15 (c-name "WebKitWebFrame")
16 (gtype-id "WEBKIT_TYPE_WEB_FRAME")
19 (define-object NetworkRequest
20 (in-module "WebKitGtk")
22 (c-name "WebKitNetworkRequest")
23 (gtype-id "WEBKIT_TYPE_NETWORK_REQUEST")
26 ;; Enumerations and flags ...
27 ;; TODO: http://bugs.webkit.org/show_bug.cgi?id=16119 - mapping enums to GType
28 ;(define-enum NavigationResponse
29 ; (in-module "GtkWebKit")
30 ; (c-name "WebKitNavigationResponse")
32 ; '("accept" "WEBKIT_NAVIGATION_RESPONSE_ACCEPT")
33 ; '("ignore" "WEBKIT_NAVIGATION_RESPONSE_IGNORE")
34 ; '("download" "WEBKIT_NAVIGATION_RESPONSE_DOWNLOAD")
38 ;; From webkitgtkpage.h
40 (define-function webkit_web_view_new
41 (is-constructor-of "WebKitWebView")
42 (c-name "webkit_web_view_new")
43 (caller-owns-return #t)
44 (return-type "GtkWidget*")
47 (define-method can_go_backward
48 (of-object "WebKitWebView")
49 (c-name "webkit_web_view_can_go_backward")
50 (return-type "gboolean")
53 (define-method can_go_forward
54 (of-object "WebKitWebView")
55 (c-name "webkit_web_view_can_go_forward")
56 (return-type "gboolean")
59 (define-method go_backward
60 (of-object "WebKitWebView")
61 (c-name "webkit_web_view_go_backward")
65 (define-method go_forward
66 (of-object "WebKitWebView")
67 (c-name "webkit_web_view_go_forward")
71 (define-method stop_loading
72 (of-object "WebKitWebView")
73 (c-name "webkit_web_view_stop_loading")
78 (of-object "WebKitWebView")
79 (c-name "webkit_web_view_open")
82 '("const-gchar*" "uri")
87 (of-object "WebKitWebView")
88 (c-name "webkit_web_view_reload")
92 (define-method load_html_string
93 (of-object "WebKitWebView")
94 (c-name "webkit_web_view_load_html_string")
97 '("const-gchar*" "content")
98 '("const-gchar*" "base_uri")
102 (define-method load_string
103 (of-object "WebKitWebView")
104 (c-name "webkit_web_view_load_string")
107 '("const-gchar*" "content")
108 '("const-gchar*" "content_mimetype")
109 '("const-gchar*" "content_encoding")
110 '("const-gchar*" "base_uri")
114 (define-method get_main_frame
115 (of-object "WebKitWebView")
116 (c-name "webkit_web_view_get_main_frame")
117 (return-type "WebKitWebFrame*")
120 (define-method execute_script
121 (of-object "WebKitWebView")
122 (c-name "webkit_web_view_execute_script")
125 '("const-gchar*" "script")
129 (define-method get_editable
130 (of-object "WebKitWebView")
131 (c-name "webkit_web_view_get_editable")
132 (return-type "gboolean")
135 (define-method set_editable
136 (of-object "WebKitWebView")
137 (c-name "webkit_web_view_set_editable")
143 ;; From webkitgtkframe.h
145 (define-function webkit_web_frame_new
146 (is-constructor-of "WebKitWebFrame")
147 (c-name "webkit_web_frame_new")
148 (caller-owns-return #t)
149 (return-type "WebKitWebFrame*")
151 '("web_view" (argname "web_view"))
155 (define-method get_web_view
156 (of-object "WebKitWebFrame")
157 (c-name "webkit_web_frame_get_web_view")
158 (caller-owns-return #t)
159 (return-type "WebKitWebView*")
162 (define-method get_name
163 (of-object "WebKitWebFrame")
164 (c-name "webkit_web_frame_get_name")
165 (caller-owns-return #f)
166 (return-type "const-gchar*")
169 (define-method get_title
170 (of-object "WebKitWebFrame")
171 (c-name "webkit_web_frame_get_title")
172 (caller-owns-return #f)
173 (return-type "const-gchar*")
176 (define-method get_location
177 (of-object "WebKitWebFrame")
178 (c-name "webkit_web_frame_get_location")
179 (caller-owns-return #f)
180 (return-type "const-gchar*")
183 (define-method get_parent
184 (of-object "WebKitWebFrame")
185 (c-name "webkit_web_frame_get_parent")
186 (caller-owns-return #f)
187 (return-type "WebKitWebFrame*")
190 (define-method load_request
191 (of-object "WebKitWebFrame")
192 (c-name "webkit_web_frame_load_request")
195 '("WebKitNetworkRequest*" "request")
199 (define-method stop_loading
200 (of-object "WebKitWebFrame")
201 (c-name "webkit_web_frame_stop_loading")
205 (define-method reload
206 (of-object "WebKitWebFrame")
207 (c-name "webkit_web_frame_reload")
211 (define-method find_frame
212 (of-object "WebKitWebFrame")
213 (c-name "webkit_web_frame_find_frame")
214 (caller-owns-return #f)
215 (return-type "WebKitWebFrame*")
217 '("const-gchar*" "name")
221 ;; TODO: wrap webkit_web_frame_get_global_context
224 ;; From webkitgtknetworkrequest.h
226 (define-function webkit_network_request_new
227 (is-constructor-of "WebKitNetworkRequest")
228 (c-name "webkit_network_request_new")
229 (caller-owns-return #t)
230 (return-type "WebKitNetworkRequest*")
232 '("uri" (argname "uri"))
236 (define-method set_uri
237 (of-object "WebKitNetworkRequest")
238 (c-name "webkit_network_request_set_uri")
241 '("const-gchar*" "uri")
245 (define-method get_uri
246 (of-object "WebKitNetworkRequest")
247 (c-name "webkit_network_request_get_uri")
248 (caller-owns-return #f)
249 (return-type "const-gchar*")