From 5b9b55e09ee8661c74df2ec1cc6233c234e2d4a7 Mon Sep 17 00:00:00 2001
From: perry.werneck@gmail.com <perry.werneck@gmail.com@d25448e0-c022-0410-b998-a785f7053de0>
Date: Fri, 1 Mar 2013 14:27:57 +0000
Subject: [PATCH] Incluindo mais métodos na extensão .oxt

---
 po/pt_BR.po             | 18 +++++++++---------
 pw3270.cbp              |  1 +
 src/oxt/Makefile.in     |  2 +-
 src/oxt/actions.cxx     | 50 ++++++++++++++++++++++++++++++++++++++++++++++++++
 src/oxt/globals.hpp     | 27 ++++++++++++++++-----------
 src/oxt/local.cxx       |  8 ++++++++
 src/oxt/pw3270.idl      |  8 ++++++++
 src/oxt/pw3270OXT.cbp   |  2 ++
 src/oxt/set.cxx         | 42 ++++++++++++++++++++++++++++++++++++++++++
 src/oxt/testprogram.cxx |  8 +++++---
 10 files changed, 142 insertions(+), 24 deletions(-)
 create mode 100644 src/oxt/actions.cxx
 create mode 100644 src/oxt/set.cxx

diff --git a/po/pt_BR.po b/po/pt_BR.po
index 9911edb..083e145 100644
--- a/po/pt_BR.po
+++ b/po/pt_BR.po
@@ -5,7 +5,7 @@ msgid ""
 msgstr ""
 "Project-Id-Version: pw3270 5.0\n"
 "Report-Msgid-Bugs-To: \n"
-"POT-Creation-Date: 2013-02-28 07:17-0300\n"
+"POT-Creation-Date: 2013-03-01 08:21-0300\n"
 "PO-Revision-Date: 2013-02-25 14:46-0300\n"
 "Last-Translator: Perry Werneck <perry.werneck@gmail.com>\n"
 "Language-Team: Português <>\n"
@@ -43,32 +43,32 @@ msgstr "Ação %s precisa do atributo src"
 msgid "%s requires GTK version %d.%d.%d"
 msgstr "%s requer GTK versão %d.%d.%d"
 
-#: kybd.c:2689
+#: kybd.c:2691
 #, c-format
 msgid "%s: Bell not supported"
 msgstr "%s: Alerta sonoro não suportado"
 
-#: kybd.c:2848
+#: kybd.c:2850
 #, c-format
 msgid "%s: Missing hex digits after \\x"
 msgstr "%s: Faltando dígitos hexadecimais após \\x"
 
-#: kybd.c:2788
+#: kybd.c:2790
 #, c-format
 msgid "%s: Unknown character after \\p"
 msgstr "%s: Caractere desconhecido depois de \\p"
 
-#: kybd.c:2824
+#: kybd.c:2826
 #, c-format
 msgid "%s: Unknown character after \\pa"
 msgstr "%s: Caractere desconhecido depois de \\pa"
 
-#: kybd.c:2802
+#: kybd.c:2804
 #, c-format
 msgid "%s: Unknown character after \\pf"
 msgstr "%s: Caractere desconhecido depois de \\pf"
 
-#: kybd.c:2740
+#: kybd.c:2742
 #, c-format
 msgid "%s: Vertical tab not supported"
 msgstr "%s: Tabulação verticao não suportada"
@@ -2046,12 +2046,12 @@ msgstr "Unknown 3270 Data Stream command: 0x%X"
 msgid "Unknown FT control code from host"
 msgstr "Servidor enviou código de controle FT desconhecido"
 
-#: kybd.c:2438
+#: kybd.c:2440
 #, c-format
 msgid "Unknown PA key %d"
 msgstr "PA %d desconhecida"
 
-#: kybd.c:2453
+#: kybd.c:2455
 #, c-format
 msgid "Unknown PF key %d"
 msgstr "PF %d desconhecida"
diff --git a/pw3270.cbp b/pw3270.cbp
index c570b5d..a3092fd 100644
--- a/pw3270.cbp
+++ b/pw3270.cbp
@@ -262,6 +262,7 @@
 			<Option compilerVar="CC" />
 		</Unit>
 		<Unit filename="src/plugins/remotectl/remotectl.h" />
+		<Unit filename="src/plugins/remotectl/server.h" />
 		<Unit filename="src/plugins/remotectl/testprogram.c">
 			<Option compilerVar="CC" />
 		</Unit>
diff --git a/src/oxt/Makefile.in b/src/oxt/Makefile.in
index 2e17f07..2093c1a 100644
--- a/src/oxt/Makefile.in
+++ b/src/oxt/Makefile.in
@@ -1,7 +1,7 @@
 
 PACKAGE=@PACKAGE_NAME@
 
-SOURCES=main.cxx local.cxx connection.cxx get.cxx
+SOURCES=main.cxx local.cxx connection.cxx get.cxx set.cxx actions.cxx
 
 prefix=/usr
 exec_prefix=@exec_prefix@
diff --git a/src/oxt/actions.cxx b/src/oxt/actions.cxx
new file mode 100644
index 0000000..695cc75
--- /dev/null
+++ b/src/oxt/actions.cxx
@@ -0,0 +1,50 @@
+/*
+ * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270  e X3270
+ * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a
+ * aplicativos mainframe. Registro no INPI sob o nome G3270.
+ *
+ * Copyright (C) <2008> <Banco do Brasil S.A.>
+ *
+ * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob
+ * os termos da GPL v.2 - Licença Pública Geral  GNU,  conforme  publicado  pela
+ * Free Software Foundation.
+ *
+ * Este programa é distribuído na expectativa de  ser  útil,  mas  SEM  QUALQUER
+ * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou  de  ADEQUAÇÃO
+ * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para
+ * obter mais detalhes.
+ *
+ * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este
+ * programa;  se  não, escreva para a Free Software Foundation, Inc., 59 Temple
+ * Place, Suite 330, Boston, MA, 02111-1307, USA
+ *
+ * Este programa está nomeado como actions.cxx e possui - linhas de código.
+ *
+ * Contatos:
+ *
+ * perry.werneck@gmail.com	(Alexandre Perry de Souza Werneck)
+ * erico.mendonca@gmail.com	(Erico Mascarenhas Mendonça)
+ * licinio@bb.com.br		(Licínio Luis Branco)
+ * kraucer@bb.com.br		(Kraucer Fernandes Mazuco)
+ *
+ */
+
+ #include "globals.hpp"
+ #include <string.h>
+
+/*---[ Implement ]-----------------------------------------------------------------------------------------*/
+
+::sal_Int16 SAL_CALL pw3270::uno_impl::enter(  ) throw (::com::sun::star::uno::RuntimeException)
+{
+	return hSession->enter();
+}
+
+::sal_Int16 SAL_CALL pw3270::uno_impl::pfkey( ::sal_Int16 keycode ) throw (::com::sun::star::uno::RuntimeException)
+{
+	return hSession->pfkey((int) keycode);
+}
+
+::sal_Int16 SAL_CALL pw3270::uno_impl::pakey( ::sal_Int16 keycode ) throw (::com::sun::star::uno::RuntimeException)
+{
+	return hSession->pakey((int) keycode);
+}
diff --git a/src/oxt/globals.hpp b/src/oxt/globals.hpp
index 6da6bd7..1d4b57f 100644
--- a/src/oxt/globals.hpp
+++ b/src/oxt/globals.hpp
@@ -51,20 +51,20 @@
 			public:
 				session();
 				virtual ~session();
-				virtual int		get_revision(void)						= 0;
-				virtual int 	get_state(void)							= 0;
-				virtual char *  get_text_at(int row, int col, int len)	= 0;
+				virtual int		get_revision(void)								= 0;
+				virtual int 	get_state(void)									= 0;
+				virtual char *  get_text_at(int row, int col, int len)			= 0;
+				virtual int		set_text_at(int row, int col, const char *text) = 0;
 
+				virtual int		connect(const char *uri)						= 0;
+				virtual int		disconnect(void)								= 0;
+				virtual bool	connected(void)									= 0;
 
-				virtual int		connect(const char *uri)				= 0;
-				virtual int		disconnect(void)						= 0;
-				virtual bool	connected(void)							= 0;
+				virtual int		enter(void)										= 0;
+				virtual int		pfkey(int key)									= 0;
+				virtual int		pakey(int key)									= 0;
 
-				virtual int		enter(void)								= 0;
-				virtual int		pfkey(int key)							= 0;
-				virtual int		pakey(int key)							= 0;
-
-				virtual void	mem_free(void *)						= 0;
+				virtual void	mem_free(void *)								= 0;
 
 				void			sleep(int seconds = 1);
 
@@ -90,6 +90,7 @@
 				virtual int		pakey(int key);
 
 				virtual char *  get_text_at(int row, int col, int len);
+				virtual int		set_text_at(int row, int col, const char *text);
 
 				virtual void	mem_free(void *ptr);
 
@@ -139,6 +140,10 @@
 				virtual ::sal_Int16 SAL_CALL getConnectionState(  ) throw (::com::sun::star::uno::RuntimeException);
 				virtual ::sal_Int16 SAL_CALL sleep( ::sal_Int16 seconds ) throw (::com::sun::star::uno::RuntimeException);
 				virtual ::rtl::OUString SAL_CALL getTextAt( ::sal_Int16 row, ::sal_Int16 col, ::sal_Int16 size ) throw (::com::sun::star::uno::RuntimeException);
+				virtual ::sal_Int16 SAL_CALL setTextAt( ::sal_Int16 row, ::sal_Int16 col, const ::rtl::OUString& text ) throw (::com::sun::star::uno::RuntimeException);
+				virtual ::sal_Int16 SAL_CALL enter(  ) throw (::com::sun::star::uno::RuntimeException);
+				virtual ::sal_Int16 SAL_CALL pfkey( ::sal_Int16 keycode ) throw (::com::sun::star::uno::RuntimeException);
+				virtual ::sal_Int16 SAL_CALL pakey( ::sal_Int16 keycode ) throw (::com::sun::star::uno::RuntimeException);
 
 			private:
 
diff --git a/src/oxt/local.cxx b/src/oxt/local.cxx
index 90ef738..d6dea23 100644
--- a/src/oxt/local.cxx
+++ b/src/oxt/local.cxx
@@ -228,3 +228,11 @@
 		return NULL;
 	return _get_text_at(hSession,row,col,len);
  }
+
+ int pw3270::lib3270_session::set_text_at(int row, int col, const char *text)
+ {
+	if(!hSession)
+		return EINVAL;
+	return _set_text_at(hSession,row,col,(const unsigned char *) text);
+ }
+
diff --git a/src/oxt/pw3270.idl b/src/oxt/pw3270.idl
index 8331c9b..0c4ad94 100644
--- a/src/oxt/pw3270.idl
+++ b/src/oxt/pw3270.idl
@@ -64,6 +64,14 @@ module br
 				/* Get */
 				string	getTextAt([in] short row, [in] short col, [in] short size);
 
+				/* Set */
+				short	setTextAt([in] short row, [in] short col, [in] string text);
+
+				/* Actions */
+				short	enter();
+				short	pfkey([in] short keycode);
+				short	pakey([in] short keycode);
+
 				/* Misc */
 				short	getRevision();
 				short	sleep([in] short seconds);
diff --git a/src/oxt/pw3270OXT.cbp b/src/oxt/pw3270OXT.cbp
index fb6f37a..d84b7ac 100644
--- a/src/oxt/pw3270OXT.cbp
+++ b/src/oxt/pw3270OXT.cbp
@@ -33,12 +33,14 @@
 			<Add option="-Wall" />
 		</Compiler>
 		<Unit filename="Makefile.in" />
+		<Unit filename="actions.cxx" />
 		<Unit filename="connection.cxx" />
 		<Unit filename="get.cxx" />
 		<Unit filename="globals.hpp" />
 		<Unit filename="local.cxx" />
 		<Unit filename="main.cxx" />
 		<Unit filename="pw3270.idl" />
+		<Unit filename="set.cxx" />
 		<Unit filename="testprogram.cxx" />
 		<Extensions>
 			<code_completion />
diff --git a/src/oxt/set.cxx b/src/oxt/set.cxx
new file mode 100644
index 0000000..9a55799
--- /dev/null
+++ b/src/oxt/set.cxx
@@ -0,0 +1,42 @@
+/*
+ * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270  e X3270
+ * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a
+ * aplicativos mainframe. Registro no INPI sob o nome G3270.
+ *
+ * Copyright (C) <2008> <Banco do Brasil S.A.>
+ *
+ * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob
+ * os termos da GPL v.2 - Licença Pública Geral  GNU,  conforme  publicado  pela
+ * Free Software Foundation.
+ *
+ * Este programa é distribuído na expectativa de  ser  útil,  mas  SEM  QUALQUER
+ * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou  de  ADEQUAÇÃO
+ * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para
+ * obter mais detalhes.
+ *
+ * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este
+ * programa;  se  não, escreva para a Free Software Foundation, Inc., 59 Temple
+ * Place, Suite 330, Boston, MA, 02111-1307, USA
+ *
+ * Este programa está nomeado como set.cxx e possui - linhas de código.
+ *
+ * Contatos:
+ *
+ * perry.werneck@gmail.com	(Alexandre Perry de Souza Werneck)
+ * erico.mendonca@gmail.com	(Erico Mascarenhas Mendonça)
+ * licinio@bb.com.br		(Licínio Luis Branco)
+ * kraucer@bb.com.br		(Kraucer Fernandes Mazuco)
+ *
+ */
+
+ #include "globals.hpp"
+ #include <string.h>
+
+/*---[ Implement ]-----------------------------------------------------------------------------------------*/
+
+::sal_Int16 SAL_CALL pw3270::uno_impl::setTextAt( ::sal_Int16 row, ::sal_Int16 col, const ::rtl::OUString& text ) throw (::com::sun::star::uno::RuntimeException)
+{
+	return hSession->set_text_at((int) row, (int) col, rtl::OUStringToOString(text,hSession->get_encoding()).getStr());
+}
+
+
diff --git a/src/oxt/testprogram.cxx b/src/oxt/testprogram.cxx
index 1045069..5f16ff8 100644
--- a/src/oxt/testprogram.cxx
+++ b/src/oxt/testprogram.cxx
@@ -118,12 +118,14 @@ int SAL_CALL main(int argc, char **argv)
 			str	= OUStringToOString( srv->getTextAt(1,1,2000),RTL_TEXTENCODING_UTF8);
 			printf("ContentsAt(1,1):\n%s\n",str.pData->buffer);
 
-			srv->Disconnect();
-			srv->sleep(2);
 			printf("getConnectionState: %d\n", srv->getConnectionState());
 
-			srv->sleep(2);
+			srv->sleep(1);
+			srv->enter();
+			srv->sleep(1);
 
+			str	= OUStringToOString( srv->getTextAt(1,1,2000),RTL_TEXTENCODING_UTF8);
+			printf("ContentsAt(1,1):\n%s\n",str.pData->buffer);
 
 			/*
 			printf("waitForStringAt(SISBB) returned %d\n",srv->waitForStringAt(20,39,OUString::createFromAscii("SISBB"),20));
--
libgit2 0.21.2