519 lines
13 KiB
C
519 lines
13 KiB
C
/*
|
|
* Copyright 1995-1998 by Metro Link, Inc.
|
|
*
|
|
* Permission to use, copy, modify, distribute, and sell this software and its
|
|
* documentation for any purpose is hereby granted without fee, 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 name of Metro Link, Inc. not be used in
|
|
* advertising or publicity pertaining to distribution of the software without
|
|
* specific, written prior permission. Metro Link, Inc. makes no
|
|
* representations about the suitability of this software for any purpose.
|
|
* It is provided "as is" without express or implied warranty.
|
|
*
|
|
* METRO LINK, INC. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
|
|
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
|
|
* EVENT SHALL METRO LINK, INC. 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.
|
|
*/
|
|
/*
|
|
* Copyright (c) 1997-2003 by The XFree86 Project, Inc.
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining a
|
|
* copy of this software and associated documentation files (the "Software"),
|
|
* to deal in the Software without restriction, including without limitation
|
|
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
|
* and/or sell copies of the Software, and to permit persons to whom the
|
|
* Software is furnished to do so, subject to the following conditions:
|
|
*
|
|
* The above copyright notice and this permission notice shall be included in
|
|
* all copies or substantial portions of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
* THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
|
|
* OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
|
|
* ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
|
* OTHER DEALINGS IN THE SOFTWARE.
|
|
*
|
|
* Except as contained in this notice, the name of the copyright holder(s)
|
|
* and author(s) shall not be used in advertising or otherwise to promote
|
|
* the sale, use or other dealings in this Software without prior written
|
|
* authorization from the copyright holder(s) and author(s).
|
|
*/
|
|
|
|
#ifdef HAVE_XORG_CONFIG_H
|
|
#include <xorg-config.h>
|
|
#endif
|
|
|
|
#include <errno.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <sys/types.h>
|
|
#if defined(UseMMAP) || (defined(linux) && defined(__ia64__))
|
|
#include <sys/mman.h>
|
|
#endif
|
|
#include <unistd.h>
|
|
#include <sys/stat.h>
|
|
#include <fcntl.h>
|
|
#include <string.h>
|
|
#if defined(linux) && \
|
|
(defined(__alpha__) || defined(__powerpc__) || defined(__ia64__) \
|
|
|| defined(__amd64__))
|
|
#include <malloc.h>
|
|
#endif
|
|
#include <stdarg.h>
|
|
|
|
#include "os.h"
|
|
#include "loader.h"
|
|
#include "loaderProcs.h"
|
|
#include "xf86.h"
|
|
#include "xf86Priv.h"
|
|
#include "compiler.h"
|
|
#include "sym.h"
|
|
|
|
#if defined(Lynx) && defined(sun)
|
|
/* Cross build machine doesn;t have strerror() */
|
|
#define strerror(err) "strerror unsupported"
|
|
#endif
|
|
|
|
/*
|
|
* handles are used to identify files that are loaded. Even archives
|
|
* are counted as a single file.
|
|
*/
|
|
#define MAX_HANDLE 256
|
|
#define HANDLE_FREE 0
|
|
#define HANDLE_USED 1
|
|
static char freeHandles[MAX_HANDLE];
|
|
static int refCount[MAX_HANDLE];
|
|
|
|
/*
|
|
* modules are used to identify compilation units (ie object modules).
|
|
* Archives contain multiple modules, each of which is treated seperately.
|
|
*/
|
|
static int moduleseq = 0;
|
|
|
|
/* Prototypes for static functions. */
|
|
static loaderPtr _LoaderListPush(void);
|
|
static loaderPtr _LoaderListPop(int);
|
|
|
|
void
|
|
LoaderInit(void)
|
|
{
|
|
const char *osname = NULL;
|
|
|
|
char *ld_bind_now = getenv("LD_BIND_NOW");
|
|
if (ld_bind_now && *ld_bind_now) {
|
|
xf86Msg(X_ERROR, "LD_BIND_NOW is set, dlloader will NOT work!\n");
|
|
}
|
|
|
|
xf86MsgVerb(X_INFO, 2, "Loader magic: %p\n", (void *)
|
|
((long)dixLookupTab ^ (long)extLookupTab
|
|
^ (long)fontLookupTab ^ (long)miLookupTab
|
|
^ (long)xfree86LookupTab));
|
|
xf86MsgVerb(X_INFO, 2, "Module ABI versions:\n");
|
|
xf86ErrorFVerb(2, "\t%s: %d.%d\n", ABI_CLASS_ANSIC,
|
|
GET_ABI_MAJOR(LoaderVersionInfo.ansicVersion),
|
|
GET_ABI_MINOR(LoaderVersionInfo.ansicVersion));
|
|
xf86ErrorFVerb(2, "\t%s: %d.%d\n", ABI_CLASS_VIDEODRV,
|
|
GET_ABI_MAJOR(LoaderVersionInfo.videodrvVersion),
|
|
GET_ABI_MINOR(LoaderVersionInfo.videodrvVersion));
|
|
xf86ErrorFVerb(2, "\t%s : %d.%d\n", ABI_CLASS_XINPUT,
|
|
GET_ABI_MAJOR(LoaderVersionInfo.xinputVersion),
|
|
GET_ABI_MINOR(LoaderVersionInfo.xinputVersion));
|
|
xf86ErrorFVerb(2, "\t%s : %d.%d\n", ABI_CLASS_EXTENSION,
|
|
GET_ABI_MAJOR(LoaderVersionInfo.extensionVersion),
|
|
GET_ABI_MINOR(LoaderVersionInfo.extensionVersion));
|
|
xf86ErrorFVerb(2, "\t%s : %d.%d\n", ABI_CLASS_FONT,
|
|
GET_ABI_MAJOR(LoaderVersionInfo.fontVersion),
|
|
GET_ABI_MINOR(LoaderVersionInfo.fontVersion));
|
|
|
|
LoaderGetOS(&osname, NULL, NULL, NULL);
|
|
if (osname)
|
|
xf86MsgVerb(X_INFO, 2, "Loader running on %s\n", osname);
|
|
|
|
#if defined(__UNIXWARE__) && !defined(__GNUC__)
|
|
/* For UnixWare we need to load the C Runtime libraries which are
|
|
* normally auto-linked by the compiler. Otherwise we are bound to
|
|
* see unresolved symbols when trying to use the type "long long".
|
|
* Obviously, this does not apply if the GNU C compiler is used.
|
|
*/
|
|
{
|
|
int errmaj, errmin, wasLoaded; /* place holders */
|
|
char *xcrtpath = DEFAULT_MODULE_PATH "/libcrt.a";
|
|
char *uwcrtpath = "/usr/ccs/lib/libcrt.a";
|
|
char *path;
|
|
struct stat st;
|
|
|
|
if(stat(xcrtpath, &st) < 0)
|
|
path = uwcrtpath; /* fallback: try to get libcrt.a from the uccs */
|
|
else
|
|
path = xcrtpath; /* get the libcrt.a we compiled with */
|
|
LoaderOpen (path, "libcrt", 0, &errmaj, &errmin, &wasLoaded);
|
|
}
|
|
#endif
|
|
}
|
|
|
|
static loaderPtr listHead = (loaderPtr) 0;
|
|
|
|
static loaderPtr
|
|
_LoaderListPush()
|
|
{
|
|
loaderPtr item = calloc(1, sizeof(struct _loader));
|
|
|
|
item->next = listHead;
|
|
listHead = item;
|
|
|
|
return item;
|
|
}
|
|
|
|
static loaderPtr
|
|
_LoaderListPop(int handle)
|
|
{
|
|
loaderPtr item = listHead;
|
|
loaderPtr *bptr = &listHead; /* pointer to previous node */
|
|
|
|
while (item) {
|
|
if (item->handle == handle) {
|
|
*bptr = item->next; /* remove this from the list */
|
|
return item;
|
|
}
|
|
bptr = &(item->next);
|
|
item = item->next;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* _LoaderHandleToName() will return the name of the first module with a
|
|
* given handle. This requires getting the last module on the LIFO with
|
|
* the given handle.
|
|
*/
|
|
char *
|
|
_LoaderHandleToName(int handle)
|
|
{
|
|
loaderPtr item = listHead;
|
|
loaderPtr aritem = NULL;
|
|
loaderPtr lastitem = NULL;
|
|
|
|
if (handle < 0) {
|
|
return "(built-in)";
|
|
}
|
|
while (item) {
|
|
if (item->handle == handle) {
|
|
if (strchr(item->name, ':') == NULL)
|
|
aritem = item;
|
|
else
|
|
lastitem = item;
|
|
}
|
|
item = item->next;
|
|
}
|
|
|
|
if (aritem)
|
|
return aritem->name;
|
|
|
|
if (lastitem)
|
|
return lastitem->name;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* _LoaderHandleToCanonicalName() will return the cname of the first module
|
|
* with a given handle. This requires getting the last module on the LIFO with
|
|
* the given handle.
|
|
*/
|
|
char *
|
|
_LoaderHandleToCanonicalName(int handle)
|
|
{
|
|
loaderPtr item = listHead;
|
|
loaderPtr lastitem = NULL;
|
|
|
|
if (handle < 0) {
|
|
return "(built-in)";
|
|
}
|
|
while (item) {
|
|
if (item->handle == handle) {
|
|
lastitem = item;
|
|
}
|
|
item = item->next;
|
|
}
|
|
|
|
if (lastitem)
|
|
return lastitem->cname;
|
|
|
|
return NULL;
|
|
}
|
|
|
|
/*
|
|
* _LoaderModuleToName() will return the name of the first module with a
|
|
* given handle. This requires getting the last module on the LIFO with
|
|
* the given handle.
|
|
*/
|
|
char *
|
|
_LoaderModuleToName(int module)
|
|
{
|
|
loaderPtr item = listHead;
|
|
loaderPtr aritem = NULL;
|
|
loaderPtr lastitem = NULL;
|
|
|
|
if (module < 0) {
|
|
return "(built-in)";
|
|
}
|
|
while (item) {
|
|
if (item->module == module) {
|
|
if (strchr(item->name, ':') == NULL)
|
|
aritem = item;
|
|
else
|
|
lastitem = item;
|
|
}
|
|
item = item->next;
|
|
}
|
|
|
|
if (aritem)
|
|
return aritem->name;
|
|
|
|
if (lastitem)
|
|
return lastitem->name;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* These four are just ABI stubs */
|
|
_X_EXPORT void
|
|
LoaderRefSymbols(const char *sym0, ...)
|
|
{
|
|
}
|
|
|
|
_X_EXPORT void
|
|
LoaderRefSymLists(const char **list0, ...)
|
|
{
|
|
}
|
|
|
|
_X_EXPORT void
|
|
LoaderReqSymLists(const char **list0, ...)
|
|
{
|
|
}
|
|
|
|
_X_EXPORT void
|
|
LoaderReqSymbols(const char *sym0, ...)
|
|
{
|
|
}
|
|
|
|
/* Public Interface to the loader. */
|
|
|
|
int
|
|
LoaderOpen(const char *module, const char *cname, int handle,
|
|
int *errmaj, int *errmin, int *wasLoaded, int flags)
|
|
{
|
|
loaderPtr tmp;
|
|
int new_handle;
|
|
int fd;
|
|
|
|
#if defined(DEBUG)
|
|
ErrorF("LoaderOpen(%s)\n", module);
|
|
#endif
|
|
|
|
/*
|
|
* Check to see if the module is already loaded.
|
|
* Only if we are loading it into an existing namespace.
|
|
* If it is to be loaded into a new namespace, don't check.
|
|
* Note: We only have one namespace.
|
|
*/
|
|
if (handle >= 0) {
|
|
tmp = listHead;
|
|
while (tmp) {
|
|
#ifdef DEBUGLIST
|
|
ErrorF("strcmp(%x(%s),{%x} %x(%s))\n", module, module,
|
|
&(tmp->name), tmp->name, tmp->name);
|
|
#endif
|
|
if (!strcmp(module, tmp->name)) {
|
|
refCount[tmp->handle]++;
|
|
if (wasLoaded)
|
|
*wasLoaded = 1;
|
|
xf86MsgVerb(X_INFO, 2, "Reloading %s\n", module);
|
|
return tmp->handle;
|
|
}
|
|
tmp = tmp->next;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* OK, it's a new one. Add it.
|
|
*/
|
|
xf86Msg(X_INFO, "Loading %s\n", module);
|
|
if (wasLoaded)
|
|
*wasLoaded = 0;
|
|
|
|
/*
|
|
* Find a free handle.
|
|
*/
|
|
new_handle = 1;
|
|
while (freeHandles[new_handle] && new_handle < MAX_HANDLE)
|
|
new_handle++;
|
|
|
|
if (new_handle == MAX_HANDLE) {
|
|
xf86Msg(X_ERROR, "Out of loader space\n"); /* XXX */
|
|
if (errmaj)
|
|
*errmaj = LDR_NOSPACE;
|
|
if (errmin)
|
|
*errmin = LDR_NOSPACE;
|
|
return -1;
|
|
}
|
|
|
|
freeHandles[new_handle] = HANDLE_USED;
|
|
refCount[new_handle] = 1;
|
|
|
|
if ((fd = open(module, O_RDONLY)) < 0) {
|
|
xf86Msg(X_ERROR, "Unable to open %s\n", module);
|
|
freeHandles[new_handle] = HANDLE_FREE;
|
|
if (errmaj)
|
|
*errmaj = LDR_NOMODOPEN;
|
|
if (errmin)
|
|
*errmin = errno;
|
|
return -1;
|
|
}
|
|
|
|
tmp = _LoaderListPush();
|
|
tmp->name = malloc(strlen(module) + 1);
|
|
strcpy(tmp->name, module);
|
|
tmp->cname = malloc(strlen(cname) + 1);
|
|
strcpy(tmp->cname, cname);
|
|
tmp->handle = new_handle;
|
|
tmp->module = moduleseq++;
|
|
|
|
if ((tmp->private = DLLoadModule(tmp, fd, flags)) == NULL) {
|
|
xf86Msg(X_ERROR, "Failed to load %s\n", module);
|
|
_LoaderListPop(new_handle);
|
|
freeHandles[new_handle] = HANDLE_FREE;
|
|
if (errmaj)
|
|
*errmaj = LDR_NOLOAD;
|
|
if (errmin)
|
|
*errmin = LDR_NOLOAD;
|
|
return -1;
|
|
}
|
|
|
|
close(fd);
|
|
|
|
return new_handle;
|
|
}
|
|
|
|
int
|
|
LoaderHandleOpen(int handle)
|
|
{
|
|
if (handle < 0 || handle >= MAX_HANDLE)
|
|
return -1;
|
|
|
|
if (freeHandles[handle] != HANDLE_USED)
|
|
return -1;
|
|
|
|
refCount[handle]++;
|
|
return handle;
|
|
}
|
|
|
|
_X_EXPORT void *
|
|
LoaderSymbol(const char *sym)
|
|
{
|
|
return (DLFindSymbol(sym));
|
|
}
|
|
|
|
/* more stub */
|
|
_X_EXPORT int
|
|
LoaderCheckUnresolved(int delay_flag)
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
LoaderUnload(int handle)
|
|
{
|
|
loaderRec fakeHead;
|
|
loaderPtr tmp = &fakeHead;
|
|
|
|
if (handle < 0 || handle >= MAX_HANDLE)
|
|
return -1;
|
|
|
|
/*
|
|
* check the reference count, only free it if it goes to zero
|
|
*/
|
|
if (--refCount[handle])
|
|
return 0;
|
|
/*
|
|
* find the loaderRecs associated with this handle.
|
|
*/
|
|
|
|
while ((tmp = _LoaderListPop(handle)) != NULL) {
|
|
if (strchr(tmp->name, ':') == NULL) {
|
|
/* It is not a member of an archive */
|
|
xf86Msg(X_INFO, "Unloading %s\n", tmp->name);
|
|
}
|
|
DLUnloadModule(tmp->private);
|
|
free(tmp->name);
|
|
free(tmp->cname);
|
|
free(tmp);
|
|
}
|
|
|
|
freeHandles[handle] = HANDLE_FREE;
|
|
|
|
return 0;
|
|
}
|
|
|
|
void
|
|
LoaderDuplicateSymbol(const char *symbol, const int handle)
|
|
{
|
|
ErrorF("Duplicate symbol %s in %s\n", symbol,
|
|
listHead ? listHead->name : "(built-in)");
|
|
ErrorF("Also defined in %s\n", _LoaderHandleToName(handle));
|
|
FatalError("Module load failure\n");
|
|
}
|
|
|
|
unsigned long LoaderOptions = 0;
|
|
|
|
void
|
|
LoaderResetOptions(void)
|
|
{
|
|
LoaderOptions = 0;
|
|
}
|
|
|
|
void
|
|
LoaderSetOptions(unsigned long opts)
|
|
{
|
|
LoaderOptions |= opts;
|
|
}
|
|
|
|
void
|
|
LoaderClearOptions(unsigned long opts)
|
|
{
|
|
LoaderOptions &= ~opts;
|
|
}
|
|
|
|
_X_EXPORT int
|
|
LoaderGetABIVersion(const char *abiclass)
|
|
{
|
|
struct {
|
|
const char *name;
|
|
int version;
|
|
} classes[] = {
|
|
{ ABI_CLASS_ANSIC, LoaderVersionInfo.ansicVersion },
|
|
{ ABI_CLASS_VIDEODRV, LoaderVersionInfo.videodrvVersion },
|
|
{ ABI_CLASS_XINPUT, LoaderVersionInfo.xinputVersion },
|
|
{ ABI_CLASS_EXTENSION, LoaderVersionInfo.extensionVersion },
|
|
{ ABI_CLASS_FONT, LoaderVersionInfo.fontVersion },
|
|
{ NULL, 0 }
|
|
};
|
|
int i;
|
|
|
|
for(i = 0; classes[i].name; i++) {
|
|
if(!strcmp(classes[i].name, abiclass)) {
|
|
return classes[i].version;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|