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
215
216
217
218
219
220
221
222
223
|
#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
static void interaction_handler(GnomeClient * client, gint key, GnomeDialogType dialog_type, gpointer data)
{
AV * args = (AV*)data;
SV * handler = *av_fetch(args, 0, 0);
int i;
dSP;
PUSHMARK(sp);
for (i=1;i<=av_len(args);i++)
XPUSHs(sv_2mortal(newSVsv(*av_fetch(args, i, 0))));
XPUSHs(sv_2mortal(newSViv(key)));
XPUSHs(sv_2mortal(newSVGnomeDialogType(dialog_type)));
PUTBACK;
perl_call_sv(handler, G_DISCARD);
}
MODULE = Gtk::Gnome::Client PACKAGE = Gtk::Gnome::Client PREFIX = gnome_client_
#ifdef GNOME_CLIENT
Gtk::Gnome::Client_Sink
new(Class)
SV * Class
CODE:
RETVAL = GNOME_CLIENT(gnome_client_new());
OUTPUT:
RETVAL
Gtk::Gnome::Client_Sink
new_without_connection(Class)
SV * Class
CODE:
RETVAL = GNOME_CLIENT(gnome_client_new_without_connection());
OUTPUT:
RETVAL
void
gnome_client_connect(client)
Gtk::Gnome::Client client
void
gnome_client_disconnect(client)
Gtk::Gnome::Client client
void
gnome_client_set_id(client, client_id)
Gtk::Gnome::Client client
char * client_id
char *
gnome_client_get_id(client)
Gtk::Gnome::Client client
char *
gnome_client_get_previous_id(client)
Gtk::Gnome::Client client
void
gnome_client_set_clone_command(client, ...)
Gtk::Gnome::Client client
CODE:
{
char ** a = (char**)malloc(sizeof(char*) + items);
int i;
for(i=1;i<items;i++)
a[i-1] = SvPV(ST(i), na);
a[i-1] = 0;
gnome_client_set_clone_command(client, items-1, a);
free(a);
}
void
gnome_client_set_current_directory(client, dir)
Gtk::Gnome::Client client
char * dir
void
gnome_client_set_discard_command(client, ...)
Gtk::Gnome::Client client
CODE:
{
char ** a = (char**)malloc(sizeof(char*) + items);
int i;
for(i=1;i<items;i++)
a[i-1] = SvPV(ST(i), na);
a[i-1] = 0;
gnome_client_set_discard_command(client, items-1, a);
free(a);
}
void
gnome_client_set_environment(client, ...)
Gtk::Gnome::Client client
CODE:
{
char ** a = (char**)malloc(sizeof(char*) + items);
int i;
for(i=1;i<items;i++)
a[i-1] = SvPV(ST(i), na);
a[i-1] = 0;
gnome_client_set_environment(client, items-1, a);
free(a);
}
void
gnome_client_set_process_id(client, pid)
Gtk::Gnome::Client client
int pid
void
gnome_client_set_program(client, program)
Gtk::Gnome::Client client
char * program
void
gnome_client_set_restart_command(client, ...)
Gtk::Gnome::Client client
CODE:
{
char ** a = (char**)malloc(sizeof(char*) + items);
int i;
for(i=1;i<items;i++)
a[i-1] = SvPV(ST(i), na);
a[i-1] = 0;
gnome_client_set_restart_command(client, items-1, a);
free(a);
}
void
gnome_client_set_resign_command(client, ...)
Gtk::Gnome::Client client
CODE:
{
char ** a = (char**)malloc(sizeof(char*) + items);
int i;
for(i=1;i<items;i++)
a[i-1] = SvPV(ST(i), na);
a[i-1] = 0;
gnome_client_set_resign_command(client, items-1, a);
free(a);
}
void
gnome_client_set_restart_style(client, style)
Gtk::Gnome::Client client
Gtk::Gnome::RestartStyle style
void
gnome_client_set_shutdown_command(client, ...)
Gtk::Gnome::Client client
CODE:
{
char ** a = (char**)malloc(sizeof(char*) + items);
int i;
for(i=1;i<items;i++)
a[i-1] = SvPV(ST(i), na);
a[i-1] = 0;
gnome_client_set_shutdown_command(client, items-1, a);
free(a);
}
void
gnome_client_set_user_id(client, id)
Gtk::Gnome::Client client
char * id
void
gnome_client_request_phase_2(client)
Gtk::Gnome::Client client
void
gnome_client_request_interaction(client, dialog, handler, ...)
Gtk::Gnome::Client client
Gtk::Gnome::DialogType dialog
SV * handler
CODE:
{
AV * args = newAV();
PackCallbackST(args, 2);
gnome_client_request_interaction(client, dialog, interaction_handler, (gpointer)args);
}
void
interaction_key_return(Class, key, cancel_shutdown)
SV * Class
int key
int cancel_shutdown
CODE:
gnome_interaction_key_return(key, cancel_shutdown);
void
gnome_client_request_save(client, save_style, shutdown, interact_style, fast, global)
Gtk::Gnome::Client client
Gtk::Gnome::SaveStyle save_style
bool shutdown
Gtk::Gnome::InteractStyle interact_style
bool fast
bool global
#endif
|
