mirror of
				https://github.com/python/cpython.git
				synced 2025-10-26 11:14:33 +00:00 
			
		
		
		
	 96a8fb7e99
			
		
	
	
		96a8fb7e99
		
	
	
	
	
		
			
			* in import.c, #ifdef out references to dynamic loading based on HAVE_DYNAMIC_LOADING * clean out the platform-specific crud from importdl.c. [ maybe fold this function into import.c and drop the importdl.c file? Greg.] * change GetDynLoadFunc's "funcname" parameter to "shortname". change "name" to "fqname" for clarification. * each GetDynLoadFunc now creates its own funcname value. WARNING: as I mentioned previously, we may run into an issue with a missing "_" on some platforms. Testing will show this pretty quickly, however. * move pathname munging into dynload_shlib.c
		
			
				
	
	
		
			76 lines
		
	
	
	
		
			2.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			76 lines
		
	
	
	
		
			2.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /***********************************************************
 | |
| Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam,
 | |
| The Netherlands.
 | |
| 
 | |
|                         All Rights Reserved
 | |
| 
 | |
| Permission to use, copy, modify, and distribute this software and its
 | |
| documentation for any purpose and without fee is hereby granted,
 | |
| provided that the above copyright notice appear in all copies and that
 | |
| both that copyright notice and this permission notice appear in
 | |
| supporting documentation, and that the names of Stichting Mathematisch
 | |
| Centrum or CWI or Corporation for National Research Initiatives or
 | |
| CNRI not be used in advertising or publicity pertaining to
 | |
| distribution of the software without specific, written prior
 | |
| permission.
 | |
| 
 | |
| While CWI is the initial source for this software, a modified version
 | |
| is made available by the Corporation for National Research Initiatives
 | |
| (CNRI) at the Internet address ftp://ftp.python.org.
 | |
| 
 | |
| STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
 | |
| REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
 | |
| MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
 | |
| CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
 | |
| DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
 | |
| PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
 | |
| TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
 | |
| PERFORMANCE OF THIS SOFTWARE.
 | |
| 
 | |
| ******************************************************************/
 | |
| 
 | |
| /* Support for dynamic loading of extension modules */
 | |
| 
 | |
| #define  INCL_DOSERRORS
 | |
| #define  INCL_DOSMODULEMGR
 | |
| #include <os2.h>
 | |
| 
 | |
| #include "Python.h"
 | |
| #include "importdl.h"
 | |
| 
 | |
| 
 | |
| const struct filedescr _PyImport_DynLoadFiletab[] = {
 | |
| 	{".pyd", "rb", C_EXTENSION},
 | |
| 	{".dll", "rb", C_EXTENSION},
 | |
| 	{0, 0}
 | |
| };
 | |
| 
 | |
| dl_funcptr _PyImport_GetDynLoadFunc(const char *fqname, const char *shortname,
 | |
| 				    const char *pathname, FILE *fp)
 | |
| {
 | |
| 	dl_funcptr p;
 | |
| 	APIRET  rc;
 | |
| 	HMODULE hDLL;
 | |
| 	char failreason[256];
 | |
| 	char funcname[258];
 | |
| 
 | |
| 	rc = DosLoadModule(failreason,
 | |
| 			   sizeof(failreason),
 | |
| 			   pathname,
 | |
| 			   &hDLL);
 | |
| 
 | |
| 	if (rc != NO_ERROR) {
 | |
| 		char errBuf[256];
 | |
| 		sprintf(errBuf,
 | |
| 			"DLL load failed, rc = %d: %s",
 | |
| 			rc, failreason);
 | |
| 		PyErr_SetString(PyExc_ImportError, errBuf);
 | |
| 		return NULL;
 | |
| 	}
 | |
| 
 | |
| 	sprintf(funcname, "init%.200s", shortname);
 | |
| 	rc = DosQueryProcAddr(hDLL, 0L, funcname, &p);
 | |
| 	if (rc != NO_ERROR)
 | |
| 		p = NULL; /* Signify Failure to Acquire Entrypoint */
 | |
| 	return p;
 | |
| }
 |