Commit 2cf85aa5da77b65a1518005c9e19271ad0229f30

Authored by Perry Werneck
1 parent 83fe410a
Exists in master

Empacotando extensão ooRexx de forma independente.

AUTHORS 0 → 100644
... ... @@ -0,0 +1,3 @@
  1 +Perry Werneck <perry.werneck@gmail.com>
  2 +and others
  3 +
... ...
LICENCA 0 → 100644
... ... @@ -0,0 +1,164 @@
  1 +GNU LESSER GENERAL PUBLIC LICENSE (LICENÇA PÚBLICA MENOS GERAL GNU)
  2 +Versão 3, 29 de junho de 2007
  3 +Copyright © 2007 Free Software Foundation, Inc. <http://fsf.org>
  4 +
  5 +É permitido a todos copiar e distribuir cópias literais deste documento de
  6 +licença, mas sua alteração não é permitida.
  7 +
  8 +Esta versão da GNU Lesser General Public License incorpora os termos e
  9 +condições da versão 3 da GNU General Public License, complementada pelas
  10 +permissões adicionais listadas abaixo.
  11 +
  12 +0. Definições Adicionais.
  13 +
  14 +De acordo com sua utilização no presente documento, "esta Licença" refere-
  15 +se à versão 3 da GNU Lesser General Public License (Licença Pública Menos
  16 +Geral GNU) e "GNU GPL" refere-se à versão 3 da GNU General Public
  17 +License (Licença Pública Geral GNU).
  18 +
  19 +"A Biblioteca" refere-se a um trabalho coberto regido nos termos desta
  20 +Licença que não se trate de um Aplicativo ou Trabalho Combinado conforme
  21 +definido abaixo.
  22 +
  23 +Um "Aplicativo" constitui qualquer trabalho que faça uso de uma interface
  24 +fornecida pela Biblioteca, mas que não se encontra de outra forma baseada na
  25 +referida Biblioteca. A definição de uma subclasse de uma classe definida pela
  26 +Biblioteca é considerada um modo de utilizar uma interface fornecida pela
  27 +Biblioteca.
  28 +
  29 +Um "Trabalho Combinado" constitui um trabalho produzido através da
  30 +combinação ou vinculação de um Aplicativo à Biblioteca. A versão
  31 +específica da Biblioteca com a qual o Trabalho Combinado foi elaborado é
  32 +também denominada "Linked Version" [Versão Vinculada].
  33 +
  34 +A "Fonte Mínima Correspondente" de um Trabalho Combinado significa a
  35 +Fonte Correspondente ao Trabalho Combinado, excluindo qualquer código
  36 +fonte de parte do Trabalho Combinado que, considerado de forma isolada,
  37 +seja baseado no Aplicativo e não na Versão Vinculada.
  38 +
  39 +O "Código do aplicativo Correspondente" de um Trabalho Combinado
  40 +significa o código objeto e/ou código fonte do Aplicativo, incluindo
  41 +quaisquer dados e programas utilitários necessários para a reprodução do
  42 +Trabalho Combinado do Aplicativo, mas excluindo as Bibliotecas de Sistema
  43 +do Trabalho Combinado.
  44 +
  45 +1. Exceção à Seção 3 da GNU GPL.
  46 +
  47 +Você pode distribuir um trabalho coberto nos termos das seções 3 e 4 desta
  48 +Licença sem estar limitado aos termos da seção 3 da GNU GPL.
  49 +
  50 +2. Distribuição de Versões Modificadas.
  51 +
  52 +Ser vocẽ modificar uma cópia da Biblioteca e, em suas modificações um
  53 +recurso referir-se a uma função os dados a serem fornecidos por um
  54 +Aplicativo que utiliza o recurso (diferente de quando um argumento é
  55 +transmitido quando o recurso é chamado), voçe pode distribuir uma cópia da
  56 +versão modificada:
  57 +
  58 +a) Nos termos desta Licença, desde que você faça um esforço de boa-fé para
  59 +garantir que, caso um Aplicativo não forneça a função o dado, o recurso
  60 +ainda funcione e execute qualquer parte do seu propósito que permaneça
  61 +significatio, ou
  62 +
  63 +b) nos termos da GNU GPL, sem nenhuma permissão adicional desta Licença
  64 +aplicável à referida cópia.
  65 +
  66 +3. Material que Incorpore Código Objeto dos Arquivos de Cabeçalho da
  67 +Biblioteca.
  68 +
  69 +A forma do código objeto de um Aplicativo pode incorporar material de um
  70 +arquivo de cabeçalho que faz parte da Biblioteca. Você pode distribuir o
  71 +referido código objeto da forma como escolher, desde que, se o material
  72 +incorporado não estiver limitado a parâmetros numéricos, layouts de
  73 +estruturas de dados e agentes de acesso ou pequenas macros, funções
  74 +sequenciais e modelos (dez ou menos linhas de comprimento), voçê faça o
  75 +seguinte:
  76 +
  77 +a) Forneça um aviso proeminente com cada cópia do código objeto de que
  78 +este utiliza a Biblioteca e que a Biblioteca e seu uso são coberto por
  79 +esta Licença.
  80 +
  81 +b) Forneça o código objeto com uma cópia da GNU GPL e esta Licença.
  82 +
  83 +4. Trabalhos Combinados.
  84 +
  85 +Você pode distribuir um Trabalho Combinado nos termos que escolher e que,
  86 +reunidos em conjunto, não restrinjam de forma efetiva a modificação das
  87 +partes da Biblioteca contidas no Trabalho Combinado e a engenharia reversa
  88 +para depurações de tais modificações se você também fizer o seguinte:
  89 +
  90 +a) Fornecer um aviso proeminente com cada cópia do Trabalho Combinado
  91 +de que este utiliza a Biblioteca e que a Biblioteca e seu uso são cobertos
  92 +por esta Licença.
  93 +
  94 +b) Fornecer o Trabalho Combinado com uma cópia da GNU GPL e esta
  95 +Licença.
  96 +
  97 +c) Para um Trabalho Combinado que exiba avisos de copyright durante
  98 +a execução, incluir o aviso de copyright da Biblioteca entre esses avisos,bem
  99 +como uma referência direcionando o usuário para as cópias da GNU GPL e
  100 +esta Licença.
  101 +
  102 +d) Faça um dos seguintes:
  103 +
  104 +0) Distribua a Fonte Mínima Correspondente nos termos desta Licença e o
  105 +Código do Aplicativo Correspondente em uma forma adequada para, e sob
  106 +termos que permitam, que o usuário recombine ou revincule o Aplicativo a
  107 +uma versão modificada da Versão Vinculada para produzir um Trabalho
  108 +Combinado modificado, na forma especificada pela seção 6 da GNU GPL
  109 +para distribuição da Fonte Correspondente.
  110 +
  111 +1) Utilize um mecanismo de biblioteca compartilhada adequado para
  112 +vinculação à Biblioteca.
  113 +
  114 +Um mecanismo adequado é um mecanismo que (a) utiliza em tempo de
  115 +execução uma cópia da Biblioteca já presente no sistema de computadores de
  116 +usuário e, (b) operará de forma apropriada com uma versão modificada da
  117 +Biblioteca que seja compatível com a interface da Versão Vinculada.
  118 +e) Forneça Informações de Instalação, mas somente se for necessário de outro
  119 +modo fornecer as referidas informações nos termos da seção 6 da GNU GPL,
  120 +e somente na medida em que tais informações sejam necessárias para instalar
  121 +e executar uma versão modificada do Trabalho Combinado produzido através
  122 +da recombinação ou revinculação do Aplicativo a uma versão modificada da
  123 +Versão Vinculada. (Se você utilizar a opção 4d0, as Informações de
  124 +Instalação devem acompanhar a Fonte Mínima Correspondente e o Código do
  125 +Aplicativo Correspondente. Se utilizar a opção 4d1, você deve fornecer as
  126 +Informações de Instalação da forma especificada na seção 6 da GNU GPL
  127 +para distribuição da Fonte Correspondente.)
  128 +
  129 +5. Bibliotecas Combinadas.
  130 +
  131 +Você pode colocar os recursos de biblioteca que constituem um trabalho
  132 +baseado na Biblioteca lado a lado em uma única biblioteca em conjunto com
  133 +outros recursos de biblioteca que não sejam Aplicativos e não sejam cobertos
  134 +por esta Licença, e distribuir a referida biblioteca combinada nos termos de
  135 +sua escolha, se fizer o seguinte:
  136 +
  137 +a) Faça a biblioteca combinada ser acompanhada de uma cópia do mesmo
  138 +trabalho baseado na Biblioteca, não combinado a nenhum outro recurso da
  139 +biblioteca, distribuído nos termos desta Licença.
  140 +
  141 +b) Forneça um aviso proeminente com a biblioteca combinada de que parte
  142 +da mesma corresponde a um trabalho baseado na Biblioteca e explique onde
  143 +localizar a forma não combinada de acompanhamento do mesmo trabalho.
  144 +
  145 +6. Versões Revisadas da GNU Lesser General Public License.
  146 +
  147 +A Free Software Foundation pode, de tempos em tempos, publicar versões
  148 +revisadas e/ou novas versões da GNU Lesser General Public License. Tais
  149 +novas versões serão similares em essência à versão atual, mas podem diferir
  150 +em detalhes para abordar novos problemas e/ou interesses.
  151 +
  152 +Cada versão recebe um número de versão distinto. Se a Biblioteca recebida
  153 +especificar que uma determinada versão numerada da GNU Lesser General
  154 +Public License "ou qualquer versão posterior" se aplique a ela, você tem a
  155 +opção de seguir os termos e condições da versão publicada ou de qualquer
  156 +versão posterior publicada pela Free Software Foundation. Se a Biblioteca, da
  157 +forma como foi recebida, não especificar um número de versão da GNU Lesser
  158 +General Public License, você pode escolher qualquer versão da GNU
  159 +Lesser General Public License já publicada pela Free Software Foundation.
  160 +Se a Biblioteca recebida especificar que um procurador pode decidir se
  161 +versões futuras da GNU Lesses General Public License serão aplicáveis, a
  162 +instrução pública do procurados de aceitação de qualquer versão constitui
  163 +uma autorização permanente para que você escolha esta versão da Biblioteca.
  164 +
... ...
LICENSE 0 → 100644
... ... @@ -0,0 +1,166 @@
  1 + GNU LESSER GENERAL PUBLIC LICENSE
  2 + Version 3, 29 June 2007
  3 +
  4 + Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
  5 + Everyone is permitted to copy and distribute verbatim copies
  6 + of this license document, but changing it is not allowed.
  7 +
  8 +
  9 + This version of the GNU Lesser General Public License incorporates
  10 +the terms and conditions of version 3 of the GNU General Public
  11 +License, supplemented by the additional permissions listed below.
  12 +
  13 + 0. Additional Definitions.
  14 +
  15 + As used herein, "this License" refers to version 3 of the GNU Lesser
  16 +General Public License, and the "GNU GPL" refers to version 3 of the GNU
  17 +General Public License.
  18 +
  19 + "The Library" refers to a covered work governed by this License,
  20 +other than an Application or a Combined Work as defined below.
  21 +
  22 + An "Application" is any work that makes use of an interface provided
  23 +by the Library, but which is not otherwise based on the Library.
  24 +Defining a subclass of a class defined by the Library is deemed a mode
  25 +of using an interface provided by the Library.
  26 +
  27 + A "Combined Work" is a work produced by combining or linking an
  28 +Application with the Library. The particular version of the Library
  29 +with which the Combined Work was made is also called the "Linked
  30 +Version".
  31 +
  32 + The "Minimal Corresponding Source" for a Combined Work means the
  33 +Corresponding Source for the Combined Work, excluding any source code
  34 +for portions of the Combined Work that, considered in isolation, are
  35 +based on the Application, and not on the Linked Version.
  36 +
  37 + The "Corresponding Application Code" for a Combined Work means the
  38 +object code and/or source code for the Application, including any data
  39 +and utility programs needed for reproducing the Combined Work from the
  40 +Application, but excluding the System Libraries of the Combined Work.
  41 +
  42 + 1. Exception to Section 3 of the GNU GPL.
  43 +
  44 + You may convey a covered work under sections 3 and 4 of this License
  45 +without being bound by section 3 of the GNU GPL.
  46 +
  47 + 2. Conveying Modified Versions.
  48 +
  49 + If you modify a copy of the Library, and, in your modifications, a
  50 +facility refers to a function or data to be supplied by an Application
  51 +that uses the facility (other than as an argument passed when the
  52 +facility is invoked), then you may convey a copy of the modified
  53 +version:
  54 +
  55 + a) under this License, provided that you make a good faith effort to
  56 + ensure that, in the event an Application does not supply the
  57 + function or data, the facility still operates, and performs
  58 + whatever part of its purpose remains meaningful, or
  59 +
  60 + b) under the GNU GPL, with none of the additional permissions of
  61 + this License applicable to that copy.
  62 +
  63 + 3. Object Code Incorporating Material from Library Header Files.
  64 +
  65 + The object code form of an Application may incorporate material from
  66 +a header file that is part of the Library. You may convey such object
  67 +code under terms of your choice, provided that, if the incorporated
  68 +material is not limited to numerical parameters, data structure
  69 +layouts and accessors, or small macros, inline functions and templates
  70 +(ten or fewer lines in length), you do both of the following:
  71 +
  72 + a) Give prominent notice with each copy of the object code that the
  73 + Library is used in it and that the Library and its use are
  74 + covered by this License.
  75 +
  76 + b) Accompany the object code with a copy of the GNU GPL and this license
  77 + document.
  78 +
  79 + 4. Combined Works.
  80 +
  81 + You may convey a Combined Work under terms of your choice that,
  82 +taken together, effectively do not restrict modification of the
  83 +portions of the Library contained in the Combined Work and reverse
  84 +engineering for debugging such modifications, if you also do each of
  85 +the following:
  86 +
  87 + a) Give prominent notice with each copy of the Combined Work that
  88 + the Library is used in it and that the Library and its use are
  89 + covered by this License.
  90 +
  91 + b) Accompany the Combined Work with a copy of the GNU GPL and this license
  92 + document.
  93 +
  94 + c) For a Combined Work that displays copyright notices during
  95 + execution, include the copyright notice for the Library among
  96 + these notices, as well as a reference directing the user to the
  97 + copies of the GNU GPL and this license document.
  98 +
  99 + d) Do one of the following:
  100 +
  101 + 0) Convey the Minimal Corresponding Source under the terms of this
  102 + License, and the Corresponding Application Code in a form
  103 + suitable for, and under terms that permit, the user to
  104 + recombine or relink the Application with a modified version of
  105 + the Linked Version to produce a modified Combined Work, in the
  106 + manner specified by section 6 of the GNU GPL for conveying
  107 + Corresponding Source.
  108 +
  109 + 1) Use a suitable shared library mechanism for linking with the
  110 + Library. A suitable mechanism is one that (a) uses at run time
  111 + a copy of the Library already present on the user's computer
  112 + system, and (b) will operate properly with a modified version
  113 + of the Library that is interface-compatible with the Linked
  114 + Version.
  115 +
  116 + e) Provide Installation Information, but only if you would otherwise
  117 + be required to provide such information under section 6 of the
  118 + GNU GPL, and only to the extent that such information is
  119 + necessary to install and execute a modified version of the
  120 + Combined Work produced by recombining or relinking the
  121 + Application with a modified version of the Linked Version. (If
  122 + you use option 4d0, the Installation Information must accompany
  123 + the Minimal Corresponding Source and Corresponding Application
  124 + Code. If you use option 4d1, you must provide the Installation
  125 + Information in the manner specified by section 6 of the GNU GPL
  126 + for conveying Corresponding Source.)
  127 +
  128 + 5. Combined Libraries.
  129 +
  130 + You may place library facilities that are a work based on the
  131 +Library side by side in a single library together with other library
  132 +facilities that are not Applications and are not covered by this
  133 +License, and convey such a combined library under terms of your
  134 +choice, if you do both of the following:
  135 +
  136 + a) Accompany the combined library with a copy of the same work based
  137 + on the Library, uncombined with any other library facilities,
  138 + conveyed under the terms of this License.
  139 +
  140 + b) Give prominent notice with the combined library that part of it
  141 + is a work based on the Library, and explaining where to find the
  142 + accompanying uncombined form of the same work.
  143 +
  144 + 6. Revised Versions of the GNU Lesser General Public License.
  145 +
  146 + The Free Software Foundation may publish revised and/or new versions
  147 +of the GNU Lesser General Public License from time to time. Such new
  148 +versions will be similar in spirit to the present version, but may
  149 +differ in detail to address new problems or concerns.
  150 +
  151 + Each version is given a distinguishing version number. If the
  152 +Library as you received it specifies that a certain numbered version
  153 +of the GNU Lesser General Public License "or any later version"
  154 +applies to it, you have the option of following the terms and
  155 +conditions either of that published version or of any later version
  156 +published by the Free Software Foundation. If the Library as you
  157 +received it does not specify a version number of the GNU Lesser
  158 +General Public License, you may choose any version of the GNU Lesser
  159 +General Public License ever published by the Free Software Foundation.
  160 +
  161 + If the Library as you received it specifies that a proxy can decide
  162 +whether future versions of the GNU Lesser General Public License shall
  163 +apply, that proxy's public statement of acceptance of any version is
  164 +permanent authorization for you to choose that version for the
  165 +Library.
  166 +
... ...
Makefile.in
... ... @@ -31,7 +31,7 @@ LIBNAME=@DLLPREFIX@rx3270@DLLEXT@
31 31  
32 32 PACKAGE_NAME=@PACKAGE_NAME@
33 33 PACKAGE_VERSION=@PACKAGE_VERSION@
34   -PACKAGE_TARNAME=@PACKAGE_TARNAME@
  34 +PACKAGE_TARNAME=pw3270-plugin-rexx
35 35  
36 36 prefix=@prefix@
37 37 exec_prefix=@exec_prefix@
... ... @@ -159,15 +159,17 @@ $(SRCDIR): \
159 159 @cp src/include/*.in $(SRCDIR)/src/include
160 160  
161 161 @$(MKDIR) $(SRCDIR)/src/include
162   - @cp src/include/*.h $(SRCDIR)/src/native
  162 + @cp src/include/*.h $(SRCDIR)/src/include
163 163  
164 164 @$(MKDIR) $(SRCDIR)/src/extension
165 165 @cp src/extension/*.in $(SRCDIR)/src/extension
166 166 @cp src/extension/*.cc $(SRCDIR)/src/extension
  167 + @cp src/extension/*.cls $(SRCDIR)/src/extension
167 168  
168 169 @$(MKDIR) $(SRCDIR)/src/plugin
169 170 @cp src/plugin/*.in $(SRCDIR)/src/plugin
170 171 @cp src/plugin/*.cc $(SRCDIR)/src/plugin
  172 + @cp src/plugin/*.xml $(SRCDIR)/src/plugin
171 173  
172 174  
173 175 $(BINRLS)/$(LIBNAME): \
... ...
src/extension/Makefile.in
... ... @@ -38,6 +38,7 @@ exec_prefix=@exec_prefix@
38 38 bindir=@bindir@
39 39 sbindir=@sbindir@
40 40 libdir=@libdir@
  41 +datarootdir=@datarootdir@
41 42  
42 43 BASEDIR=@BASEDIR@
43 44 SRCDIR=$(BASEDIR)/.src/$(PACKAGE_TARNAME)-$(PACKAGE_VERSION)
... ... @@ -108,6 +109,9 @@ install: \
108 109 @$(MKDIR) $(DESTDIR)/$(libdir)
109 110 @$(INSTALL_PROGRAM) $(BINRLS)/$(LIBNAME).@PACKAGE_MAJOR_VERSION@.@PACKAGE_MINOR_VERSION@ $(DESTDIR)/$(libdir)
110 111  
  112 + @$(MKDIR) $(DESTDIR)/$(datarootdir)/ooRexx
  113 + @$(INSTALL_DATA) rx3270.cls $(DESTDIR)/$(datarootdir)/ooRexx
  114 +
111 115 @rm -f $(DESTDIR)/$(libdir)/$(LIBNAME).@PACKAGE_MAJOR_VERSION@
112 116 @rm -f $(DESTDIR)/$(libdir)/$(LIBNAME)
113 117  
... ...
src/extension/rx3270.cls 0 → 100644
... ... @@ -0,0 +1,148 @@
  1 +/*-- REXX -----------------------------------------------------------------------*/
  2 +/* */
  3 +/* "Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270 */
  4 +/* (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a */
  5 +/* aplicativos mainframe. Registro no INPI sob 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., 59 Temple */
  20 +/* Place, Suite 330, Boston, MA, 02111-1307, USA */
  21 +/* */
  22 +/* Contatos: */
  23 +/* */
  24 +/* perry.werneck@gmail.com (Alexandre Perry de Souza Werneck) */
  25 +/* erico.mendonca@gmail.com (Erico Mascarenhas Mendonça) */
  26 +/* licinio@bb.com.br (Licínio Luis Branco) */
  27 +/* */
  28 +/*-------------------------------------------------------------------------------*/
  29 +
  30 +::requires "rx3270" LIBRARY
  31 +
  32 +/*-------------------------------------------------------------------------------*/
  33 +/* 3270 class */
  34 +/*-------------------------------------------------------------------------------*/
  35 +
  36 +::class rx3270 public subclass object
  37 +
  38 +::METHOD INIT EXTERNAL "LIBRARY rx3270 rx3270_method_init"
  39 +::METHOD UNINIT EXTERNAL "LIBRARY rx3270 rx3270_method_uninit"
  40 +
  41 +::METHOD VERSION EXTERNAL "LIBRARY rx3270 rx3270_method_version"
  42 +::METHOD REVISION EXTERNAL "LIBRARY rx3270 rx3270_method_revision"
  43 +
  44 +::METHOD CONNECT EXTERNAL "LIBRARY rx3270 rx3270_method_connect"
  45 +::METHOD DISCONNECT EXTERNAL "LIBRARY rx3270 rx3270_method_disconnect"
  46 +
  47 +::METHOD SLEEP EXTERNAL "LIBRARY rx3270 rx3270_method_sleep"
  48 +
  49 +::METHOD CONNECTED EXTERNAL "LIBRARY rx3270 rx3270_method_is_connected"
  50 +::METHOD READY EXTERNAL "LIBRARY rx3270 rx3270_method_is_ready"
  51 +
  52 +::METHOD WAITFORREADY EXTERNAL "LIBRARY rx3270 rx3270_method_wait_for_ready"
  53 +
  54 +::METHOD SETCURSOR EXTERNAL "LIBRARY rx3270 rx3270_method_set_cursor"
  55 +::METHOD GETCURSORADDR EXTERNAL "LIBRARY rx3270 rx3270_method_get_cursor_addr"
  56 +::METHOD SETCURSORADDR EXTERNAL "LIBRARY rx3270 rx3270_method_set_cursor_addr"
  57 +
  58 +::METHOD ENTER EXTERNAL "LIBRARY rx3270 rx3270_method_enter"
  59 +::METHOD PFKEY EXTERNAL "LIBRARY rx3270 rx3270_method_pfkey"
  60 +::METHOD PAKEY EXTERNAL "LIBRARY rx3270 rx3270_method_pakey"
  61 +
  62 +::METHOD ERASE EXTERNAL "LIBRARY rx3270 rx3270_method_erase"
  63 +::METHOD ERASEEOF EXTERNAL "LIBRARY rx3270 rx3270_method_erase_eof"
  64 +::METHOD ERASEEOL EXTERNAL "LIBRARY rx3270 rx3270_method_erase_eol"
  65 +::METHOD ERASEINPUT EXTERNAL "LIBRARY rx3270 rx3270_method_erase_input"
  66 +
  67 +::METHOD OPTION EXTERNAL "LIBRARY rx3270 rx3270_method_set_option"
  68 +::METHOD EVENTTRACE EXTERNAL "LIBRARY rx3270 rx3270_method_event_trace"
  69 +::METHOD SCREENTRACE EXTERNAL "LIBRARY rx3270 rx3270_method_screen_trace"
  70 +::METHOD DSTRACE EXTERNAL "LIBRARY rx3270 rx3270_method_ds_trace"
  71 +
  72 +::METHOD GETTEXTAT EXTERNAL "LIBRARY rx3270 rx3270_method_get_text_at"
  73 +::METHOD SETTEXTAT EXTERNAL "LIBRARY rx3270 rx3270_method_set_text_at"
  74 +::METHOD CMPTEXTAT EXTERNAL "LIBRARY rx3270 rx3270_method_cmp_text_at"
  75 +
  76 +::METHOD GET EXTERNAL "LIBRARY rx3270 rx3270_method_get_text"
  77 +::METHOD INPUT EXTERNAL "LIBRARY rx3270 rx3270_method_input_text"
  78 +
  79 +::METHOD WAITFORTEXTAT EXTERNAL "LIBRARY rx3270 rx3270_method_wait_for_text_at"
  80 +::METHOD TEST EXTERNAL "LIBRARY rx3270 rx3270_method_test"
  81 +
  82 +::METHOD GETFIELDSTART EXTERNAL "LIBRARY rx3270 rx3270_method_get_field_start"
  83 +::METHOD GETFIELDLEN EXTERNAL "LIBRARY rx3270 rx3270_method_get_field_len"
  84 +::METHOD GETNEXTUNPROTECTED EXTERNAL "LIBRARY rx3270 rx3270_method_get_next_unprotected"
  85 +::METHOD GETISPROTECTED EXTERNAL "LIBRARY rx3270 rx3270_method_get_is_protected"
  86 +::METHOD GETISPROTECTEDAT EXTERNAL "LIBRARY rx3270 rx3270_method_get_is_protected_at"
  87 +
  88 +::METHOD GETSELECTION EXTERNAL "LIBRARY rx3270 rx3270_method_get_selection"
  89 +::METHOD SETSELECTION EXTERNAL "LIBRARY rx3270 rx3270_method_set_selection"
  90 +
  91 +::METHOD GETCLIPBOARD EXTERNAL "LIBRARY rx3270 rx3270_method_get_clipboard"
  92 +::METHOD SETCLIPBOARD EXTERNAL "LIBRARY rx3270 rx3270_method_set_clipboard"
  93 +
  94 +::METHOD POPUP EXTERNAL "LIBRARY rx3270 rx3270_method_popup"
  95 +::METHOD GETFILENAME EXTERNAL "LIBRARY rx3270 rx3270_method_get_filename"
  96 +
  97 +::METHOD GETDISPLAYCHARSET EXTERNAL "LIBRARY rx3270 rx3270_method_get_display_charset"
  98 +::METHOD SETDISPLAYCHARSET EXTERNAL "LIBRARY rx3270 rx3270_method_set_display_charset"
  99 +
  100 +::METHOD GETHOSTCHARSET EXTERNAL "LIBRARY rx3270 rx3270_method_get_host_charset"
  101 +::METHOD SETHOSTCHARSET EXTERNAL "LIBRARY rx3270 rx3270_method_set_host_charset"
  102 +
  103 +::METHOD SETUNLOCKDELAY EXTERNAL "LIBRARY rx3270 rx3270_method_set_unlock_delay"
  104 +
  105 +::method waitForStringAt
  106 + use arg row, col, key, timeout
  107 + if datatype(timeout) <> "NUM"
  108 + then timeout = 60
  109 +return self~WaitForTextAt(row,col,key,timeout)
  110 +
  111 +::method getScreenContent
  112 +return self~get()
  113 +
  114 +::method queryStringAt
  115 + use arg row, col, key
  116 +return self~GetTextAt(row,col,length(key)) == key
  117 +
  118 +::method waitForTerminalReady
  119 + use arg timeout
  120 +return self~WaitForReady(timeout)
  121 +
  122 +::method isTerminalReady
  123 +return self~ready()
  124 +
  125 +::method setStringAt
  126 + use arg row, col, str
  127 +return self~SetTextAt(row,col,str)
  128 +
  129 +::method getStringAt
  130 + use arg row, col, size
  131 +return self~GetTextAt(row,col,size)
  132 +
  133 +::method sendEnterKey
  134 +return self~enter()
  135 +
  136 +::method sendPFKey
  137 + use arg key
  138 +return self~pfKey(key)
  139 +
  140 +::method setCursorPosition
  141 + use arg row, col
  142 +return self~SetCursor(row,col)
  143 +
  144 +::method getScreenContentAt
  145 + use arg row, col, size
  146 +return self~GetTextAt(row,col,size)
  147 +
  148 +
... ...
src/plugin/80rexx.xml 0 → 100644
... ... @@ -0,0 +1,42 @@
  1 +<!-----------------------------------------------------------------------------
  2 +
  3 + Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270
  4 + (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a
  5 + aplicativos mainframe. Registro no INPI sob 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 +
  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 +<ui>
  33 + <menubar name='topmenu' topmenu='yes'>
  34 + <menu name='FileMenu' label='_File' />
  35 + <menu name='EditMenu' label='_Edit' />
  36 + <menu name='View' label='_View' />
  37 + <menu name='ScriptsMenu' label='Scripts' visible='yes' >
  38 + <menuitem action='rexx' label='External Rexx script'/>
  39 + </menu>
  40 + </menubar>
  41 +</ui>
  42 +
... ...
src/plugin/Makefile.in
... ... @@ -38,6 +38,7 @@ exec_prefix=@exec_prefix@
38 38 bindir=@bindir@
39 39 sbindir=@sbindir@
40 40 libdir=@libdir@
  41 +datarootdir=@datarootdir@
41 42  
42 43 BASEDIR=@BASEDIR@
43 44 SRCDIR=$(BASEDIR)/.src/$(PACKAGE_TARNAME)-$(PACKAGE_VERSION)
... ... @@ -105,6 +106,12 @@ Release: \
105 106 install: \
106 107 $(BINRLS)/$(LIBNAME)
107 108  
  109 + @$(MKDIR) $(DESTDIR)/$(libdir)/pw3270-plugins
  110 + @$(INSTALL_PROGRAM) $(BINRLS)/$(LIBNAME) $(DESTDIR)/$(libdir)/pw3270-plugins
  111 +
  112 + @$(MKDIR) $(DESTDIR)/$(datarootdir)/pw3270/ui
  113 + @$(INSTALL_DATA) 80rexx.xml $(DESTDIR)/$(datarootdir)/pw3270/ui
  114 +
108 115 $(BINRLS)/$(LIBNAME): \
109 116 $(foreach SRC, $(basename $(SOURCES)), $(OBJRLS)/$(SRC).o)
110 117  
... ...
ui/80rexx.xml
... ... @@ -1,42 +0,0 @@
1   -<!-----------------------------------------------------------------------------
2   -
3   - Software pw3270, desenvolvido com base nos códigos fontes do WC3270 e X3270
4   - (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a
5   - aplicativos mainframe. Registro no INPI sob 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   -
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   -<ui>
33   - <menubar name='topmenu' topmenu='yes'>
34   - <menu name='FileMenu' label='_File' />
35   - <menu name='EditMenu' label='_Edit' />
36   - <menu name='View' label='_View' />
37   - <menu name='ScriptsMenu' label='Scripts' visible='yes' >
38   - <menuitem action='rexx' label='External Rexx script'/>
39   - </menu>
40   - </menubar>
41   -</ui>
42   -