/*
=================
Sys_LoadLibrary
=================
*/
void *Sys_LoadLibrary(const char *path, const char *sym, void **handle)
{
void *module, *entry;
*handle = NULL;
dlerror();
module = dlopen(path, RTLD_LAZY);
if (!module) {
Com_SetLastError(dlerror());
return NULL;
}
if (sym) {
dlerror();
entry = dlsym(module, sym);
if (!entry) {
Com_SetLastError(dlerror());
dlclose(module);
return NULL;
}
} else {
entry = NULL;
}
*handle = module;
return entry;
}
qboolean QAL_Init(void)
{
al_device = Cvar_Get("al_device", "", 0);
device = alcOpenDevice(al_device->string[0] ? al_device->string : NULL);
if (!device) {
Com_SetLastError(va("alcOpenDevice(%s) failed", al_device->string));
goto fail;
}
context = alcCreateContext(device, NULL);
if (!context) {
Com_SetLastError("alcCreateContext failed");
goto fail;
}
if (!alcMakeContextCurrent(context)) {
Com_SetLastError("alcMakeContextCurrent failed");
goto fail;
}
al_device->flags |= CVAR_SOUND;
return qtrue;
fail:
QAL_Shutdown();
return qfalse;
}
void *Sys_LoadLibrary(const char *path, const char *sym, void **handle)
{
HMODULE module;
void *entry;
*handle = NULL;
module = LoadLibraryA(path);
if (!module) {
Com_SetLastError(va("%s: LoadLibrary failed with error %lu\n",
path, GetLastError()));
return NULL;
}
if (sym) {
entry = GetProcAddress(module, sym);
if (!entry) {
Com_SetLastError(va("%s: GetProcAddress failed with error %lu\n",
path, GetLastError()));
FreeLibrary(module);
return NULL;
}
} else {
entry = NULL;
}
*handle = module;
return entry;
}
qboolean QAL_Init(void)
{
al_driver = Cvar_Get("al_driver", LIBAL, 0);
al_device = Cvar_Get("al_device", "", 0);
// don't allow absolute or relative paths
FS_SanitizeFilenameVariable(al_driver);
Sys_LoadLibrary(al_driver->string, NULL, &handle);
if (!handle) {
return qfalse;
}
#define QAL(type, func) q##func = Sys_GetProcAddress(handle, #func)
QALC_IMP
QAL_IMP
#undef QAL
device = qalcOpenDevice(al_device->string[0] ? al_device->string : NULL);
if (!device) {
Com_SetLastError(va("alcOpenDevice(%s) failed", al_device->string));
goto fail;
}
context = qalcCreateContext(device, NULL);
if (!context) {
Com_SetLastError("alcCreateContext failed");
goto fail;
}
if (!qalcMakeContextCurrent(context)) {
Com_SetLastError("alcMakeContextCurrent failed");
goto fail;
}
al_driver->flags |= CVAR_SOUND;
al_device->flags |= CVAR_SOUND;
return qtrue;
fail:
QAL_Shutdown();
return qfalse;
}
qboolean AL_Init(void)
{
int i;
Com_DPrintf("Initializing OpenAL\n");
if (!QAL_Init()) {
goto fail0;
}
// check for linear distance extension
if (!qalIsExtensionPresent("AL_EXT_LINEAR_DISTANCE")) {
Com_SetLastError("AL_EXT_LINEAR_DISTANCE extension is missing");
goto fail1;
}
// generate source names
qalGetError();
for (i = 0; i < MAX_CHANNELS; i++) {
qalGenSources(1, &s_srcnums[i]);
if (qalGetError() != AL_NO_ERROR) {
break;
}
}
Com_DPrintf("Got %d AL sources\n", i);
if (i < MIN_CHANNELS) {
Com_SetLastError("Insufficient number of AL sources");
goto fail1;
}
s_numchannels = i;
Com_Printf("OpenAL initialized.\n");
return qtrue;
fail1:
QAL_Shutdown();
fail0:
Com_EPrintf("Failed to initialize OpenAL: %s\n", Com_GetLastError());
return qfalse;
}
void *Sys_GetProcAddress(void *handle, const char *sym)
{
void *entry;
dlerror();
entry = dlsym(handle, sym);
if (!entry)
Com_SetLastError(dlerror());
return entry;
}
void *Sys_GetProcAddress(void *handle, const char *sym)
{
void *entry;
entry = GetProcAddress(handle, sym);
if (!entry)
Com_SetLastError(va("GetProcAddress(%s) failed with error %lu",
sym, GetLastError()));
return entry;
}
/*
=================
Qcommon_Init
=================
*/
void Qcommon_Init(int argc, char **argv)
{
if (setjmp(abortframe))
Sys_Error("Error during initialization: %s", com_errorMsg);
com_argc = argc;
com_argv = argv;
Com_SetLastError(NULL);
X86_SetFPCW();
// prepare enough of the subsystems to handle
// cvar and command buffer management
Z_Init();
MSG_Init();
Cbuf_Init();
Cmd_Init();
Cvar_Init();
Key_Init();
Prompt_Init();
Con_Init();
//
// init commands and vars
//
z_perturb = Cvar_Get("z_perturb", "0", 0);
#if USE_CLIENT
host_speeds = Cvar_Get("host_speeds", "0", 0);
#endif
#ifdef _DEBUG
developer = Cvar_Get("developer", "0", 0);
#endif
timescale = Cvar_Get("timescale", "1", CVAR_CHEAT);
fixedtime = Cvar_Get("fixedtime", "0", CVAR_CHEAT);
logfile_enable = Cvar_Get("logfile", "0", 0);
logfile_flush = Cvar_Get("logfile_flush", "0", 0);
logfile_name = Cvar_Get("logfile_name", "console", 0);
logfile_prefix = Cvar_Get("logfile_prefix", "[%Y-%m-%d %H:%M] ", 0);
#if USE_CLIENT
dedicated = Cvar_Get("dedicated", "0", CVAR_NOSET);
cl_running = Cvar_Get("cl_running", "0", CVAR_ROM);
cl_paused = Cvar_Get("cl_paused", "0", CVAR_ROM);
#else
dedicated = Cvar_Get("dedicated", "1", CVAR_ROM);
#endif
sv_running = Cvar_Get("sv_running", "0", CVAR_ROM);
sv_paused = Cvar_Get("sv_paused", "0", CVAR_ROM);
com_timedemo = Cvar_Get("timedemo", "0", CVAR_CHEAT);
com_date_format = Cvar_Get("com_date_format", "%Y-%m-%d", 0);
#ifdef _WIN32
com_time_format = Cvar_Get("com_time_format", "%H.%M", 0);
#else
com_time_format = Cvar_Get("com_time_format", "%H:%M", 0);
#endif
#ifdef _DEBUG
com_debug_break = Cvar_Get("com_debug_break", "0", 0);
#endif
com_fatal_error = Cvar_Get("com_fatal_error", "0", 0);
com_version = Cvar_Get("version", com_version_string, CVAR_SERVERINFO | CVAR_ROM);
allow_download = Cvar_Get("allow_download", COM_DEDICATED ? "0" : "1", CVAR_ARCHIVE);
allow_download_players = Cvar_Get("allow_download_players", "1", CVAR_ARCHIVE);
allow_download_models = Cvar_Get("allow_download_models", "1", CVAR_ARCHIVE);
allow_download_sounds = Cvar_Get("allow_download_sounds", "1", CVAR_ARCHIVE);
allow_download_maps = Cvar_Get("allow_download_maps", "1", CVAR_ARCHIVE);
allow_download_textures = Cvar_Get("allow_download_textures", "1", CVAR_ARCHIVE);
allow_download_pics = Cvar_Get("allow_download_pics", "1", CVAR_ARCHIVE);
allow_download_others = Cvar_Get("allow_download_others", "0", 0);
rcon_password = Cvar_Get("rcon_password", "", CVAR_PRIVATE);
Cmd_AddCommand("z_stats", Z_Stats_f);
//Cmd_AddCommand("setenv", Com_Setenv_f);
Cmd_AddMacro("com_date", Com_Date_m);
Cmd_AddMacro("com_time", Com_Time_m);
Cmd_AddMacro("com_uptime", Com_Uptime_m);
Cmd_AddMacro("com_uptime_long", Com_UptimeLong_m);
Cmd_AddMacro("random", Com_Random_m);
Cmd_AddMacro("com_maplist", Com_MapList_m);
// add any system-wide configuration files
Sys_AddDefaultConfig();
// we need to add the early commands twice, because
// a basedir or cddir needs to be set before execing
// config files, but we want other parms to override
// the settings of the config files
Com_AddEarlyCommands(qfalse);
Sys_Init();
Sys_RunConsole();
FS_Init();
Sys_RunConsole();
// no longer allow CVAR_NOSET modifications
com_initialized = qtrue;
// after FS is initialized, open logfile
logfile_enable->changed = logfile_enable_changed;
logfile_flush->changed = logfile_param_changed;
logfile_name->changed = logfile_param_changed;
logfile_enable_changed(logfile_enable);
// execute configs: default.cfg may come from the packfile, but config.cfg
// and autoexec.cfg must be real files within the game directory
Com_AddConfigFile(COM_DEFAULT_CFG, 0);
Com_AddConfigFile(COM_CONFIG_CFG, FS_TYPE_REAL | FS_PATH_GAME);
Com_AddConfigFile(COM_AUTOEXEC_CFG, FS_TYPE_REAL | FS_PATH_GAME);
Com_AddConfigFile(COM_POSTEXEC_CFG, FS_TYPE_REAL);
Com_AddEarlyCommands(qtrue);
Cmd_AddCommand("lasterror", Com_LastError_f);
Cmd_AddCommand("quit", Com_Quit_f);
#if !USE_CLIENT
Cmd_AddCommand("recycle", Com_Recycle_f);
#endif
srand(Sys_Milliseconds());
Netchan_Init();
NET_Init();
BSP_Init();
CM_Init();
SV_Init();
CL_Init();
TST_Init();
Sys_RunConsole();
// add + commands from command line
if (!Com_AddLateCommands()) {
// if the user didn't give any commands, run default action
char *cmd = COM_DEDICATED ? "dedicated_start" : "client_start";
if ((cmd = Cmd_AliasCommand(cmd)) != NULL) {
Cbuf_AddText(&cmd_buffer, cmd);
Cbuf_Execute(&cmd_buffer);
}
} else {
// the user asked for something explicit
// so drop the loading plaque
SCR_EndLoadingPlaque();
}
// even not given a starting map, dedicated server starts
// listening for rcon commands (create socket after all configs
// are executed to make sure port number is properly set)
if (COM_DEDICATED) {
NET_Config(NET_SERVER);
}
Com_AddConfigFile(COM_POSTINIT_CFG, FS_TYPE_REAL);
Com_Printf("====== " PRODUCT " initialized ======\n\n");
Com_LPrintf(PRINT_NOTICE, APPLICATION " " VERSION ", " __DATE__ "\n");
Com_Printf("http://skuller.net/q2pro/\n\n");
time(&com_startTime);
com_eventTime = Sys_Milliseconds();
}
