Commit bb4d9d9d43cb49a731d9037cf8fd48d0f5e8d546
1 parent
531efdd0
Exists in
master
and in
5 other branches
Iniciando implementação dos métodos no plugin rexx
Showing
3 changed files
with
38 additions
and
25 deletions
Show diff stats
pw3270.cbp
@@ -232,13 +232,9 @@ | @@ -232,13 +232,9 @@ | ||
232 | <Option compilerVar="CC" /> | 232 | <Option compilerVar="CC" /> |
233 | </Unit> | 233 | </Unit> |
234 | <Unit filename="src/plugins/rx3270/Makefile.in" /> | 234 | <Unit filename="src/plugins/rx3270/Makefile.in" /> |
235 | - <Unit filename="src/plugins/rx3270/pluginmain.c"> | ||
236 | - <Option compilerVar="CC" /> | ||
237 | - </Unit> | 235 | + <Unit filename="src/plugins/rx3270/pluginmain.cc" /> |
238 | <Unit filename="src/plugins/rx3270/rx3270.h" /> | 236 | <Unit filename="src/plugins/rx3270/rx3270.h" /> |
239 | - <Unit filename="src/plugins/rx3270/rxapimain.c"> | ||
240 | - <Option compilerVar="CC" /> | ||
241 | - </Unit> | 237 | + <Unit filename="src/plugins/rx3270/rxapimain.cc" /> |
242 | <Unit filename="src/pw3270/Makefile.in" /> | 238 | <Unit filename="src/pw3270/Makefile.in" /> |
243 | <Unit filename="src/pw3270/actions.c"> | 239 | <Unit filename="src/pw3270/actions.c"> |
244 | <Option compilerVar="CC" /> | 240 | <Option compilerVar="CC" /> |
src/include/plugin.mak.in
@@ -59,17 +59,17 @@ DLL_NAME=@DLLDIR@/@DLLPREFIX@$(MODULE_NAME)@DLLEXT@.@VERSION@ | @@ -59,17 +59,17 @@ DLL_NAME=@DLLDIR@/@DLLPREFIX@$(MODULE_NAME)@DLLEXT@.@VERSION@ | ||
59 | PLUGIN_NAME=plugins/$(MODULE_NAME)@DLLEXT@ | 59 | PLUGIN_NAME=plugins/$(MODULE_NAME)@DLLEXT@ |
60 | 60 | ||
61 | ifeq ($(LIB3270_MODE),Debug) | 61 | ifeq ($(LIB3270_MODE),Debug) |
62 | - PW3270_LIBS="-L$(BINDBG)@DLLDIR@ -l3270" | ||
63 | - PW3270_CFLAGS="-I../../../src/include" | ||
64 | - LIB3270_LIBS="-L$(BINDBG)@DLLDIR@ -l3270" | ||
65 | - LIB270_CFLAGS="-I../../../src/include" | 62 | + PW3270_LIBS=-L$(BINDBG)@DLLDIR@ -l3270 |
63 | + PW3270_CFLAGS=-I../../../src/include | ||
64 | + LIB3270_LIBS=-L$(BINDBG)@DLLDIR@ -l3270 | ||
65 | + LIB270_CFLAGS=-I../../../src/include | ||
66 | endif | 66 | endif |
67 | 67 | ||
68 | ifeq ($(LIB3270_MODE),Release) | 68 | ifeq ($(LIB3270_MODE),Release) |
69 | - PW3270_LIBS="-L$(BINRLS)@DLLDIR@ -l3270" | ||
70 | - PW3270_CFLAGS="-I../../../src/include" | ||
71 | - LIB3270_LIBS="-L$(BINRLS)@DLLDIR@ -l3270" | ||
72 | - LIB270_CFLAGS="-I../../../src/include" | 69 | + PW3270_LIBS=-L$(BINRLS)@DLLDIR@ -l3270 |
70 | + PW3270_CFLAGS=-I../../../src/include | ||
71 | + LIB3270_LIBS=-L$(BINRLS)@DLLDIR@ -l3270 | ||
72 | + LIB270_CFLAGS=-I../../../src/include | ||
73 | endif | 73 | endif |
74 | 74 | ||
75 | ifeq ($(LIB3270_MODE),Default) | 75 | ifeq ($(LIB3270_MODE),Default) |
src/plugins/rx3270/rxapimain.cc
@@ -68,7 +68,7 @@ BOOL WINAPI DllMain(HANDLE hinst, DWORD dwcallpurpose, LPVOID lpvResvd) | @@ -68,7 +68,7 @@ BOOL WINAPI DllMain(HANDLE hinst, DWORD dwcallpurpose, LPVOID lpvResvd) | ||
68 | 68 | ||
69 | int librx3270_loaded(void) | 69 | int librx3270_loaded(void) |
70 | { | 70 | { |
71 | - trace("%s %04x",__FUNCTION__,REXX_CURRENT_INTERPRETER_VERSION); | 71 | + trace("%s %04x %s %s",__FUNCTION__,REXX_CURRENT_INTERPRETER_VERSION,__DATE__,__TIME__); |
72 | return 0; | 72 | return 0; |
73 | } | 73 | } |
74 | 74 | ||
@@ -80,27 +80,45 @@ int librx3270_unloaded(void) | @@ -80,27 +80,45 @@ int librx3270_unloaded(void) | ||
80 | 80 | ||
81 | RexxRoutine0(CSTRING, rx3270version) | 81 | RexxRoutine0(CSTRING, rx3270version) |
82 | { | 82 | { |
83 | - return "Teste"; | 83 | + return lib3270_get_version(); |
84 | +} | ||
85 | + | ||
86 | +RexxRoutine0(CSTRING, rx3270QueryCState) | ||
87 | +{ | ||
88 | + return ""; | ||
89 | +} | ||
90 | + | ||
91 | +RexxRoutine0(int, rx3270Disconnect) | ||
92 | +{ | ||
93 | + return 0; | ||
94 | +} | ||
95 | + | ||
96 | +RexxRoutine2(int, rx3270Connect, CSTRING, hostname, int, timeout) | ||
97 | +{ | ||
98 | + return 0; | ||
84 | } | 99 | } |
85 | 100 | ||
86 | 101 | ||
87 | // now build the actual entry list | 102 | // now build the actual entry list |
88 | RexxRoutineEntry rx3270_functions[] = | 103 | RexxRoutineEntry rx3270_functions[] = |
89 | { | 104 | { |
90 | - REXX_TYPED_ROUTINE(rx3270version, rx3270version), | ||
91 | - REXX_LAST_METHOD() | 105 | + REXX_TYPED_ROUTINE(rx3270version, rx3270version), |
106 | + REXX_TYPED_ROUTINE(rx3270QueryCState, rx3270QueryCState), | ||
107 | + REXX_TYPED_ROUTINE(rx3270Disconnect, rx3270Disconnect), | ||
108 | + REXX_TYPED_ROUTINE(rx3270Connect, rx3270Connect), | ||
109 | + REXX_LAST_METHOD() | ||
92 | }; | 110 | }; |
93 | 111 | ||
94 | RexxPackageEntry rx3270_package_entry = | 112 | RexxPackageEntry rx3270_package_entry = |
95 | { | 113 | { |
96 | STANDARD_PACKAGE_HEADER | 114 | STANDARD_PACKAGE_HEADER |
97 | - REXX_CURRENT_INTERPRETER_VERSION, // anything after 4.0.0 will work | ||
98 | - "pw3270", // name of the package | ||
99 | - "5.0", // package information | ||
100 | - NULL, // no load/unload functions | 115 | + REXX_CURRENT_INTERPRETER_VERSION, // anything after 4.0.0 will work |
116 | + "pw3270", // name of the package | ||
117 | + PACKAGE_VERSION, // package information | ||
118 | + NULL, // no load/unload functions | ||
101 | NULL, | 119 | NULL, |
102 | - rx3270_functions, // the exported functions | ||
103 | - NULL // no methods in rxmath. | 120 | + rx3270_functions, // the exported functions |
121 | + NULL // no methods in rx3270. | ||
104 | }; | 122 | }; |
105 | 123 | ||
106 | // package loading stub. | 124 | // package loading stub. |
@@ -111,7 +129,6 @@ OOREXX_GET_PACKAGE(rx3270); | @@ -111,7 +129,6 @@ OOREXX_GET_PACKAGE(rx3270); | ||
111 | BEGIN_EXTERN_C() | 129 | BEGIN_EXTERN_C() |
112 | LIB3270_EXPORT RexxPackageEntry * RexxEntry RexxGetPackage(void) | 130 | LIB3270_EXPORT RexxPackageEntry * RexxEntry RexxGetPackage(void) |
113 | { | 131 | { |
114 | - trace("%s struct size=%d ****************************************************",__FUNCTION__,(int) sizeof(RexxPackageEntry)); | ||
115 | return &rx3270_package_entry; | 132 | return &rx3270_package_entry; |
116 | } | 133 | } |
117 | END_EXTERN_C() | 134 | END_EXTERN_C() |