tewi/Server/module.c

/* $Id: module.c 416 2024-11-19 07:54:58Z nishi $ */

#define SOURCE

#include "tw_module.h"

#include "tw_config.h"

#include <cm_string.h>
#include <cm_log.h>

#include <string.h>
#include <stdlib.h>
#if !defined(_MSC_VER) && !defined(__BORLANDC__)
#include <unistd.h>
#endif

extern struct tw_config config;

#if defined(_PSP) || defined(__PPU__) || defined(__ps2sdk__) || defined(__NeXT__) || defined(__DOS__) || defined(__amiga__)
void* tw_module_load(const char* path) { return NULL; }

void* tw_module_symbol(void* mod, const char* sym) { return NULL; }

int tw_module_init(void* mod) { return 1; }

#else

#if defined(__MINGW32__) || defined(_MSC_VER) || defined(__BORLANDC__) || defined(__WATCOMC__)
#ifdef __OS2__
#define INCL_DOSMODULEMGR
#define INCL_DOSERRORS
#include <os2.h>
#elif defined(__NETWARE__)
#include <nwadv.h>
#include <nwthread.h>
#else
#include <windows.h>
#include <direct.h>
#endif
#else
#include <dlfcn.h>
#endif

void* tw_module_load(const char* path) {
        char* p = getcwd(NULL, 0);
        void* lib;
        char tmp[512];
#ifdef __OS2__
        HMODULE mod;
#elif defined(__NETWARE__)
        unsigned int* hnd = malloc(sizeof(*hnd));
#endif
#ifndef WINCE
        chdir(config.server_root);
#endif
#if defined(__MINGW32__) || defined(_MSC_VER) || defined(__BORLANDC__) || defined(__WATCOMC__)
#ifdef __OS2__
        if(DosLoadModule(tmp, 512, path, &mod) != NO_ERROR) {
                return NULL;
        }
        lib = (void*)mod;
#elif defined(__NETWARE__)
        *hnd = FindNLMHandle(path);
        if(*hnd == 0){
                free(hnd);
                hnd = NULL;
        }
        lib = (void*)hnd;
#else
        lib = LoadLibrary(path);
#endif
#else
        lib = dlopen(path, RTLD_LAZY);
#endif
        if(lib == NULL) {
                cm_log("Module", "Could not load %s", path);
        }
#ifndef WINCE
        chdir(p);
#endif
        free(p);
        return lib;
}

void* tw_module_symbol(void* mod, const char* sym) {
#if defined(__MINGW32__) || defined(_MSC_VER) || defined(__BORLANDC__) || defined(__WATCOMC__)
#ifdef __OS2__
        void* ret;
        APIRET rc;
        if((rc = DosQueryProcAddr((HMODULE)mod, 0, sym, (PFN*)&ret)) != NO_ERROR) {
                cm_log("Module", "OS/2 error %d", (int)rc);
                return NULL;
        }
        return ret;
#elif defined(__NETWARE__)
        return ImportSymbol(*(unsigned int*)mod, sym);
#elif defined(WINCE)
        return GetProcAddressW(mod, sym);
#else
        return GetProcAddress(mod, sym);
#endif
#else
        return dlsym(mod, sym);
#endif
}

int tw_module_init(void* mod) {
        tw_mod_init_t mod_init = (tw_mod_init_t)tw_module_symbol(mod, "mod_init");
        if(mod_init == NULL) {
                cm_log("Module", "Could not find a init call");
                return 1;
        } else {
                struct tw_tool tools;
                tw_init_tools(&tools);
                return mod_init(&config, &tools);
        }
}
#endif

void tw_add_version(const char* string) {
        if(config.extension == NULL) {
                config.extension = cm_strcat(" ", string);
        } else {
                char* tmp = config.extension;
                config.extension = cm_strcat3(tmp, " ", string);
                free(tmp);
        }
}

void tw_add_define(const char* string) {
        int i;
        for(i = 0; config.defined[i] != NULL; i++) {
                if(strcmp(config.defined[i], string) == 0) {
                        return;
                }
        }
        for(i = 0; config.defined[i] != NULL; i++)
                ;
        config.defined[i] = cm_strdup(string);
        config.defined[i + 1] = NULL;
}

void tw_delete_define(const char* string) {
        int i;
        for(i = 0; config.defined[i] != NULL; i++) {
                if(strcmp(config.defined[i], string) == 0) {
                        free(config.defined[i]);
                        for(; config.defined[i] != NULL; i++) {
                                config.defined[i] = config.defined[i + 1];
                        }
                        break;
                }
        }
}

void tw_init_tools(struct tw_tool* tools) {
        tools->log = cm_log;
        tools->add_version = tw_add_version;
        tools->add_define = tw_add_define;
}
Revision:	1.3
Committed:	Tue Nov 19 07:55:13 2024 UTC (5 months, 1 week ago) by nishi
Content type:	text/x-c
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.2:	+8 -2 lines
Log Message:	compiles for windows ce
#	User	Rev	Content
1	nishi	1.3	/* $Id: module.c 416 2024-11-19 07:54:58Z nishi $ */
2	nishi	1.1
3			#define SOURCE
4
5			#include "tw_module.h"
6
7			#include "tw_config.h"
8
9			#include <cm_string.h>
10			#include <cm_log.h>
11
12			#include <string.h>
13			#include <stdlib.h>
14			#if !defined(_MSC_VER) && !defined(__BORLANDC__)
15			#include <unistd.h>
16			#endif
17
18			extern struct tw_config config;
19
20	nishi	1.2	#if defined(_PSP) \|\| defined(__PPU__) \|\| defined(__ps2sdk__) \|\| defined(__NeXT__) \|\| defined(__DOS__) \|\| defined(__amiga__)
21	nishi	1.1	void* tw_module_load(const char* path) { return NULL; }
22
23			void* tw_module_symbol(void* mod, const char* sym) { return NULL; }
24
25			int tw_module_init(void* mod) { return 1; }
26
27			#else
28
29			#if defined(__MINGW32__) \|\| defined(_MSC_VER) \|\| defined(__BORLANDC__) \|\| defined(__WATCOMC__)
30			#ifdef __OS2__
31			#define INCL_DOSMODULEMGR
32			#define INCL_DOSERRORS
33			#include <os2.h>
34			#elif defined(__NETWARE__)
35			#include <nwadv.h>
36			#include <nwthread.h>
37			#else
38			#include <windows.h>
39			#include <direct.h>
40			#endif
41			#else
42			#include <dlfcn.h>
43			#endif
44
45			void* tw_module_load(const char* path) {
46			char* p = getcwd(NULL, 0);
47			void* lib;
48			char tmp[512];
49			#ifdef __OS2__
50			HMODULE mod;
51			#elif defined(__NETWARE__)
52			unsigned int* hnd = malloc(sizeof(*hnd));
53			#endif
54	nishi	1.3	#ifndef WINCE
55	nishi	1.1	chdir(config.server_root);
56	nishi	1.3	#endif
57	nishi	1.1	#if defined(__MINGW32__) \|\| defined(_MSC_VER) \|\| defined(__BORLANDC__) \|\| defined(__WATCOMC__)
58			#ifdef __OS2__
59			if(DosLoadModule(tmp, 512, path, &mod) != NO_ERROR) {
60			return NULL;
61			}
62			lib = (void*)mod;
63			#elif defined(__NETWARE__)
64			*hnd = FindNLMHandle(path);
65			if(*hnd == 0){
66			free(hnd);
67			hnd = NULL;
68			}
69			lib = (void*)hnd;
70			#else
71	nishi	1.3	lib = LoadLibrary(path);
72	nishi	1.1	#endif
73			#else
74			lib = dlopen(path, RTLD_LAZY);
75			#endif
76			if(lib == NULL) {
77			cm_log("Module", "Could not load %s", path);
78			}
79	nishi	1.3	#ifndef WINCE
80	nishi	1.1	chdir(p);
81	nishi	1.3	#endif
82	nishi	1.1	free(p);
83			return lib;
84			}
85
86			void* tw_module_symbol(void* mod, const char* sym) {
87			#if defined(__MINGW32__) \|\| defined(_MSC_VER) \|\| defined(__BORLANDC__) \|\| defined(__WATCOMC__)
88			#ifdef __OS2__
89			void* ret;
90			APIRET rc;
91			if((rc = DosQueryProcAddr((HMODULE)mod, 0, sym, (PFN*)&ret)) != NO_ERROR) {
92			cm_log("Module", "OS/2 error %d", (int)rc);
93			return NULL;
94			}
95			return ret;
96			#elif defined(__NETWARE__)
97			return ImportSymbol((unsigned int)mod, sym);
98	nishi	1.3	#elif defined(WINCE)
99			return GetProcAddressW(mod, sym);
100	nishi	1.1	#else
101			return GetProcAddress(mod, sym);
102			#endif
103			#else
104			return dlsym(mod, sym);
105			#endif
106			}
107
108			int tw_module_init(void* mod) {
109			tw_mod_init_t mod_init = (tw_mod_init_t)tw_module_symbol(mod, "mod_init");
110			if(mod_init == NULL) {
111			cm_log("Module", "Could not find a init call");
112			return 1;
113			} else {
114			struct tw_tool tools;
115			tw_init_tools(&tools);
116			return mod_init(&config, &tools);
117			}
118			}
119			#endif
120
121			void tw_add_version(const char* string) {
122			if(config.extension == NULL) {
123			config.extension = cm_strcat(" ", string);
124			} else {
125			char* tmp = config.extension;
126			config.extension = cm_strcat3(tmp, " ", string);
127			free(tmp);
128			}
129			}
130
131			void tw_add_define(const char* string) {
132			int i;
133			for(i = 0; config.defined[i] != NULL; i++) {
134			if(strcmp(config.defined[i], string) == 0) {
135			return;
136			}
137			}
138			for(i = 0; config.defined[i] != NULL; i++)
139			;
140			config.defined[i] = cm_strdup(string);
141			config.defined[i + 1] = NULL;
142			}
143
144			void tw_delete_define(const char* string) {
145			int i;
146			for(i = 0; config.defined[i] != NULL; i++) {
147			if(strcmp(config.defined[i], string) == 0) {
148			free(config.defined[i]);
149			for(; config.defined[i] != NULL; i++) {
150			config.defined[i] = config.defined[i + 1];
151			}
152			break;
153			}
154			}
155			}
156
157			void tw_init_tools(struct tw_tool* tools) {
158			tools->log = cm_log;
159			tools->add_version = tw_add_version;
160			tools->add_define = tw_add_define;
161			}