Commit 2311b8562c866cdfdbb133365753cc91a6206f4d
1 parent
16a0f764
Exists in
master
and in
1 other branch
Adjusting delayed loading on windows ipc client module.
Showing
7 changed files
with
276 additions
and
90 deletions
Show diff stats
client/Makefile.in
| @@ -39,6 +39,9 @@ MAIN_SOURCES= \ | @@ -39,6 +39,9 @@ MAIN_SOURCES= \ | ||
| 39 | $(wildcard src/session/remote/*.cc) \ | 39 | $(wildcard src/session/remote/*.cc) \ |
| 40 | $(wildcard src/session/remote/@OSNAME@/*.cc) | 40 | $(wildcard src/session/remote/@OSNAME@/*.cc) |
| 41 | 41 | ||
| 42 | +DYNAMIC_SOURCES= \ | ||
| 43 | + $(wildcard src/core/@OSNAME@/dynamic/*.cc) | ||
| 44 | + | ||
| 42 | TEST_SOURCES= \ | 45 | TEST_SOURCES= \ |
| 43 | $(wildcard src/testprogram/*.cc) | 46 | $(wildcard src/testprogram/*.cc) |
| 44 | 47 | ||
| @@ -191,7 +194,8 @@ Release: \ | @@ -191,7 +194,8 @@ Release: \ | ||
| 191 | $(BINRLS)/lib$(MODULE_NAME).static.a | 194 | $(BINRLS)/lib$(MODULE_NAME).static.a |
| 192 | 195 | ||
| 193 | $(BINRLS)/lib$(MODULE_NAME)@LIBEXT@: \ | 196 | $(BINRLS)/lib$(MODULE_NAME)@LIBEXT@: \ |
| 194 | - $(foreach SRC, $(basename $(MAIN_SOURCES)), $(OBJRLS)/$(SRC).o) | 197 | + $(foreach SRC, $(basename $(MAIN_SOURCES)), $(OBJRLS)/$(SRC).o) \ |
| 198 | + $(foreach SRC, $(basename $(DYNAMIC_SOURCES)), $(OBJRLS)/$(SRC).o) | ||
| 195 | 199 | ||
| 196 | @$(MKDIR) $(@D) | 200 | @$(MKDIR) $(@D) |
| 197 | @echo $< ... | 201 | @echo $< ... |
| @@ -308,7 +312,8 @@ $(BINDBG)/$(MODULE_NAME)-client@EXEEXT@: \ | @@ -308,7 +312,8 @@ $(BINDBG)/$(MODULE_NAME)-client@EXEEXT@: \ | ||
| 308 | 312 | ||
| 309 | 313 | ||
| 310 | $(BINDBG)/lib$(MODULE_NAME)@LIBEXT@: \ | 314 | $(BINDBG)/lib$(MODULE_NAME)@LIBEXT@: \ |
| 311 | - $(foreach SRC, $(basename $(MAIN_SOURCES)), $(OBJDBG)/$(SRC).o) | 315 | + $(foreach SRC, $(basename $(MAIN_SOURCES)), $(OBJDBG)/$(SRC).o) \ |
| 316 | + $(foreach SRC, $(basename $(DYNAMIC_SOURCES)), $(OBJDBG)/$(SRC).o) | ||
| 312 | 317 | ||
| 313 | @$(MKDIR) $(@D) | 318 | @$(MKDIR) $(@D) |
| 314 | @echo $< ... | 319 | @echo $< ... |
client/ipcclient.cbp
| @@ -49,6 +49,7 @@ | @@ -49,6 +49,7 @@ | ||
| 49 | <Unit filename="src/core/linux/request.cc" /> | 49 | <Unit filename="src/core/linux/request.cc" /> |
| 50 | <Unit filename="src/core/session.cc" /> | 50 | <Unit filename="src/core/session.cc" /> |
| 51 | <Unit filename="src/core/windows/attribute.cc" /> | 51 | <Unit filename="src/core/windows/attribute.cc" /> |
| 52 | + <Unit filename="src/core/windows/dynamic/init.cc" /> | ||
| 52 | <Unit filename="src/core/windows/pop.cc" /> | 53 | <Unit filename="src/core/windows/pop.cc" /> |
| 53 | <Unit filename="src/core/windows/push.cc" /> | 54 | <Unit filename="src/core/windows/push.cc" /> |
| 54 | <Unit filename="src/core/windows/request.cc" /> | 55 | <Unit filename="src/core/windows/request.cc" /> |
| @@ -0,0 +1,74 @@ | @@ -0,0 +1,74 @@ | ||
| 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 - 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 | +/** | ||
| 31 | + * @file src/os/linux/attribute.cc | ||
| 32 | + * | ||
| 33 | + * @brief Implements methods for static attribute management. | ||
| 34 | + * | ||
| 35 | + * @author perry.werneck@gmail.com | ||
| 36 | + * | ||
| 37 | + */ | ||
| 38 | + | ||
| 39 | + #include <lib3270/ipc.h> | ||
| 40 | + #include <lib3270/toggle.h> | ||
| 41 | + #include <lib3270/properties.h> | ||
| 42 | + | ||
| 43 | +/*---[ Implement ]----------------------------------------------------------------------------------*/ | ||
| 44 | + | ||
| 45 | + std::vector<const LIB3270_PROPERTY *> TN3270::getAttributes() noexcept { | ||
| 46 | + | ||
| 47 | + std::vector<const LIB3270_PROPERTY *> attributes; | ||
| 48 | + | ||
| 49 | + for(auto prop = lib3270_get_int_properties_list(); prop->name; prop++) { | ||
| 50 | + attributes.push_back((const LIB3270_PROPERTY *) prop); | ||
| 51 | + } | ||
| 52 | + | ||
| 53 | + for(auto prop = lib3270_get_unsigned_properties_list(); prop->name; prop++) { | ||
| 54 | + attributes.push_back((const LIB3270_PROPERTY *) prop); | ||
| 55 | + } | ||
| 56 | + | ||
| 57 | + for(auto prop = lib3270_get_string_properties_list(); prop->name; prop++) { | ||
| 58 | + attributes.push_back((const LIB3270_PROPERTY *) prop); | ||
| 59 | + } | ||
| 60 | + | ||
| 61 | + for(auto prop = lib3270_get_toggle_list(); prop->name; prop++) { | ||
| 62 | + attributes.push_back((const LIB3270_PROPERTY *) prop); | ||
| 63 | + } | ||
| 64 | + | ||
| 65 | + for(auto prop = lib3270_get_boolean_properties_list(); prop->name; prop++) { | ||
| 66 | + attributes.push_back((const LIB3270_PROPERTY *) prop); | ||
| 67 | + } | ||
| 68 | + | ||
| 69 | + return attributes; | ||
| 70 | + | ||
| 71 | + } | ||
| 72 | + | ||
| 73 | + | ||
| 74 | + |
| @@ -0,0 +1,194 @@ | @@ -0,0 +1,194 @@ | ||
| 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 - 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 | +/** | ||
| 31 | + * @file | ||
| 32 | + * | ||
| 33 | + * @brief Win32 delayed loading support methods. | ||
| 34 | + * | ||
| 35 | + * @author perry.werneck@gmail.com | ||
| 36 | + * | ||
| 37 | + */ | ||
| 38 | + | ||
| 39 | + #include <config.h> | ||
| 40 | + #include <ipc-client-internals.h> | ||
| 41 | + #include <fcntl.h> | ||
| 42 | + | ||
| 43 | + extern "C" { | ||
| 44 | + | ||
| 45 | + extern __declspec (dllexport) PfnDliHook __pfnDliNotifyHook2; | ||
| 46 | + extern __declspec (dllexport) PfnDliHook __pfnDliFailureHook2; | ||
| 47 | + | ||
| 48 | + FARPROC WINAPI IPC3270_DelayLoadHook(unsigned reason, DelayLoadInfo * info); | ||
| 49 | + | ||
| 50 | + } | ||
| 51 | + | ||
| 52 | + using std::string; | ||
| 53 | + | ||
| 54 | +/*---[ Implement ]----------------------------------------------------------------------------------*/ | ||
| 55 | + | ||
| 56 | + // https://docs.microsoft.com/en-us/cpp/build/reference/loading-all-imports-for-a-delay-loaded-dll?view=vs-2019 | ||
| 57 | + | ||
| 58 | + PfnDliHook __pfnDliNotifyHook2 = IPC3270_DelayLoadHook; | ||
| 59 | + PfnDliHook __pfnDliFailureHook2 = IPC3270_DelayLoadHook; | ||
| 60 | + | ||
| 61 | + static HANDLE hModule = 0; | ||
| 62 | + static HANDLE hEventLog = 0; | ||
| 63 | + | ||
| 64 | + BOOL WINAPI DllMain(HANDLE hInstance, DWORD dwcallpurpose, LPVOID lpvResvd) { | ||
| 65 | + switch(dwcallpurpose) { | ||
| 66 | + case DLL_PROCESS_ATTACH: | ||
| 67 | + hModule = hInstance; | ||
| 68 | + hEventLog = RegisterEventSource(NULL, LIB3270_STRINGIZE_VALUE_OF(PRODUCT_NAME)); | ||
| 69 | + break; | ||
| 70 | + | ||
| 71 | + case DLL_PROCESS_DETACH: | ||
| 72 | + hModule = 0; | ||
| 73 | + DeregisterEventSource(hEventLog); | ||
| 74 | + hEventLog = 0; | ||
| 75 | + break; | ||
| 76 | + | ||
| 77 | + } | ||
| 78 | + | ||
| 79 | + return TRUE; | ||
| 80 | + } | ||
| 81 | + | ||
| 82 | + static void eventlog(const char *msg) { | ||
| 83 | + | ||
| 84 | + std::string username = TN3270::getUserName(); | ||
| 85 | + | ||
| 86 | + const char *outMsg[] = { | ||
| 87 | + username.c_str(), | ||
| 88 | + PACKAGE_NAME, | ||
| 89 | + msg | ||
| 90 | + }; | ||
| 91 | + | ||
| 92 | + debug("username"," ",msg); | ||
| 93 | + | ||
| 94 | + ReportEvent( | ||
| 95 | + hEventLog, | ||
| 96 | + EVENTLOG_ERROR_TYPE, | ||
| 97 | + 1, | ||
| 98 | + 0, | ||
| 99 | + NULL, | ||
| 100 | + 3, | ||
| 101 | + 0, | ||
| 102 | + outMsg, | ||
| 103 | + NULL | ||
| 104 | + ); | ||
| 105 | + | ||
| 106 | + } | ||
| 107 | + | ||
| 108 | + static void dummyProc() { | ||
| 109 | + debug(__FUNCTION__," was called"); | ||
| 110 | + throw std::runtime_error("Operation not supported"); | ||
| 111 | + } | ||
| 112 | + | ||
| 113 | + FARPROC WINAPI IPC3270_DelayLoadHook(unsigned reason, DelayLoadInfo * info) { | ||
| 114 | + | ||
| 115 | + static string savedpath; | ||
| 116 | + | ||
| 117 | + // https://docs.microsoft.com/en-us/cpp/build/reference/structure-and-constant-definitions?view=vs-2019 | ||
| 118 | + | ||
| 119 | + debug(__FUNCTION__," ",(const char *) info->szDll); | ||
| 120 | + | ||
| 121 | + switch (reason) { | ||
| 122 | + case dliNoteStartProcessing: | ||
| 123 | + debug(__FUNCTION__,"::dliNoteStartProcessing") | ||
| 124 | + { | ||
| 125 | + string installLocation = TN3270::getInstallLocation(); | ||
| 126 | + | ||
| 127 | + if(!installLocation.empty()) { | ||
| 128 | + | ||
| 129 | + char curdir[4096]; | ||
| 130 | + memset(curdir,0,sizeof(curdir)); | ||
| 131 | + | ||
| 132 | + if(GetCurrentDirectory(sizeof(curdir)-1,curdir)) { | ||
| 133 | + savedpath = curdir; | ||
| 134 | + debug("Saved path: \"",savedpath,"\""); | ||
| 135 | + } else { | ||
| 136 | + savedpath.clear(); | ||
| 137 | + } | ||
| 138 | + | ||
| 139 | + SetCurrentDirectory(installLocation.c_str()); | ||
| 140 | + | ||
| 141 | + debug("Current path changed to \"",installLocation,"\""); | ||
| 142 | + } | ||
| 143 | + } | ||
| 144 | + break; | ||
| 145 | + | ||
| 146 | + case dliNoteEndProcessing: | ||
| 147 | + debug(__FUNCTION__,"::dliNoteEndProcessing") | ||
| 148 | + | ||
| 149 | + if(!savedpath.empty()) { | ||
| 150 | + debug("Restoring current path to \"",savedpath,"\""); | ||
| 151 | + SetCurrentDirectory(savedpath.c_str()); | ||
| 152 | + savedpath.clear(); | ||
| 153 | + | ||
| 154 | + } | ||
| 155 | + | ||
| 156 | + break; | ||
| 157 | + | ||
| 158 | + case dliNotePreLoadLibrary: | ||
| 159 | + debug(__FUNCTION__,"::dliNotePreLoadLibrary"); | ||
| 160 | + break; | ||
| 161 | + | ||
| 162 | + case dliNotePreGetProcAddress: | ||
| 163 | + debug(__FUNCTION__,"::dliNotePreGetProcAddress") | ||
| 164 | + break; | ||
| 165 | + | ||
| 166 | + case dliFailLoadLib: | ||
| 167 | + debug(__FUNCTION__,"::dliFailLoadLib") | ||
| 168 | + { | ||
| 169 | + string msg = "Can't load "; | ||
| 170 | + msg += (const char *) info->szDll; | ||
| 171 | + eventlog(msg.c_str()); | ||
| 172 | + } | ||
| 173 | + return (FARPROC) hModule; | ||
| 174 | + | ||
| 175 | + case dliFailGetProc: | ||
| 176 | + debug(__FUNCTION__,"::dliFailGetProc"); | ||
| 177 | + { | ||
| 178 | + string msg = "Can't find method on "; | ||
| 179 | + msg += (const char *) info->szDll; | ||
| 180 | + eventlog(msg.c_str()); | ||
| 181 | + } | ||
| 182 | + return (FARPROC) dummyProc; | ||
| 183 | + | ||
| 184 | + default: | ||
| 185 | + debug(__FUNCTION__,"::default") | ||
| 186 | + | ||
| 187 | + } | ||
| 188 | + | ||
| 189 | + // Returning NULL causes the delay load machinery to perform default | ||
| 190 | + // processing for this notification. | ||
| 191 | + return NULL; | ||
| 192 | + | ||
| 193 | + } | ||
| 194 | + |
client/src/core/windows/tools.cc
| @@ -45,79 +45,6 @@ | @@ -45,79 +45,6 @@ | ||
| 45 | 45 | ||
| 46 | /*---[ Implement ]----------------------------------------------------------------------------------*/ | 46 | /*---[ Implement ]----------------------------------------------------------------------------------*/ |
| 47 | 47 | ||
| 48 | - // https://docs.microsoft.com/en-us/cpp/build/reference/loading-all-imports-for-a-delay-loaded-dll?view=vs-2019 | ||
| 49 | - | ||
| 50 | - PfnDliHook __pfnDliNotifyHook2 = IPC3270_DelayLoadHook; | ||
| 51 | - PfnDliHook __pfnDliFailureHook2 = IPC3270_DelayLoadHook; | ||
| 52 | - | ||
| 53 | - FARPROC WINAPI IPC3270_DelayLoadHook(unsigned reason, DelayLoadInfo * info) { | ||
| 54 | - | ||
| 55 | - // https://docs.microsoft.com/en-us/cpp/build/reference/structure-and-constant-definitions?view=vs-2019 | ||
| 56 | - | ||
| 57 | - debug(__FUNCTION__," ",(const char *) info->szDll); | ||
| 58 | - | ||
| 59 | - switch (reason) { | ||
| 60 | - case dliNoteStartProcessing: | ||
| 61 | - debug(__FUNCTION__,"::dliNoteStartProcessing") | ||
| 62 | - /* | ||
| 63 | - { | ||
| 64 | - string installLocation = TN3270::getInstallLocation(); | ||
| 65 | - if(!installLocation.empty()) { | ||
| 66 | - SetCurrentDirectory(installLocation.c_str()); | ||
| 67 | - } | ||
| 68 | - } | ||
| 69 | - */ | ||
| 70 | - break; | ||
| 71 | - | ||
| 72 | - case dliNoteEndProcessing: | ||
| 73 | - debug(__FUNCTION__,"::dliNoteEndProcessing") | ||
| 74 | - break; | ||
| 75 | - | ||
| 76 | - case dliNotePreLoadLibrary: | ||
| 77 | - debug(__FUNCTION__,"::dliNotePreLoadLibrary"); | ||
| 78 | - | ||
| 79 | - /* | ||
| 80 | - { | ||
| 81 | - // http://otb.manusoft.com/2013/01/using-delayload-to-specify-dependent-dll-path.htm | ||
| 82 | - | ||
| 83 | - string myPath = TN3270::getInstallLocation(); | ||
| 84 | - | ||
| 85 | - myPath += "\\"; | ||
| 86 | - myPath += (const char *) info->szDll; | ||
| 87 | - | ||
| 88 | - debug("Checking ",myPath,"=",access(myPath.c_str(), R_OK)); | ||
| 89 | - | ||
| 90 | - if(access(myPath.c_str(), R_OK) == 0) { | ||
| 91 | - return (FARPROC) LoadLibrary(myPath.c_str()); | ||
| 92 | - } | ||
| 93 | - | ||
| 94 | - } | ||
| 95 | - */ | ||
| 96 | - break; | ||
| 97 | - | ||
| 98 | - case dliNotePreGetProcAddress: | ||
| 99 | - debug(__FUNCTION__,"::dliNotePreGetProcAddress") | ||
| 100 | - break; | ||
| 101 | - | ||
| 102 | - case dliFailLoadLib: | ||
| 103 | - debug(__FUNCTION__,"::dliFailLoadLib") | ||
| 104 | - break; | ||
| 105 | - | ||
| 106 | - case dliFailGetProc: | ||
| 107 | - debug(__FUNCTION__,"::dliFailGetProc") | ||
| 108 | - break; | ||
| 109 | - | ||
| 110 | - default: | ||
| 111 | - debug(__FUNCTION__,"::default") | ||
| 112 | - | ||
| 113 | - } | ||
| 114 | - | ||
| 115 | - // Returning NULL causes the delay load machinery to perform default | ||
| 116 | - // processing for this notification. | ||
| 117 | - return NULL; | ||
| 118 | - | ||
| 119 | - } | ||
| 120 | - | ||
| 121 | namespace TN3270 { | 48 | namespace TN3270 { |
| 122 | 49 | ||
| 123 | std::string getUserName() { | 50 | std::string getUserName() { |
client/src/include/lib3270/ipc.h
| @@ -65,19 +65,6 @@ | @@ -65,19 +65,6 @@ | ||
| 65 | 65 | ||
| 66 | #include <string> | 66 | #include <string> |
| 67 | 67 | ||
| 68 | -#ifdef _WIN32 | ||
| 69 | - | ||
| 70 | - extern "C" { | ||
| 71 | - | ||
| 72 | - extern __declspec (dllexport) PfnDliHook __pfnDliNotifyHook2; | ||
| 73 | - extern __declspec (dllexport) PfnDliHook __pfnDliFailureHook2; | ||
| 74 | - | ||
| 75 | - FARPROC WINAPI IPC3270_DelayLoadHook(unsigned reason, DelayLoadInfo * info); | ||
| 76 | - | ||
| 77 | - } | ||
| 78 | - | ||
| 79 | -#endif // _WIN32 | ||
| 80 | - | ||
| 81 | namespace TN3270 { | 68 | namespace TN3270 { |
| 82 | 69 | ||
| 83 | class Host; | 70 | class Host; |
client/src/session/local/init.cc