File: GtkTerm.xs

package info (click to toggle)
libgtk-perl 0.1.17-1
  • links: PTS
  • area: main
  • in suites: hamm
  • size: 1,352 kB
  • ctags: 1,100
  • sloc: ansic: 4,393; perl: 3,463; makefile: 36
file content (214 lines) | stat: -rw-r--r-- 3,365 bytes parent folder | download | duplicates (2)
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
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include <gtk/gtk.h>

#include "GtkTypes.h"
#include "GdkTypes.h"
#include "MiscTypes.h"

#include "GtkDefs.h"

#ifndef boolSV
# define boolSV(b) ((b) ? &sv_yes : &sv_no)
#endif

MODULE = Gtk::Term		PACKAGE = Gtk::Term		PREFIX = gtk_term_

#ifdef GTK_TERM

void
gtk_term_setup(term, width, height, max_width, scrollback)
	Gtk::Term	term
	guint	width
	guint	height
	guint	max_width
	guint	scrollback

gint
gtk_term_set_scroll_offset(term, offset)
	Gtk::Term	term
	gint	offset

void
gtk_term_block_refresh(term)
	Gtk::Term	term

void
gtk_term_force_refresh(term)
	Gtk::Term	term

void
gtk_term_unblock_refresh(term)
	Gtk::Term	term

void
gtk_term_set_fonts(term, font_normal, font_dim, font_bold, overstrike_bold, font_underline, draw_underline, font_reverse, colors_reversed)
	Gtk::Term	term
	Gtk::Gdk::Font	font_normal
	Gtk::Gdk::Font	font_dim
	Gtk::Gdk::Font	font_bold
	gboolean	overstrike_bold
	Gtk::Gdk::Font	font_underline
	gboolean	draw_underline
	Gtk::Gdk::Font	font_reverse
	gboolean	colors_reversed

void
gtk_term_set_color(term, index, back, fore, fore_dim, fore_bold)
	Gtk::Term	term
	guint	index
	gulong	back
	gulong	fore
	gulong	fore_dim
	gulong	fore_bold

void
gtk_term_select_color(term, fore_index, back_index)
	Gtk::Term	term
	guint	fore_index
	guint	back_index

void
gtk_term_set_dim(term, dim)
	Gtk::Term	term
	gboolean	dim

void
gtk_term_set_bold(term, bold)
	Gtk::Term	term
	gboolean	bold

void
gtk_term_set_underline(term, underline)
	Gtk::Term	term
	gboolean	underline

void
gtk_term_set_reverse(term, reverse)
	Gtk::Term	term
	gboolean	reverse

void
gtk_term_invert(term)
	Gtk::Term	term

void
gtk_term_insert_lines(term, n)
	Gtk::Term	term
	guint	n

void
gtk_term_delete_lines(term, n)
	Gtk::Term	term
	guint	n

void
gtk_term_scroll(term, n, downwards)
	Gtk::Term	term
	guint	n
	gboolean	downwards

void
gtk_term_clear_line(term, before_cursor, after_cursor)
	Gtk::Term	term
	gboolean	before_cursor
	gboolean	after_cursor

void
gtk_term_insert_chars(term, n)
	Gtk::Term	term
	guint	n

void
gtk_term_delete_chars(term, n)
	Gtk::Term	term
	guint	n

void
gtk_term_bell(term)
	Gtk::Term	term

void
gtk_term_clear(term, before_cursor, after_cursor)
	Gtk::Term	term
	gboolean	before_cursor
	gboolean	after_cursor

void
gtk_term_set_cursor(term, x, y)
	Gtk::Term	term
	guint	x
	guint	y

void
gtk_term_get_cursor(term, x, y)
	Gtk::Term	term
	PPCODE:
	{
		int x,y;
		gtk_term_get_cursor(term, &x, &y);
		EXTEND(sp, 2);
		PUSHs(sv_2mortal(newSViv(x)));
		PUSHs(sv_2mortal(newSViv(y)));
	}

void
gtk_term_set_cursor_mode(term, mode, blinking)
	Gtk::Term	term
	Gtk::CursorMode	mode
	gboolean	blinking

void
gtk_term_save_cursor(term)
	Gtk::Term	term

void
gtk_term_restore_cursor(term)
	Gtk::Term	term

void
gtk_term_set_scroll_reg(term, top, bottom)
	Gtk::Term	term
	guint	top
	guint	bottom

void
gtk_term_reset(term)
	Gtk::Term	term

void
gtk_term_get_size(term, x, y)
	Gtk::Term	term
	PPCODE:
	{
		int x,y;
		gtk_term_get_size(term, &x, &y);
		EXTEND(sp, 2);
		PUSHs(sv_2mortal(newSViv(x)));
		PUSHs(sv_2mortal(newSViv(y)));
	}

void
gtk_term_erase_chars(term, n)
	Gtk::Term	term
	guint	n

void
gtk_term_putc(term, text, insert)
	Gtk::Term	term
	SV *	text
	gboolean	insert
	CODE:
	{
		int i,l;
		char * c = SvPV(text, l);
		for(i=0;i<l;i++)
			gtk_term_putc(term, c[i], insert);
	}


#endif