1;; -*- scheme -*-
2; object definitions ...
3(define-object HtmlContext
4  (in-module "Gtk")
5  (parent "GObject")
6  (c-name "GtkHtmlContext")
7  (gtype-id "GTK_HTML_CONTEXT_TYPE")
8)
9
10(define-object View
11  (in-module "Html")
12  (parent "GtkLayout")
13  (c-name "HtmlView")
14  (gtype-id "HTML_TYPE_VIEW")
15  (fields
16    '("HtmlDocumen*" "document")
17  )
18)
19
20;; Enumerations and flags ...
21
22
23;; From /usr/include/gtkhtml-2.0/libgtkhtml/gtkhtmlcontext.h
24
25(define-function gtk_html_context_get_type
26  (c-name "gtk_html_context_get_type")
27  (return-type "GType")
28)
29
30(define-function gtk_html_context_get
31  (c-name "gtk_html_context_get")
32  (return-type "GtkHtmlContext*")
33)
34
35
36;; From /usr/include/gtkhtml-2.0/libgtkhtml/view/htmlselection.h
37
38(define-function html_selection_end
39  (c-name "html_selection_end")
40  (return-type "none")
41  (parameters
42    '("HtmlView*" "view")
43    '("GdkEventButton*" "event")
44  )
45)
46
47(define-function html_selection_update
48  (c-name "html_selection_update")
49  (return-type "none")
50  (parameters
51    '("HtmlView*" "view")
52    '("GdkEventMotion*" "event")
53  )
54)
55
56(define-function html_selection_clear
57  (c-name "html_selection_clear")
58  (return-type "none")
59  (parameters
60    '("HtmlView*" "view")
61  )
62)
63
64(define-function html_selection_set
65  (c-name "html_selection_set")
66  (return-type "none")
67  (parameters
68    '("HtmlView*" "view")
69    '("DomNode*" "start")
70    '("int" "offset")
71    '("int" "len")
72  )
73)
74
75
76
77;; From /usr/include/gtkhtml-2.0/libgtkhtml/view/htmlview.h
78
79(define-function html_view_get_type
80  (c-name "html_view_get_type")
81  (return-type "GType")
82)
83
84(define-function html_view_new
85  (is-constructor-of HtmlView)
86  (c-name "html_view_new")
87)
88
89(define-method set_document
90  (of-object "HtmlView")
91  (c-name "html_view_set_document")
92  (return-type "none")
93  (parameters
94    '("HtmlDocument*" "document")
95  )
96)
97
98(define-method jump_to_anchor
99  (of-object "HtmlView")
100  (c-name "html_view_jump_to_anchor")
101  (return-type "none")
102  (parameters
103    '("const-gchar*" "anchor")
104  )
105)
106
107(define-method get_magnification
108  (of-object "HtmlView")
109  (c-name "html_view_get_magnification")
110  (return-type "gdouble")
111)
112
113(define-method set_magnification
114  (of-object "HtmlView")
115  (c-name "html_view_set_magnification")
116  (return-type "none")
117  (parameters
118    '("gdouble" "magnification")
119  )
120)
121
122(define-method zoom_in
123  (of-object "HtmlView")
124  (c-name "html_view_zoom_in")
125  (return-type "none")
126)
127
128(define-method zoom_out
129  (of-object "HtmlView")
130  (c-name "html_view_zoom_out")
131  (return-type "none")
132)
133
134(define-method zoom_reset
135  (of-object "HtmlView")
136  (c-name "html_view_zoom_reset")
137  (return-type "none")
138)
139
140(define-method find_layout_box
141  (of-object "HtmlView")
142  (c-name "html_view_find_layout_box")
143  (return-type "HtmlBox*")
144  (parameters
145    '("DomNode*" "node")
146    '("gboolean" "find_parent")
147  )
148)
149
150
151;; -*- scheme -*-
152; object definitions ...
153(define-object Document
154  (in-module "Html")
155  (parent "GObject")
156  (c-name "HtmlDocument")
157  (gtype-id "HTML_TYPE_DOCUMENT")
158)
159
160;; Enumerations and flags ...
161
162(define-enum DocumentState
163  (in-module "Html")
164  (c-name "HtmlDocumentState")
165  (values
166    '("done" "HTML_DOCUMENT_STATE_DONE")
167    '("parsing" "HTML_DOCUMENT_STATE_PARSING")
168  )
169)
170
171
172;; From /usr/include/gtkhtml-2.0/libgtkhtml/document/htmldocument.h
173
174(define-function html_document_get_type
175  (c-name "html_document_get_type")
176  (return-type "GType")
177)
178
179(define-function html_document_new
180  (is-constructor-of HtmlDocument)
181  (c-name "html_document_new")
182)
183
184(define-method open_stream
185  (of-object "HtmlDocument")
186  (c-name "html_document_open_stream")
187  (return-type "gboolean")
188  (parameters
189    '("const-gchar*" "mime_type")
190  )
191)
192
193(define-method write_stream
194  (of-object "HtmlDocument")
195  (c-name "html_document_write_stream")
196  (return-type "none")
197  (parameters
198    '("const-gchar*" "buffer")
199    '("gint" "len")
200  )
201)
202
203(define-method close_stream
204  (of-object "HtmlDocument")
205  (c-name "html_document_close_stream")
206  (return-type "none")
207)
208
209(define-method clear
210  (of-object "HtmlDocument")
211  (c-name "html_document_clear")
212  (return-type "none")
213)
214
215(define-method update_hover_node
216  (of-object "HtmlDocument")
217  (c-name "html_document_update_hover_node")
218  (return-type "none")
219  (parameters
220    '("DomNode*" "node")
221  )
222)
223
224(define-method update_active_node
225  (of-object "HtmlDocument")
226  (c-name "html_document_update_active_node")
227  (return-type "none")
228  (parameters
229    '("DomNode*" "node")
230  )
231)
232
233(define-method update_focus_element
234  (of-object "HtmlDocument")
235  (c-name "html_document_update_focus_element")
236  (return-type "none")
237  (parameters
238    '("DomElement*" "element")
239  )
240)
241
242(define-method find_anchor
243  (of-object "HtmlDocument")
244  (c-name "html_document_find_anchor")
245  (return-type "DomNode*")
246  (parameters
247    '("const-gchar*" "anchor")
248  )
249)
250
251
252;; -*- scheme -*-
253; object definitions ...
254(define-object Stream
255  (in-module "Html")
256  (parent "GObject")
257  (c-name "HtmlStream")
258  (gtype-id "HTML_TYPE_STREAM")
259)
260
261;; Enumerations and flags ...
262
263
264;; From /usr/include/gtkhtml-2.0/libgtkhtml/util/htmlstream.h
265
266(define-function html_stream_get_type
267  (c-name "html_stream_get_type")
268  (return-type "GType")
269)
270
271(define-function html_stream_new
272  (c-name "html_stream_new")
273  (is-constructor-of HtmlStream)
274  (parameters
275    '("HtmlStreamWriteFunc" "write_func")
276    '("HtmlStreamCloseFunc" "close_func")
277    '("gpointer" "user_data")
278  )
279)
280
281(define-method write
282  (of-object "HtmlStream")
283  (c-name "html_stream_write")
284  (return-type "none")
285  (parameters
286    '("const-gchar*" "buffer")
287    '("guint" "size")
288  )
289)
290
291(define-method close
292  (of-object "HtmlStream")
293  (c-name "html_stream_close")
294  (return-type "none")
295)
296
297(define-method destroy
298  (of-object "HtmlStream")
299  (c-name "html_stream_destroy")
300  (return-type "none")
301)
302
303(define-method get_written
304  (of-object "HtmlStream")
305  (c-name "html_stream_get_written")
306  (return-type "gint")
307)
308
309(define-method cancel
310  (of-object "HtmlStream")
311  (c-name "html_stream_cancel")
312  (return-type "none")
313)
314
315(define-method set_cancel_func
316  (of-object "HtmlStream")
317  (c-name "html_stream_set_cancel_func")
318  (return-type "none")
319  (parameters
320    '("HtmlStreamCancelFunc" "abort_func")
321    '("gpointer" "cancel_data")
322  )
323)
324
325(define-method get_mime_type
326  (of-object "HtmlStream")
327  (c-name "html_stream_get_mime_type")
328  (return-type "const-char*")
329)
330
331(define-method set_mime_type
332  (of-object "HtmlStream")
333  (c-name "html_stream_set_mime_type")
334  (return-type "none")
335  (parameters
336    '("const-char*" "mime_type")
337  )
338)
339
340
341