Commit 56b8c5497034ff29b5d39206e1b526dbb70e04b9
1 parent
3a91ec08
Exists in
master
and in
1 other branch
Refactoring build process.
Showing
24 changed files
with
2251 additions
and
2250 deletions
Show diff stats
Makefile.in
... | ... | @@ -24,18 +24,19 @@ |
24 | 24 | # erico.mendonca@gmail.com (Erico Mascarenhas de Mendonça) |
25 | 25 | # |
26 | 26 | |
27 | -#---[ Library configuration ]------------------------------------------------------------ | |
28 | - | |
29 | -MODULE_NAME=ipc3270c | |
30 | 27 | PACKAGE_NAME=@PACKAGE_NAME@ |
31 | 28 | |
29 | +#---[ PLugin configuration ]------------------------------------------------------------- | |
30 | + | |
31 | +PLUGIN_NAME=ipc3270c | |
32 | + | |
32 | 33 | PLUGIN_SOURCES= \ |
33 | - $(wildcard src/plugin/*.c) \ | |
34 | - $(wildcard src/plugin/@OSNAME@/*.c) \ | |
35 | - $(wildcard src/plugin/@OSNAME@/*.rc) | |
34 | + $(wildcard src/$(PLUGIN_NAME)/*.c) \ | |
35 | + $(wildcard src/$(PLUGIN_NAME)/@OSNAME@/*.c) \ | |
36 | + $(wildcard src/$(PLUGIN_NAME)/@OSNAME@/*.rc) | |
36 | 37 | |
37 | -TEST_SOURCES= \ | |
38 | - $(wildcard src/testprogram/*.c) | |
38 | +PLUGIN_TEST_SOURCES= \ | |
39 | + src/testprograms/plugin.c | |
39 | 40 | |
40 | 41 | #---[ Tools ]---------------------------------------------------------------------------- |
41 | 42 | |
... | ... | @@ -69,7 +70,7 @@ BASEDIR=@BASEDIR@ |
69 | 70 | |
70 | 71 | POTDIR=$(BASEDIR)/.pot |
71 | 72 | |
72 | -OBJDIR=$(BASEDIR)/.obj/$(MODULE_NAME) | |
73 | +OBJDIR=$(BASEDIR)/.obj | |
73 | 74 | OBJDBG=$(OBJDIR)/Debug |
74 | 75 | OBJRLS=$(OBJDIR)/Release |
75 | 76 | |
... | ... | @@ -160,7 +161,7 @@ $(OBJRLS)/%.o: \ |
160 | 161 | |
161 | 162 | #---[ Misc Rules ]----------------------------------------------------------------------- |
162 | 163 | |
163 | -$(POTDIR)/$(MODULE_NAME)/%.pot: \ | |
164 | +$(POTDIR)/$(PLUGIN_NAME)/%.pot: \ | |
164 | 165 | %.c |
165 | 166 | |
166 | 167 | @echo $(notdir $@) ... |
... | ... | @@ -174,7 +175,7 @@ $(POTDIR)/$(MODULE_NAME)/%.pot: \ |
174 | 175 | $< |
175 | 176 | @touch $@ |
176 | 177 | |
177 | -$(POTDIR)/$(MODULE_NAME)/%.pot: \ | |
178 | +$(POTDIR)/$(PLUGIN_NAME)/%.pot: \ | |
178 | 179 | %.rc |
179 | 180 | |
180 | 181 | @echo $< ... |
... | ... | @@ -185,13 +186,13 @@ $(POTDIR)/$(MODULE_NAME)/%.pot: \ |
185 | 186 | #---[ Release Targets ]------------------------------------------------------------------ |
186 | 187 | |
187 | 188 | all: \ |
188 | - $(BINRLS)/$(MODULE_NAME)@DLLEXT@ \ | |
189 | - $(POTDIR)/$(MODULE_NAME).pot | |
189 | + $(BINRLS)/$(PLUGIN_NAME)@DLLEXT@ \ | |
190 | + $(POTDIR)/$(PLUGIN_NAME).pot | |
190 | 191 | |
191 | 192 | Release: \ |
192 | - $(BINRLS)/$(MODULE_NAME)@DLLEXT@ | |
193 | + $(BINRLS)/$(PLUGIN_NAME)@DLLEXT@ | |
193 | 194 | |
194 | -$(BINRLS)/$(MODULE_NAME)@DLLEXT@: \ | |
195 | +$(BINRLS)/$(PLUGIN_NAME)@DLLEXT@: \ | |
195 | 196 | $(foreach SRC, $(basename $(PLUGIN_SOURCES)), $(OBJRLS)/$(SRC).o) |
196 | 197 | |
197 | 198 | @$(MKDIR) $(@D) |
... | ... | @@ -213,39 +214,39 @@ install: \ |
213 | 214 | install-plugin |
214 | 215 | |
215 | 216 | install-plugin: \ |
216 | - $(BINRLS)/$(MODULE_NAME)@DLLEXT@ | |
217 | + $(BINRLS)/$(PLUGIN_NAME)@DLLEXT@ | |
217 | 218 | |
218 | 219 | @$(MKDIR) $(DESTDIR)$(libdir)/pw3270-plugins |
219 | 220 | |
220 | 221 | @$(INSTALL_PROGRAM) \ |
221 | - $(BINRLS)/$(MODULE_NAME)@DLLEXT@ \ | |
222 | + $(BINRLS)/$(PLUGIN_NAME)@DLLEXT@ \ | |
222 | 223 | $(DESTDIR)$(libdir)/pw3270-plugins |
223 | 224 | |
224 | 225 | #---[ Misc Targets ]--------------------------------------------------------------------- |
225 | 226 | |
226 | -$(POTDIR)/$(MODULE_NAME).pot: \ | |
227 | - $(foreach SRC, $(basename $(SOURCES)), $(POTDIR)/$(MODULE_NAME)/$(SRC).pot) | |
227 | +$(POTDIR)/$(PLUGIN_NAME).pot: \ | |
228 | + $(foreach SRC, $(basename $(SOURCES)), $(POTDIR)/$(PLUGIN_NAME)/$(SRC).pot) | |
228 | 229 | |
229 | 230 | @rm -f $@ |
230 | 231 | @mkdir -p `dirname $@` |
231 | 232 | @$(MSGCAT) --sort-output $^ > $@ |
232 | 233 | |
233 | 234 | locale: \ |
234 | - $(POTDIR)/$(MODULE_NAME).pot | |
235 | + $(POTDIR)/$(PLUGIN_NAME).pot | |
235 | 236 | |
236 | -run: \ | |
237 | - $(BINDBG)/$(MODULE_NAME)@DLLEXT@ \ | |
238 | - $(BINDBG)/$(MODULE_NAME)@EXEEXT@ | |
237 | +run-plugin: \ | |
238 | + $(BINDBG)/$(PLUGIN_NAME)@DLLEXT@ \ | |
239 | + $(BINDBG)/$(PLUGIN_NAME)@EXEEXT@ | |
239 | 240 | |
240 | - $(BINDBG)/$(MODULE_NAME)@EXEEXT@ | |
241 | + $(BINDBG)/$(PLUGIN_NAME)@EXEEXT@ | |
241 | 242 | |
242 | 243 | #---[ Debug Targets ]-------------------------------------------------------------------- |
243 | 244 | |
244 | 245 | Debug: \ |
245 | - $(BINDBG)/$(MODULE_NAME)@DLLEXT@ \ | |
246 | - $(BINDBG)/$(MODULE_NAME)@EXEEXT@ | |
246 | + $(BINDBG)/$(PLUGIN_NAME)@DLLEXT@ \ | |
247 | + $(BINDBG)/$(PLUGIN_NAME)@EXEEXT@ | |
247 | 248 | |
248 | -$(BINDBG)/lib$(MODULE_NAME).a: \ | |
249 | +$(BINDBG)/lib$(PLUGIN_NAME).a: \ | |
249 | 250 | $(foreach SRC, $(basename $(CORE_SOURCES)), $(OBJDBG)/$(SRC).o) |
250 | 251 | |
251 | 252 | @$(MKDIR) $(@D) |
... | ... | @@ -254,8 +255,8 @@ $(BINDBG)/lib$(MODULE_NAME).a: \ |
254 | 255 | @$(AR) rcs $@ $^ |
255 | 256 | |
256 | 257 | |
257 | -$(BINDBG)/$(MODULE_NAME)@EXEEXT@: \ | |
258 | - $(foreach SRC, $(basename $(TEST_SOURCES)), $(OBJDBG)/$(SRC).o) | |
258 | +$(BINDBG)/$(PLUGIN_NAME)@EXEEXT@: \ | |
259 | + $(foreach SRC, $(basename $(PLUGIN_TEST_SOURCES)), $(OBJDBG)/$(SRC).o) | |
259 | 260 | |
260 | 261 | @$(MKDIR) $(@D) |
261 | 262 | @echo $< ... |
... | ... | @@ -270,7 +271,7 @@ $(BINDBG)/$(MODULE_NAME)@EXEEXT@: \ |
270 | 271 | $(GTK_LIBS) \ |
271 | 272 | $(GLIB_LIBS) |
272 | 273 | |
273 | -$(BINDBG)/$(MODULE_NAME)@DLLEXT@: \ | |
274 | +$(BINDBG)/$(PLUGIN_NAME)@DLLEXT@: \ | |
274 | 275 | $(foreach SRC, $(basename $(PLUGIN_SOURCES)), $(OBJDBG)/$(SRC).o) |
275 | 276 | |
276 | 277 | @$(MKDIR) $(@D) |
... | ... | @@ -293,8 +294,8 @@ clean: \ |
293 | 294 | cleanDebug \ |
294 | 295 | cleanRelease |
295 | 296 | |
296 | - @rm -fr $(BASEDIR)/.tmp/$(MODULE_NAME) | |
297 | - @rm -fr $(POTDIR)/$(MODULE_NAME) | |
297 | + @rm -fr $(BASEDIR)/.tmp/$(PLUGIN_NAME) | |
298 | + @rm -fr $(POTDIR)/$(PLUGIN_NAME) | |
298 | 299 | |
299 | 300 | cleanDebug: |
300 | 301 | ... | ... |
configure.ac
... | ... | @@ -31,7 +31,7 @@ AC_PREREQ(2.61) |
31 | 31 | |
32 | 32 | dnl Initialise automake with the package name, version and |
33 | 33 | dnl bug-reporting address. |
34 | -AC_INIT([pw3270], [5.2], [perry.werneck@gmail.com]) | |
34 | +AC_INIT([ipc3270], [5.2], [perry.werneck@gmail.com]) | |
35 | 35 | |
36 | 36 | dnl Place auxilliary scripts here. |
37 | 37 | AC_CONFIG_AUX_DIR([scripts]) | ... | ... |
... | ... | @@ -0,0 +1,46 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | + * | |
21 | + * Este programa está nomeado como daemon.c e possui - linhas de código. | |
22 | + * | |
23 | + * Contatos: | |
24 | + * | |
25 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | + * licinio@bb.com.br (Licínio Luis Branco) | |
28 | + * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | + * | |
30 | + * Referencias: | |
31 | + * | |
32 | + * https://live.gnome.org/DBusGlibBindings | |
33 | + * | |
34 | + */ | |
35 | + | |
36 | + #include "service.h" | |
37 | + | |
38 | +/*---[ Globals ]---------------------------------------------------------------------------------*/ | |
39 | + | |
40 | + G_GNUC_INTERNAL GMainLoop * main_loop; | |
41 | + | |
42 | + | |
43 | +/*---[ Prototipes ]------------------------------------------------------------------------------*/ | |
44 | + | |
45 | + G_GNUC_INTERNAL void pw3270_dbus_register_io_handlers(void); | |
46 | + | ... | ... |
... | ... | @@ -0,0 +1,59 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | + * | |
21 | + * Este programa está nomeado como globals.h e possui - linhas de código. | |
22 | + * | |
23 | + * Contatos: | |
24 | + * | |
25 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | + * licinio@bb.com.br (Licínio Luis Branco) | |
28 | + * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | + * | |
30 | + */ | |
31 | + | |
32 | +#ifndef PW3270_DBUS_GLOBALS_H_INCLUDED | |
33 | + | |
34 | + #define PW3270_DBUS_GLOBALS_H_INCLUDED 1 | |
35 | + | |
36 | + #include <libintl.h> | |
37 | + #include <glib/gi18n.h> | |
38 | + | |
39 | + #include <errno.h> | |
40 | + #include <lib3270.h> | |
41 | + #include <lib3270/log.h> | |
42 | + #include <glib.h> | |
43 | + | |
44 | + // | |
45 | + // Disabling warning on unused-function defined in dbus-glib-bindings.h | |
46 | + // warning: 'org_freedesktop_DBus_reload_config' defined but not used [-Wunused-function] ... | |
47 | + // | |
48 | + #pragma GCC diagnostic ignored "-Wunused-function" | |
49 | + | |
50 | + #include <dbus/dbus-glib.h> | |
51 | + #include <dbus/dbus-glib-bindings.h> | |
52 | + #include <dbus/dbus-glib-lowlevel.h> | |
53 | + | |
54 | + #define ERROR_DOMAIN g_quark_from_static_string("pw3270DBUS") | |
55 | + | |
56 | + G_GNUC_INTERNAL gpointer pw3270_dbus_register_object (DBusGConnection *connection,DBusGProxy *proxy,GType object_type,const DBusGObjectInfo *info,const gchar *path); | |
57 | + | |
58 | + | |
59 | +#endif // PW3270_DBUS_GLOBALS_H_INCLUDED | ... | ... |
... | ... | @@ -0,0 +1,620 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | + * | |
21 | + * Este programa está nomeado como gobject.c e possui - linhas de código. | |
22 | + * | |
23 | + * Contatos: | |
24 | + * | |
25 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | + * licinio@bb.com.br (Licínio Luis Branco) | |
28 | + * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | + * | |
30 | + * Referencias: | |
31 | + * | |
32 | + * https://live.gnome.org/DBusGlibBindings | |
33 | + * | |
34 | + */ | |
35 | + | |
36 | +#include <glib.h> | |
37 | +#include <gtk/gtk.h> | |
38 | +#include <dbus/dbus.h> | |
39 | +#include <dbus/dbus-glib-lowlevel.h> | |
40 | +#include <dbus/dbus-glib.h> | |
41 | + | |
42 | +#include <config.h> | |
43 | +#include <lib3270.h> | |
44 | +#include <pw3270.h> | |
45 | +#include <v3270.h> | |
46 | +#include <lib3270/actions.h> | |
47 | +#include <lib3270/charset.h> | |
48 | + | |
49 | +#include "service.h" | |
50 | + | |
51 | +/*---[ Globals ]---------------------------------------------------------------------------------*/ | |
52 | + | |
53 | + | |
54 | +/*---[ Implement ]-------------------------------------------------------------------------------*/ | |
55 | + | |
56 | +G_DEFINE_TYPE(PW3270Dbus, pw3270_dbus, G_TYPE_OBJECT) | |
57 | + | |
58 | +static void pw3270_dbus_finalize(GObject *object) | |
59 | +{ | |
60 | + G_OBJECT_CLASS(pw3270_dbus_parent_class)->finalize (object); | |
61 | +} | |
62 | + | |
63 | + | |
64 | +static void pw3270_dbus_class_init(PW3270DbusClass *klass) | |
65 | +{ | |
66 | + GObjectClass *object_class; | |
67 | + object_class = G_OBJECT_CLASS (klass); | |
68 | + object_class->finalize = pw3270_dbus_finalize; | |
69 | + debug("%s",__FUNCTION__); | |
70 | +} | |
71 | + | |
72 | +static void pw3270_dbus_init(PW3270Dbus *object) | |
73 | +{ | |
74 | + debug("%s(%p)",__FUNCTION__,object); | |
75 | +} | |
76 | + | |
77 | +PW3270Dbus * pw3270_dbus_new(void) | |
78 | +{ | |
79 | + return (PW3270Dbus *) g_object_new(PW3270_TYPE_DBUS, NULL); | |
80 | +} | |
81 | + | |
82 | +void pw3270_dbus_get_revision(PW3270Dbus *object, DBusGMethodInvocation *context) | |
83 | +{ | |
84 | + debug("%s object=%p context=%p",__FUNCTION__,object,context); | |
85 | + dbus_g_method_return(context,lib3270_get_revision()); | |
86 | +} | |
87 | + | |
88 | +void pw3270_dbus_connect(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context) | |
89 | +{ | |
90 | + H3270 *hSession = pw3270_dbus_get_session_handle(PW3270_DBUS(object)); | |
91 | + | |
92 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
93 | + | |
94 | + if(uri && *uri) | |
95 | + { | |
96 | + lib3270_set_url(hSession,uri); | |
97 | + g_message("Connecting to \"%s\" by remote request",lib3270_get_url(hSession)); | |
98 | + } | |
99 | + else | |
100 | + { | |
101 | + g_message("%s","Connecting by remote request"); | |
102 | + } | |
103 | + | |
104 | + dbus_g_method_return(context,lib3270_reconnect(hSession,0)); | |
105 | +} | |
106 | + | |
107 | +void pw3270_dbus_set_ur_l(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context) | |
108 | +{ | |
109 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
110 | + | |
111 | + g_message("Changing host to \"%s\" by remote request",uri); | |
112 | + | |
113 | + dbus_g_method_return(context,lib3270_set_url(pw3270_dbus_get_session_handle(PW3270_DBUS(object)),uri) != 0); | |
114 | +} | |
115 | + | |
116 | +void pw3270_dbus_get_ur_l(PW3270Dbus *object, DBusGMethodInvocation *context) | |
117 | +{ | |
118 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
119 | + dbus_g_method_return(context,lib3270_get_url(pw3270_dbus_get_session_handle(PW3270_DBUS(object)))); | |
120 | +} | |
121 | + | |
122 | + | |
123 | +void pw3270_dbus_disconnect(PW3270Dbus *object, DBusGMethodInvocation *context) | |
124 | +{ | |
125 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
126 | + | |
127 | + g_message("Disconnecting by remote request"); | |
128 | + lib3270_disconnect(pw3270_dbus_get_session_handle(object)); | |
129 | + dbus_g_method_return(context,0); | |
130 | +} | |
131 | + | |
132 | +void pw3270_dbus_get_message_id(PW3270Dbus *object, DBusGMethodInvocation *context) | |
133 | +{ | |
134 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
135 | + dbus_g_method_return(context,lib3270_get_program_message(pw3270_dbus_get_session_handle(object))); | |
136 | +} | |
137 | + | |
138 | +void pw3270_dbus_get_connection_state(PW3270Dbus *object, DBusGMethodInvocation *context) | |
139 | +{ | |
140 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
141 | + dbus_g_method_return(context,lib3270_get_connection_state(pw3270_dbus_get_session_handle(object))); | |
142 | +} | |
143 | + | |
144 | +void pw3270_dbus_get_secure_state(PW3270Dbus *object, DBusGMethodInvocation *context) | |
145 | +{ | |
146 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
147 | + dbus_g_method_return(context,lib3270_get_secure(pw3270_dbus_get_session_handle(object))); | |
148 | +} | |
149 | + | |
150 | +GError * pw3270_dbus_get_error_from_errno(int code) | |
151 | +{ | |
152 | + return g_error_new(ERROR_DOMAIN,code,"%s",g_strerror(code)); | |
153 | +} | |
154 | + | |
155 | +int pw3270_dbus_check_valid_state(PW3270Dbus *object, DBusGMethodInvocation *context) | |
156 | +{ | |
157 | + H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
158 | + GError * error = NULL; | |
159 | + | |
160 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
161 | + | |
162 | + if(!lib3270_is_connected(hSession)) | |
163 | + { | |
164 | + error = pw3270_dbus_get_error_from_errno(ENOTCONN); | |
165 | + } | |
166 | + else | |
167 | + { | |
168 | + LIB3270_MESSAGE state = lib3270_get_program_message(hSession); | |
169 | + | |
170 | + switch(state) | |
171 | + { | |
172 | + case LIB3270_MESSAGE_NONE: | |
173 | + return 0; | |
174 | + | |
175 | + case LIB3270_MESSAGE_DISCONNECTED: | |
176 | + error = pw3270_dbus_get_error_from_errno(ENOTCONN); | |
177 | + break; | |
178 | + | |
179 | + case LIB3270_MESSAGE_MINUS: | |
180 | + case LIB3270_MESSAGE_PROTECTED: | |
181 | + case LIB3270_MESSAGE_NUMERIC: | |
182 | + case LIB3270_MESSAGE_OVERFLOW: | |
183 | + case LIB3270_MESSAGE_INHIBIT: | |
184 | + case LIB3270_MESSAGE_KYBDLOCK: | |
185 | + case LIB3270_MESSAGE_X: | |
186 | + error = g_error_new(ERROR_DOMAIN,-1,_( "State %04d can't accept requests" ),state); | |
187 | + break; | |
188 | + | |
189 | + case LIB3270_MESSAGE_SYSWAIT: | |
190 | + case LIB3270_MESSAGE_TWAIT: | |
191 | + case LIB3270_MESSAGE_CONNECTED: | |
192 | + case LIB3270_MESSAGE_AWAITING_FIRST: | |
193 | + error = pw3270_dbus_get_error_from_errno(EBUSY); | |
194 | + break; | |
195 | + | |
196 | + case LIB3270_MESSAGE_RESOLVING: | |
197 | + case LIB3270_MESSAGE_CONNECTING: | |
198 | + error = g_error_new(ERROR_DOMAIN,EINPROGRESS,_( "Connecting to host" )); | |
199 | + break; | |
200 | + | |
201 | + case LIB3270_MESSAGE_USER: | |
202 | + error = g_error_new(ERROR_DOMAIN,-1,_( "Unexpected state %04d" ),state); | |
203 | + } | |
204 | + } | |
205 | + | |
206 | + if(error) | |
207 | + { | |
208 | + dbus_g_method_return_error(context,error); | |
209 | + g_error_free(error); | |
210 | + return -1; | |
211 | + } | |
212 | + | |
213 | + return 0; | |
214 | +} | |
215 | + | |
216 | +void pw3270_dbus_get_screen_contents(PW3270Dbus *object, DBusGMethodInvocation *context) | |
217 | +{ | |
218 | + char * text; | |
219 | + gchar * utftext; | |
220 | + H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
221 | + | |
222 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
223 | + | |
224 | + if(pw3270_dbus_check_valid_state(object,context)) | |
225 | + return; | |
226 | + | |
227 | + text = lib3270_get_string_at_address(hSession,0,-1,'\n'); | |
228 | + | |
229 | + utftext = g_convert_with_fallback(text,-1,"UTF-8",lib3270_get_display_charset(hSession),"?",NULL,NULL,NULL); | |
230 | + | |
231 | + lib3270_free(text); | |
232 | + | |
233 | + dbus_g_method_return(context,utftext); | |
234 | + | |
235 | + g_free(utftext); | |
236 | + | |
237 | +} | |
238 | + | |
239 | +void pw3270_dbus_enter(PW3270Dbus *object, DBusGMethodInvocation *context) | |
240 | +{ | |
241 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
242 | + if(pw3270_dbus_check_valid_state(object,context)) | |
243 | + return; | |
244 | + dbus_g_method_return(context,lib3270_enter(pw3270_dbus_get_session_handle(object))); | |
245 | +} | |
246 | + | |
247 | +void pw3270_dbus_set_text_at(PW3270Dbus *object, int row, int col, const gchar *utftext, DBusGMethodInvocation *context) | |
248 | +{ | |
249 | + gchar * text; | |
250 | + H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
251 | + | |
252 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
253 | + if(pw3270_dbus_check_valid_state(object,context)) | |
254 | + return; | |
255 | + | |
256 | + text = g_convert_with_fallback(utftext,-1,lib3270_get_display_charset(hSession),"UTF-8","?",NULL,NULL,NULL); | |
257 | + | |
258 | + int sz = lib3270_set_string_at(hSession,row,col,(const unsigned char *) text); | |
259 | + | |
260 | + trace("%s returns %d",__FUNCTION__,sz); | |
261 | + dbus_g_method_return(context,sz); | |
262 | + | |
263 | + g_free(text); | |
264 | +} | |
265 | + | |
266 | +void pw3270_dbus_input(PW3270Dbus *object, const gchar *utftext, DBusGMethodInvocation *context) | |
267 | +{ | |
268 | + gchar * text; | |
269 | + H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
270 | + | |
271 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
272 | + if(pw3270_dbus_check_valid_state(object,context)) | |
273 | + return; | |
274 | + | |
275 | + text = g_convert_with_fallback(utftext,-1,lib3270_get_display_charset(hSession),"UTF-8","?",NULL,NULL,NULL); | |
276 | + | |
277 | + dbus_g_method_return(context,lib3270_emulate_input(hSession,(const char *) text,-1,1)); | |
278 | + | |
279 | + g_free(text); | |
280 | +} | |
281 | + | |
282 | + | |
283 | +void pw3270_dbus_get_text_at(PW3270Dbus *object, int row, int col, int len, char lf, DBusGMethodInvocation *context) | |
284 | +{ | |
285 | + gchar * text; | |
286 | + H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
287 | + | |
288 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
289 | + if(pw3270_dbus_check_valid_state(object,context)) | |
290 | + return; | |
291 | + | |
292 | + text = lib3270_get_string_at(hSession, row, col, len, lf); | |
293 | + if(!text) | |
294 | + { | |
295 | + GError *error = pw3270_dbus_get_error_from_errno(errno); | |
296 | + dbus_g_method_return_error(context,error); | |
297 | + g_error_free(error); | |
298 | + } | |
299 | + else | |
300 | + { | |
301 | + gchar * utftext = g_convert_with_fallback(text,-1,"UTF-8",lib3270_get_display_charset(hSession),"?",NULL,NULL,NULL); | |
302 | + | |
303 | + lib3270_free(text); | |
304 | + | |
305 | + dbus_g_method_return(context,utftext); | |
306 | + | |
307 | + g_free(utftext); | |
308 | + } | |
309 | + } | |
310 | + | |
311 | + void pw3270_dbus_get_text(PW3270Dbus *object, int offset, int len, char lf, DBusGMethodInvocation *context) | |
312 | + { | |
313 | + gchar * text; | |
314 | + H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
315 | + | |
316 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
317 | + if(pw3270_dbus_check_valid_state(object,context)) | |
318 | + return; | |
319 | + | |
320 | + if(len < 0) { | |
321 | + len = lib3270_get_length(hSession); | |
322 | + } | |
323 | + | |
324 | + text = lib3270_get_string_at_address(hSession,offset,len,lf); | |
325 | + if(!text) | |
326 | + { | |
327 | + GError *error = pw3270_dbus_get_error_from_errno(errno); | |
328 | + dbus_g_method_return_error(context,error); | |
329 | + g_error_free(error); | |
330 | + } | |
331 | + else | |
332 | + { | |
333 | + gchar * utftext = g_convert_with_fallback(text,-1,"UTF-8",lib3270_get_display_charset(hSession),"?",NULL,NULL,NULL); | |
334 | + | |
335 | + lib3270_free(text); | |
336 | + | |
337 | + debug("\n%s\n",utftext); | |
338 | + | |
339 | + dbus_g_method_return(context,utftext); | |
340 | + | |
341 | + g_free(utftext); | |
342 | + } | |
343 | + | |
344 | + } | |
345 | + | |
346 | + void pw3270_dbus_is_connected(PW3270Dbus *object, DBusGMethodInvocation *context) | |
347 | + { | |
348 | + trace("%s object=%p context=%p connected=%s",__FUNCTION__,object,context, lib3270_is_connected(pw3270_dbus_get_session_handle(object)) ? "Yes" : "No"); | |
349 | + dbus_g_method_return(context,lib3270_is_connected(pw3270_dbus_get_session_handle(object))); | |
350 | + } | |
351 | + | |
352 | + void pw3270_dbus_is_ready(PW3270Dbus *object, DBusGMethodInvocation *context) | |
353 | + { | |
354 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
355 | + dbus_g_method_return(context,lib3270_is_ready(pw3270_dbus_get_session_handle(object))); | |
356 | + } | |
357 | + | |
358 | + void pw3270_dbus_in_tn3270_e(PW3270Dbus *object, DBusGMethodInvocation *context) | |
359 | + { | |
360 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
361 | + dbus_g_method_return(context,lib3270_in_tn3270e(pw3270_dbus_get_session_handle(object))); | |
362 | + } | |
363 | + | |
364 | + void pw3270_dbus_wait_for_ready(PW3270Dbus *object, int timeout, DBusGMethodInvocation *context) | |
365 | + { | |
366 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
367 | + dbus_g_method_return(context,lib3270_wait_for_ready(pw3270_dbus_get_session_handle(object),timeout)); | |
368 | + } | |
369 | + | |
370 | + void pw3270_dbus_set_cursor_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context) | |
371 | + { | |
372 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
373 | + dbus_g_method_return(context,lib3270_set_cursor_position(pw3270_dbus_get_session_handle(object),row,col)); | |
374 | + } | |
375 | + | |
376 | + void pw3270_dbus_set_cursor_address(PW3270Dbus *object, int addr, DBusGMethodInvocation *context) | |
377 | + { | |
378 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
379 | + dbus_g_method_return(context,lib3270_set_cursor_address(pw3270_dbus_get_session_handle(object),addr)); | |
380 | + } | |
381 | + | |
382 | + void pw3270_dbus_get_cursor_address(PW3270Dbus *object, DBusGMethodInvocation *context) | |
383 | + { | |
384 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
385 | + dbus_g_method_return(context,lib3270_get_cursor_address(pw3270_dbus_get_session_handle(object))); | |
386 | + } | |
387 | + | |
388 | + void pw3270_dbus_get_screen_width(PW3270Dbus *object, DBusGMethodInvocation *context) | |
389 | + { | |
390 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
391 | + dbus_g_method_return(context,lib3270_get_width(pw3270_dbus_get_session_handle(object))); | |
392 | + } | |
393 | + | |
394 | + void pw3270_dbus_get_screen_height(PW3270Dbus *object, DBusGMethodInvocation *context) | |
395 | + { | |
396 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
397 | + dbus_g_method_return(context,lib3270_get_height(pw3270_dbus_get_session_handle(object))); | |
398 | + } | |
399 | + | |
400 | + void pw3270_dbus_get_screen_length(PW3270Dbus *object, DBusGMethodInvocation *context) | |
401 | + { | |
402 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
403 | + dbus_g_method_return(context,lib3270_get_width(pw3270_dbus_get_session_handle(object))); | |
404 | + } | |
405 | + | |
406 | + void pw3270_dbus_set_toggle(PW3270Dbus *object, int id, int value, DBusGMethodInvocation *context) | |
407 | + { | |
408 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
409 | + dbus_g_method_return(context,lib3270_set_toggle(pw3270_dbus_get_session_handle(object),(LIB3270_TOGGLE) id,value)); | |
410 | + } | |
411 | + | |
412 | +void pw3270_dbus_cmp_text_at(PW3270Dbus *object, int row, int col, const gchar *utftext, char lf, DBusGMethodInvocation *context) | |
413 | +{ | |
414 | + gchar * text; | |
415 | + H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
416 | + | |
417 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
418 | + if(pw3270_dbus_check_valid_state(object,context)) | |
419 | + return; | |
420 | + | |
421 | + text = g_convert_with_fallback(utftext,-1,lib3270_get_display_charset(hSession),"UTF-8","?",NULL,NULL,NULL); | |
422 | + | |
423 | + dbus_g_method_return(context,lib3270_cmp_text_at(hSession,row,col,text,lf)); | |
424 | + | |
425 | + g_free(text); | |
426 | +} | |
427 | + | |
428 | +void pw3270_dbus_pf_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context) | |
429 | +{ | |
430 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
431 | + if(pw3270_dbus_check_valid_state(object,context)) | |
432 | + return; | |
433 | + dbus_g_method_return(context,lib3270_pfkey(pw3270_dbus_get_session_handle(object),key)); | |
434 | +} | |
435 | + | |
436 | +void pw3270_dbus_pa_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context) | |
437 | +{ | |
438 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
439 | + if(pw3270_dbus_check_valid_state(object,context)) | |
440 | + return; | |
441 | + dbus_g_method_return(context,lib3270_pakey(pw3270_dbus_get_session_handle(object),key)); | |
442 | +} | |
443 | + | |
444 | + void pw3270_dbus_get_field_start(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
445 | + { | |
446 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
447 | + dbus_g_method_return(context,lib3270_get_field_start(pw3270_dbus_get_session_handle(object),baddr)); | |
448 | + } | |
449 | + | |
450 | + void pw3270_dbus_get_field_length(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
451 | + { | |
452 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
453 | + dbus_g_method_return(context,lib3270_get_field_len(pw3270_dbus_get_session_handle(object),baddr)); | |
454 | + } | |
455 | + | |
456 | + void pw3270_dbus_get_next_unprotected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
457 | + { | |
458 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
459 | + dbus_g_method_return(context,lib3270_get_next_unprotected(pw3270_dbus_get_session_handle(object),baddr)); | |
460 | + } | |
461 | + | |
462 | + void pw3270_dbus_get_is_protected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
463 | + { | |
464 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
465 | + dbus_g_method_return(context,lib3270_get_is_protected(pw3270_dbus_get_session_handle(object),baddr)); | |
466 | + } | |
467 | + | |
468 | + void pw3270_dbus_get_is_protected_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context) | |
469 | + { | |
470 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
471 | + dbus_g_method_return(context,lib3270_get_is_protected_at(pw3270_dbus_get_session_handle(object),row,col)); | |
472 | + } | |
473 | + | |
474 | + void pw3270_dbus_action(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context) | |
475 | + { | |
476 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
477 | + dbus_g_method_return(context,lib3270_action(pw3270_dbus_get_session_handle(object),text)); | |
478 | + } | |
479 | + | |
480 | + void pw3270_dbus_get_clipboard(PW3270Dbus *object, DBusGMethodInvocation *context) | |
481 | + { | |
482 | + gchar *text; | |
483 | + | |
484 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
485 | + | |
486 | + if(pw3270_dbus_check_valid_state(object,context)) | |
487 | + return; | |
488 | + | |
489 | + text = gtk_clipboard_wait_for_text(gtk_widget_get_clipboard(pw3270_get_toplevel(),GDK_SELECTION_CLIPBOARD)); | |
490 | + | |
491 | + trace("Clipboard:\n%s\n",text); | |
492 | + | |
493 | + if(!text) | |
494 | + { | |
495 | + GError *error = pw3270_dbus_get_error_from_errno(ENOENT); | |
496 | + dbus_g_method_return_error(context,error); | |
497 | + g_error_free(error); | |
498 | + } | |
499 | + else | |
500 | + { | |
501 | + dbus_g_method_return(context,text); | |
502 | + g_free(text); | |
503 | + } | |
504 | +} | |
505 | + | |
506 | +void pw3270_dbus_set_clipboard(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context) | |
507 | +{ | |
508 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
509 | + gtk_clipboard_set_text(gtk_widget_get_clipboard(pw3270_get_toplevel(),GDK_SELECTION_CLIPBOARD),(gchar *) text, -1); | |
510 | + dbus_g_method_return(context,0); | |
511 | +} | |
512 | + | |
513 | +void pw3270_dbus_set_script(PW3270Dbus *object, const gchar G_GNUC_UNUSED(*text), int mode, DBusGMethodInvocation *context) | |
514 | +{ | |
515 | + GtkWidget *widget = pw3270_get_terminal_widget(NULL); | |
516 | + | |
517 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
518 | + | |
519 | + if(!widget) | |
520 | + { | |
521 | + GError *error = pw3270_dbus_get_error_from_errno(EINVAL); | |
522 | + dbus_g_method_return_error(context,error); | |
523 | + g_error_free(error); | |
524 | + return; | |
525 | + } | |
526 | + | |
527 | + dbus_g_method_return(context,v3270_set_script(widget,mode == 0 ? 0 : 'S')); | |
528 | +} | |
529 | + | |
530 | +void pw3270_dbus_show_popup(PW3270Dbus *object, int id, const gchar *title, const gchar *msg, const gchar *text, DBusGMethodInvocation *context) | |
531 | +{ | |
532 | + lib3270_popup_dialog(pw3270_dbus_get_session_handle(object), (LIB3270_NOTIFY) id , title, msg, "%s", text); | |
533 | + dbus_g_method_return(context,0); | |
534 | +} | |
535 | + | |
536 | +void pw3270_dbus_get_host_charset(PW3270Dbus *object, DBusGMethodInvocation *context) | |
537 | +{ | |
538 | + dbus_g_method_return(context,lib3270_get_host_charset(pw3270_dbus_get_session_handle(object))); | |
539 | +} | |
540 | + | |
541 | +void pw3270_dbus_get_display_charset(PW3270Dbus G_GNUC_UNUSED(*object), DBusGMethodInvocation *context) | |
542 | +{ | |
543 | + // Allways return UTF-8 to avoid double conversion | |
544 | + dbus_g_method_return(context,"UTF-8"); | |
545 | +} | |
546 | + | |
547 | +void pw3270_dbus_set_host_charset(PW3270Dbus *object, const gchar *charset, DBusGMethodInvocation *context) | |
548 | +{ | |
549 | + dbus_g_method_return(context,lib3270_set_host_charset(pw3270_dbus_get_session_handle(object),charset)); | |
550 | +} | |
551 | + | |
552 | +void pw3270_dbus_erase_eof(PW3270Dbus *object, DBusGMethodInvocation *context) | |
553 | +{ | |
554 | + trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
555 | + dbus_g_method_return(context,lib3270_eraseeof(pw3270_dbus_get_session_handle(object))); | |
556 | +} | |
557 | + | |
558 | +void pw3270_dbus_print(PW3270Dbus *object, DBusGMethodInvocation *context) | |
559 | +{ | |
560 | + dbus_g_method_return(context,lib3270_print_all(pw3270_dbus_get_session_handle(object))); | |
561 | +} | |
562 | + | |
563 | +void pw3270_dbus_set_unlock_delay(PW3270Dbus *object, int value, DBusGMethodInvocation *context) | |
564 | +{ | |
565 | + lib3270_set_unlock_delay(pw3270_dbus_get_session_handle(object),(unsigned short) value); | |
566 | + dbus_g_method_return(context,0); | |
567 | +} | |
568 | + | |
569 | + | |
570 | +void pw3270_dbus_ebc2asc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context) | |
571 | +{ | |
572 | + int sz = strlen(from); | |
573 | + | |
574 | + if(sz > 0) | |
575 | + { | |
576 | + unsigned char buffer[sz+1]; | |
577 | + memcpy(buffer,from,sz); | |
578 | + dbus_g_method_return(context,lib3270_ebc2asc(pw3270_dbus_get_session_handle(object),buffer,sz)); | |
579 | + return; | |
580 | + } | |
581 | + | |
582 | + dbus_g_method_return(context,""); | |
583 | + | |
584 | +} | |
585 | + | |
586 | +void pw3270_dbus_asc2ebc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context) | |
587 | +{ | |
588 | + int sz = strlen(from); | |
589 | + | |
590 | + if(sz > 0) | |
591 | + { | |
592 | + unsigned char buffer[sz+1]; | |
593 | + memcpy(buffer,from,sz); | |
594 | + dbus_g_method_return(context,lib3270_asc2ebc(pw3270_dbus_get_session_handle(object),buffer,sz)); | |
595 | + return; | |
596 | + } | |
597 | + | |
598 | + dbus_g_method_return(context,""); | |
599 | + | |
600 | +} | |
601 | + | |
602 | +void pw3270_dbus_filetransfer(PW3270Dbus *object, const gchar *local, const gchar *remote, int flags, int lrecl, int blksize, int primspace, int secspace, int dft, DBusGMethodInvocation *context) | |
603 | +{ | |
604 | + /* | |
605 | + dbus_g_method_return(context, | |
606 | + v3270_transfer_file( | |
607 | + v3270_get_default_widget(), | |
608 | + (LIB3270_FT_OPTION) flags, | |
609 | + local, | |
610 | + remote, | |
611 | + lrecl, | |
612 | + blksize, | |
613 | + primspace, | |
614 | + secspace, | |
615 | + dft | |
616 | + )); | |
617 | + */ | |
618 | + return; | |
619 | +} | |
620 | + | ... | ... |
... | ... | @@ -0,0 +1,179 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | + * | |
21 | + * Este programa está nomeado como main.c e possui - linhas de código. | |
22 | + * | |
23 | + * Referências: | |
24 | + * | |
25 | + * https://github.com/fbuihuu/samples-dbus/blob/master/dbus-server.c | |
26 | + * | |
27 | + * Contatos: | |
28 | + * | |
29 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
30 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
31 | + * | |
32 | + */ | |
33 | + | |
34 | +#include <glib.h> | |
35 | +#include <dbus/dbus.h> | |
36 | +#include <dbus/dbus-glib-lowlevel.h> | |
37 | +#include <dbus/dbus-glib.h> | |
38 | + | |
39 | +#include <v3270.h> | |
40 | +#include <pw3270.h> | |
41 | +#include <pw3270/plugin.h> | |
42 | + | |
43 | +#include "service.h" | |
44 | +#include "dbus-glue.h" | |
45 | + | |
46 | +#include <gtk/gtk.h> | |
47 | + | |
48 | +/*---[ Globals ]---------------------------------------------------------------------------------*/ | |
49 | + | |
50 | + static DBusGConnection * connection = NULL; | |
51 | + static DBusGProxy * proxy = NULL; | |
52 | + static gchar * service_name = NULL; | |
53 | + | |
54 | + | |
55 | +/*---[ Implement ]-------------------------------------------------------------------------------*/ | |
56 | + | |
57 | + LIB3270_EXPORT int pw3270_plugin_start(GtkWidget G_GNUC_UNUSED(*window), GtkWidget *terminal) | |
58 | + { | |
59 | + GError * error = NULL; | |
60 | + guint result; | |
61 | + char session_id = 0; | |
62 | + char id = 'a'; | |
63 | + const gchar * name = "pw3270"; | |
64 | + | |
65 | + connection = dbus_g_bus_get_private(DBUS_BUS_SESSION, g_main_context_default(), &error); | |
66 | + if(error) | |
67 | + { | |
68 | + GtkWidget *dialog = gtk_message_dialog_new( | |
69 | + GTK_WINDOW(window), | |
70 | + (GtkDialogFlags) (GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT), | |
71 | + GTK_MESSAGE_ERROR, | |
72 | + GTK_BUTTONS_OK, | |
73 | + _( "Can't connect to DBUS server" )); | |
74 | + | |
75 | + gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog),"%s",error->message); | |
76 | + | |
77 | + g_message("Error \"%s\" getting session dbus",error->message); | |
78 | + | |
79 | + g_error_free(error); | |
80 | + | |
81 | + gtk_dialog_run(GTK_DIALOG(dialog)); | |
82 | + gtk_widget_destroy(dialog); | |
83 | + | |
84 | + return -1; | |
85 | + } | |
86 | + | |
87 | + proxy = dbus_g_proxy_new_for_name(connection,DBUS_SERVICE_DBUS,DBUS_PATH_DBUS,DBUS_INTERFACE_DBUS); | |
88 | + | |
89 | + for(id='a'; id < 'z' && !error && !service_name; id++) | |
90 | + { | |
91 | + gboolean has_owner = FALSE; | |
92 | + | |
93 | + service_name = g_strdup_printf("br.com.bb.%s.%c",name,(int) id); | |
94 | + | |
95 | + org_freedesktop_DBus_name_has_owner(proxy, service_name, &has_owner, NULL); | |
96 | + | |
97 | + if(has_owner) | |
98 | + { | |
99 | + trace("Service \"%s\" has owner",service_name) | |
100 | + g_free(service_name); | |
101 | + service_name = NULL; | |
102 | + } | |
103 | + else | |
104 | + { | |
105 | + session_id = id; | |
106 | + g_message("DBUS service name is %s",service_name); | |
107 | + org_freedesktop_DBus_request_name(proxy, service_name, DBUS_NAME_FLAG_DO_NOT_QUEUE, &result, &error); | |
108 | + } | |
109 | + } | |
110 | + | |
111 | + if(error) | |
112 | + { | |
113 | + GtkWidget *dialog = gtk_message_dialog_new( | |
114 | + GTK_WINDOW(window), | |
115 | + (GtkDialogFlags) (GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT), | |
116 | + GTK_MESSAGE_ERROR, | |
117 | + GTK_BUTTONS_OK, | |
118 | + _( "Can't get DBUS object name" )); | |
119 | + | |
120 | + gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog),"%s",error->message); | |
121 | + | |
122 | + g_message("Error \"%s\" requesting DBUS name",error->message); | |
123 | + | |
124 | + g_error_free(error); | |
125 | + | |
126 | + gtk_dialog_run(GTK_DIALOG(dialog)); | |
127 | + gtk_widget_destroy(dialog); | |
128 | + | |
129 | + return -1; | |
130 | + } | |
131 | + | |
132 | + if(session_id) | |
133 | + { | |
134 | + g_autofree gchar * path = g_strdup_printf("/br/com/bb/%s",name); | |
135 | + g_autofree gchar * session = g_strdup_printf("%s:%c",name,g_ascii_toupper(session_id)); | |
136 | + | |
137 | + // pw3270_set_session_name(window,session); | |
138 | + v3270_set_session_name(terminal,session); | |
139 | + | |
140 | + g_message("DBUS service path is %s, session name is %s",path,session); | |
141 | + | |
142 | + pw3270_dbus_register_object(connection,proxy,PW3270_TYPE_DBUS,&dbus_glib_pw3270_dbus_object_info,path); | |
143 | + | |
144 | + } | |
145 | + | |
146 | + return 0; | |
147 | + } | |
148 | + | |
149 | + LIB3270_EXPORT int pw3270_plugin_stop(GtkWidget G_GNUC_UNUSED(*window), GtkWidget G_GNUC_UNUSED(*terminal)) | |
150 | + { | |
151 | + if(proxy) | |
152 | + { | |
153 | + debug("%s: Releasing proxy",__FUNCTION__); | |
154 | + g_object_unref(proxy); | |
155 | + proxy = NULL; | |
156 | + } | |
157 | + | |
158 | + if(service_name) | |
159 | + { | |
160 | + g_free(service_name); | |
161 | + service_name = NULL; | |
162 | + } | |
163 | + return 0; | |
164 | + } | |
165 | + | |
166 | + void pw3270_dbus_quit(PW3270Dbus G_GNUC_UNUSED(*object), DBusGMethodInvocation *context) | |
167 | + { | |
168 | + gtk_main_quit(); | |
169 | + dbus_g_method_return(context,0); | |
170 | + } | |
171 | + | |
172 | + H3270 * pw3270_dbus_get_session_handle(PW3270Dbus G_GNUC_UNUSED(*object)) | |
173 | + { | |
174 | + debug("%s=%p",__FUNCTION__,lib3270_get_default_session_handle()); | |
175 | + return lib3270_get_default_session_handle(); | |
176 | + } | |
177 | + | |
178 | + | |
179 | + | ... | ... |
... | ... | @@ -0,0 +1,47 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | + * | |
21 | + * Este programa está nomeado como misc.c e possui - linhas de código. | |
22 | + * | |
23 | + * Contatos: | |
24 | + * | |
25 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | + * licinio@bb.com.br (Licínio Luis Branco) | |
28 | + * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | + * | |
30 | + * Referencias: | |
31 | + * | |
32 | + * https://live.gnome.org/DBusGlibBindings | |
33 | + * | |
34 | + */ | |
35 | + | |
36 | +#include "globals.h" | |
37 | + | |
38 | +/*---[ Implement ]-------------------------------------------------------------------------------*/ | |
39 | + | |
40 | +gpointer pw3270_dbus_register_object(DBusGConnection *connection,DBusGProxy G_GNUC_UNUSED(*proxy),GType object_type,const DBusGObjectInfo *info,const gchar *path) | |
41 | +{ | |
42 | + GObject *object = G_OBJECT(g_object_new(object_type, NULL)); | |
43 | + dbus_g_object_type_install_info (object_type, info); | |
44 | + dbus_g_connection_register_g_object (connection, path, object); | |
45 | + return object; | |
46 | +} | |
47 | + | ... | ... |
... | ... | @@ -0,0 +1,138 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | + * | |
21 | + * Este programa está nomeado como service.h e possui - linhas de código. | |
22 | + * | |
23 | + * Contatos: | |
24 | + * | |
25 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | + * licinio@bb.com.br (Licínio Luis Branco) | |
28 | + * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | + * | |
30 | + */ | |
31 | + | |
32 | +#ifndef _PW3270_DBUS_SERVICE_H | |
33 | + | |
34 | + #define _PW3270_DBUS_SERVICE_H 1 | |
35 | + | |
36 | + #define ENABLE_NLS | |
37 | + #define GETTEXT_PACKAGE PACKAGE_NAME | |
38 | + | |
39 | + #include "globals.h" | |
40 | + | |
41 | + #define PW3270_TYPE_DBUS (pw3270_dbus_get_type ()) | |
42 | + #define PW3270_DBUS(object) (G_TYPE_CHECK_INSTANCE_CAST ((object), PW3270_TYPE_DBUS, PW3270Dbus)) | |
43 | + #define PW3270_DBUS_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST ((klass), PW3270_TYPE_DBUS, PW3270DbusClass)) | |
44 | + #define IS_PW3270_DBUS(object) (G_TYPE_CHECK_INSTANCE_TYPE ((object), PW3270_TYPE_DBUS)) | |
45 | + #define IS_PW3270_DBUS_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), PW3270_TYPE_DBUS)) | |
46 | + #define PW3270_DBUS_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS ((obj), PW3270_TYPE_DBUS, PW3270DbusClass)) | |
47 | + | |
48 | + G_BEGIN_DECLS | |
49 | + | |
50 | + typedef struct _PW3270Dbus PW3270Dbus; | |
51 | + typedef struct _PW3270DbusClass PW3270DbusClass; | |
52 | + | |
53 | + struct _PW3270Dbus | |
54 | + { | |
55 | + GObject parent; | |
56 | + }; | |
57 | + | |
58 | + struct _PW3270DbusClass | |
59 | + { | |
60 | + GObjectClass parent; | |
61 | + }; | |
62 | + | |
63 | + PW3270Dbus * pw3270_dbus_new (void); | |
64 | + GType pw3270_dbus_get_type (void); | |
65 | + | |
66 | + void pw3270_dbus_get_revision(PW3270Dbus *object, DBusGMethodInvocation *context); | |
67 | + void pw3270_dbus_quit(PW3270Dbus *object, DBusGMethodInvocation *context); | |
68 | + void pw3270_dbus_connect(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context); | |
69 | + void pw3270_dbus_get_ur_l(PW3270Dbus *object, DBusGMethodInvocation *context); | |
70 | + void pw3270_dbus_set_ur_l(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context); | |
71 | + void pw3270_dbus_disconnect(PW3270Dbus *object, DBusGMethodInvocation *context); | |
72 | + | |
73 | + void pw3270_dbus_get_message_id(PW3270Dbus *object, DBusGMethodInvocation *context); | |
74 | + void pw3270_dbus_get_connection_state(PW3270Dbus *object, DBusGMethodInvocation *context); | |
75 | + void pw3270_dbus_get_secure_state(PW3270Dbus *object, DBusGMethodInvocation *context); | |
76 | + | |
77 | + void pw3270_dbus_get_screen_contents(PW3270Dbus *object, DBusGMethodInvocation *context); | |
78 | + H3270 * pw3270_dbus_get_session_handle(PW3270Dbus *object); | |
79 | + GError * pw3270_dbus_get_error_from_errno(int code); | |
80 | + | |
81 | + void pw3270_dbus_is_connected(PW3270Dbus *object, DBusGMethodInvocation *context); | |
82 | + void pw3270_dbus_is_ready(PW3270Dbus *object, DBusGMethodInvocation *context); | |
83 | + void pw3270_dbus_in_tn3270_e(PW3270Dbus *object, DBusGMethodInvocation *context); | |
84 | + | |
85 | + void pw3270_dbus_set_cursor_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context); | |
86 | + void pw3270_dbus_set_cursor_address(PW3270Dbus *object, int addr, DBusGMethodInvocation *context); | |
87 | + void pw3270_dbus_get_cursor_address(PW3270Dbus *object, DBusGMethodInvocation *context); | |
88 | + | |
89 | + void pw3270_dbus_get_screen_width(PW3270Dbus *object, DBusGMethodInvocation *context); | |
90 | + void pw3270_dbus_get_screen_height(PW3270Dbus *object, DBusGMethodInvocation *context); | |
91 | + void pw3270_dbus_get_screen_length(PW3270Dbus *object, DBusGMethodInvocation *context); | |
92 | + | |
93 | + void pw3270_dbus_set_toggle(PW3270Dbus *object, int id, int value, DBusGMethodInvocation *context); | |
94 | + | |
95 | + void pw3270_dbus_wait_for_ready(PW3270Dbus *object, int timeout, DBusGMethodInvocation *context); | |
96 | + | |
97 | + void pw3270_dbus_get_field_start(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
98 | + void pw3270_dbus_get_field_length(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
99 | + void pw3270_dbus_get_next_unprotected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
100 | + | |
101 | + void pw3270_dbus_get_is_protected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
102 | + void pw3270_dbus_get_is_protected_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context); | |
103 | + | |
104 | + void pw3270_dbus_set_script(PW3270Dbus *object, const gchar *text, int mode, DBusGMethodInvocation *context); | |
105 | + | |
106 | + void pw3270_dbus_show_popup(PW3270Dbus *object, int id, const gchar *title, const gchar *msg, const gchar *text, DBusGMethodInvocation *context); | |
107 | + | |
108 | + void pw3270_dbus_action(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context); | |
109 | + | |
110 | + // Actions | |
111 | + void pw3270_dbus_enter(PW3270Dbus *object, DBusGMethodInvocation *context); | |
112 | + void pw3270_dbus_pf_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context); | |
113 | + void pw3270_dbus_pa_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context); | |
114 | + void pw3270_dbus_set_text_at(PW3270Dbus *object, int row, int col, const gchar *text, DBusGMethodInvocation *context); | |
115 | + void pw3270_dbus_get_text_at(PW3270Dbus *object, int row, int col, int len, char lf, DBusGMethodInvocation *context); | |
116 | + void pw3270_dbus_get_text(PW3270Dbus *object, int offset, int len, char lf, DBusGMethodInvocation *context); | |
117 | + void pw3270_dbus_cmp_text_at(PW3270Dbus *object, int row, int col, const gchar *text, char lf, DBusGMethodInvocation *context); | |
118 | + void pw3270_dbus_input(PW3270Dbus *object, const gchar *utftext, DBusGMethodInvocation *context); | |
119 | + | |
120 | + void pw3270_dbus_set_clipboard(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context); | |
121 | + void pw3270_dbus_get_clipboard(PW3270Dbus *object, DBusGMethodInvocation *context); | |
122 | + | |
123 | + void pw3270_dbus_get_display_charset(PW3270Dbus *object, DBusGMethodInvocation *context); | |
124 | + void pw3270_dbus_get_host_charset(PW3270Dbus *object, DBusGMethodInvocation *context); | |
125 | + void pw3270_dbus_set_host_charset(PW3270Dbus *object, const gchar *charset, DBusGMethodInvocation *context); | |
126 | + void pw3270_dbus_erase_eof(PW3270Dbus *object, DBusGMethodInvocation *context); | |
127 | + void pw3270_dbus_print(PW3270Dbus *object, DBusGMethodInvocation *context); | |
128 | + | |
129 | + void pw3270_dbus_asc2ebc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context); | |
130 | + void pw3270_dbus_ebc2asc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context); | |
131 | + | |
132 | + void pw3270_dbus_filetransfer(PW3270Dbus *object, const gchar *local, const gchar *remote, int flags, int lrecl, int blksize, int primspace, int secspace, int dft, DBusGMethodInvocation *context); | |
133 | + | |
134 | + void pw3270_dbus_set_unlock_delay(PW3270Dbus *object, int value, DBusGMethodInvocation *context); | |
135 | + | |
136 | + G_END_DECLS | |
137 | + | |
138 | +#endif // _PW3270_DBUS_SERVICE_H | ... | ... |
... | ... | @@ -0,0 +1,675 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | + * | |
21 | + * Este programa está nomeado como - e possui - linhas de código. | |
22 | + * | |
23 | + * Contatos: | |
24 | + * | |
25 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | + * | |
28 | + * Agradecimento: | |
29 | + * | |
30 | + * Hélio Passos | |
31 | + * | |
32 | + */ | |
33 | + | |
34 | + #include "private.h" | |
35 | + | |
36 | +#ifdef _WIN32 | |
37 | + #include <windows.h> | |
38 | +#else | |
39 | + #error HLLAPI is designed for windows. | |
40 | +#endif // _WIN32 | |
41 | + | |
42 | + #include <pw3270/plugin.h> | |
43 | + #include <v3270.h> | |
44 | + #include <pw3270/ipcpackets.h> | |
45 | + #include <lib3270/actions.h> | |
46 | + #include <lib3270/charset.h> | |
47 | + | |
48 | +/*--[ Defines ]--------------------------------------------------------------------------------------*/ | |
49 | + | |
50 | + #pragma pack(1) | |
51 | + | |
52 | + enum PIPE_STATE | |
53 | + { | |
54 | + PIPE_STATE_WAITING, | |
55 | + PIPE_STATE_READ, | |
56 | + PIPE_STATE_PENDING_READ, | |
57 | + PIPE_STATE_UNDEFINED | |
58 | + }; | |
59 | + | |
60 | + typedef struct _pipe_source | |
61 | + { | |
62 | + GSource gsrc; | |
63 | + HANDLE hPipe; | |
64 | + | |
65 | + enum PIPE_STATE state; | |
66 | + | |
67 | + OVERLAPPED overlap; | |
68 | + unsigned char buffer[PIPE_BUFFER_LENGTH+1]; | |
69 | + } pipe_source; | |
70 | + | |
71 | + #pragma pack() | |
72 | + | |
73 | + | |
74 | +/*--[ Globals ]--------------------------------------------------------------------------------------*/ | |
75 | + | |
76 | +// static const gchar control_char = '@'; | |
77 | + | |
78 | +/*--[ Implement ]------------------------------------------------------------------------------------*/ | |
79 | + | |
80 | + static void IO_accept(pipe_source *source) | |
81 | + { | |
82 | + set_active(FALSE); | |
83 | + | |
84 | + if(ConnectNamedPipe(source->hPipe,&source->overlap)) | |
85 | + { | |
86 | + popup_lasterror("%s",_( "Error in ConnectNamedPipe" )); | |
87 | + return; | |
88 | + } | |
89 | + | |
90 | + switch(GetLastError()) | |
91 | + { | |
92 | + // The overlapped connection in progress. | |
93 | + case ERROR_IO_PENDING: | |
94 | + // trace("%s: ERROR_IO_PENDING",__FUNCTION__); | |
95 | + source->state = PIPE_STATE_WAITING; | |
96 | + break; | |
97 | + | |
98 | + // Client is already connected, so signal an event. | |
99 | + case ERROR_PIPE_CONNECTED: | |
100 | + trace("%s: ERROR_PIPE_CONNECTED",__FUNCTION__); | |
101 | + set_active(TRUE); | |
102 | + SetEvent(source->overlap.hEvent); | |
103 | + break; | |
104 | + | |
105 | + // If an error occurs during the connect operation... | |
106 | + default: | |
107 | + popup_lasterror("%s", _( "ConnectNamedPipe failed" )); | |
108 | + } | |
109 | + | |
110 | + } | |
111 | + | |
112 | + static gboolean IO_prepare(GSource *source, gint *timeout) | |
113 | + { | |
114 | + /* | |
115 | + * Called before all the file descriptors are polled. | |
116 | + * If the source can determine that it is ready here | |
117 | + * (without waiting for the results of the poll() call) | |
118 | + * it should return TRUE. | |
119 | + * | |
120 | + * It can also return a timeout_ value which should be the maximum | |
121 | + * timeout (in milliseconds) which should be passed to the poll() call. | |
122 | + * The actual timeout used will be -1 if all sources returned -1, | |
123 | + * or it will be the minimum of all the timeout_ values | |
124 | + * returned which were >= 0. | |
125 | + * | |
126 | + */ | |
127 | + if(WaitForSingleObject(((pipe_source *) source)->overlap.hEvent,0) == WAIT_OBJECT_0) | |
128 | + return TRUE; | |
129 | + | |
130 | + *timeout = 10; | |
131 | + return FALSE; | |
132 | + } | |
133 | + | |
134 | + static gboolean IO_check(GSource *source) | |
135 | + { | |
136 | + /* | |
137 | + * Called after all the file descriptors are polled. | |
138 | + * The source should return TRUE if it is ready to be dispatched. | |
139 | + * Note that some time may have passed since the previous prepare | |
140 | + * function was called, so the source should be checked again here. | |
141 | + * | |
142 | + */ | |
143 | + if(WaitForSingleObject(((pipe_source *) source)->overlap.hEvent,0) == WAIT_OBJECT_0) | |
144 | + return TRUE; | |
145 | + | |
146 | + return FALSE; | |
147 | + } | |
148 | + | |
149 | + static void send_text(pipe_source *source, char *text) | |
150 | + { | |
151 | + struct hllapi_packet_text *pkt; | |
152 | + DWORD szBlock; | |
153 | + int f; | |
154 | + | |
155 | + if(text) | |
156 | + { | |
157 | + szBlock = sizeof(struct hllapi_packet_text)+strlen(text); | |
158 | + pkt = (struct hllapi_packet_text *) g_malloc0(szBlock); | |
159 | + pkt->packet_id = 0; | |
160 | + strcpy(pkt->text,text); | |
161 | + lib3270_free(text); | |
162 | + } | |
163 | + else | |
164 | + { | |
165 | + szBlock = sizeof(struct hllapi_packet_text); | |
166 | + pkt = (struct hllapi_packet_text *) g_malloc0(szBlock); | |
167 | + pkt->packet_id = errno ? errno : -1; | |
168 | + } | |
169 | + | |
170 | + trace("szBlock=%d text=\"%s\"",szBlock, ( (struct hllapi_packet_text *) pkt)->text); | |
171 | + for(f=0;f< (int) szBlock;f++) | |
172 | + { | |
173 | + trace("rsp(%d)= %d \"%s\"",f,* (((char *) pkt)+f),((char *) pkt)+f); | |
174 | + } | |
175 | + | |
176 | + WriteFile(source->hPipe,pkt,szBlock,&szBlock,NULL); | |
177 | + | |
178 | + g_free(pkt); | |
179 | + } | |
180 | + | |
181 | + static void send_result(pipe_source *source, int rc) | |
182 | + { | |
183 | + struct hllapi_packet_result pkt = { rc }; | |
184 | + DWORD wrote = sizeof(pkt); | |
185 | + WriteFile(source->hPipe,&pkt,wrote,&wrote,NULL); | |
186 | + } | |
187 | + | |
188 | + static int do_file_transfer(struct hllapi_packet_file_transfer * source) | |
189 | + { | |
190 | + /* | |
191 | + const gchar * local = (const char *) source->text; | |
192 | + const gchar * remote = (const char *) (local+strlen(local)+1); | |
193 | + | |
194 | + return v3270_transfer_file( v3270_get_default_widget(), | |
195 | + (LIB3270_FT_OPTION) source->options, | |
196 | + local, | |
197 | + remote, | |
198 | + source->lrecl, | |
199 | + source->blksize, | |
200 | + source->primspace, | |
201 | + source->secspace, | |
202 | + source->dft ); | |
203 | + */ | |
204 | + return EINVAL; | |
205 | + } | |
206 | + | |
207 | + static void get_host(pipe_source *source) { | |
208 | + send_text(source,strdup(lib3270_get_url(lib3270_get_default_session_handle()))); | |
209 | + } | |
210 | + | |
211 | + static void process_input(pipe_source *source, DWORD G_GNUC_UNUSED(cbRead)) | |
212 | + { | |
213 | + const struct hllapi_packet_query * query = ((struct hllapi_packet_query *) source->buffer); | |
214 | + | |
215 | + trace("%s id=%d",__FUNCTION__,query->packet_id); | |
216 | + | |
217 | + switch(query->packet_id) | |
218 | + { | |
219 | + case HLLAPI_PACKET_CONNECT: | |
220 | + send_result(source,lib3270_reconnect( lib3270_get_default_session_handle(), | |
221 | + ((struct hllapi_packet_connect *) source->buffer)->wait)); | |
222 | + break; | |
223 | + | |
224 | + case HLLAPI_PACKET_CONNECT_URL: | |
225 | + send_result(source,lib3270_connect_url(lib3270_get_default_session_handle(),(const char *) (query+1),0)); | |
226 | + break; | |
227 | + | |
228 | + case HLLAPI_PACKET_SET_HOST: | |
229 | + send_result(source,lib3270_set_url(lib3270_get_default_session_handle(), | |
230 | + ((struct hllapi_packet_text *) source->buffer)->text)); | |
231 | + break; | |
232 | + | |
233 | + case HLLAPI_PACKET_GET_HOST: | |
234 | + get_host(source); | |
235 | + break; | |
236 | + | |
237 | + case HLLAPI_PACKET_DISCONNECT: | |
238 | + send_result(source,lib3270_disconnect(lib3270_get_default_session_handle())); | |
239 | + break; | |
240 | + | |
241 | + case HLLAPI_PACKET_IS_CONNECTED: | |
242 | + send_result(source,lib3270_in_tn3270e(lib3270_get_default_session_handle())); | |
243 | + break; | |
244 | + | |
245 | + case HLLAPI_PACKET_IS_READY: | |
246 | + send_result(source,lib3270_is_ready(lib3270_get_default_session_handle())); | |
247 | + break; | |
248 | + | |
249 | + case HLLAPI_PACKET_ENTER: | |
250 | + send_result(source,lib3270_enter(lib3270_get_default_session_handle())); | |
251 | + break; | |
252 | + | |
253 | + case HLLAPI_PACKET_PRINT: | |
254 | + send_result(source,lib3270_print_all(lib3270_get_default_session_handle())); | |
255 | + break; | |
256 | + | |
257 | + case HLLAPI_PACKET_ERASE: | |
258 | + send_result(source,lib3270_erase(lib3270_get_default_session_handle())); | |
259 | + break; | |
260 | + | |
261 | + case HLLAPI_PACKET_ERASE_EOF: | |
262 | + send_result(source,lib3270_eraseeof(lib3270_get_default_session_handle())); | |
263 | + break; | |
264 | + | |
265 | + case HLLAPI_PACKET_ERASE_EOL: | |
266 | + send_result(source,lib3270_eraseeol(lib3270_get_default_session_handle())); | |
267 | + break; | |
268 | + | |
269 | + case HLLAPI_PACKET_ERASE_INPUT: | |
270 | + send_result(source,lib3270_eraseinput(lib3270_get_default_session_handle())); | |
271 | + break; | |
272 | + | |
273 | + case HLLAPI_PACKET_PFKEY: | |
274 | + send_result(source,lib3270_pfkey( lib3270_get_default_session_handle(), | |
275 | + ((struct hllapi_packet_keycode *) source->buffer)->keycode)); | |
276 | + break; | |
277 | + | |
278 | + case HLLAPI_PACKET_PAKEY: | |
279 | + send_result(source,lib3270_pakey( lib3270_get_default_session_handle(), | |
280 | + ((struct hllapi_packet_keycode *) source->buffer)->keycode)); | |
281 | + break; | |
282 | + | |
283 | + case HLLAPI_PACKET_SET_CURSOR_POSITION: | |
284 | + send_result(source,lib3270_set_cursor_position( lib3270_get_default_session_handle(), | |
285 | + ((struct hllapi_packet_cursor *) source->buffer)->row, | |
286 | + ((struct hllapi_packet_cursor *) source->buffer)->col)); | |
287 | + break; | |
288 | + | |
289 | + case HLLAPI_PACKET_SET_TEXT_AT: | |
290 | + send_result(source,lib3270_set_text_at( lib3270_get_default_session_handle(), | |
291 | + ((struct hllapi_packet_text_at *) source->buffer)->row, | |
292 | + ((struct hllapi_packet_text_at *) source->buffer)->col, | |
293 | + (unsigned char *) ((struct hllapi_packet_text_at *) source->buffer)->text)); | |
294 | + break; | |
295 | + | |
296 | + case HLLAPI_PACKET_GET_TEXT_AT: | |
297 | + send_text(source,lib3270_get_string_at( lib3270_get_default_session_handle(), | |
298 | + ((struct hllapi_packet_at *) source->buffer)->row, | |
299 | + ((struct hllapi_packet_at *) source->buffer)->col, | |
300 | + ((struct hllapi_packet_at *) source->buffer)->len, | |
301 | + ((struct hllapi_packet_at *) source->buffer)->lf)); | |
302 | + break; | |
303 | + | |
304 | + case HLLAPI_PACKET_GET_TEXT_AT_OFFSET: | |
305 | + send_text(source,lib3270_get_string_at_address( lib3270_get_default_session_handle(), | |
306 | + ((struct hllapi_packet_query_offset *) source->buffer)->addr, | |
307 | + ((struct hllapi_packet_query_offset *) source->buffer)->len, | |
308 | + ((struct hllapi_packet_query_offset *) source->buffer)->lf)); | |
309 | + break; | |
310 | + | |
311 | + case HLLAPI_PACKET_CMP_TEXT_AT: | |
312 | + send_result(source,lib3270_cmp_text_at( lib3270_get_default_session_handle(), | |
313 | + ((struct hllapi_packet_text_at *) source->buffer)->row, | |
314 | + ((struct hllapi_packet_text_at *) source->buffer)->col, | |
315 | + ((struct hllapi_packet_text_at *) source->buffer)->text, | |
316 | + ((struct hllapi_packet_text_at *) source->buffer)->lf)); | |
317 | + break; | |
318 | + | |
319 | + case HLLAPI_PACKET_INPUT_STRING: | |
320 | + send_result(source,lib3270_input_string(lib3270_get_default_session_handle(), | |
321 | + (unsigned char *) ((struct hllapi_packet_text *) source->buffer)->text)); | |
322 | + break; | |
323 | + | |
324 | + case HLLAPI_PACKET_EMULATE_INPUT: | |
325 | + send_result(source,lib3270_emulate_input(lib3270_get_default_session_handle(), | |
326 | + (const char *) ((struct hllapi_packet_emulate_input *) source->buffer)->text, | |
327 | + (int) ((struct hllapi_packet_emulate_input *) source->buffer)->len, | |
328 | + (int) ((struct hllapi_packet_emulate_input *) source->buffer)->pasting)); | |
329 | + break; | |
330 | + | |
331 | + case HLLAPI_PACKET_SET_CURSOR: | |
332 | + send_result(source,lib3270_set_cursor_address(lib3270_get_default_session_handle(), | |
333 | + ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
334 | + break; | |
335 | + | |
336 | + case HLLAPI_PACKET_GET_CURSOR: | |
337 | + send_result(source,lib3270_get_cursor_address(lib3270_get_default_session_handle())); | |
338 | + break; | |
339 | + | |
340 | + case HLLAPI_PACKET_GET_WIDTH: | |
341 | + send_result(source,lib3270_get_width(lib3270_get_default_session_handle())); | |
342 | + break; | |
343 | + | |
344 | + case HLLAPI_PACKET_GET_HEIGHT: | |
345 | + send_result(source,lib3270_get_height(lib3270_get_default_session_handle())); | |
346 | + break; | |
347 | + | |
348 | + case HLLAPI_PACKET_GET_LENGTH: | |
349 | + send_result(source,lib3270_get_length(lib3270_get_default_session_handle())); | |
350 | + break; | |
351 | + | |
352 | + case HLLAPI_PACKET_GET_PROGRAM_MESSAGE: | |
353 | + send_result(source,lib3270_get_program_message(lib3270_get_default_session_handle())); | |
354 | + break; | |
355 | + | |
356 | + case HLLAPI_PACKET_GET_SSL_STATE: | |
357 | + send_result(source,lib3270_get_secure(lib3270_get_default_session_handle())); | |
358 | + break; | |
359 | + | |
360 | + case HLLAPI_PACKET_SET_UNLOCK_DELAY: | |
361 | + lib3270_set_unlock_delay(lib3270_get_default_session_handle(),(unsigned short) ((struct hllapi_packet_set_int *) source->buffer)->value); | |
362 | + send_result(source,0); | |
363 | + break; | |
364 | + | |
365 | + case HLLAPI_PACKET_SET_TOGGLE: | |
366 | + send_result(source,lib3270_set_toggle(lib3270_get_default_session_handle(), | |
367 | + (LIB3270_TOGGLE) ((struct hllapi_packet_set *) source->buffer)->id, | |
368 | + ((struct hllapi_packet_set *) source->buffer)->value)); | |
369 | + break; | |
370 | + | |
371 | + case HLLAPI_PACKET_FIELD_START: | |
372 | + send_result(source,lib3270_get_field_start(lib3270_get_default_session_handle(), | |
373 | + ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
374 | + break; | |
375 | + | |
376 | + | |
377 | + case HLLAPI_PACKET_FIELD_LEN: | |
378 | + send_result(source,lib3270_get_field_len(lib3270_get_default_session_handle(), | |
379 | + ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
380 | + break; | |
381 | + | |
382 | + case HLLAPI_PACKET_NEXT_UNPROTECTED: | |
383 | + send_result(source,lib3270_get_next_unprotected(lib3270_get_default_session_handle(), | |
384 | + ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
385 | + break; | |
386 | + | |
387 | + case HLLAPI_PACKET_IS_PROTECTED: | |
388 | + send_result(source,lib3270_get_is_protected(lib3270_get_default_session_handle(), | |
389 | + ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
390 | + break; | |
391 | + | |
392 | + case HLLAPI_PACKET_IS_PROTECTED_AT: | |
393 | + send_result(source,lib3270_get_is_protected_at( lib3270_get_default_session_handle(), | |
394 | + ((struct hllapi_packet_query_at *) source->buffer)->row, | |
395 | + ((struct hllapi_packet_query_at *) source->buffer)->col)); | |
396 | + break; | |
397 | + | |
398 | + case HLLAPI_PACKET_QUIT: | |
399 | + gtk_main_quit(); | |
400 | + send_result(source,0); | |
401 | + break; | |
402 | + | |
403 | + case HLLAPI_PACKET_SET_HOST_CHARSET: | |
404 | + send_result(source,lib3270_set_host_charset( lib3270_get_default_session_handle(), | |
405 | + (const char *) ((struct hllapi_packet_set_text *) source->buffer)->text)); | |
406 | + break; | |
407 | + | |
408 | + case HLLAPI_PACKET_ASC2EBC: | |
409 | + send_text(source,(char *) lib3270_asc2ebc( | |
410 | + lib3270_get_default_session_handle(), | |
411 | + (unsigned char *) ((struct hllapi_packet_set_text *) source->buffer)->text,-1 | |
412 | + )); | |
413 | + break; | |
414 | + | |
415 | + case HLLAPI_PACKET_EBC2ASC: | |
416 | + send_text(source,(char *) lib3270_ebc2asc( | |
417 | + lib3270_get_default_session_handle(), | |
418 | + (unsigned char *) ((struct hllapi_packet_set_text *) source->buffer)->text,-1 | |
419 | + )); | |
420 | + break; | |
421 | + | |
422 | + case HLLAPI_PACKET_FILE_TRANSFER: | |
423 | + send_result(source,do_file_transfer((struct hllapi_packet_file_transfer *) source)); | |
424 | + break; | |
425 | + | |
426 | + case HLLAPI_PACKET_GET_HOST_CHARSET: | |
427 | + trace("%s","HLLAPI_PACKET_GET_HOST_CHARSET"); | |
428 | + send_text(source,(char *) lib3270_get_host_charset(lib3270_get_default_session_handle())); | |
429 | + break; | |
430 | + | |
431 | + case HLLAPI_PACKET_ACTION: | |
432 | + send_result(source,lib3270_action(lib3270_get_default_session_handle(), | |
433 | + (const char *) ((struct hllapi_packet_text *) source->buffer)->text)); | |
434 | + break; | |
435 | + | |
436 | + | |
437 | + default: | |
438 | + send_result(source, EINVAL); | |
439 | + g_message("Invalid remote request (id=%d)",source->buffer[0]); | |
440 | + } | |
441 | + | |
442 | + } | |
443 | + | |
444 | + static void read_input_pipe(pipe_source *source) | |
445 | + { | |
446 | + DWORD cbRead = 0; | |
447 | + | |
448 | + if(ReadFile(source->hPipe,source->buffer,PIPE_BUFFER_LENGTH,&cbRead,&source->overlap) && cbRead > 0) | |
449 | + process_input(source,cbRead); | |
450 | + | |
451 | + // The read operation is still pending. | |
452 | + switch(GetLastError()) | |
453 | + { | |
454 | + case 0: | |
455 | + break; | |
456 | + | |
457 | + case ERROR_IO_PENDING: | |
458 | + // trace("%s: PIPE_STATE_PENDING_READ",__FUNCTION__); | |
459 | + source->state = PIPE_STATE_PENDING_READ; | |
460 | + break; | |
461 | + | |
462 | + case ERROR_PIPE_LISTENING: | |
463 | + // trace("%s: ERROR_PIPE_LISTENING",__FUNCTION__); | |
464 | + source->state = PIPE_STATE_READ; | |
465 | + break; | |
466 | + | |
467 | + case ERROR_BROKEN_PIPE: | |
468 | + trace("%s: ERROR_BROKEN_PIPE",__FUNCTION__); | |
469 | + | |
470 | + if(!DisconnectNamedPipe(source->hPipe)) | |
471 | + { | |
472 | + set_active(FALSE); | |
473 | + popup_lasterror("%s",_( "Error in DisconnectNamedPipe" )); | |
474 | + } | |
475 | + else | |
476 | + { | |
477 | + IO_accept(source); | |
478 | + } | |
479 | + break; | |
480 | + | |
481 | + case ERROR_PIPE_NOT_CONNECTED: | |
482 | + trace("%s: ERROR_PIPE_NOT_CONNECTED",__FUNCTION__); | |
483 | + set_active(FALSE); | |
484 | + break; | |
485 | + | |
486 | + default: | |
487 | + if(source->hPipe != INVALID_HANDLE_VALUE) | |
488 | + popup_lasterror("%s",_( "Error receiving message from pipe" ) ); | |
489 | + } | |
490 | + | |
491 | + } | |
492 | + | |
493 | + static gboolean IO_dispatch(GSource *source, GSourceFunc G_GNUC_UNUSED(callback), gpointer G_GNUC_UNUSED(data)) | |
494 | + { | |
495 | + /* | |
496 | + * Called to dispatch the event source, | |
497 | + * after it has returned TRUE in either its prepare or its check function. | |
498 | + * The dispatch function is passed in a callback function and data. | |
499 | + * The callback function may be NULL if the source was never connected | |
500 | + * to a callback using g_source_set_callback(). The dispatch function | |
501 | + * should call the callback function with user_data and whatever additional | |
502 | + * parameters are needed for this type of event source. | |
503 | + */ | |
504 | + BOOL fSuccess; | |
505 | + DWORD cbRead = 0; | |
506 | +// DWORD dwErr = 0; | |
507 | + | |
508 | + fSuccess = GetOverlappedResult(((pipe_source *) source)->hPipe,&((pipe_source *) source)->overlap,&cbRead,FALSE ); | |
509 | + | |
510 | + // trace("%s: source=%p data=%p Result=%s cbRead=%d",__FUNCTION__,source,data,fSuccess ? "Success" : "Unsuccess",(int) cbRead); | |
511 | + | |
512 | + switch(((pipe_source *) source)->state) | |
513 | + { | |
514 | + case PIPE_STATE_WAITING: | |
515 | + if(fSuccess) | |
516 | + { | |
517 | + trace("Pipe connected (cbRet=%d)",(int) cbRead); | |
518 | + set_active(TRUE); | |
519 | + ((pipe_source *) source)->state = PIPE_STATE_READ; | |
520 | + } | |
521 | + else | |
522 | + { | |
523 | + popup_lasterror("%s", _( "Pipe connection failed" )); | |
524 | + } | |
525 | + break; | |
526 | + | |
527 | + case PIPE_STATE_READ: | |
528 | + // trace("Reading pipe (cbRead=%d)",(int) cbRead); | |
529 | + read_input_pipe( (pipe_source *) source); | |
530 | + break; | |
531 | + | |
532 | + case PIPE_STATE_PENDING_READ: | |
533 | + if(fSuccess && cbRead > 0) | |
534 | + process_input((pipe_source *) source,cbRead); | |
535 | + ((pipe_source *) source)->state = PIPE_STATE_READ; | |
536 | + break; | |
537 | + | |
538 | + case PIPE_STATE_UNDEFINED: | |
539 | + break; | |
540 | + | |
541 | +//#ifdef DEBUG | |
542 | +// default: | |
543 | +// trace("%s: source=%p data=%p Unexpected mode %d",__FUNCTION__,source,data,((pipe_source *) source)->state); | |
544 | +//#endif | |
545 | + } | |
546 | + | |
547 | + return TRUE; | |
548 | + } | |
549 | + | |
550 | + static void IO_finalize(GSource *source) | |
551 | + { | |
552 | +// trace("%s: source=%p",__FUNCTION__,source); | |
553 | + | |
554 | + if( ((pipe_source *) source)->hPipe != INVALID_HANDLE_VALUE) | |
555 | + { | |
556 | + CloseHandle(((pipe_source *) source)->hPipe); | |
557 | + ((pipe_source *) source)->hPipe = INVALID_HANDLE_VALUE; | |
558 | + } | |
559 | + | |
560 | + } | |
561 | + | |
562 | + static gboolean IO_closure(gpointer G_GNUC_UNUSED(data)) | |
563 | + { | |
564 | + return 0; | |
565 | + } | |
566 | + | |
567 | + void popup_lasterror(const gchar *fmt, ...) | |
568 | + { | |
569 | + char buffer[4096]; | |
570 | + va_list arg_ptr; | |
571 | + int sz; | |
572 | + DWORD errcode = GetLastError(); | |
573 | + char *ptr; | |
574 | + LPVOID lpMsgBuf = 0; | |
575 | + | |
576 | + FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM |FORMAT_MESSAGE_IGNORE_INSERTS, NULL, errcode, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR) &lpMsgBuf, 0, NULL); | |
577 | + | |
578 | + for(ptr= (char *) lpMsgBuf;*ptr && *ptr != '\n';ptr++); | |
579 | + *ptr = 0; | |
580 | + | |
581 | + va_start(arg_ptr, fmt); | |
582 | + vsnprintf(buffer,4095,fmt,arg_ptr); | |
583 | + va_end(arg_ptr); | |
584 | + | |
585 | + sz = strlen(buffer); | |
586 | + snprintf(buffer+sz,4096-sz,": %s\n(rc=%d)",lpMsgBuf,(int) errcode); | |
587 | + | |
588 | + printf("%s\n",buffer); | |
589 | + | |
590 | +#ifdef DEBUG | |
591 | + fprintf(stderr,"%s\n",buffer); | |
592 | + fflush(stderr); | |
593 | +#endif | |
594 | + | |
595 | + LocalFree(lpMsgBuf); | |
596 | + } | |
597 | + | |
598 | + LIB3270_EXPORT int pw3270_plugin_start(GtkWidget *window, GtkWidget *terminal) | |
599 | + { | |
600 | + char id; | |
601 | + const gchar * name = "pw3270"; | |
602 | + | |
603 | + for(id='A';id < 'Z';id++) | |
604 | + { | |
605 | + gchar * pipename = g_strdup_printf("\\\\.\\pipe\\%s_%c",name,id); | |
606 | + gchar * ptr; | |
607 | + HANDLE hPipe; | |
608 | + | |
609 | + for(ptr=pipename;*ptr;ptr++) | |
610 | + *ptr = g_ascii_tolower(*ptr); | |
611 | + | |
612 | + hPipe = CreateNamedPipe( TEXT(pipename), // pipe name | |
613 | + PIPE_ACCESS_DUPLEX | // read/write access | |
614 | + FILE_FLAG_OVERLAPPED, // overlapped mode | |
615 | + PIPE_TYPE_MESSAGE | // pipe type | |
616 | + PIPE_READMODE_MESSAGE | // pipe mode | |
617 | + PIPE_WAIT, // blocking mode | |
618 | + 1, // number of instances | |
619 | + PIPE_BUFFER_LENGTH, // output buffer size | |
620 | + PIPE_BUFFER_LENGTH, // input buffer size | |
621 | + NMPWAIT_USE_DEFAULT_WAIT, // client time-out | |
622 | + NULL); // default security attributes | |
623 | + | |
624 | + trace("%s = %p",pipename,hPipe); | |
625 | + g_free(pipename); | |
626 | + | |
627 | + if(hPipe != INVALID_HANDLE_VALUE) | |
628 | + { | |
629 | + static GSourceFuncs pipe_source_funcs = | |
630 | + { | |
631 | + IO_prepare, | |
632 | + IO_check, | |
633 | + IO_dispatch, | |
634 | + IO_finalize, | |
635 | + IO_closure, | |
636 | + NULL | |
637 | + }; | |
638 | + pipe_source * source; | |
639 | + gchar * session = g_strdup_printf("%s:%c",name,id); | |
640 | + | |
641 | + // pw3270_set_session_name(window,session); | |
642 | + v3270_set_session_name(terminal,session); | |
643 | + | |
644 | + g_free(session); | |
645 | + | |
646 | + source = (pipe_source *) g_source_new(&pipe_source_funcs,sizeof(pipe_source)); | |
647 | + | |
648 | + source->hPipe = hPipe; | |
649 | + source->state = PIPE_STATE_WAITING; | |
650 | + source->overlap.hEvent = CreateEvent( NULL,TRUE,TRUE,NULL); | |
651 | + | |
652 | + g_source_attach((GSource *) source,NULL); | |
653 | + IO_accept(source); | |
654 | + | |
655 | + return 0; | |
656 | + } | |
657 | + | |
658 | + } | |
659 | + | |
660 | + popup_lasterror( "%s", _( "Can´t create remote control pipe" )); | |
661 | + | |
662 | + return -1; | |
663 | + } | |
664 | + | |
665 | + LIB3270_EXPORT int pw3270_plugin_stop(GtkWidget *window, GtkWidget *terminal) | |
666 | + { | |
667 | + | |
668 | + return 0; | |
669 | + } | |
670 | + | |
671 | + G_GNUC_INTERNAL void set_active(gboolean on) | |
672 | + { | |
673 | + trace("%s(%s)",__FUNCTION__,on ? "Active" : "Inactive"); | |
674 | + // v3270_set_script(v3270_get_default_widget(),'H'); | |
675 | + } | ... | ... |
... | ... | @@ -0,0 +1,50 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | + * | |
6 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | + * | |
8 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | + * Free Software Foundation. | |
11 | + * | |
12 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | + * obter mais detalhes. | |
16 | + * | |
17 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | + * programa; se não, escreva para a Free Software Foundation, Inc., 59 Temple | |
19 | + * Place, Suite 330, Boston, MA, 02111-1307, USA | |
20 | + * | |
21 | + * Este programa está nomeado como -e possui - linhas de código. | |
22 | + * | |
23 | + * Contatos: | |
24 | + * | |
25 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | + * | |
28 | + */ | |
29 | + | |
30 | + #include <config.h> | |
31 | + #define ENABLE_NLS | |
32 | + #define GETTEXT_PACKAGE PACKAGE_NAME | |
33 | + | |
34 | + #include <libintl.h> | |
35 | + #include <glib/gi18n.h> | |
36 | + #include <gtk/gtk.h> | |
37 | + | |
38 | + #include <lib3270.h> | |
39 | + #include <lib3270/log.h> | |
40 | + #include <pw3270.h> | |
41 | + #include <pw3270/hllapi.h> | |
42 | + | |
43 | + #include <windows.h> | |
44 | + | |
45 | + #define PIPE_BUFFER_LENGTH HLLAPI_MAXLENGTH+30 | |
46 | + | |
47 | + G_GNUC_INTERNAL void popup_lasterror(const gchar *fmt, ...); | |
48 | + G_GNUC_INTERNAL void set_active(gboolean on); | |
49 | + | |
50 | + | ... | ... |
... | ... | @@ -0,0 +1,29 @@ |
1 | +#include <windows.h> | |
2 | + | |
3 | +VS_VERSION_INFO VERSIONINFO | |
4 | +FILEVERSION @PACKAGE_MAJOR_VERSION@,@PACKAGE_MINOR_VERSION@,@PACKAGE_MAJOR_RELEASE@,0 | |
5 | +PRODUCTVERSION @PACKAGE_MAJOR_VERSION@,@PACKAGE_MINOR_VERSION@,@PACKAGE_MAJOR_RELEASE@,0 | |
6 | + | |
7 | +BEGIN | |
8 | + | |
9 | + BLOCK "StringFileInfo" | |
10 | + BEGIN | |
11 | + BLOCK "080904E4" | |
12 | + BEGIN | |
13 | + VALUE "FileDescription", "@PACKAGE_NAME@ IPC Plugin\0" | |
14 | + VALUE "CompanyName", "Banco do Brasil S/A.\0" | |
15 | + VALUE "FileVersion", "@WIN32_VERSION@\0" | |
16 | + VALUE "LegalCopyright", "(C) 2017 Banco do Brasil S/A. All Rights Reserved\0" | |
17 | + VALUE "OriginalFilename", "ipc3270@DLLEXT@\0" | |
18 | + VALUE "ProductName", "@PACKAGE_NAME@\0" | |
19 | + VALUE "ProductVersion", "@PACKAGE_MAJOR_VERSION@.@PACKAGE_MINOR_VERSION@.@PACKAGE_MAJOR_RELEASE@.0\0" | |
20 | + END | |
21 | + END | |
22 | + | |
23 | + BLOCK "VarFileInfo" | |
24 | + BEGIN | |
25 | + VALUE "Translation", 0x809, 0x04E4 | |
26 | + END | |
27 | + | |
28 | +END | |
29 | + | ... | ... |
src/plugin/linux/daemon.h
... | ... | @@ -1,46 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | - * | |
21 | - * Este programa está nomeado como daemon.c e possui - linhas de código. | |
22 | - * | |
23 | - * Contatos: | |
24 | - * | |
25 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | - * licinio@bb.com.br (Licínio Luis Branco) | |
28 | - * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | - * | |
30 | - * Referencias: | |
31 | - * | |
32 | - * https://live.gnome.org/DBusGlibBindings | |
33 | - * | |
34 | - */ | |
35 | - | |
36 | - #include "service.h" | |
37 | - | |
38 | -/*---[ Globals ]---------------------------------------------------------------------------------*/ | |
39 | - | |
40 | - G_GNUC_INTERNAL GMainLoop * main_loop; | |
41 | - | |
42 | - | |
43 | -/*---[ Prototipes ]------------------------------------------------------------------------------*/ | |
44 | - | |
45 | - G_GNUC_INTERNAL void pw3270_dbus_register_io_handlers(void); | |
46 | - |
src/plugin/linux/globals.h
... | ... | @@ -1,59 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | - * | |
21 | - * Este programa está nomeado como globals.h e possui - linhas de código. | |
22 | - * | |
23 | - * Contatos: | |
24 | - * | |
25 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | - * licinio@bb.com.br (Licínio Luis Branco) | |
28 | - * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | - * | |
30 | - */ | |
31 | - | |
32 | -#ifndef PW3270_DBUS_GLOBALS_H_INCLUDED | |
33 | - | |
34 | - #define PW3270_DBUS_GLOBALS_H_INCLUDED 1 | |
35 | - | |
36 | - #include <libintl.h> | |
37 | - #include <glib/gi18n.h> | |
38 | - | |
39 | - #include <errno.h> | |
40 | - #include <lib3270.h> | |
41 | - #include <lib3270/log.h> | |
42 | - #include <glib.h> | |
43 | - | |
44 | - // | |
45 | - // Disabling warning on unused-function defined in dbus-glib-bindings.h | |
46 | - // warning: 'org_freedesktop_DBus_reload_config' defined but not used [-Wunused-function] ... | |
47 | - // | |
48 | - #pragma GCC diagnostic ignored "-Wunused-function" | |
49 | - | |
50 | - #include <dbus/dbus-glib.h> | |
51 | - #include <dbus/dbus-glib-bindings.h> | |
52 | - #include <dbus/dbus-glib-lowlevel.h> | |
53 | - | |
54 | - #define ERROR_DOMAIN g_quark_from_static_string("pw3270DBUS") | |
55 | - | |
56 | - G_GNUC_INTERNAL gpointer pw3270_dbus_register_object (DBusGConnection *connection,DBusGProxy *proxy,GType object_type,const DBusGObjectInfo *info,const gchar *path); | |
57 | - | |
58 | - | |
59 | -#endif // PW3270_DBUS_GLOBALS_H_INCLUDED |
src/plugin/linux/gobject.c
... | ... | @@ -1,620 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | - * | |
21 | - * Este programa está nomeado como gobject.c e possui - linhas de código. | |
22 | - * | |
23 | - * Contatos: | |
24 | - * | |
25 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | - * licinio@bb.com.br (Licínio Luis Branco) | |
28 | - * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | - * | |
30 | - * Referencias: | |
31 | - * | |
32 | - * https://live.gnome.org/DBusGlibBindings | |
33 | - * | |
34 | - */ | |
35 | - | |
36 | -#include <glib.h> | |
37 | -#include <gtk/gtk.h> | |
38 | -#include <dbus/dbus.h> | |
39 | -#include <dbus/dbus-glib-lowlevel.h> | |
40 | -#include <dbus/dbus-glib.h> | |
41 | - | |
42 | -#include <config.h> | |
43 | -#include <lib3270.h> | |
44 | -#include <pw3270.h> | |
45 | -#include <v3270.h> | |
46 | -#include <lib3270/actions.h> | |
47 | -#include <lib3270/charset.h> | |
48 | - | |
49 | -#include "service.h" | |
50 | - | |
51 | -/*---[ Globals ]---------------------------------------------------------------------------------*/ | |
52 | - | |
53 | - | |
54 | -/*---[ Implement ]-------------------------------------------------------------------------------*/ | |
55 | - | |
56 | -G_DEFINE_TYPE(PW3270Dbus, pw3270_dbus, G_TYPE_OBJECT) | |
57 | - | |
58 | -static void pw3270_dbus_finalize(GObject *object) | |
59 | -{ | |
60 | - G_OBJECT_CLASS(pw3270_dbus_parent_class)->finalize (object); | |
61 | -} | |
62 | - | |
63 | - | |
64 | -static void pw3270_dbus_class_init(PW3270DbusClass *klass) | |
65 | -{ | |
66 | - GObjectClass *object_class; | |
67 | - object_class = G_OBJECT_CLASS (klass); | |
68 | - object_class->finalize = pw3270_dbus_finalize; | |
69 | - debug("%s",__FUNCTION__); | |
70 | -} | |
71 | - | |
72 | -static void pw3270_dbus_init(PW3270Dbus *object) | |
73 | -{ | |
74 | - debug("%s(%p)",__FUNCTION__,object); | |
75 | -} | |
76 | - | |
77 | -PW3270Dbus * pw3270_dbus_new(void) | |
78 | -{ | |
79 | - return (PW3270Dbus *) g_object_new(PW3270_TYPE_DBUS, NULL); | |
80 | -} | |
81 | - | |
82 | -void pw3270_dbus_get_revision(PW3270Dbus *object, DBusGMethodInvocation *context) | |
83 | -{ | |
84 | - debug("%s object=%p context=%p",__FUNCTION__,object,context); | |
85 | - dbus_g_method_return(context,lib3270_get_revision()); | |
86 | -} | |
87 | - | |
88 | -void pw3270_dbus_connect(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context) | |
89 | -{ | |
90 | - H3270 *hSession = pw3270_dbus_get_session_handle(PW3270_DBUS(object)); | |
91 | - | |
92 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
93 | - | |
94 | - if(uri && *uri) | |
95 | - { | |
96 | - lib3270_set_url(hSession,uri); | |
97 | - g_message("Connecting to \"%s\" by remote request",lib3270_get_url(hSession)); | |
98 | - } | |
99 | - else | |
100 | - { | |
101 | - g_message("%s","Connecting by remote request"); | |
102 | - } | |
103 | - | |
104 | - dbus_g_method_return(context,lib3270_reconnect(hSession,0)); | |
105 | -} | |
106 | - | |
107 | -void pw3270_dbus_set_ur_l(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context) | |
108 | -{ | |
109 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
110 | - | |
111 | - g_message("Changing host to \"%s\" by remote request",uri); | |
112 | - | |
113 | - dbus_g_method_return(context,lib3270_set_url(pw3270_dbus_get_session_handle(PW3270_DBUS(object)),uri) != 0); | |
114 | -} | |
115 | - | |
116 | -void pw3270_dbus_get_ur_l(PW3270Dbus *object, DBusGMethodInvocation *context) | |
117 | -{ | |
118 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
119 | - dbus_g_method_return(context,lib3270_get_url(pw3270_dbus_get_session_handle(PW3270_DBUS(object)))); | |
120 | -} | |
121 | - | |
122 | - | |
123 | -void pw3270_dbus_disconnect(PW3270Dbus *object, DBusGMethodInvocation *context) | |
124 | -{ | |
125 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
126 | - | |
127 | - g_message("Disconnecting by remote request"); | |
128 | - lib3270_disconnect(pw3270_dbus_get_session_handle(object)); | |
129 | - dbus_g_method_return(context,0); | |
130 | -} | |
131 | - | |
132 | -void pw3270_dbus_get_message_id(PW3270Dbus *object, DBusGMethodInvocation *context) | |
133 | -{ | |
134 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
135 | - dbus_g_method_return(context,lib3270_get_program_message(pw3270_dbus_get_session_handle(object))); | |
136 | -} | |
137 | - | |
138 | -void pw3270_dbus_get_connection_state(PW3270Dbus *object, DBusGMethodInvocation *context) | |
139 | -{ | |
140 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
141 | - dbus_g_method_return(context,lib3270_get_connection_state(pw3270_dbus_get_session_handle(object))); | |
142 | -} | |
143 | - | |
144 | -void pw3270_dbus_get_secure_state(PW3270Dbus *object, DBusGMethodInvocation *context) | |
145 | -{ | |
146 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
147 | - dbus_g_method_return(context,lib3270_get_secure(pw3270_dbus_get_session_handle(object))); | |
148 | -} | |
149 | - | |
150 | -GError * pw3270_dbus_get_error_from_errno(int code) | |
151 | -{ | |
152 | - return g_error_new(ERROR_DOMAIN,code,"%s",g_strerror(code)); | |
153 | -} | |
154 | - | |
155 | -int pw3270_dbus_check_valid_state(PW3270Dbus *object, DBusGMethodInvocation *context) | |
156 | -{ | |
157 | - H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
158 | - GError * error = NULL; | |
159 | - | |
160 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
161 | - | |
162 | - if(!lib3270_is_connected(hSession)) | |
163 | - { | |
164 | - error = pw3270_dbus_get_error_from_errno(ENOTCONN); | |
165 | - } | |
166 | - else | |
167 | - { | |
168 | - LIB3270_MESSAGE state = lib3270_get_program_message(hSession); | |
169 | - | |
170 | - switch(state) | |
171 | - { | |
172 | - case LIB3270_MESSAGE_NONE: | |
173 | - return 0; | |
174 | - | |
175 | - case LIB3270_MESSAGE_DISCONNECTED: | |
176 | - error = pw3270_dbus_get_error_from_errno(ENOTCONN); | |
177 | - break; | |
178 | - | |
179 | - case LIB3270_MESSAGE_MINUS: | |
180 | - case LIB3270_MESSAGE_PROTECTED: | |
181 | - case LIB3270_MESSAGE_NUMERIC: | |
182 | - case LIB3270_MESSAGE_OVERFLOW: | |
183 | - case LIB3270_MESSAGE_INHIBIT: | |
184 | - case LIB3270_MESSAGE_KYBDLOCK: | |
185 | - case LIB3270_MESSAGE_X: | |
186 | - error = g_error_new(ERROR_DOMAIN,-1,_( "State %04d can't accept requests" ),state); | |
187 | - break; | |
188 | - | |
189 | - case LIB3270_MESSAGE_SYSWAIT: | |
190 | - case LIB3270_MESSAGE_TWAIT: | |
191 | - case LIB3270_MESSAGE_CONNECTED: | |
192 | - case LIB3270_MESSAGE_AWAITING_FIRST: | |
193 | - error = pw3270_dbus_get_error_from_errno(EBUSY); | |
194 | - break; | |
195 | - | |
196 | - case LIB3270_MESSAGE_RESOLVING: | |
197 | - case LIB3270_MESSAGE_CONNECTING: | |
198 | - error = g_error_new(ERROR_DOMAIN,EINPROGRESS,_( "Connecting to host" )); | |
199 | - break; | |
200 | - | |
201 | - case LIB3270_MESSAGE_USER: | |
202 | - error = g_error_new(ERROR_DOMAIN,-1,_( "Unexpected state %04d" ),state); | |
203 | - } | |
204 | - } | |
205 | - | |
206 | - if(error) | |
207 | - { | |
208 | - dbus_g_method_return_error(context,error); | |
209 | - g_error_free(error); | |
210 | - return -1; | |
211 | - } | |
212 | - | |
213 | - return 0; | |
214 | -} | |
215 | - | |
216 | -void pw3270_dbus_get_screen_contents(PW3270Dbus *object, DBusGMethodInvocation *context) | |
217 | -{ | |
218 | - char * text; | |
219 | - gchar * utftext; | |
220 | - H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
221 | - | |
222 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
223 | - | |
224 | - if(pw3270_dbus_check_valid_state(object,context)) | |
225 | - return; | |
226 | - | |
227 | - text = lib3270_get_string_at_address(hSession,0,-1,'\n'); | |
228 | - | |
229 | - utftext = g_convert_with_fallback(text,-1,"UTF-8",lib3270_get_display_charset(hSession),"?",NULL,NULL,NULL); | |
230 | - | |
231 | - lib3270_free(text); | |
232 | - | |
233 | - dbus_g_method_return(context,utftext); | |
234 | - | |
235 | - g_free(utftext); | |
236 | - | |
237 | -} | |
238 | - | |
239 | -void pw3270_dbus_enter(PW3270Dbus *object, DBusGMethodInvocation *context) | |
240 | -{ | |
241 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
242 | - if(pw3270_dbus_check_valid_state(object,context)) | |
243 | - return; | |
244 | - dbus_g_method_return(context,lib3270_enter(pw3270_dbus_get_session_handle(object))); | |
245 | -} | |
246 | - | |
247 | -void pw3270_dbus_set_text_at(PW3270Dbus *object, int row, int col, const gchar *utftext, DBusGMethodInvocation *context) | |
248 | -{ | |
249 | - gchar * text; | |
250 | - H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
251 | - | |
252 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
253 | - if(pw3270_dbus_check_valid_state(object,context)) | |
254 | - return; | |
255 | - | |
256 | - text = g_convert_with_fallback(utftext,-1,lib3270_get_display_charset(hSession),"UTF-8","?",NULL,NULL,NULL); | |
257 | - | |
258 | - int sz = lib3270_set_string_at(hSession,row,col,(const unsigned char *) text); | |
259 | - | |
260 | - trace("%s returns %d",__FUNCTION__,sz); | |
261 | - dbus_g_method_return(context,sz); | |
262 | - | |
263 | - g_free(text); | |
264 | -} | |
265 | - | |
266 | -void pw3270_dbus_input(PW3270Dbus *object, const gchar *utftext, DBusGMethodInvocation *context) | |
267 | -{ | |
268 | - gchar * text; | |
269 | - H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
270 | - | |
271 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
272 | - if(pw3270_dbus_check_valid_state(object,context)) | |
273 | - return; | |
274 | - | |
275 | - text = g_convert_with_fallback(utftext,-1,lib3270_get_display_charset(hSession),"UTF-8","?",NULL,NULL,NULL); | |
276 | - | |
277 | - dbus_g_method_return(context,lib3270_emulate_input(hSession,(const char *) text,-1,1)); | |
278 | - | |
279 | - g_free(text); | |
280 | -} | |
281 | - | |
282 | - | |
283 | -void pw3270_dbus_get_text_at(PW3270Dbus *object, int row, int col, int len, char lf, DBusGMethodInvocation *context) | |
284 | -{ | |
285 | - gchar * text; | |
286 | - H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
287 | - | |
288 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
289 | - if(pw3270_dbus_check_valid_state(object,context)) | |
290 | - return; | |
291 | - | |
292 | - text = lib3270_get_string_at(hSession, row, col, len, lf); | |
293 | - if(!text) | |
294 | - { | |
295 | - GError *error = pw3270_dbus_get_error_from_errno(errno); | |
296 | - dbus_g_method_return_error(context,error); | |
297 | - g_error_free(error); | |
298 | - } | |
299 | - else | |
300 | - { | |
301 | - gchar * utftext = g_convert_with_fallback(text,-1,"UTF-8",lib3270_get_display_charset(hSession),"?",NULL,NULL,NULL); | |
302 | - | |
303 | - lib3270_free(text); | |
304 | - | |
305 | - dbus_g_method_return(context,utftext); | |
306 | - | |
307 | - g_free(utftext); | |
308 | - } | |
309 | - } | |
310 | - | |
311 | - void pw3270_dbus_get_text(PW3270Dbus *object, int offset, int len, char lf, DBusGMethodInvocation *context) | |
312 | - { | |
313 | - gchar * text; | |
314 | - H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
315 | - | |
316 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
317 | - if(pw3270_dbus_check_valid_state(object,context)) | |
318 | - return; | |
319 | - | |
320 | - if(len < 0) { | |
321 | - len = lib3270_get_length(hSession); | |
322 | - } | |
323 | - | |
324 | - text = lib3270_get_string_at_address(hSession,offset,len,lf); | |
325 | - if(!text) | |
326 | - { | |
327 | - GError *error = pw3270_dbus_get_error_from_errno(errno); | |
328 | - dbus_g_method_return_error(context,error); | |
329 | - g_error_free(error); | |
330 | - } | |
331 | - else | |
332 | - { | |
333 | - gchar * utftext = g_convert_with_fallback(text,-1,"UTF-8",lib3270_get_display_charset(hSession),"?",NULL,NULL,NULL); | |
334 | - | |
335 | - lib3270_free(text); | |
336 | - | |
337 | - debug("\n%s\n",utftext); | |
338 | - | |
339 | - dbus_g_method_return(context,utftext); | |
340 | - | |
341 | - g_free(utftext); | |
342 | - } | |
343 | - | |
344 | - } | |
345 | - | |
346 | - void pw3270_dbus_is_connected(PW3270Dbus *object, DBusGMethodInvocation *context) | |
347 | - { | |
348 | - trace("%s object=%p context=%p connected=%s",__FUNCTION__,object,context, lib3270_is_connected(pw3270_dbus_get_session_handle(object)) ? "Yes" : "No"); | |
349 | - dbus_g_method_return(context,lib3270_is_connected(pw3270_dbus_get_session_handle(object))); | |
350 | - } | |
351 | - | |
352 | - void pw3270_dbus_is_ready(PW3270Dbus *object, DBusGMethodInvocation *context) | |
353 | - { | |
354 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
355 | - dbus_g_method_return(context,lib3270_is_ready(pw3270_dbus_get_session_handle(object))); | |
356 | - } | |
357 | - | |
358 | - void pw3270_dbus_in_tn3270_e(PW3270Dbus *object, DBusGMethodInvocation *context) | |
359 | - { | |
360 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
361 | - dbus_g_method_return(context,lib3270_in_tn3270e(pw3270_dbus_get_session_handle(object))); | |
362 | - } | |
363 | - | |
364 | - void pw3270_dbus_wait_for_ready(PW3270Dbus *object, int timeout, DBusGMethodInvocation *context) | |
365 | - { | |
366 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
367 | - dbus_g_method_return(context,lib3270_wait_for_ready(pw3270_dbus_get_session_handle(object),timeout)); | |
368 | - } | |
369 | - | |
370 | - void pw3270_dbus_set_cursor_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context) | |
371 | - { | |
372 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
373 | - dbus_g_method_return(context,lib3270_set_cursor_position(pw3270_dbus_get_session_handle(object),row,col)); | |
374 | - } | |
375 | - | |
376 | - void pw3270_dbus_set_cursor_address(PW3270Dbus *object, int addr, DBusGMethodInvocation *context) | |
377 | - { | |
378 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
379 | - dbus_g_method_return(context,lib3270_set_cursor_address(pw3270_dbus_get_session_handle(object),addr)); | |
380 | - } | |
381 | - | |
382 | - void pw3270_dbus_get_cursor_address(PW3270Dbus *object, DBusGMethodInvocation *context) | |
383 | - { | |
384 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
385 | - dbus_g_method_return(context,lib3270_get_cursor_address(pw3270_dbus_get_session_handle(object))); | |
386 | - } | |
387 | - | |
388 | - void pw3270_dbus_get_screen_width(PW3270Dbus *object, DBusGMethodInvocation *context) | |
389 | - { | |
390 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
391 | - dbus_g_method_return(context,lib3270_get_width(pw3270_dbus_get_session_handle(object))); | |
392 | - } | |
393 | - | |
394 | - void pw3270_dbus_get_screen_height(PW3270Dbus *object, DBusGMethodInvocation *context) | |
395 | - { | |
396 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
397 | - dbus_g_method_return(context,lib3270_get_height(pw3270_dbus_get_session_handle(object))); | |
398 | - } | |
399 | - | |
400 | - void pw3270_dbus_get_screen_length(PW3270Dbus *object, DBusGMethodInvocation *context) | |
401 | - { | |
402 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
403 | - dbus_g_method_return(context,lib3270_get_width(pw3270_dbus_get_session_handle(object))); | |
404 | - } | |
405 | - | |
406 | - void pw3270_dbus_set_toggle(PW3270Dbus *object, int id, int value, DBusGMethodInvocation *context) | |
407 | - { | |
408 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
409 | - dbus_g_method_return(context,lib3270_set_toggle(pw3270_dbus_get_session_handle(object),(LIB3270_TOGGLE) id,value)); | |
410 | - } | |
411 | - | |
412 | -void pw3270_dbus_cmp_text_at(PW3270Dbus *object, int row, int col, const gchar *utftext, char lf, DBusGMethodInvocation *context) | |
413 | -{ | |
414 | - gchar * text; | |
415 | - H3270 * hSession = pw3270_dbus_get_session_handle(object); | |
416 | - | |
417 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
418 | - if(pw3270_dbus_check_valid_state(object,context)) | |
419 | - return; | |
420 | - | |
421 | - text = g_convert_with_fallback(utftext,-1,lib3270_get_display_charset(hSession),"UTF-8","?",NULL,NULL,NULL); | |
422 | - | |
423 | - dbus_g_method_return(context,lib3270_cmp_text_at(hSession,row,col,text,lf)); | |
424 | - | |
425 | - g_free(text); | |
426 | -} | |
427 | - | |
428 | -void pw3270_dbus_pf_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context) | |
429 | -{ | |
430 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
431 | - if(pw3270_dbus_check_valid_state(object,context)) | |
432 | - return; | |
433 | - dbus_g_method_return(context,lib3270_pfkey(pw3270_dbus_get_session_handle(object),key)); | |
434 | -} | |
435 | - | |
436 | -void pw3270_dbus_pa_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context) | |
437 | -{ | |
438 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
439 | - if(pw3270_dbus_check_valid_state(object,context)) | |
440 | - return; | |
441 | - dbus_g_method_return(context,lib3270_pakey(pw3270_dbus_get_session_handle(object),key)); | |
442 | -} | |
443 | - | |
444 | - void pw3270_dbus_get_field_start(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
445 | - { | |
446 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
447 | - dbus_g_method_return(context,lib3270_get_field_start(pw3270_dbus_get_session_handle(object),baddr)); | |
448 | - } | |
449 | - | |
450 | - void pw3270_dbus_get_field_length(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
451 | - { | |
452 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
453 | - dbus_g_method_return(context,lib3270_get_field_len(pw3270_dbus_get_session_handle(object),baddr)); | |
454 | - } | |
455 | - | |
456 | - void pw3270_dbus_get_next_unprotected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
457 | - { | |
458 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
459 | - dbus_g_method_return(context,lib3270_get_next_unprotected(pw3270_dbus_get_session_handle(object),baddr)); | |
460 | - } | |
461 | - | |
462 | - void pw3270_dbus_get_is_protected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context) | |
463 | - { | |
464 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
465 | - dbus_g_method_return(context,lib3270_get_is_protected(pw3270_dbus_get_session_handle(object),baddr)); | |
466 | - } | |
467 | - | |
468 | - void pw3270_dbus_get_is_protected_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context) | |
469 | - { | |
470 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
471 | - dbus_g_method_return(context,lib3270_get_is_protected_at(pw3270_dbus_get_session_handle(object),row,col)); | |
472 | - } | |
473 | - | |
474 | - void pw3270_dbus_action(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context) | |
475 | - { | |
476 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
477 | - dbus_g_method_return(context,lib3270_action(pw3270_dbus_get_session_handle(object),text)); | |
478 | - } | |
479 | - | |
480 | - void pw3270_dbus_get_clipboard(PW3270Dbus *object, DBusGMethodInvocation *context) | |
481 | - { | |
482 | - gchar *text; | |
483 | - | |
484 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
485 | - | |
486 | - if(pw3270_dbus_check_valid_state(object,context)) | |
487 | - return; | |
488 | - | |
489 | - text = gtk_clipboard_wait_for_text(gtk_widget_get_clipboard(pw3270_get_toplevel(),GDK_SELECTION_CLIPBOARD)); | |
490 | - | |
491 | - trace("Clipboard:\n%s\n",text); | |
492 | - | |
493 | - if(!text) | |
494 | - { | |
495 | - GError *error = pw3270_dbus_get_error_from_errno(ENOENT); | |
496 | - dbus_g_method_return_error(context,error); | |
497 | - g_error_free(error); | |
498 | - } | |
499 | - else | |
500 | - { | |
501 | - dbus_g_method_return(context,text); | |
502 | - g_free(text); | |
503 | - } | |
504 | -} | |
505 | - | |
506 | -void pw3270_dbus_set_clipboard(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context) | |
507 | -{ | |
508 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
509 | - gtk_clipboard_set_text(gtk_widget_get_clipboard(pw3270_get_toplevel(),GDK_SELECTION_CLIPBOARD),(gchar *) text, -1); | |
510 | - dbus_g_method_return(context,0); | |
511 | -} | |
512 | - | |
513 | -void pw3270_dbus_set_script(PW3270Dbus *object, const gchar G_GNUC_UNUSED(*text), int mode, DBusGMethodInvocation *context) | |
514 | -{ | |
515 | - GtkWidget *widget = pw3270_get_terminal_widget(NULL); | |
516 | - | |
517 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
518 | - | |
519 | - if(!widget) | |
520 | - { | |
521 | - GError *error = pw3270_dbus_get_error_from_errno(EINVAL); | |
522 | - dbus_g_method_return_error(context,error); | |
523 | - g_error_free(error); | |
524 | - return; | |
525 | - } | |
526 | - | |
527 | - dbus_g_method_return(context,v3270_set_script(widget,mode == 0 ? 0 : 'S')); | |
528 | -} | |
529 | - | |
530 | -void pw3270_dbus_show_popup(PW3270Dbus *object, int id, const gchar *title, const gchar *msg, const gchar *text, DBusGMethodInvocation *context) | |
531 | -{ | |
532 | - lib3270_popup_dialog(pw3270_dbus_get_session_handle(object), (LIB3270_NOTIFY) id , title, msg, "%s", text); | |
533 | - dbus_g_method_return(context,0); | |
534 | -} | |
535 | - | |
536 | -void pw3270_dbus_get_host_charset(PW3270Dbus *object, DBusGMethodInvocation *context) | |
537 | -{ | |
538 | - dbus_g_method_return(context,lib3270_get_host_charset(pw3270_dbus_get_session_handle(object))); | |
539 | -} | |
540 | - | |
541 | -void pw3270_dbus_get_display_charset(PW3270Dbus G_GNUC_UNUSED(*object), DBusGMethodInvocation *context) | |
542 | -{ | |
543 | - // Allways return UTF-8 to avoid double conversion | |
544 | - dbus_g_method_return(context,"UTF-8"); | |
545 | -} | |
546 | - | |
547 | -void pw3270_dbus_set_host_charset(PW3270Dbus *object, const gchar *charset, DBusGMethodInvocation *context) | |
548 | -{ | |
549 | - dbus_g_method_return(context,lib3270_set_host_charset(pw3270_dbus_get_session_handle(object),charset)); | |
550 | -} | |
551 | - | |
552 | -void pw3270_dbus_erase_eof(PW3270Dbus *object, DBusGMethodInvocation *context) | |
553 | -{ | |
554 | - trace("%s object=%p context=%p",__FUNCTION__,object,context); | |
555 | - dbus_g_method_return(context,lib3270_eraseeof(pw3270_dbus_get_session_handle(object))); | |
556 | -} | |
557 | - | |
558 | -void pw3270_dbus_print(PW3270Dbus *object, DBusGMethodInvocation *context) | |
559 | -{ | |
560 | - dbus_g_method_return(context,lib3270_print_all(pw3270_dbus_get_session_handle(object))); | |
561 | -} | |
562 | - | |
563 | -void pw3270_dbus_set_unlock_delay(PW3270Dbus *object, int value, DBusGMethodInvocation *context) | |
564 | -{ | |
565 | - lib3270_set_unlock_delay(pw3270_dbus_get_session_handle(object),(unsigned short) value); | |
566 | - dbus_g_method_return(context,0); | |
567 | -} | |
568 | - | |
569 | - | |
570 | -void pw3270_dbus_ebc2asc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context) | |
571 | -{ | |
572 | - int sz = strlen(from); | |
573 | - | |
574 | - if(sz > 0) | |
575 | - { | |
576 | - unsigned char buffer[sz+1]; | |
577 | - memcpy(buffer,from,sz); | |
578 | - dbus_g_method_return(context,lib3270_ebc2asc(pw3270_dbus_get_session_handle(object),buffer,sz)); | |
579 | - return; | |
580 | - } | |
581 | - | |
582 | - dbus_g_method_return(context,""); | |
583 | - | |
584 | -} | |
585 | - | |
586 | -void pw3270_dbus_asc2ebc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context) | |
587 | -{ | |
588 | - int sz = strlen(from); | |
589 | - | |
590 | - if(sz > 0) | |
591 | - { | |
592 | - unsigned char buffer[sz+1]; | |
593 | - memcpy(buffer,from,sz); | |
594 | - dbus_g_method_return(context,lib3270_asc2ebc(pw3270_dbus_get_session_handle(object),buffer,sz)); | |
595 | - return; | |
596 | - } | |
597 | - | |
598 | - dbus_g_method_return(context,""); | |
599 | - | |
600 | -} | |
601 | - | |
602 | -void pw3270_dbus_filetransfer(PW3270Dbus *object, const gchar *local, const gchar *remote, int flags, int lrecl, int blksize, int primspace, int secspace, int dft, DBusGMethodInvocation *context) | |
603 | -{ | |
604 | - /* | |
605 | - dbus_g_method_return(context, | |
606 | - v3270_transfer_file( | |
607 | - v3270_get_default_widget(), | |
608 | - (LIB3270_FT_OPTION) flags, | |
609 | - local, | |
610 | - remote, | |
611 | - lrecl, | |
612 | - blksize, | |
613 | - primspace, | |
614 | - secspace, | |
615 | - dft | |
616 | - )); | |
617 | - */ | |
618 | - return; | |
619 | -} | |
620 | - |
src/plugin/linux/main.c
... | ... | @@ -1,179 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | - * | |
21 | - * Este programa está nomeado como main.c e possui - linhas de código. | |
22 | - * | |
23 | - * Referências: | |
24 | - * | |
25 | - * https://github.com/fbuihuu/samples-dbus/blob/master/dbus-server.c | |
26 | - * | |
27 | - * Contatos: | |
28 | - * | |
29 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
30 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
31 | - * | |
32 | - */ | |
33 | - | |
34 | -#include <glib.h> | |
35 | -#include <dbus/dbus.h> | |
36 | -#include <dbus/dbus-glib-lowlevel.h> | |
37 | -#include <dbus/dbus-glib.h> | |
38 | - | |
39 | -#include <v3270.h> | |
40 | -#include <pw3270.h> | |
41 | -#include <pw3270/plugin.h> | |
42 | - | |
43 | -#include "service.h" | |
44 | -#include "dbus-glue.h" | |
45 | - | |
46 | -#include <gtk/gtk.h> | |
47 | - | |
48 | -/*---[ Globals ]---------------------------------------------------------------------------------*/ | |
49 | - | |
50 | - static DBusGConnection * connection = NULL; | |
51 | - static DBusGProxy * proxy = NULL; | |
52 | - static gchar * service_name = NULL; | |
53 | - | |
54 | - | |
55 | -/*---[ Implement ]-------------------------------------------------------------------------------*/ | |
56 | - | |
57 | - LIB3270_EXPORT int pw3270_plugin_start(GtkWidget G_GNUC_UNUSED(*window), GtkWidget *terminal) | |
58 | - { | |
59 | - GError * error = NULL; | |
60 | - guint result; | |
61 | - char session_id = 0; | |
62 | - char id = 'a'; | |
63 | - const gchar * name = "pw3270"; | |
64 | - | |
65 | - connection = dbus_g_bus_get_private(DBUS_BUS_SESSION, g_main_context_default(), &error); | |
66 | - if(error) | |
67 | - { | |
68 | - GtkWidget *dialog = gtk_message_dialog_new( | |
69 | - GTK_WINDOW(window), | |
70 | - (GtkDialogFlags) (GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT), | |
71 | - GTK_MESSAGE_ERROR, | |
72 | - GTK_BUTTONS_OK, | |
73 | - _( "Can't connect to DBUS server" )); | |
74 | - | |
75 | - gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog),"%s",error->message); | |
76 | - | |
77 | - g_message("Error \"%s\" getting session dbus",error->message); | |
78 | - | |
79 | - g_error_free(error); | |
80 | - | |
81 | - gtk_dialog_run(GTK_DIALOG(dialog)); | |
82 | - gtk_widget_destroy(dialog); | |
83 | - | |
84 | - return -1; | |
85 | - } | |
86 | - | |
87 | - proxy = dbus_g_proxy_new_for_name(connection,DBUS_SERVICE_DBUS,DBUS_PATH_DBUS,DBUS_INTERFACE_DBUS); | |
88 | - | |
89 | - for(id='a'; id < 'z' && !error && !service_name; id++) | |
90 | - { | |
91 | - gboolean has_owner = FALSE; | |
92 | - | |
93 | - service_name = g_strdup_printf("br.com.bb.%s.%c",name,(int) id); | |
94 | - | |
95 | - org_freedesktop_DBus_name_has_owner(proxy, service_name, &has_owner, NULL); | |
96 | - | |
97 | - if(has_owner) | |
98 | - { | |
99 | - trace("Service \"%s\" has owner",service_name) | |
100 | - g_free(service_name); | |
101 | - service_name = NULL; | |
102 | - } | |
103 | - else | |
104 | - { | |
105 | - session_id = id; | |
106 | - g_message("DBUS service name is %s",service_name); | |
107 | - org_freedesktop_DBus_request_name(proxy, service_name, DBUS_NAME_FLAG_DO_NOT_QUEUE, &result, &error); | |
108 | - } | |
109 | - } | |
110 | - | |
111 | - if(error) | |
112 | - { | |
113 | - GtkWidget *dialog = gtk_message_dialog_new( | |
114 | - GTK_WINDOW(window), | |
115 | - (GtkDialogFlags) (GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT), | |
116 | - GTK_MESSAGE_ERROR, | |
117 | - GTK_BUTTONS_OK, | |
118 | - _( "Can't get DBUS object name" )); | |
119 | - | |
120 | - gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog),"%s",error->message); | |
121 | - | |
122 | - g_message("Error \"%s\" requesting DBUS name",error->message); | |
123 | - | |
124 | - g_error_free(error); | |
125 | - | |
126 | - gtk_dialog_run(GTK_DIALOG(dialog)); | |
127 | - gtk_widget_destroy(dialog); | |
128 | - | |
129 | - return -1; | |
130 | - } | |
131 | - | |
132 | - if(session_id) | |
133 | - { | |
134 | - g_autofree gchar * path = g_strdup_printf("/br/com/bb/%s",name); | |
135 | - g_autofree gchar * session = g_strdup_printf("%s:%c",name,g_ascii_toupper(session_id)); | |
136 | - | |
137 | - // pw3270_set_session_name(window,session); | |
138 | - v3270_set_session_name(terminal,session); | |
139 | - | |
140 | - g_message("DBUS service path is %s, session name is %s",path,session); | |
141 | - | |
142 | - pw3270_dbus_register_object(connection,proxy,PW3270_TYPE_DBUS,&dbus_glib_pw3270_dbus_object_info,path); | |
143 | - | |
144 | - } | |
145 | - | |
146 | - return 0; | |
147 | - } | |
148 | - | |
149 | - LIB3270_EXPORT int pw3270_plugin_stop(GtkWidget G_GNUC_UNUSED(*window), GtkWidget G_GNUC_UNUSED(*terminal)) | |
150 | - { | |
151 | - if(proxy) | |
152 | - { | |
153 | - debug("%s: Releasing proxy",__FUNCTION__); | |
154 | - g_object_unref(proxy); | |
155 | - proxy = NULL; | |
156 | - } | |
157 | - | |
158 | - if(service_name) | |
159 | - { | |
160 | - g_free(service_name); | |
161 | - service_name = NULL; | |
162 | - } | |
163 | - return 0; | |
164 | - } | |
165 | - | |
166 | - void pw3270_dbus_quit(PW3270Dbus G_GNUC_UNUSED(*object), DBusGMethodInvocation *context) | |
167 | - { | |
168 | - gtk_main_quit(); | |
169 | - dbus_g_method_return(context,0); | |
170 | - } | |
171 | - | |
172 | - H3270 * pw3270_dbus_get_session_handle(PW3270Dbus G_GNUC_UNUSED(*object)) | |
173 | - { | |
174 | - debug("%s=%p",__FUNCTION__,lib3270_get_default_session_handle()); | |
175 | - return lib3270_get_default_session_handle(); | |
176 | - } | |
177 | - | |
178 | - | |
179 | - |
src/plugin/linux/misc.c
... | ... | @@ -1,47 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | - * | |
21 | - * Este programa está nomeado como misc.c e possui - linhas de código. | |
22 | - * | |
23 | - * Contatos: | |
24 | - * | |
25 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | - * licinio@bb.com.br (Licínio Luis Branco) | |
28 | - * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | - * | |
30 | - * Referencias: | |
31 | - * | |
32 | - * https://live.gnome.org/DBusGlibBindings | |
33 | - * | |
34 | - */ | |
35 | - | |
36 | -#include "globals.h" | |
37 | - | |
38 | -/*---[ Implement ]-------------------------------------------------------------------------------*/ | |
39 | - | |
40 | -gpointer pw3270_dbus_register_object(DBusGConnection *connection,DBusGProxy G_GNUC_UNUSED(*proxy),GType object_type,const DBusGObjectInfo *info,const gchar *path) | |
41 | -{ | |
42 | - GObject *object = G_OBJECT(g_object_new(object_type, NULL)); | |
43 | - dbus_g_object_type_install_info (object_type, info); | |
44 | - dbus_g_connection_register_g_object (connection, path, object); | |
45 | - return object; | |
46 | -} | |
47 | - |
src/plugin/linux/service.h
... | ... | @@ -1,138 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | - * | |
21 | - * Este programa está nomeado como service.h e possui - linhas de código. | |
22 | - * | |
23 | - * Contatos: | |
24 | - * | |
25 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | - * licinio@bb.com.br (Licínio Luis Branco) | |
28 | - * kraucer@bb.com.br (Kraucer Fernandes Mazuco) | |
29 | - * | |
30 | - */ | |
31 | - | |
32 | -#ifndef _PW3270_DBUS_SERVICE_H | |
33 | - | |
34 | - #define _PW3270_DBUS_SERVICE_H 1 | |
35 | - | |
36 | - #define ENABLE_NLS | |
37 | - #define GETTEXT_PACKAGE PACKAGE_NAME | |
38 | - | |
39 | - #include "globals.h" | |
40 | - | |
41 | - #define PW3270_TYPE_DBUS (pw3270_dbus_get_type ()) | |
42 | - #define PW3270_DBUS(object) (G_TYPE_CHECK_INSTANCE_CAST ((object), PW3270_TYPE_DBUS, PW3270Dbus)) | |
43 | - #define PW3270_DBUS_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST ((klass), PW3270_TYPE_DBUS, PW3270DbusClass)) | |
44 | - #define IS_PW3270_DBUS(object) (G_TYPE_CHECK_INSTANCE_TYPE ((object), PW3270_TYPE_DBUS)) | |
45 | - #define IS_PW3270_DBUS_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), PW3270_TYPE_DBUS)) | |
46 | - #define PW3270_DBUS_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS ((obj), PW3270_TYPE_DBUS, PW3270DbusClass)) | |
47 | - | |
48 | - G_BEGIN_DECLS | |
49 | - | |
50 | - typedef struct _PW3270Dbus PW3270Dbus; | |
51 | - typedef struct _PW3270DbusClass PW3270DbusClass; | |
52 | - | |
53 | - struct _PW3270Dbus | |
54 | - { | |
55 | - GObject parent; | |
56 | - }; | |
57 | - | |
58 | - struct _PW3270DbusClass | |
59 | - { | |
60 | - GObjectClass parent; | |
61 | - }; | |
62 | - | |
63 | - PW3270Dbus * pw3270_dbus_new (void); | |
64 | - GType pw3270_dbus_get_type (void); | |
65 | - | |
66 | - void pw3270_dbus_get_revision(PW3270Dbus *object, DBusGMethodInvocation *context); | |
67 | - void pw3270_dbus_quit(PW3270Dbus *object, DBusGMethodInvocation *context); | |
68 | - void pw3270_dbus_connect(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context); | |
69 | - void pw3270_dbus_get_ur_l(PW3270Dbus *object, DBusGMethodInvocation *context); | |
70 | - void pw3270_dbus_set_ur_l(PW3270Dbus *object, const gchar *uri, DBusGMethodInvocation *context); | |
71 | - void pw3270_dbus_disconnect(PW3270Dbus *object, DBusGMethodInvocation *context); | |
72 | - | |
73 | - void pw3270_dbus_get_message_id(PW3270Dbus *object, DBusGMethodInvocation *context); | |
74 | - void pw3270_dbus_get_connection_state(PW3270Dbus *object, DBusGMethodInvocation *context); | |
75 | - void pw3270_dbus_get_secure_state(PW3270Dbus *object, DBusGMethodInvocation *context); | |
76 | - | |
77 | - void pw3270_dbus_get_screen_contents(PW3270Dbus *object, DBusGMethodInvocation *context); | |
78 | - H3270 * pw3270_dbus_get_session_handle(PW3270Dbus *object); | |
79 | - GError * pw3270_dbus_get_error_from_errno(int code); | |
80 | - | |
81 | - void pw3270_dbus_is_connected(PW3270Dbus *object, DBusGMethodInvocation *context); | |
82 | - void pw3270_dbus_is_ready(PW3270Dbus *object, DBusGMethodInvocation *context); | |
83 | - void pw3270_dbus_in_tn3270_e(PW3270Dbus *object, DBusGMethodInvocation *context); | |
84 | - | |
85 | - void pw3270_dbus_set_cursor_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context); | |
86 | - void pw3270_dbus_set_cursor_address(PW3270Dbus *object, int addr, DBusGMethodInvocation *context); | |
87 | - void pw3270_dbus_get_cursor_address(PW3270Dbus *object, DBusGMethodInvocation *context); | |
88 | - | |
89 | - void pw3270_dbus_get_screen_width(PW3270Dbus *object, DBusGMethodInvocation *context); | |
90 | - void pw3270_dbus_get_screen_height(PW3270Dbus *object, DBusGMethodInvocation *context); | |
91 | - void pw3270_dbus_get_screen_length(PW3270Dbus *object, DBusGMethodInvocation *context); | |
92 | - | |
93 | - void pw3270_dbus_set_toggle(PW3270Dbus *object, int id, int value, DBusGMethodInvocation *context); | |
94 | - | |
95 | - void pw3270_dbus_wait_for_ready(PW3270Dbus *object, int timeout, DBusGMethodInvocation *context); | |
96 | - | |
97 | - void pw3270_dbus_get_field_start(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
98 | - void pw3270_dbus_get_field_length(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
99 | - void pw3270_dbus_get_next_unprotected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
100 | - | |
101 | - void pw3270_dbus_get_is_protected(PW3270Dbus *object, int baddr, DBusGMethodInvocation *context); | |
102 | - void pw3270_dbus_get_is_protected_at(PW3270Dbus *object, int row, int col, DBusGMethodInvocation *context); | |
103 | - | |
104 | - void pw3270_dbus_set_script(PW3270Dbus *object, const gchar *text, int mode, DBusGMethodInvocation *context); | |
105 | - | |
106 | - void pw3270_dbus_show_popup(PW3270Dbus *object, int id, const gchar *title, const gchar *msg, const gchar *text, DBusGMethodInvocation *context); | |
107 | - | |
108 | - void pw3270_dbus_action(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context); | |
109 | - | |
110 | - // Actions | |
111 | - void pw3270_dbus_enter(PW3270Dbus *object, DBusGMethodInvocation *context); | |
112 | - void pw3270_dbus_pf_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context); | |
113 | - void pw3270_dbus_pa_key(PW3270Dbus *object, int key, DBusGMethodInvocation *context); | |
114 | - void pw3270_dbus_set_text_at(PW3270Dbus *object, int row, int col, const gchar *text, DBusGMethodInvocation *context); | |
115 | - void pw3270_dbus_get_text_at(PW3270Dbus *object, int row, int col, int len, char lf, DBusGMethodInvocation *context); | |
116 | - void pw3270_dbus_get_text(PW3270Dbus *object, int offset, int len, char lf, DBusGMethodInvocation *context); | |
117 | - void pw3270_dbus_cmp_text_at(PW3270Dbus *object, int row, int col, const gchar *text, char lf, DBusGMethodInvocation *context); | |
118 | - void pw3270_dbus_input(PW3270Dbus *object, const gchar *utftext, DBusGMethodInvocation *context); | |
119 | - | |
120 | - void pw3270_dbus_set_clipboard(PW3270Dbus *object, const gchar *text, DBusGMethodInvocation *context); | |
121 | - void pw3270_dbus_get_clipboard(PW3270Dbus *object, DBusGMethodInvocation *context); | |
122 | - | |
123 | - void pw3270_dbus_get_display_charset(PW3270Dbus *object, DBusGMethodInvocation *context); | |
124 | - void pw3270_dbus_get_host_charset(PW3270Dbus *object, DBusGMethodInvocation *context); | |
125 | - void pw3270_dbus_set_host_charset(PW3270Dbus *object, const gchar *charset, DBusGMethodInvocation *context); | |
126 | - void pw3270_dbus_erase_eof(PW3270Dbus *object, DBusGMethodInvocation *context); | |
127 | - void pw3270_dbus_print(PW3270Dbus *object, DBusGMethodInvocation *context); | |
128 | - | |
129 | - void pw3270_dbus_asc2ebc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context); | |
130 | - void pw3270_dbus_ebc2asc(PW3270Dbus *object, const gchar *from, DBusGMethodInvocation *context); | |
131 | - | |
132 | - void pw3270_dbus_filetransfer(PW3270Dbus *object, const gchar *local, const gchar *remote, int flags, int lrecl, int blksize, int primspace, int secspace, int dft, DBusGMethodInvocation *context); | |
133 | - | |
134 | - void pw3270_dbus_set_unlock_delay(PW3270Dbus *object, int value, DBusGMethodInvocation *context); | |
135 | - | |
136 | - G_END_DECLS | |
137 | - | |
138 | -#endif // _PW3270_DBUS_SERVICE_H |
src/plugin/windows/main.c
... | ... | @@ -1,675 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
19 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
20 | - * | |
21 | - * Este programa está nomeado como - e possui - linhas de código. | |
22 | - * | |
23 | - * Contatos: | |
24 | - * | |
25 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | - * | |
28 | - * Agradecimento: | |
29 | - * | |
30 | - * Hélio Passos | |
31 | - * | |
32 | - */ | |
33 | - | |
34 | - #include "private.h" | |
35 | - | |
36 | -#ifdef _WIN32 | |
37 | - #include <windows.h> | |
38 | -#else | |
39 | - #error HLLAPI is designed for windows. | |
40 | -#endif // _WIN32 | |
41 | - | |
42 | - #include <pw3270/plugin.h> | |
43 | - #include <v3270.h> | |
44 | - #include <pw3270/ipcpackets.h> | |
45 | - #include <lib3270/actions.h> | |
46 | - #include <lib3270/charset.h> | |
47 | - | |
48 | -/*--[ Defines ]--------------------------------------------------------------------------------------*/ | |
49 | - | |
50 | - #pragma pack(1) | |
51 | - | |
52 | - enum PIPE_STATE | |
53 | - { | |
54 | - PIPE_STATE_WAITING, | |
55 | - PIPE_STATE_READ, | |
56 | - PIPE_STATE_PENDING_READ, | |
57 | - PIPE_STATE_UNDEFINED | |
58 | - }; | |
59 | - | |
60 | - typedef struct _pipe_source | |
61 | - { | |
62 | - GSource gsrc; | |
63 | - HANDLE hPipe; | |
64 | - | |
65 | - enum PIPE_STATE state; | |
66 | - | |
67 | - OVERLAPPED overlap; | |
68 | - unsigned char buffer[PIPE_BUFFER_LENGTH+1]; | |
69 | - } pipe_source; | |
70 | - | |
71 | - #pragma pack() | |
72 | - | |
73 | - | |
74 | -/*--[ Globals ]--------------------------------------------------------------------------------------*/ | |
75 | - | |
76 | -// static const gchar control_char = '@'; | |
77 | - | |
78 | -/*--[ Implement ]------------------------------------------------------------------------------------*/ | |
79 | - | |
80 | - static void IO_accept(pipe_source *source) | |
81 | - { | |
82 | - set_active(FALSE); | |
83 | - | |
84 | - if(ConnectNamedPipe(source->hPipe,&source->overlap)) | |
85 | - { | |
86 | - popup_lasterror("%s",_( "Error in ConnectNamedPipe" )); | |
87 | - return; | |
88 | - } | |
89 | - | |
90 | - switch(GetLastError()) | |
91 | - { | |
92 | - // The overlapped connection in progress. | |
93 | - case ERROR_IO_PENDING: | |
94 | - // trace("%s: ERROR_IO_PENDING",__FUNCTION__); | |
95 | - source->state = PIPE_STATE_WAITING; | |
96 | - break; | |
97 | - | |
98 | - // Client is already connected, so signal an event. | |
99 | - case ERROR_PIPE_CONNECTED: | |
100 | - trace("%s: ERROR_PIPE_CONNECTED",__FUNCTION__); | |
101 | - set_active(TRUE); | |
102 | - SetEvent(source->overlap.hEvent); | |
103 | - break; | |
104 | - | |
105 | - // If an error occurs during the connect operation... | |
106 | - default: | |
107 | - popup_lasterror("%s", _( "ConnectNamedPipe failed" )); | |
108 | - } | |
109 | - | |
110 | - } | |
111 | - | |
112 | - static gboolean IO_prepare(GSource *source, gint *timeout) | |
113 | - { | |
114 | - /* | |
115 | - * Called before all the file descriptors are polled. | |
116 | - * If the source can determine that it is ready here | |
117 | - * (without waiting for the results of the poll() call) | |
118 | - * it should return TRUE. | |
119 | - * | |
120 | - * It can also return a timeout_ value which should be the maximum | |
121 | - * timeout (in milliseconds) which should be passed to the poll() call. | |
122 | - * The actual timeout used will be -1 if all sources returned -1, | |
123 | - * or it will be the minimum of all the timeout_ values | |
124 | - * returned which were >= 0. | |
125 | - * | |
126 | - */ | |
127 | - if(WaitForSingleObject(((pipe_source *) source)->overlap.hEvent,0) == WAIT_OBJECT_0) | |
128 | - return TRUE; | |
129 | - | |
130 | - *timeout = 10; | |
131 | - return FALSE; | |
132 | - } | |
133 | - | |
134 | - static gboolean IO_check(GSource *source) | |
135 | - { | |
136 | - /* | |
137 | - * Called after all the file descriptors are polled. | |
138 | - * The source should return TRUE if it is ready to be dispatched. | |
139 | - * Note that some time may have passed since the previous prepare | |
140 | - * function was called, so the source should be checked again here. | |
141 | - * | |
142 | - */ | |
143 | - if(WaitForSingleObject(((pipe_source *) source)->overlap.hEvent,0) == WAIT_OBJECT_0) | |
144 | - return TRUE; | |
145 | - | |
146 | - return FALSE; | |
147 | - } | |
148 | - | |
149 | - static void send_text(pipe_source *source, char *text) | |
150 | - { | |
151 | - struct hllapi_packet_text *pkt; | |
152 | - DWORD szBlock; | |
153 | - int f; | |
154 | - | |
155 | - if(text) | |
156 | - { | |
157 | - szBlock = sizeof(struct hllapi_packet_text)+strlen(text); | |
158 | - pkt = (struct hllapi_packet_text *) g_malloc0(szBlock); | |
159 | - pkt->packet_id = 0; | |
160 | - strcpy(pkt->text,text); | |
161 | - lib3270_free(text); | |
162 | - } | |
163 | - else | |
164 | - { | |
165 | - szBlock = sizeof(struct hllapi_packet_text); | |
166 | - pkt = (struct hllapi_packet_text *) g_malloc0(szBlock); | |
167 | - pkt->packet_id = errno ? errno : -1; | |
168 | - } | |
169 | - | |
170 | - trace("szBlock=%d text=\"%s\"",szBlock, ( (struct hllapi_packet_text *) pkt)->text); | |
171 | - for(f=0;f< (int) szBlock;f++) | |
172 | - { | |
173 | - trace("rsp(%d)= %d \"%s\"",f,* (((char *) pkt)+f),((char *) pkt)+f); | |
174 | - } | |
175 | - | |
176 | - WriteFile(source->hPipe,pkt,szBlock,&szBlock,NULL); | |
177 | - | |
178 | - g_free(pkt); | |
179 | - } | |
180 | - | |
181 | - static void send_result(pipe_source *source, int rc) | |
182 | - { | |
183 | - struct hllapi_packet_result pkt = { rc }; | |
184 | - DWORD wrote = sizeof(pkt); | |
185 | - WriteFile(source->hPipe,&pkt,wrote,&wrote,NULL); | |
186 | - } | |
187 | - | |
188 | - static int do_file_transfer(struct hllapi_packet_file_transfer * source) | |
189 | - { | |
190 | - /* | |
191 | - const gchar * local = (const char *) source->text; | |
192 | - const gchar * remote = (const char *) (local+strlen(local)+1); | |
193 | - | |
194 | - return v3270_transfer_file( v3270_get_default_widget(), | |
195 | - (LIB3270_FT_OPTION) source->options, | |
196 | - local, | |
197 | - remote, | |
198 | - source->lrecl, | |
199 | - source->blksize, | |
200 | - source->primspace, | |
201 | - source->secspace, | |
202 | - source->dft ); | |
203 | - */ | |
204 | - return EINVAL; | |
205 | - } | |
206 | - | |
207 | - static void get_host(pipe_source *source) { | |
208 | - send_text(source,strdup(lib3270_get_url(lib3270_get_default_session_handle()))); | |
209 | - } | |
210 | - | |
211 | - static void process_input(pipe_source *source, DWORD G_GNUC_UNUSED(cbRead)) | |
212 | - { | |
213 | - const struct hllapi_packet_query * query = ((struct hllapi_packet_query *) source->buffer); | |
214 | - | |
215 | - trace("%s id=%d",__FUNCTION__,query->packet_id); | |
216 | - | |
217 | - switch(query->packet_id) | |
218 | - { | |
219 | - case HLLAPI_PACKET_CONNECT: | |
220 | - send_result(source,lib3270_reconnect( lib3270_get_default_session_handle(), | |
221 | - ((struct hllapi_packet_connect *) source->buffer)->wait)); | |
222 | - break; | |
223 | - | |
224 | - case HLLAPI_PACKET_CONNECT_URL: | |
225 | - send_result(source,lib3270_connect_url(lib3270_get_default_session_handle(),(const char *) (query+1),0)); | |
226 | - break; | |
227 | - | |
228 | - case HLLAPI_PACKET_SET_HOST: | |
229 | - send_result(source,lib3270_set_url(lib3270_get_default_session_handle(), | |
230 | - ((struct hllapi_packet_text *) source->buffer)->text)); | |
231 | - break; | |
232 | - | |
233 | - case HLLAPI_PACKET_GET_HOST: | |
234 | - get_host(source); | |
235 | - break; | |
236 | - | |
237 | - case HLLAPI_PACKET_DISCONNECT: | |
238 | - send_result(source,lib3270_disconnect(lib3270_get_default_session_handle())); | |
239 | - break; | |
240 | - | |
241 | - case HLLAPI_PACKET_IS_CONNECTED: | |
242 | - send_result(source,lib3270_in_tn3270e(lib3270_get_default_session_handle())); | |
243 | - break; | |
244 | - | |
245 | - case HLLAPI_PACKET_IS_READY: | |
246 | - send_result(source,lib3270_is_ready(lib3270_get_default_session_handle())); | |
247 | - break; | |
248 | - | |
249 | - case HLLAPI_PACKET_ENTER: | |
250 | - send_result(source,lib3270_enter(lib3270_get_default_session_handle())); | |
251 | - break; | |
252 | - | |
253 | - case HLLAPI_PACKET_PRINT: | |
254 | - send_result(source,lib3270_print_all(lib3270_get_default_session_handle())); | |
255 | - break; | |
256 | - | |
257 | - case HLLAPI_PACKET_ERASE: | |
258 | - send_result(source,lib3270_erase(lib3270_get_default_session_handle())); | |
259 | - break; | |
260 | - | |
261 | - case HLLAPI_PACKET_ERASE_EOF: | |
262 | - send_result(source,lib3270_eraseeof(lib3270_get_default_session_handle())); | |
263 | - break; | |
264 | - | |
265 | - case HLLAPI_PACKET_ERASE_EOL: | |
266 | - send_result(source,lib3270_eraseeol(lib3270_get_default_session_handle())); | |
267 | - break; | |
268 | - | |
269 | - case HLLAPI_PACKET_ERASE_INPUT: | |
270 | - send_result(source,lib3270_eraseinput(lib3270_get_default_session_handle())); | |
271 | - break; | |
272 | - | |
273 | - case HLLAPI_PACKET_PFKEY: | |
274 | - send_result(source,lib3270_pfkey( lib3270_get_default_session_handle(), | |
275 | - ((struct hllapi_packet_keycode *) source->buffer)->keycode)); | |
276 | - break; | |
277 | - | |
278 | - case HLLAPI_PACKET_PAKEY: | |
279 | - send_result(source,lib3270_pakey( lib3270_get_default_session_handle(), | |
280 | - ((struct hllapi_packet_keycode *) source->buffer)->keycode)); | |
281 | - break; | |
282 | - | |
283 | - case HLLAPI_PACKET_SET_CURSOR_POSITION: | |
284 | - send_result(source,lib3270_set_cursor_position( lib3270_get_default_session_handle(), | |
285 | - ((struct hllapi_packet_cursor *) source->buffer)->row, | |
286 | - ((struct hllapi_packet_cursor *) source->buffer)->col)); | |
287 | - break; | |
288 | - | |
289 | - case HLLAPI_PACKET_SET_TEXT_AT: | |
290 | - send_result(source,lib3270_set_text_at( lib3270_get_default_session_handle(), | |
291 | - ((struct hllapi_packet_text_at *) source->buffer)->row, | |
292 | - ((struct hllapi_packet_text_at *) source->buffer)->col, | |
293 | - (unsigned char *) ((struct hllapi_packet_text_at *) source->buffer)->text)); | |
294 | - break; | |
295 | - | |
296 | - case HLLAPI_PACKET_GET_TEXT_AT: | |
297 | - send_text(source,lib3270_get_string_at( lib3270_get_default_session_handle(), | |
298 | - ((struct hllapi_packet_at *) source->buffer)->row, | |
299 | - ((struct hllapi_packet_at *) source->buffer)->col, | |
300 | - ((struct hllapi_packet_at *) source->buffer)->len, | |
301 | - ((struct hllapi_packet_at *) source->buffer)->lf)); | |
302 | - break; | |
303 | - | |
304 | - case HLLAPI_PACKET_GET_TEXT_AT_OFFSET: | |
305 | - send_text(source,lib3270_get_string_at_address( lib3270_get_default_session_handle(), | |
306 | - ((struct hllapi_packet_query_offset *) source->buffer)->addr, | |
307 | - ((struct hllapi_packet_query_offset *) source->buffer)->len, | |
308 | - ((struct hllapi_packet_query_offset *) source->buffer)->lf)); | |
309 | - break; | |
310 | - | |
311 | - case HLLAPI_PACKET_CMP_TEXT_AT: | |
312 | - send_result(source,lib3270_cmp_text_at( lib3270_get_default_session_handle(), | |
313 | - ((struct hllapi_packet_text_at *) source->buffer)->row, | |
314 | - ((struct hllapi_packet_text_at *) source->buffer)->col, | |
315 | - ((struct hllapi_packet_text_at *) source->buffer)->text, | |
316 | - ((struct hllapi_packet_text_at *) source->buffer)->lf)); | |
317 | - break; | |
318 | - | |
319 | - case HLLAPI_PACKET_INPUT_STRING: | |
320 | - send_result(source,lib3270_input_string(lib3270_get_default_session_handle(), | |
321 | - (unsigned char *) ((struct hllapi_packet_text *) source->buffer)->text)); | |
322 | - break; | |
323 | - | |
324 | - case HLLAPI_PACKET_EMULATE_INPUT: | |
325 | - send_result(source,lib3270_emulate_input(lib3270_get_default_session_handle(), | |
326 | - (const char *) ((struct hllapi_packet_emulate_input *) source->buffer)->text, | |
327 | - (int) ((struct hllapi_packet_emulate_input *) source->buffer)->len, | |
328 | - (int) ((struct hllapi_packet_emulate_input *) source->buffer)->pasting)); | |
329 | - break; | |
330 | - | |
331 | - case HLLAPI_PACKET_SET_CURSOR: | |
332 | - send_result(source,lib3270_set_cursor_address(lib3270_get_default_session_handle(), | |
333 | - ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
334 | - break; | |
335 | - | |
336 | - case HLLAPI_PACKET_GET_CURSOR: | |
337 | - send_result(source,lib3270_get_cursor_address(lib3270_get_default_session_handle())); | |
338 | - break; | |
339 | - | |
340 | - case HLLAPI_PACKET_GET_WIDTH: | |
341 | - send_result(source,lib3270_get_width(lib3270_get_default_session_handle())); | |
342 | - break; | |
343 | - | |
344 | - case HLLAPI_PACKET_GET_HEIGHT: | |
345 | - send_result(source,lib3270_get_height(lib3270_get_default_session_handle())); | |
346 | - break; | |
347 | - | |
348 | - case HLLAPI_PACKET_GET_LENGTH: | |
349 | - send_result(source,lib3270_get_length(lib3270_get_default_session_handle())); | |
350 | - break; | |
351 | - | |
352 | - case HLLAPI_PACKET_GET_PROGRAM_MESSAGE: | |
353 | - send_result(source,lib3270_get_program_message(lib3270_get_default_session_handle())); | |
354 | - break; | |
355 | - | |
356 | - case HLLAPI_PACKET_GET_SSL_STATE: | |
357 | - send_result(source,lib3270_get_secure(lib3270_get_default_session_handle())); | |
358 | - break; | |
359 | - | |
360 | - case HLLAPI_PACKET_SET_UNLOCK_DELAY: | |
361 | - lib3270_set_unlock_delay(lib3270_get_default_session_handle(),(unsigned short) ((struct hllapi_packet_set_int *) source->buffer)->value); | |
362 | - send_result(source,0); | |
363 | - break; | |
364 | - | |
365 | - case HLLAPI_PACKET_SET_TOGGLE: | |
366 | - send_result(source,lib3270_set_toggle(lib3270_get_default_session_handle(), | |
367 | - (LIB3270_TOGGLE) ((struct hllapi_packet_set *) source->buffer)->id, | |
368 | - ((struct hllapi_packet_set *) source->buffer)->value)); | |
369 | - break; | |
370 | - | |
371 | - case HLLAPI_PACKET_FIELD_START: | |
372 | - send_result(source,lib3270_get_field_start(lib3270_get_default_session_handle(), | |
373 | - ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
374 | - break; | |
375 | - | |
376 | - | |
377 | - case HLLAPI_PACKET_FIELD_LEN: | |
378 | - send_result(source,lib3270_get_field_len(lib3270_get_default_session_handle(), | |
379 | - ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
380 | - break; | |
381 | - | |
382 | - case HLLAPI_PACKET_NEXT_UNPROTECTED: | |
383 | - send_result(source,lib3270_get_next_unprotected(lib3270_get_default_session_handle(), | |
384 | - ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
385 | - break; | |
386 | - | |
387 | - case HLLAPI_PACKET_IS_PROTECTED: | |
388 | - send_result(source,lib3270_get_is_protected(lib3270_get_default_session_handle(), | |
389 | - ((struct hllapi_packet_addr *) source->buffer)->addr)); | |
390 | - break; | |
391 | - | |
392 | - case HLLAPI_PACKET_IS_PROTECTED_AT: | |
393 | - send_result(source,lib3270_get_is_protected_at( lib3270_get_default_session_handle(), | |
394 | - ((struct hllapi_packet_query_at *) source->buffer)->row, | |
395 | - ((struct hllapi_packet_query_at *) source->buffer)->col)); | |
396 | - break; | |
397 | - | |
398 | - case HLLAPI_PACKET_QUIT: | |
399 | - gtk_main_quit(); | |
400 | - send_result(source,0); | |
401 | - break; | |
402 | - | |
403 | - case HLLAPI_PACKET_SET_HOST_CHARSET: | |
404 | - send_result(source,lib3270_set_host_charset( lib3270_get_default_session_handle(), | |
405 | - (const char *) ((struct hllapi_packet_set_text *) source->buffer)->text)); | |
406 | - break; | |
407 | - | |
408 | - case HLLAPI_PACKET_ASC2EBC: | |
409 | - send_text(source,(char *) lib3270_asc2ebc( | |
410 | - lib3270_get_default_session_handle(), | |
411 | - (unsigned char *) ((struct hllapi_packet_set_text *) source->buffer)->text,-1 | |
412 | - )); | |
413 | - break; | |
414 | - | |
415 | - case HLLAPI_PACKET_EBC2ASC: | |
416 | - send_text(source,(char *) lib3270_ebc2asc( | |
417 | - lib3270_get_default_session_handle(), | |
418 | - (unsigned char *) ((struct hllapi_packet_set_text *) source->buffer)->text,-1 | |
419 | - )); | |
420 | - break; | |
421 | - | |
422 | - case HLLAPI_PACKET_FILE_TRANSFER: | |
423 | - send_result(source,do_file_transfer((struct hllapi_packet_file_transfer *) source)); | |
424 | - break; | |
425 | - | |
426 | - case HLLAPI_PACKET_GET_HOST_CHARSET: | |
427 | - trace("%s","HLLAPI_PACKET_GET_HOST_CHARSET"); | |
428 | - send_text(source,(char *) lib3270_get_host_charset(lib3270_get_default_session_handle())); | |
429 | - break; | |
430 | - | |
431 | - case HLLAPI_PACKET_ACTION: | |
432 | - send_result(source,lib3270_action(lib3270_get_default_session_handle(), | |
433 | - (const char *) ((struct hllapi_packet_text *) source->buffer)->text)); | |
434 | - break; | |
435 | - | |
436 | - | |
437 | - default: | |
438 | - send_result(source, EINVAL); | |
439 | - g_message("Invalid remote request (id=%d)",source->buffer[0]); | |
440 | - } | |
441 | - | |
442 | - } | |
443 | - | |
444 | - static void read_input_pipe(pipe_source *source) | |
445 | - { | |
446 | - DWORD cbRead = 0; | |
447 | - | |
448 | - if(ReadFile(source->hPipe,source->buffer,PIPE_BUFFER_LENGTH,&cbRead,&source->overlap) && cbRead > 0) | |
449 | - process_input(source,cbRead); | |
450 | - | |
451 | - // The read operation is still pending. | |
452 | - switch(GetLastError()) | |
453 | - { | |
454 | - case 0: | |
455 | - break; | |
456 | - | |
457 | - case ERROR_IO_PENDING: | |
458 | - // trace("%s: PIPE_STATE_PENDING_READ",__FUNCTION__); | |
459 | - source->state = PIPE_STATE_PENDING_READ; | |
460 | - break; | |
461 | - | |
462 | - case ERROR_PIPE_LISTENING: | |
463 | - // trace("%s: ERROR_PIPE_LISTENING",__FUNCTION__); | |
464 | - source->state = PIPE_STATE_READ; | |
465 | - break; | |
466 | - | |
467 | - case ERROR_BROKEN_PIPE: | |
468 | - trace("%s: ERROR_BROKEN_PIPE",__FUNCTION__); | |
469 | - | |
470 | - if(!DisconnectNamedPipe(source->hPipe)) | |
471 | - { | |
472 | - set_active(FALSE); | |
473 | - popup_lasterror("%s",_( "Error in DisconnectNamedPipe" )); | |
474 | - } | |
475 | - else | |
476 | - { | |
477 | - IO_accept(source); | |
478 | - } | |
479 | - break; | |
480 | - | |
481 | - case ERROR_PIPE_NOT_CONNECTED: | |
482 | - trace("%s: ERROR_PIPE_NOT_CONNECTED",__FUNCTION__); | |
483 | - set_active(FALSE); | |
484 | - break; | |
485 | - | |
486 | - default: | |
487 | - if(source->hPipe != INVALID_HANDLE_VALUE) | |
488 | - popup_lasterror("%s",_( "Error receiving message from pipe" ) ); | |
489 | - } | |
490 | - | |
491 | - } | |
492 | - | |
493 | - static gboolean IO_dispatch(GSource *source, GSourceFunc G_GNUC_UNUSED(callback), gpointer G_GNUC_UNUSED(data)) | |
494 | - { | |
495 | - /* | |
496 | - * Called to dispatch the event source, | |
497 | - * after it has returned TRUE in either its prepare or its check function. | |
498 | - * The dispatch function is passed in a callback function and data. | |
499 | - * The callback function may be NULL if the source was never connected | |
500 | - * to a callback using g_source_set_callback(). The dispatch function | |
501 | - * should call the callback function with user_data and whatever additional | |
502 | - * parameters are needed for this type of event source. | |
503 | - */ | |
504 | - BOOL fSuccess; | |
505 | - DWORD cbRead = 0; | |
506 | -// DWORD dwErr = 0; | |
507 | - | |
508 | - fSuccess = GetOverlappedResult(((pipe_source *) source)->hPipe,&((pipe_source *) source)->overlap,&cbRead,FALSE ); | |
509 | - | |
510 | - // trace("%s: source=%p data=%p Result=%s cbRead=%d",__FUNCTION__,source,data,fSuccess ? "Success" : "Unsuccess",(int) cbRead); | |
511 | - | |
512 | - switch(((pipe_source *) source)->state) | |
513 | - { | |
514 | - case PIPE_STATE_WAITING: | |
515 | - if(fSuccess) | |
516 | - { | |
517 | - trace("Pipe connected (cbRet=%d)",(int) cbRead); | |
518 | - set_active(TRUE); | |
519 | - ((pipe_source *) source)->state = PIPE_STATE_READ; | |
520 | - } | |
521 | - else | |
522 | - { | |
523 | - popup_lasterror("%s", _( "Pipe connection failed" )); | |
524 | - } | |
525 | - break; | |
526 | - | |
527 | - case PIPE_STATE_READ: | |
528 | - // trace("Reading pipe (cbRead=%d)",(int) cbRead); | |
529 | - read_input_pipe( (pipe_source *) source); | |
530 | - break; | |
531 | - | |
532 | - case PIPE_STATE_PENDING_READ: | |
533 | - if(fSuccess && cbRead > 0) | |
534 | - process_input((pipe_source *) source,cbRead); | |
535 | - ((pipe_source *) source)->state = PIPE_STATE_READ; | |
536 | - break; | |
537 | - | |
538 | - case PIPE_STATE_UNDEFINED: | |
539 | - break; | |
540 | - | |
541 | -//#ifdef DEBUG | |
542 | -// default: | |
543 | -// trace("%s: source=%p data=%p Unexpected mode %d",__FUNCTION__,source,data,((pipe_source *) source)->state); | |
544 | -//#endif | |
545 | - } | |
546 | - | |
547 | - return TRUE; | |
548 | - } | |
549 | - | |
550 | - static void IO_finalize(GSource *source) | |
551 | - { | |
552 | -// trace("%s: source=%p",__FUNCTION__,source); | |
553 | - | |
554 | - if( ((pipe_source *) source)->hPipe != INVALID_HANDLE_VALUE) | |
555 | - { | |
556 | - CloseHandle(((pipe_source *) source)->hPipe); | |
557 | - ((pipe_source *) source)->hPipe = INVALID_HANDLE_VALUE; | |
558 | - } | |
559 | - | |
560 | - } | |
561 | - | |
562 | - static gboolean IO_closure(gpointer G_GNUC_UNUSED(data)) | |
563 | - { | |
564 | - return 0; | |
565 | - } | |
566 | - | |
567 | - void popup_lasterror(const gchar *fmt, ...) | |
568 | - { | |
569 | - char buffer[4096]; | |
570 | - va_list arg_ptr; | |
571 | - int sz; | |
572 | - DWORD errcode = GetLastError(); | |
573 | - char *ptr; | |
574 | - LPVOID lpMsgBuf = 0; | |
575 | - | |
576 | - FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM |FORMAT_MESSAGE_IGNORE_INSERTS, NULL, errcode, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR) &lpMsgBuf, 0, NULL); | |
577 | - | |
578 | - for(ptr= (char *) lpMsgBuf;*ptr && *ptr != '\n';ptr++); | |
579 | - *ptr = 0; | |
580 | - | |
581 | - va_start(arg_ptr, fmt); | |
582 | - vsnprintf(buffer,4095,fmt,arg_ptr); | |
583 | - va_end(arg_ptr); | |
584 | - | |
585 | - sz = strlen(buffer); | |
586 | - snprintf(buffer+sz,4096-sz,": %s\n(rc=%d)",lpMsgBuf,(int) errcode); | |
587 | - | |
588 | - printf("%s\n",buffer); | |
589 | - | |
590 | -#ifdef DEBUG | |
591 | - fprintf(stderr,"%s\n",buffer); | |
592 | - fflush(stderr); | |
593 | -#endif | |
594 | - | |
595 | - LocalFree(lpMsgBuf); | |
596 | - } | |
597 | - | |
598 | - LIB3270_EXPORT int pw3270_plugin_start(GtkWidget *window, GtkWidget *terminal) | |
599 | - { | |
600 | - char id; | |
601 | - const gchar * name = "pw3270"; | |
602 | - | |
603 | - for(id='A';id < 'Z';id++) | |
604 | - { | |
605 | - gchar * pipename = g_strdup_printf("\\\\.\\pipe\\%s_%c",name,id); | |
606 | - gchar * ptr; | |
607 | - HANDLE hPipe; | |
608 | - | |
609 | - for(ptr=pipename;*ptr;ptr++) | |
610 | - *ptr = g_ascii_tolower(*ptr); | |
611 | - | |
612 | - hPipe = CreateNamedPipe( TEXT(pipename), // pipe name | |
613 | - PIPE_ACCESS_DUPLEX | // read/write access | |
614 | - FILE_FLAG_OVERLAPPED, // overlapped mode | |
615 | - PIPE_TYPE_MESSAGE | // pipe type | |
616 | - PIPE_READMODE_MESSAGE | // pipe mode | |
617 | - PIPE_WAIT, // blocking mode | |
618 | - 1, // number of instances | |
619 | - PIPE_BUFFER_LENGTH, // output buffer size | |
620 | - PIPE_BUFFER_LENGTH, // input buffer size | |
621 | - NMPWAIT_USE_DEFAULT_WAIT, // client time-out | |
622 | - NULL); // default security attributes | |
623 | - | |
624 | - trace("%s = %p",pipename,hPipe); | |
625 | - g_free(pipename); | |
626 | - | |
627 | - if(hPipe != INVALID_HANDLE_VALUE) | |
628 | - { | |
629 | - static GSourceFuncs pipe_source_funcs = | |
630 | - { | |
631 | - IO_prepare, | |
632 | - IO_check, | |
633 | - IO_dispatch, | |
634 | - IO_finalize, | |
635 | - IO_closure, | |
636 | - NULL | |
637 | - }; | |
638 | - pipe_source * source; | |
639 | - gchar * session = g_strdup_printf("%s:%c",name,id); | |
640 | - | |
641 | - // pw3270_set_session_name(window,session); | |
642 | - v3270_set_session_name(terminal,session); | |
643 | - | |
644 | - g_free(session); | |
645 | - | |
646 | - source = (pipe_source *) g_source_new(&pipe_source_funcs,sizeof(pipe_source)); | |
647 | - | |
648 | - source->hPipe = hPipe; | |
649 | - source->state = PIPE_STATE_WAITING; | |
650 | - source->overlap.hEvent = CreateEvent( NULL,TRUE,TRUE,NULL); | |
651 | - | |
652 | - g_source_attach((GSource *) source,NULL); | |
653 | - IO_accept(source); | |
654 | - | |
655 | - return 0; | |
656 | - } | |
657 | - | |
658 | - } | |
659 | - | |
660 | - popup_lasterror( "%s", _( "Can´t create remote control pipe" )); | |
661 | - | |
662 | - return -1; | |
663 | - } | |
664 | - | |
665 | - LIB3270_EXPORT int pw3270_plugin_stop(GtkWidget *window, GtkWidget *terminal) | |
666 | - { | |
667 | - | |
668 | - return 0; | |
669 | - } | |
670 | - | |
671 | - G_GNUC_INTERNAL void set_active(gboolean on) | |
672 | - { | |
673 | - trace("%s(%s)",__FUNCTION__,on ? "Active" : "Inactive"); | |
674 | - // v3270_set_script(v3270_get_default_widget(),'H'); | |
675 | - } |
src/plugin/windows/private.h
... | ... | @@ -1,50 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. | |
5 | - * | |
6 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
7 | - * | |
8 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
9 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
10 | - * Free Software Foundation. | |
11 | - * | |
12 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
13 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
14 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
15 | - * obter mais detalhes. | |
16 | - * | |
17 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
18 | - * programa; se não, escreva para a Free Software Foundation, Inc., 59 Temple | |
19 | - * Place, Suite 330, Boston, MA, 02111-1307, USA | |
20 | - * | |
21 | - * Este programa está nomeado como -e possui - linhas de código. | |
22 | - * | |
23 | - * Contatos: | |
24 | - * | |
25 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
26 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
27 | - * | |
28 | - */ | |
29 | - | |
30 | - #include <config.h> | |
31 | - #define ENABLE_NLS | |
32 | - #define GETTEXT_PACKAGE PACKAGE_NAME | |
33 | - | |
34 | - #include <libintl.h> | |
35 | - #include <glib/gi18n.h> | |
36 | - #include <gtk/gtk.h> | |
37 | - | |
38 | - #include <lib3270.h> | |
39 | - #include <lib3270/log.h> | |
40 | - #include <pw3270.h> | |
41 | - #include <pw3270/hllapi.h> | |
42 | - | |
43 | - #include <windows.h> | |
44 | - | |
45 | - #define PIPE_BUFFER_LENGTH HLLAPI_MAXLENGTH+30 | |
46 | - | |
47 | - G_GNUC_INTERNAL void popup_lasterror(const gchar *fmt, ...); | |
48 | - G_GNUC_INTERNAL void set_active(gboolean on); | |
49 | - | |
50 | - |
src/plugin/windows/resources.rc.in
... | ... | @@ -1,29 +0,0 @@ |
1 | -#include <windows.h> | |
2 | - | |
3 | -VS_VERSION_INFO VERSIONINFO | |
4 | -FILEVERSION @PACKAGE_MAJOR_VERSION@,@PACKAGE_MINOR_VERSION@,@PACKAGE_MAJOR_RELEASE@,0 | |
5 | -PRODUCTVERSION @PACKAGE_MAJOR_VERSION@,@PACKAGE_MINOR_VERSION@,@PACKAGE_MAJOR_RELEASE@,0 | |
6 | - | |
7 | -BEGIN | |
8 | - | |
9 | - BLOCK "StringFileInfo" | |
10 | - BEGIN | |
11 | - BLOCK "080904E4" | |
12 | - BEGIN | |
13 | - VALUE "FileDescription", "@PACKAGE_NAME@ IPC Plugin\0" | |
14 | - VALUE "CompanyName", "Banco do Brasil S/A.\0" | |
15 | - VALUE "FileVersion", "@WIN32_VERSION@\0" | |
16 | - VALUE "LegalCopyright", "(C) 2017 Banco do Brasil S/A. All Rights Reserved\0" | |
17 | - VALUE "OriginalFilename", "ipc3270@DLLEXT@\0" | |
18 | - VALUE "ProductName", "@PACKAGE_NAME@\0" | |
19 | - VALUE "ProductVersion", "@PACKAGE_MAJOR_VERSION@.@PACKAGE_MINOR_VERSION@.@PACKAGE_MAJOR_RELEASE@.0\0" | |
20 | - END | |
21 | - END | |
22 | - | |
23 | - BLOCK "VarFileInfo" | |
24 | - BEGIN | |
25 | - VALUE "Translation", 0x809, 0x04E4 | |
26 | - END | |
27 | - | |
28 | -END | |
29 | - |
src/testprogram/linux/test.sh
... | ... | @@ -1,126 +0,0 @@ |
1 | -#!/bin/bash | |
2 | - | |
3 | -SESSION=a | |
4 | -DEST=br.com.bb.pw3270 | |
5 | -BPATH=/br/com/bb/pw3270 | |
6 | - | |
7 | -run_command() | |
8 | -{ | |
9 | - | |
10 | - case $1 in | |
11 | - | |
12 | - revision) | |
13 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getRevision | |
14 | - ;; | |
15 | - | |
16 | - message) | |
17 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getMessageID | |
18 | - ;; | |
19 | - | |
20 | - ssl) | |
21 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getSecureState | |
22 | - ;; | |
23 | - | |
24 | - connect) | |
25 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.connect string:$2 int32:10 | |
26 | - ;; | |
27 | - | |
28 | - disconnect) | |
29 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.disconnect | |
30 | - ;; | |
31 | - | |
32 | - url) | |
33 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getURL | |
34 | - ;; | |
35 | - | |
36 | - quit) | |
37 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.quit | |
38 | - ;; | |
39 | - | |
40 | - get) | |
41 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getScreenContents | |
42 | - ;; | |
43 | - | |
44 | - gettext) | |
45 | -# addr,len,lf | |
46 | -# dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getText int32:1 int32:-1 byte:0 | |
47 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getText int32:1 int32:-1 byte:10 | |
48 | - ;; | |
49 | - | |
50 | - protect) | |
51 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getIsProtectedAt int32:$2 int32:$3 | |
52 | - ;; | |
53 | - | |
54 | - set) | |
55 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.setTextAt int32:$2 int32:$3 string:$4 | |
56 | - ;; | |
57 | - | |
58 | - action) | |
59 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.action string:$2 | |
60 | - ;; | |
61 | - | |
62 | - enter) | |
63 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.enter | |
64 | - ;; | |
65 | - | |
66 | - isconnected) | |
67 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.isConnected | |
68 | - ;; | |
69 | - | |
70 | - hostcharset) | |
71 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getHostCharset | |
72 | - ;; | |
73 | - | |
74 | - displaycharset) | |
75 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getDisplayCharset | |
76 | - ;; | |
77 | - | |
78 | - unlockdelay) | |
79 | - dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.setUnlockDelay int32:$2 | |
80 | - ;; | |
81 | - | |
82 | - *) | |
83 | - echo "Comando $1 desconhecido" | |
84 | - ;; | |
85 | - | |
86 | - esac | |
87 | -} | |
88 | - | |
89 | - | |
90 | - | |
91 | -until [ -z "$1" ] | |
92 | -do | |
93 | - if [ ${1:0:2} = '--' ]; then | |
94 | - tmp=${1:2} | |
95 | - parameter=${tmp%%=*} | |
96 | - parameter=$(echo $parameter | tr "[:lower:]" "[:upper:]") | |
97 | - value=${tmp##*=} | |
98 | - | |
99 | - case "$parameter" in | |
100 | - SESSION) | |
101 | - SESSION=$value | |
102 | - ;; | |
103 | - HELP) | |
104 | - echo "$0 options" | |
105 | - echo "" | |
106 | - echo "Options:" | |
107 | - echo "" | |
108 | - echo " --session pw3270's session manager" | |
109 | - echo "" | |
110 | - exit 0 | |
111 | - ;; | |
112 | - | |
113 | - *) | |
114 | - eval $parameter=$value | |
115 | - ;; | |
116 | - | |
117 | - esac | |
118 | - | |
119 | - else | |
120 | - run_command $@ | |
121 | - exit 0 | |
122 | - fi | |
123 | - | |
124 | - shift | |
125 | -done | |
126 | - |
src/testprogram/testprogram.c
... | ... | @@ -1,248 +0,0 @@ |
1 | -/* | |
2 | - * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | - * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | - * aplicativos mainframe. Registro no INPI sob o nome G3270. Registro no INPI sob | |
5 | - * o nome G3270. | |
6 | - * | |
7 | - * Copyright (C) <2008> <Banco do Brasil S.A.> | |
8 | - * | |
9 | - * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
10 | - * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
11 | - * Free Software Foundation. | |
12 | - * | |
13 | - * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
14 | - * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
15 | - * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
16 | - * obter mais detalhes. | |
17 | - * | |
18 | - * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
19 | - * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
20 | - * St, Fifth Floor, Boston, MA 02110-1301 USA | |
21 | - * | |
22 | - * Este programa está nomeado como testprogram.c e possui - linhas de código. | |
23 | - * | |
24 | - * Contatos: | |
25 | - * | |
26 | - * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
27 | - * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
28 | - * | |
29 | - */ | |
30 | - | |
31 | - | |
32 | - /** | |
33 | - * @brief Test program for pw3270 HLLAPI compatibility plugin. | |
34 | - * | |
35 | - */ | |
36 | - | |
37 | - #include <config.h> | |
38 | - #include <v3270.h> | |
39 | - #include <v3270/trace.h> | |
40 | - #include <pw3270/plugin.h> | |
41 | - #include <string.h> | |
42 | - #include <stdlib.h> | |
43 | - #include <pw3270.h> | |
44 | - | |
45 | - /*---[ Globals ]------------------------------------------------------------------------------------*/ | |
46 | - | |
47 | - const gchar * plugin_path = ".bin/Debug"; | |
48 | - const gchar * session_name = "pw3270"; | |
49 | - const gchar * plugin_name = "ipc3270c." G_MODULE_SUFFIX; | |
50 | - | |
51 | - /*---[ Implement ]----------------------------------------------------------------------------------*/ | |
52 | - | |
53 | - static void close_module(GtkWidget *widget, GModule *module) | |
54 | - { | |
55 | - g_message("Closing module %p",module); | |
56 | - | |
57 | - static void (*stop)(GtkWidget *window, GtkWidget *terminal) = NULL; | |
58 | - if(!g_module_symbol(module,"pw3270_plugin_stop",(void **) &stop)) | |
59 | - { | |
60 | - g_message("Can't get stop method from plugin: %s",g_module_error()); | |
61 | - } | |
62 | - else | |
63 | - { | |
64 | - stop(gtk_widget_get_toplevel(widget),widget); | |
65 | - } | |
66 | - | |
67 | - g_module_close(module); | |
68 | - g_message("Module %p was closed",module); | |
69 | - } | |
70 | - | |
71 | - static void toggle_ds_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
72 | - { | |
73 | - v3270_set_toggle(terminal,LIB3270_TOGGLE_DS_TRACE,gtk_toggle_tool_button_get_active(button)); | |
74 | - } | |
75 | - | |
76 | - static void toggle_event_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
77 | - { | |
78 | - v3270_set_toggle(terminal,LIB3270_TOGGLE_EVENT_TRACE,gtk_toggle_tool_button_get_active(button)); | |
79 | - } | |
80 | - | |
81 | - static void toggle_ssl_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
82 | - { | |
83 | - v3270_set_toggle(terminal,LIB3270_TOGGLE_SSL_TRACE,gtk_toggle_tool_button_get_active(button)); | |
84 | - } | |
85 | - | |
86 | - static void toggle_screen_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
87 | - { | |
88 | - v3270_set_toggle(terminal,LIB3270_TOGGLE_SCREEN_TRACE,gtk_toggle_tool_button_get_active(button)); | |
89 | - } | |
90 | - | |
91 | - static void toggle_started_trace(GtkToggleToolButton *button, GModule *module) | |
92 | - { | |
93 | - if(!module) | |
94 | - return; | |
95 | - | |
96 | - GtkWidget * terminal = GTK_WIDGET(g_object_get_data(G_OBJECT(button),"terminal")); | |
97 | - | |
98 | - const gchar * method_name = (gtk_toggle_tool_button_get_active(button) ? "pw3270_plugin_start" : "pw3270_plugin_stop"); | |
99 | - | |
100 | - static void (*call)(GtkWidget *window, GtkWidget *terminal) = NULL; | |
101 | - if(!g_module_symbol(module,method_name,(void **) &call)) | |
102 | - { | |
103 | - g_message("Can't get method \"%s\": %s",method_name,g_module_error()); | |
104 | - return; | |
105 | - } | |
106 | - | |
107 | - g_message("Calling %s",method_name); | |
108 | - call(gtk_widget_get_toplevel(terminal), GTK_WIDGET(terminal)); | |
109 | - | |
110 | - } | |
111 | - | |
112 | - static GtkToolItem * create_tool_item(GtkWidget *terminal, const gchar *label, const gchar *tooltip, GCallback callback) | |
113 | - { | |
114 | - GtkToolItem * item = gtk_toggle_tool_button_new(); | |
115 | - gtk_tool_button_set_label(GTK_TOOL_BUTTON(item),label); | |
116 | - | |
117 | - g_signal_connect(GTK_WIDGET(item), "toggled", G_CALLBACK(callback), terminal); | |
118 | - | |
119 | - if(tooltip) | |
120 | - gtk_widget_set_tooltip_text(GTK_WIDGET(item),tooltip); | |
121 | - | |
122 | - return item; | |
123 | - } | |
124 | - | |
125 | - static void activate(GtkApplication* app, G_GNUC_UNUSED gpointer user_data) { | |
126 | - | |
127 | - GtkWidget * window = gtk_application_window_new(app); | |
128 | - GtkWidget * terminal = v3270_new(); | |
129 | - GtkWidget * notebook = gtk_notebook_new(); | |
130 | - GModule * module = NULL; | |
131 | - | |
132 | - gtk_widget_set_name(window,session_name); | |
133 | - | |
134 | - // Setup tabs | |
135 | - gtk_notebook_append_page(GTK_NOTEBOOK(notebook),terminal,gtk_label_new(v3270_get_session_name(terminal))); | |
136 | - | |
137 | - // Load plugin | |
138 | - { | |
139 | - g_autofree gchar * plugin = g_build_filename(plugin_path,plugin_name,NULL); | |
140 | - | |
141 | - g_message("Loading %s",plugin); | |
142 | - | |
143 | - module = g_module_open(plugin,G_MODULE_BIND_LOCAL); | |
144 | - | |
145 | - if(module) | |
146 | - { | |
147 | - g_signal_connect (terminal, "destroy", G_CALLBACK(close_module), module); | |
148 | - } | |
149 | - else | |
150 | - { | |
151 | - g_message("Can't open \"%s\": %s",plugin,g_module_error()); | |
152 | - gtk_main_quit(); | |
153 | - } | |
154 | - | |
155 | - } | |
156 | - // Create trace window | |
157 | - { | |
158 | - GtkWidget * box = gtk_box_new(GTK_ORIENTATION_VERTICAL,0); | |
159 | - GtkWidget * trace = v3270_trace_new(terminal); | |
160 | - GtkWidget * toolbar = gtk_toolbar_new(); | |
161 | - GtkToolItem * start = gtk_toggle_tool_button_new(); | |
162 | - | |
163 | - gtk_widget_set_sensitive(GTK_WIDGET(start),module != NULL); | |
164 | - | |
165 | - g_object_set_data(G_OBJECT(start),"terminal",terminal); | |
166 | - | |
167 | - gtk_tool_button_set_label(GTK_TOOL_BUTTON(start),"Enable"); | |
168 | - g_signal_connect(GTK_WIDGET(start), "toggled", G_CALLBACK(toggle_started_trace), module); | |
169 | - gtk_widget_set_tooltip_text(GTK_WIDGET(start),"Start/Stop plugin module"); | |
170 | - | |
171 | - gtk_toolbar_insert(GTK_TOOLBAR(toolbar), start, -1); | |
172 | - | |
173 | - gtk_toolbar_insert(GTK_TOOLBAR(toolbar),gtk_separator_tool_item_new(),-1); | |
174 | - | |
175 | - gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "DS Trace","Toggle DS Trace",G_CALLBACK(toggle_ds_trace)),-1); | |
176 | - gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "Event Trace","Toggle Event Trace",G_CALLBACK(toggle_event_trace)),-1); | |
177 | - gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "Screen Trace","Toggle Screen Trace",G_CALLBACK(toggle_screen_trace)),-1); | |
178 | - gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "SSL Trace","Toggle SSL Trace",G_CALLBACK(toggle_ssl_trace)),-1); | |
179 | - | |
180 | - gtk_box_pack_start(GTK_BOX(box),toolbar,FALSE,FALSE,0); | |
181 | - gtk_box_pack_start(GTK_BOX(box),trace,TRUE,TRUE,0); | |
182 | - gtk_notebook_append_page(GTK_NOTEBOOK(notebook),box,gtk_label_new("Trace")); | |
183 | - } | |
184 | - | |
185 | - // Setup and show main window | |
186 | - gtk_window_set_position(GTK_WINDOW(window),GTK_WIN_POS_CENTER); | |
187 | - gtk_window_set_default_size (GTK_WINDOW (window), 800, 500); | |
188 | - gtk_container_add(GTK_CONTAINER(window),notebook); | |
189 | - gtk_widget_show_all (window); | |
190 | - | |
191 | - // Setup title. | |
192 | - const gchar *url = lib3270_get_url(v3270_get_session(terminal)); | |
193 | - if(url) { | |
194 | - | |
195 | - v3270_set_url(terminal,url); | |
196 | - v3270_reconnect(terminal); | |
197 | - | |
198 | - gchar * title = g_strdup_printf("%s - %s", v3270_get_session_name(terminal), url); | |
199 | - gtk_window_set_title(GTK_WINDOW(window), title); | |
200 | - g_free(title); | |
201 | - | |
202 | - } else { | |
203 | - | |
204 | - gtk_window_set_title(GTK_WINDOW(window), v3270_get_session_name(terminal)); | |
205 | - | |
206 | - } | |
207 | - | |
208 | -} | |
209 | - | |
210 | -int main (int argc, char **argv) { | |
211 | - | |
212 | - /* | |
213 | - GVariantBuilder builder; | |
214 | - | |
215 | - g_variant_builder_init(&builder,G_VARIANT_TYPE("(isi)")); | |
216 | - | |
217 | - g_variant_builder_add(&builder, "i", 10); | |
218 | - g_variant_builder_add(&builder, "s", "teste"); | |
219 | - g_variant_builder_add(&builder, "i", 20); | |
220 | - | |
221 | - GVariant *value = g_variant_builder_end(&builder); | |
222 | - | |
223 | - size_t szPacket = 0; | |
224 | - g_autofree unsigned char * buffer = ipc3270_pack("teste", value, &szPacket); | |
225 | - g_variant_unref(value); | |
226 | - | |
227 | - debug("Package \"%s\" was created with %u bytes", buffer, (unsigned int) szPacket); | |
228 | - | |
229 | - value = ipc3270_unpack(buffer); | |
230 | - | |
231 | - g_variant_unref(value); | |
232 | - */ | |
233 | - | |
234 | - GtkApplication *app; | |
235 | - int status; | |
236 | - | |
237 | - app = gtk_application_new ("br.com.bb.pw3270",G_APPLICATION_FLAGS_NONE); | |
238 | - | |
239 | - g_signal_connect (app, "activate", G_CALLBACK(activate), NULL); | |
240 | - | |
241 | - status = g_application_run (G_APPLICATION (app), argc, argv); | |
242 | - g_object_unref (app); | |
243 | - | |
244 | - g_message("rc=%d",status); | |
245 | - return status; | |
246 | - | |
247 | -} | |
248 | - |
... | ... | @@ -0,0 +1,126 @@ |
1 | +#!/bin/bash | |
2 | + | |
3 | +SESSION=a | |
4 | +DEST=br.com.bb.pw3270 | |
5 | +BPATH=/br/com/bb/pw3270 | |
6 | + | |
7 | +run_command() | |
8 | +{ | |
9 | + | |
10 | + case $1 in | |
11 | + | |
12 | + revision) | |
13 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getRevision | |
14 | + ;; | |
15 | + | |
16 | + message) | |
17 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getMessageID | |
18 | + ;; | |
19 | + | |
20 | + ssl) | |
21 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getSecureState | |
22 | + ;; | |
23 | + | |
24 | + connect) | |
25 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.connect string:$2 int32:10 | |
26 | + ;; | |
27 | + | |
28 | + disconnect) | |
29 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.disconnect | |
30 | + ;; | |
31 | + | |
32 | + url) | |
33 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getURL | |
34 | + ;; | |
35 | + | |
36 | + quit) | |
37 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.quit | |
38 | + ;; | |
39 | + | |
40 | + get) | |
41 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getScreenContents | |
42 | + ;; | |
43 | + | |
44 | + gettext) | |
45 | +# addr,len,lf | |
46 | +# dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getText int32:1 int32:-1 byte:0 | |
47 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getText int32:1 int32:-1 byte:10 | |
48 | + ;; | |
49 | + | |
50 | + protect) | |
51 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getIsProtectedAt int32:$2 int32:$3 | |
52 | + ;; | |
53 | + | |
54 | + set) | |
55 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.setTextAt int32:$2 int32:$3 string:$4 | |
56 | + ;; | |
57 | + | |
58 | + action) | |
59 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.action string:$2 | |
60 | + ;; | |
61 | + | |
62 | + enter) | |
63 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.enter | |
64 | + ;; | |
65 | + | |
66 | + isconnected) | |
67 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.isConnected | |
68 | + ;; | |
69 | + | |
70 | + hostcharset) | |
71 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getHostCharset | |
72 | + ;; | |
73 | + | |
74 | + displaycharset) | |
75 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getDisplayCharset | |
76 | + ;; | |
77 | + | |
78 | + unlockdelay) | |
79 | + dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.setUnlockDelay int32:$2 | |
80 | + ;; | |
81 | + | |
82 | + *) | |
83 | + echo "Comando $1 desconhecido" | |
84 | + ;; | |
85 | + | |
86 | + esac | |
87 | +} | |
88 | + | |
89 | + | |
90 | + | |
91 | +until [ -z "$1" ] | |
92 | +do | |
93 | + if [ ${1:0:2} = '--' ]; then | |
94 | + tmp=${1:2} | |
95 | + parameter=${tmp%%=*} | |
96 | + parameter=$(echo $parameter | tr "[:lower:]" "[:upper:]") | |
97 | + value=${tmp##*=} | |
98 | + | |
99 | + case "$parameter" in | |
100 | + SESSION) | |
101 | + SESSION=$value | |
102 | + ;; | |
103 | + HELP) | |
104 | + echo "$0 options" | |
105 | + echo "" | |
106 | + echo "Options:" | |
107 | + echo "" | |
108 | + echo " --session pw3270's session manager" | |
109 | + echo "" | |
110 | + exit 0 | |
111 | + ;; | |
112 | + | |
113 | + *) | |
114 | + eval $parameter=$value | |
115 | + ;; | |
116 | + | |
117 | + esac | |
118 | + | |
119 | + else | |
120 | + run_command $@ | |
121 | + exit 0 | |
122 | + fi | |
123 | + | |
124 | + shift | |
125 | +done | |
126 | + | ... | ... |
... | ... | @@ -0,0 +1,248 @@ |
1 | +/* | |
2 | + * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 | |
3 | + * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a | |
4 | + * aplicativos mainframe. Registro no INPI sob o nome G3270. Registro no INPI sob | |
5 | + * o nome G3270. | |
6 | + * | |
7 | + * Copyright (C) <2008> <Banco do Brasil S.A.> | |
8 | + * | |
9 | + * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob | |
10 | + * os termos da GPL v.2 - Licença Pública Geral GNU, conforme publicado pela | |
11 | + * Free Software Foundation. | |
12 | + * | |
13 | + * Este programa é distribuído na expectativa de ser útil, mas SEM QUALQUER | |
14 | + * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou de ADEQUAÇÃO | |
15 | + * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para | |
16 | + * obter mais detalhes. | |
17 | + * | |
18 | + * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este | |
19 | + * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin | |
20 | + * St, Fifth Floor, Boston, MA 02110-1301 USA | |
21 | + * | |
22 | + * Este programa está nomeado como testprogram.c e possui - linhas de código. | |
23 | + * | |
24 | + * Contatos: | |
25 | + * | |
26 | + * perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) | |
27 | + * erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) | |
28 | + * | |
29 | + */ | |
30 | + | |
31 | + | |
32 | + /** | |
33 | + * @brief Test program for pw3270 HLLAPI compatibility plugin. | |
34 | + * | |
35 | + */ | |
36 | + | |
37 | + #include <config.h> | |
38 | + #include <v3270.h> | |
39 | + #include <v3270/trace.h> | |
40 | + #include <pw3270/plugin.h> | |
41 | + #include <string.h> | |
42 | + #include <stdlib.h> | |
43 | + #include <pw3270.h> | |
44 | + | |
45 | + /*---[ Globals ]------------------------------------------------------------------------------------*/ | |
46 | + | |
47 | + const gchar * plugin_path = ".bin/Debug"; | |
48 | + const gchar * session_name = "pw3270"; | |
49 | + const gchar * plugin_name = "ipc3270c." G_MODULE_SUFFIX; | |
50 | + | |
51 | + /*---[ Implement ]----------------------------------------------------------------------------------*/ | |
52 | + | |
53 | + static void close_module(GtkWidget *widget, GModule *module) | |
54 | + { | |
55 | + g_message("Closing module %p",module); | |
56 | + | |
57 | + static void (*stop)(GtkWidget *window, GtkWidget *terminal) = NULL; | |
58 | + if(!g_module_symbol(module,"pw3270_plugin_stop",(void **) &stop)) | |
59 | + { | |
60 | + g_message("Can't get stop method from plugin: %s",g_module_error()); | |
61 | + } | |
62 | + else | |
63 | + { | |
64 | + stop(gtk_widget_get_toplevel(widget),widget); | |
65 | + } | |
66 | + | |
67 | + g_module_close(module); | |
68 | + g_message("Module %p was closed",module); | |
69 | + } | |
70 | + | |
71 | + static void toggle_ds_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
72 | + { | |
73 | + v3270_set_toggle(terminal,LIB3270_TOGGLE_DS_TRACE,gtk_toggle_tool_button_get_active(button)); | |
74 | + } | |
75 | + | |
76 | + static void toggle_event_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
77 | + { | |
78 | + v3270_set_toggle(terminal,LIB3270_TOGGLE_EVENT_TRACE,gtk_toggle_tool_button_get_active(button)); | |
79 | + } | |
80 | + | |
81 | + static void toggle_ssl_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
82 | + { | |
83 | + v3270_set_toggle(terminal,LIB3270_TOGGLE_SSL_TRACE,gtk_toggle_tool_button_get_active(button)); | |
84 | + } | |
85 | + | |
86 | + static void toggle_screen_trace(GtkToggleToolButton *button, GtkWidget *terminal) | |
87 | + { | |
88 | + v3270_set_toggle(terminal,LIB3270_TOGGLE_SCREEN_TRACE,gtk_toggle_tool_button_get_active(button)); | |
89 | + } | |
90 | + | |
91 | + static void toggle_started_trace(GtkToggleToolButton *button, GModule *module) | |
92 | + { | |
93 | + if(!module) | |
94 | + return; | |
95 | + | |
96 | + GtkWidget * terminal = GTK_WIDGET(g_object_get_data(G_OBJECT(button),"terminal")); | |
97 | + | |
98 | + const gchar * method_name = (gtk_toggle_tool_button_get_active(button) ? "pw3270_plugin_start" : "pw3270_plugin_stop"); | |
99 | + | |
100 | + static void (*call)(GtkWidget *window, GtkWidget *terminal) = NULL; | |
101 | + if(!g_module_symbol(module,method_name,(void **) &call)) | |
102 | + { | |
103 | + g_message("Can't get method \"%s\": %s",method_name,g_module_error()); | |
104 | + return; | |
105 | + } | |
106 | + | |
107 | + g_message("Calling %s",method_name); | |
108 | + call(gtk_widget_get_toplevel(terminal), GTK_WIDGET(terminal)); | |
109 | + | |
110 | + } | |
111 | + | |
112 | + static GtkToolItem * create_tool_item(GtkWidget *terminal, const gchar *label, const gchar *tooltip, GCallback callback) | |
113 | + { | |
114 | + GtkToolItem * item = gtk_toggle_tool_button_new(); | |
115 | + gtk_tool_button_set_label(GTK_TOOL_BUTTON(item),label); | |
116 | + | |
117 | + g_signal_connect(GTK_WIDGET(item), "toggled", G_CALLBACK(callback), terminal); | |
118 | + | |
119 | + if(tooltip) | |
120 | + gtk_widget_set_tooltip_text(GTK_WIDGET(item),tooltip); | |
121 | + | |
122 | + return item; | |
123 | + } | |
124 | + | |
125 | + static void activate(GtkApplication* app, G_GNUC_UNUSED gpointer user_data) { | |
126 | + | |
127 | + GtkWidget * window = gtk_application_window_new(app); | |
128 | + GtkWidget * terminal = v3270_new(); | |
129 | + GtkWidget * notebook = gtk_notebook_new(); | |
130 | + GModule * module = NULL; | |
131 | + | |
132 | + gtk_widget_set_name(window,session_name); | |
133 | + | |
134 | + // Setup tabs | |
135 | + gtk_notebook_append_page(GTK_NOTEBOOK(notebook),terminal,gtk_label_new(v3270_get_session_name(terminal))); | |
136 | + | |
137 | + // Load plugin | |
138 | + { | |
139 | + g_autofree gchar * plugin = g_build_filename(plugin_path,plugin_name,NULL); | |
140 | + | |
141 | + g_message("Loading %s",plugin); | |
142 | + | |
143 | + module = g_module_open(plugin,G_MODULE_BIND_LOCAL); | |
144 | + | |
145 | + if(module) | |
146 | + { | |
147 | + g_signal_connect (terminal, "destroy", G_CALLBACK(close_module), module); | |
148 | + } | |
149 | + else | |
150 | + { | |
151 | + g_message("Can't open \"%s\": %s",plugin,g_module_error()); | |
152 | + gtk_main_quit(); | |
153 | + } | |
154 | + | |
155 | + } | |
156 | + // Create trace window | |
157 | + { | |
158 | + GtkWidget * box = gtk_box_new(GTK_ORIENTATION_VERTICAL,0); | |
159 | + GtkWidget * trace = v3270_trace_new(terminal); | |
160 | + GtkWidget * toolbar = gtk_toolbar_new(); | |
161 | + GtkToolItem * start = gtk_toggle_tool_button_new(); | |
162 | + | |
163 | + gtk_widget_set_sensitive(GTK_WIDGET(start),module != NULL); | |
164 | + | |
165 | + g_object_set_data(G_OBJECT(start),"terminal",terminal); | |
166 | + | |
167 | + gtk_tool_button_set_label(GTK_TOOL_BUTTON(start),"Enable"); | |
168 | + g_signal_connect(GTK_WIDGET(start), "toggled", G_CALLBACK(toggle_started_trace), module); | |
169 | + gtk_widget_set_tooltip_text(GTK_WIDGET(start),"Start/Stop plugin module"); | |
170 | + | |
171 | + gtk_toolbar_insert(GTK_TOOLBAR(toolbar), start, -1); | |
172 | + | |
173 | + gtk_toolbar_insert(GTK_TOOLBAR(toolbar),gtk_separator_tool_item_new(),-1); | |
174 | + | |
175 | + gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "DS Trace","Toggle DS Trace",G_CALLBACK(toggle_ds_trace)),-1); | |
176 | + gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "Event Trace","Toggle Event Trace",G_CALLBACK(toggle_event_trace)),-1); | |
177 | + gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "Screen Trace","Toggle Screen Trace",G_CALLBACK(toggle_screen_trace)),-1); | |
178 | + gtk_toolbar_insert(GTK_TOOLBAR(toolbar),create_tool_item(terminal, "SSL Trace","Toggle SSL Trace",G_CALLBACK(toggle_ssl_trace)),-1); | |
179 | + | |
180 | + gtk_box_pack_start(GTK_BOX(box),toolbar,FALSE,FALSE,0); | |
181 | + gtk_box_pack_start(GTK_BOX(box),trace,TRUE,TRUE,0); | |
182 | + gtk_notebook_append_page(GTK_NOTEBOOK(notebook),box,gtk_label_new("Trace")); | |
183 | + } | |
184 | + | |
185 | + // Setup and show main window | |
186 | + gtk_window_set_position(GTK_WINDOW(window),GTK_WIN_POS_CENTER); | |
187 | + gtk_window_set_default_size (GTK_WINDOW (window), 800, 500); | |
188 | + gtk_container_add(GTK_CONTAINER(window),notebook); | |
189 | + gtk_widget_show_all (window); | |
190 | + | |
191 | + // Setup title. | |
192 | + const gchar *url = lib3270_get_url(v3270_get_session(terminal)); | |
193 | + if(url) { | |
194 | + | |
195 | + v3270_set_url(terminal,url); | |
196 | + v3270_reconnect(terminal); | |
197 | + | |
198 | + gchar * title = g_strdup_printf("%s - %s", v3270_get_session_name(terminal), url); | |
199 | + gtk_window_set_title(GTK_WINDOW(window), title); | |
200 | + g_free(title); | |
201 | + | |
202 | + } else { | |
203 | + | |
204 | + gtk_window_set_title(GTK_WINDOW(window), v3270_get_session_name(terminal)); | |
205 | + | |
206 | + } | |
207 | + | |
208 | +} | |
209 | + | |
210 | +int main (int argc, char **argv) { | |
211 | + | |
212 | + /* | |
213 | + GVariantBuilder builder; | |
214 | + | |
215 | + g_variant_builder_init(&builder,G_VARIANT_TYPE("(isi)")); | |
216 | + | |
217 | + g_variant_builder_add(&builder, "i", 10); | |
218 | + g_variant_builder_add(&builder, "s", "teste"); | |
219 | + g_variant_builder_add(&builder, "i", 20); | |
220 | + | |
221 | + GVariant *value = g_variant_builder_end(&builder); | |
222 | + | |
223 | + size_t szPacket = 0; | |
224 | + g_autofree unsigned char * buffer = ipc3270_pack("teste", value, &szPacket); | |
225 | + g_variant_unref(value); | |
226 | + | |
227 | + debug("Package \"%s\" was created with %u bytes", buffer, (unsigned int) szPacket); | |
228 | + | |
229 | + value = ipc3270_unpack(buffer); | |
230 | + | |
231 | + g_variant_unref(value); | |
232 | + */ | |
233 | + | |
234 | + GtkApplication *app; | |
235 | + int status; | |
236 | + | |
237 | + app = gtk_application_new ("br.com.bb.pw3270",G_APPLICATION_FLAGS_NONE); | |
238 | + | |
239 | + g_signal_connect (app, "activate", G_CALLBACK(activate), NULL); | |
240 | + | |
241 | + status = g_application_run (G_APPLICATION (app), argc, argv); | |
242 | + g_object_unref (app); | |
243 | + | |
244 | + g_message("rc=%d",status); | |
245 | + return status; | |
246 | + | |
247 | +} | |
248 | + | ... | ... |