forked from KolibriOS/kolibrios
45 lines
834 B
C
45 lines
834 B
C
/*
|
|
2015
|
|
Author: Pavel Yakovlev.
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
void *name;
|
|
void *function;
|
|
} export_t;
|
|
|
|
typedef unsigned long long qword;
|
|
typedef unsigned int dword;
|
|
typedef unsigned char byte;
|
|
typedef unsigned short word;
|
|
|
|
#define NULL ((void*)0)
|
|
|
|
#define quotess(name) #name
|
|
|
|
#ifdef NO_LIBIMPORT_FUNC
|
|
#define EXPORT_ export_t EXPORTS[]={
|
|
#else
|
|
#define EXPORT_ export_t EXPORTS[]={{"lib_pointer_library",&lib_pointer_library},
|
|
#endif
|
|
|
|
|
|
#define export(name) {LIB_NAME "." quotess(name),&name},
|
|
#define _EXPORT { NULL, NULL }};
|
|
|
|
#ifndef NO_LIBIMPORT_FUNC
|
|
static struct LIBDLL_STRUCT
|
|
{
|
|
int (*load)(char *path);
|
|
dword (*get)(char *name);
|
|
};
|
|
|
|
static inline struct LIBDLL_STRUCT library;
|
|
|
|
static void lib_pointer_library(dword adr1,dword adr2)
|
|
{
|
|
library.load = adr1;
|
|
library.get = adr2;
|
|
}
|
|
#endif |