2 * Win32 builtin functions
4 * Copyright 1997 Alexandre Julliard
13 #include <sys/types.h>
14 #ifdef HAVE_SYS_MMAN_H
19 #include "wine/winbase16.h"
20 #include "wine/library.h"
24 #include "wine/server.h"
25 #include "debugtools.h"
27 DEFAULT_DEBUG_CHANNEL(module
);
28 DECLARE_DEBUG_CHANNEL(relay
);
30 extern void RELAY_SetupDLL( const char *module
);
32 static HMODULE main_module
;
34 /***********************************************************************
37 void *BUILTIN32_dlopen( const char *name
)
42 if (!(handle
= wine_dll_load( name
, error
, sizeof(error
) )))
44 if (strstr(error
, "cannot open") || strstr(error
, "open failed")) {
45 /* The file does not exist -> WARN() */
46 WARN("cannot open .so lib for builtin %s: %s\n", name
, error
);
48 /* ERR() for all other errors (missing functions, ...) */
49 ERR("failed to load .so lib for builtin %s: %s\n", name
, error
);
55 /***********************************************************************
58 int BUILTIN32_dlclose( void *handle
)
60 /* FIXME: should unregister descriptors first */
61 /* wine_dll_unload( handle ); */
66 /***********************************************************************
69 * Load a library in memory; callback function for wine_dll_register
71 static void load_library( void *base
, const char *filename
)
73 HMODULE module
= (HMODULE
)base
;
78 ERR("could not map image for %s\n", filename
? filename
: "main exe" );
82 if (!(PE_HEADER(module
)->FileHeader
.Characteristics
& IMAGE_FILE_DLL
))
84 /* if we already have an executable, ignore this one */
85 if (!main_module
) main_module
= module
;
86 return; /* don't create the modref here, will be done later on */
89 if (GetModuleHandleA( filename
))
90 MESSAGE( "Warning: loading builtin %s, but native version already present. Expect trouble.\n", filename
);
92 /* Create 32-bit MODREF */
93 if (!(wm
= PE_CreateModule( module
, filename
, 0, 0, TRUE
)))
95 ERR( "can't load %s\n", filename
);
96 SetLastError( ERROR_OUTOFMEMORY
);
99 TRACE( "loaded %s %p %x\n", filename
, wm
, module
);
100 wm
->refCount
++; /* we don't support freeing builtin dlls (FIXME)*/
102 /* setup relay debugging entry points */
103 if (TRACE_ON(relay
)) RELAY_SetupDLL( (void *)module
);
107 /***********************************************************************
108 * BUILTIN32_LoadLibraryExA
110 * Partly copied from the original PE_ version.
113 WINE_MODREF
*BUILTIN32_LoadLibraryExA(LPCSTR path
, DWORD flags
)
116 char dllname
[20], *p
;
120 /* Fix the name in case we have a full path and extension */
122 if ((p
= strrchr( name
, '\\' ))) name
= p
+ 1;
123 if ((p
= strrchr( name
, '/' ))) name
= p
+ 1;
125 if (strlen(name
) >= sizeof(dllname
)-4) goto error
;
127 strcpy( dllname
, name
);
128 p
= strrchr( dllname
, '.' );
129 if (!p
) strcat( dllname
, ".dll" );
130 for (p
= dllname
; *p
; p
++) *p
= FILE_tolower(*p
);
132 if (!(handle
= BUILTIN32_dlopen( dllname
))) goto error
;
134 if (!(wm
= MODULE_FindModule( path
))) wm
= MODULE_FindModule( dllname
);
137 ERR( "loaded .so but dll %s still not found\n", dllname
);
138 /* wine_dll_unload( handle );*/
141 wm
->dlhandle
= handle
;
145 SetLastError( ERROR_FILE_NOT_FOUND
);
149 /***********************************************************************
152 * Initialize loading callbacks and return HMODULE of main exe.
153 * 'main' is the main exe in case if was already loaded from a PE file.
155 HMODULE
BUILTIN32_LoadExeModule( HMODULE main
)
158 wine_dll_set_callback( load_library
);
160 MESSAGE( "No built-in EXE module loaded! Did you create a .spec file?\n" );
165 /***********************************************************************
166 * BUILTIN32_RegisterDLL
168 * Register a built-in DLL descriptor.
170 void BUILTIN32_RegisterDLL( const IMAGE_NT_HEADERS
*header
, const char *filename
)
172 extern void __wine_dll_register( const IMAGE_NT_HEADERS
*header
, const char *filename
);
173 __wine_dll_register( header
, filename
);