* Description: Entry point for win32 gaim, and various win32 dependant * Gaim is the legal property of its developers, whose names are too numerous * to list here. Please refer to the COPYRIGHT file distributed with this * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA /* This is for ATTACH_PARENT_PROCESS */ #define _WIN32_WINNT 0x501 #define WIN32_PROXY_REGKEY "Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings" typedef int (CALLBACK* LPFNGAIMMAIN)(HINSTANCE, int, char**); typedef void (CALLBACK* LPFNSETDLLDIRECTORY)(LPCTSTR); typedef BOOL (CALLBACK* LPFNATTACHCONSOLE)(DWORD); static LPFNGAIMMAIN gaim_main = NULL; static LPFNSETDLLDIRECTORY MySetDllDirectory = NULL; static BOOL read_reg_string(HKEY key, char* sub_key, char* val_name, LPBYTE data, LPDWORD data_len) { if (ERROR_SUCCESS == (retv = RegOpenKeyEx(key, sub_key, 0, KEY_QUERY_VALUE, &hkey))) { if (ERROR_SUCCESS == (retv = RegQueryValueEx(hkey, val_name, NULL, NULL, data, data_len))) FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, (LPTSTR) &szBuf, sizeof(szBuf), NULL); printf("Could not read reg key '%s' subkey '%s' value: '%s'\nError: (%ld) %s\n", ((key == HKEY_LOCAL_MACHINE) ? "HKLM" : (key == HKEY_CURRENT_USER) ? "HKCU" : sub_key, val_name, retv, szBuf); FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, NULL, retv, 0, (LPTSTR) &szBuf, sizeof(szBuf), NULL); printf("Could not open reg subkey: %s\nError: (%ld) %s\n", /* We assume that GTK+ is installed under \\path\to\Gaim\..\GTK * First we find \\path\to if (GetModuleFileName(NULL, path, MAX_PATH) != 0) { while ((tmp = strchr(tmp, '\\'))) { printf("Unable to determine current executable path. \n" "This will prevent the settings dir from being set.\n" "Assuming GTK+ is in the PATH.\n"); /* Set up the settings dir base to be \\path\to * The actual settings dir will be \\path\to\.gaim */ char settingsdir[strlen(path) + strlen("GAIMHOME=") + 1]; char aspelldir[strlen(path) + strlen("GAIM_ASPELL_DIR=\\Aspell\\bin") + 1]; snprintf(settingsdir, sizeof(settingsdir), "GAIMHOME=%s", path); printf("Setting settings dir: %s\n", settingsdir); snprintf(aspelldir, sizeof(aspelldir), "GAIM_ASPELL_DIR=%s\\Aspell\\bin", path); /* set the GTK+ path to be \\path\to\GTK\bin */ strcat(path, "\\GTK\\bin"); char gtkpath[MAX_PATH + 1]; hkey = HKEY_CURRENT_USER; if (!read_reg_string(hkey, "SOFTWARE\\GTK\\2.0", "Path", (LPBYTE) >kpath, &plen)) { hkey = HKEY_LOCAL_MACHINE; if (!read_reg_string(hkey, "SOFTWARE\\GTK\\2.0", "Path", (LPBYTE) >kpath, &plen)) { printf("GTK+ Path Registry Key not found. " "Assuming GTK+ is in the PATH.\n"); /* this value is replaced during a successful RegQueryValueEx() */ /* Determine GTK+ dll path .. */ if (!read_reg_string(hkey, "SOFTWARE\\GTK\\2.0", "DllPath", (LPBYTE) &path, &plen)) { printf("GTK+ path found: %s\n", path); if ((hmod = GetModuleHandle("kernel32.dll"))) { MySetDllDirectory = (LPFNSETDLLDIRECTORY) GetProcAddress( hmod, "SetDllDirectoryA"); printf("SetDllDirectory not supported\n"); printf("Error getting kernel32.dll module handle\n"); /* For Windows XP SP1+ / Server 2003 we use SetDllDirectory to avoid dll hell */ printf("Using SetDllDirectory\n"); /* For the rest, we set the current directory and make sure * SafeDllSearch is set to 0 where needed. */ printf("Setting current directory to GTK+ dll directory\n"); SetCurrentDirectory(path); /* For Windows 2000 (SP3+) / WinXP (No SP): * If SafeDllSearchMode is set to 1, Windows system directories are * searched for dlls before the current directory. Therefore we set it osinfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO); if ((osinfo.dwMajorVersion == 5 && osinfo.dwMinorVersion == 0 && strcmp(osinfo.szCSDVersion, "Service Pack 3") >= 0) || (osinfo.dwMajorVersion == 5 && osinfo.dwMinorVersion == 1 && strcmp(osinfo.szCSDVersion, "") >= 0) DWORD reglen = sizeof(DWORD); printf("Using Win2k (SP3+) / WinXP (No SP)... Checking SafeDllSearch\n"); read_reg_string(HKEY_LOCAL_MACHINE, "System\\CurrentControlSet\\Control\\Session Manager", printf("Trying to set SafeDllSearchMode to 0\n"); if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, "System\\CurrentControlSet\\Control\\Session Manager", REG_DWORD, (LPBYTE) ®val, printf("Error writing SafeDllSearchMode. Error: %u\n", printf("Error opening Session Manager key for writing. Error: %u\n", printf("SafeDllSearchMode is set to 0\n"); static char* wgaim_lcid_to_posix(LCID lcid) { int lang_id = PRIMARYLANGID(lcid); int sub_id = SUBLANGID(lcid); case LANG_BULGARIAN: posix = "bg"; break; case LANG_CATALAN: posix = "ca"; break; case SUBLANG_CHINESE_SIMPLIFIED: case SUBLANG_CHINESE_TRADITIONAL: case LANG_CZECH: posix = "cs"; break; case LANG_DANISH: posix = "da"; break; case LANG_GERMAN: posix = "de"; break; case LANG_GREEK: posix = "el"; break; case SUBLANG_ENGLISH_AUS: case SUBLANG_ENGLISH_CAN: case LANG_SPANISH: posix = "es"; break; case LANG_FINNISH: posix = "fi"; break; case LANG_FRENCH: posix = "fr"; break; case LANG_HEBREW: posix = "he"; break; case LANG_HUNGARIAN: posix = "hu"; break; case LANG_ICELANDIC: break; case LANG_ITALIAN: posix = "it"; break; case LANG_JAPANESE: posix = "ja"; break; case LANG_KOREAN: posix = "ko"; break; case LANG_DUTCH: posix = "nl"; break; case SUBLANG_NORWEGIAN_BOKMAL: case SUBLANG_NORWEGIAN_NYNORSK: case LANG_POLISH: posix = "pl"; break; case SUBLANG_PORTUGUESE_BRAZILIAN: case LANG_ROMANIAN: posix = "ro"; break; case LANG_RUSSIAN: posix = "ru"; break; /* LANG_CROATIAN == LANG_SERBIAN for some reason * We'll need to do something here if we ever get a croatian translation */ /* case LANG_CROATIAN: posix = "hr"; break;*/ case SUBLANG_SERBIAN_LATIN: posix = "sr@Latn"; break; case SUBLANG_SERBIAN_CYRILLIC: case LANG_SLOVAK: posix = "sk"; break; case LANG_ALBANIAN: posix = "sq"; break; case LANG_SWEDISH: posix = "sv"; break; case LANG_THAI: posix = "th"; break; case LANG_TURKISH: posix = "tr"; break; case LANG_INDONESIAN: break; case LANG_UKRAINIAN: posix = "uk"; break; case LANG_BELARUSIAN: break; case LANG_SLOVENIAN: posix = "sl"; break; case LANG_ESTONIAN: posix = "et"; break; case LANG_LATVIAN: break; case LANG_LITHUANIAN: posix = "lt"; break; case LANG_VIETNAMESE: posix = "vi"; break; case LANG_ARMENIAN: break; case LANG_AZERI: posix = "az"; break; case LANG_MACEDONIAN: posix = "mk"; break; case LANG_AFRIKAANS: break; case LANG_GEORGIAN: posix = "ka"; break; case LANG_FAEROESE: break; case LANG_HINDI: posix = "hi"; break; case LANG_SWAHILI: break; case LANG_BENGALI: break; case LANG_PUNJABI: posix = "pa"; break; case LANG_GUJARATI: posix = "gu"; break; case LANG_TAMIL: posix = "ta"; break; case LANG_KANNADA: break; case LANG_MALAYALAM: break; case LANG_ASSAMESE: break; case LANG_MARATHI: break; case LANG_SANSKRIT: break; case LANG_MONGOLIAN: break; case LANG_GALICIAN: posix = "gl"; break; case LANG_KONKANI: break; case LANG_MANIPURI: break; case LANG_KASHMIRI: break; /* Deal with exceptions */ case 2125: posix = "my_MM"; break; /* Myanmar (Burmese) */ case 1076: posix = "xh"; break; /* Xhosa */ case 9999: posix = "ku"; break; /* Kurdish (from NSIS) */ /* Determine and set Gaim locale as follows (in order of priority): - Check NSIS Installer Language reg value - Use default user locale static const char *wgaim_get_locale() { const char *locale = NULL; /* Check if user set GAIMLANG env var */ if ((locale = getenv("GAIMLANG"))) if (read_reg_string(HKEY_CURRENT_USER, "SOFTWARE\\gaim", "Installer Language", (LPBYTE) &data, &datalen)) { if ((locale = wgaim_lcid_to_posix(atoi(data)))) lcid = GetUserDefaultLCID(); if ((locale = wgaim_lcid_to_posix(lcid))) static void wgaim_set_locale() { const char *locale = NULL; locale = wgaim_get_locale(); snprintf(envstr, 25, "LANG=%s", locale); printf("Setting locale: %s\n", envstr); static BOOL wgaim_set_running() { if ((h = CreateMutex(NULL, FALSE, "gaim_is_running"))) { if (GetLastError() == ERROR_ALREADY_EXISTS) { "An instance of Gaim is already running", NULL, MB_OK | MB_TOPMOST); static void wgaim_set_proxy() { DWORD reglen = sizeof(DWORD); /* If the proxy server environment variables are already set, * we shouldn't override them */ if (getenv("HTTP_PROXY") || getenv("http_proxy") || getenv("HTTPPROXY")) if (read_reg_string(HKEY_CURRENT_USER, WIN32_PROXY_REGKEY, (LPBYTE) ®val, ®len) && (regval & 1)) { reglen = sizeof(proxy_server); if (!read_reg_string(HKEY_CURRENT_USER, WIN32_PROXY_REGKEY, "ProxyServer", (LPBYTE) &proxy_server, ®len)) if ((reglen > strlen("http=")) && (c = strstr(proxy_server, "http="))) { /* c now points the proxy server (and port) */ const char envstr_prefix[] = "HTTP_PROXY=http://"; char envstr[sizeof(envstr_prefix) + strlen(c) + 1]; snprintf(envstr, sizeof(envstr), "%s%s", printf("Setting HTTP Proxy: %s\n", envstr); # define _stdcall __attribute__((stdcall)) WinMain (struct HINSTANCE__ *hInstance, struct HINSTANCE__ *hPrevInstance, char *lpszCmdLine, int nCmdShow) { /* If debug or help or version flag used, create console for output */ if (strstr(lpszCmdLine, "-d") || strstr(lpszCmdLine, "-h") || strstr(lpszCmdLine, "-v")) { LPFNATTACHCONSOLE MyAttachConsole = NULL; if ((hmod = GetModuleHandle("kernel32.dll"))) { GetProcAddress(hmod, "AttachConsole"); if ((MyAttachConsole && MyAttachConsole(ATTACH_PARENT_PROCESS)) freopen("CONOUT$", "w", stdout); /* Load exception handler if we have it */ if (GetModuleFileName(NULL, gaimdir, MAX_PATH) != 0) { while ((tmp = strchr(tmp, '\\'))) { strcat(gaimdir, "\\exchndl.dll"); if (LoadLibrary(gaimdir)) printf("Loaded exchndl.dll\n"); "Error getting module filename. Error: %u", MessageBox(NULL, errbuf, NULL, MB_OK | MB_TOPMOST); if (!getenv("GAIM_NO_DLL_CHECK")) /* If help or version flag used, do not check Mutex */ if (!strstr(lpszCmdLine, "-h") && !strstr(lpszCmdLine, "-v")) if (!getenv("GAIM_MULTI_INST") && !wgaim_set_running()) /* Now we are ready for Gaim .. */ if ((hmod = LoadLibrary("gaim.dll"))) { gaim_main = (LPFNGAIMMAIN) GetProcAddress(hmod, "gaim_main"); snprintf(errbuf, 512, "Error loading gaim.dll. Error: %u", MessageBox(NULL, errbuf, NULL, MB_OK | MB_TOPMOST); return gaim_main (hInstance, __argc, __argv);