Mercurial > pidgin
annotate src/win_gaim.c @ 11122:59a4bc5c24e5
[gaim-migrate @ 13178]
Etan pointed out the documentation for gaim_privacy_check could be improved.
committer: Tailor Script <tailor@pidgin.im>
author | Richard Laager <rlaager@wiktel.com> |
---|---|
date | Mon, 18 Jul 2005 15:49:12 +0000 |
parents | 52d6b10025ca |
children | e865bdbbf91d |
rev | line source |
---|---|
4490 | 1 /* |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
2 * win_gaim.c |
4490 | 3 * |
4 * Date: June, 2002 | |
5 * Description: Entry point for win32 gaim, and various win32 dependant | |
6 * routines. | |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
7 * |
8046 | 8 * Gaim is the legal property of its developers, whose names are too numerous |
9 * to list here. Please refer to the COPYRIGHT file distributed with this | |
10 * source distribution. | |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
11 * |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
12 * This program is free software; you can redistribute it and/or modify |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
13 * it under the terms of the GNU General Public License as published by |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
14 * the Free Software Foundation; either version 2 of the License, or |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
15 * (at your option) any later version. |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
16 * |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
17 * This program is distributed in the hope that it will be useful, |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
20 * GNU General Public License for more details. |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
21 * |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
22 * You should have received a copy of the GNU General Public License |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
23 * along with this program; if not, write to the Free Software |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
24 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
25 * |
4490 | 26 */ |
11060
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
27 |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
28 #ifndef _WIN32_WINNT |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
29 # define _WIN32_WINNT 0x0501 |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
30 #endif |
4490 | 31 #include <windows.h> |
7477
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
32 #include <fcntl.h> |
4490 | 33 #include <stdlib.h> |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
34 #include <string.h> |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
35 #include <stdio.h> |
4490 | 36 |
11060
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
37 /** Currently missing from win32-api */ |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
38 #ifndef ATTACH_PARENT_PROCESS |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
39 # define ATTACH_PARENT_PROCESS -1 |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
40 #endif |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
41 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
42 typedef int (CALLBACK* LPFNGAIMMAIN)(HINSTANCE, int, char**); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
43 typedef void (CALLBACK* LPFNSETDLLDIRECTORY)(LPCTSTR); |
11060
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
44 typedef BOOL (CALLBACK* LPFNATTACHCONSOLE)(DWORD); |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
45 |
4490 | 46 /* |
47 * PROTOTYPES | |
48 */ | |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
49 static LPFNGAIMMAIN gaim_main = NULL; |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
50 static LPFNSETDLLDIRECTORY MySetDllDirectory = NULL; |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
51 |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
52 |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
53 static BOOL read_reg_string(HKEY key, char* sub_key, char* val_name, LPBYTE data, LPDWORD data_len) { |
10688
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
54 HKEY hkey; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
55 BOOL ret = FALSE; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
56 LONG retv; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
57 |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
58 if (ERROR_SUCCESS == (retv = RegOpenKeyEx(key, sub_key, 0, |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
59 KEY_QUERY_VALUE, &hkey))) { |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
60 if (ERROR_SUCCESS == (retv = RegQueryValueEx(hkey, val_name, |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
61 NULL, NULL, data, data_len))) |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
62 ret = TRUE; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
63 else { |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
64 TCHAR szBuf[80]; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
65 |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
66 FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
67 NULL, retv, 0, |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
68 (LPTSTR) &szBuf, sizeof(szBuf), NULL); |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
69 |
10688
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
70 printf("Could not read reg key '%s' subkey '%s' value: '%s'\nError: (%ld) %s\n", |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
71 ((key == HKEY_LOCAL_MACHINE) ? "HKLM" : |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
72 (key == HKEY_CURRENT_USER) ? "HKCU" : |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
73 "???"), |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
74 sub_key, val_name, retv, szBuf); |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
75 } |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
76 RegCloseKey(key); |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
77 } |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
78 else { |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
79 TCHAR szBuf[80]; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
80 |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
81 FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, NULL, retv, 0, |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
82 (LPTSTR) &szBuf, sizeof(szBuf), NULL); |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
83 printf("Could not open reg subkey: %s\nError: (%ld) %s\n", |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
84 sub_key, retv, szBuf); |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
85 } |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
86 |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
87 return ret; |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
88 } |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
89 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
90 static void dll_prep() { |
10688
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
91 char gtkpath[MAX_PATH + 1]; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
92 char path[MAX_PATH + 1]; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
93 DWORD plen; |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
94 BOOL gotreg = FALSE; |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
95 HKEY hkey; |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
96 HMODULE hmod; |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
97 |
10688
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
98 plen = sizeof(gtkpath); |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
99 if(!(gotreg = read_reg_string((hkey=HKEY_LOCAL_MACHINE), "SOFTWARE\\GTK\\2.0", "Path", (LPBYTE)>kpath, &plen))) |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
100 gotreg = read_reg_string((hkey=HKEY_CURRENT_USER), "SOFTWARE\\GTK\\2.0", "Path", (LPBYTE)>kpath, &plen); |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
101 |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
102 if(!gotreg) |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
103 return; |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
104 |
10688
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
105 /* this value is replaced during a successful RegQueryValueEx() */ |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
106 plen = sizeof(path); |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
107 /* Determine GTK+ dll path .. */ |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
108 if (!read_reg_string(hkey, "SOFTWARE\\GTK\\2.0", "DllPath", |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
109 (LPBYTE) &path, &plen)) { |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
110 strcpy(path, gtkpath); |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
111 strcat(path, "\\bin"); |
7818a5e9e3a2
[gaim-migrate @ 12237]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10521
diff
changeset
|
112 } |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
113 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
114 printf("GTK+ path found: %s\n", path); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
115 |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
116 if((hmod=GetModuleHandle("kernel32.dll"))) { |
10898
cfacc0de0d94
[gaim-migrate @ 12614]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10688
diff
changeset
|
117 MySetDllDirectory = (LPFNSETDLLDIRECTORY)GetProcAddress(hmod, "SetDllDirectoryA"); |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
118 if(!MySetDllDirectory) |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
119 printf("SetDllDirectory not supported\n"); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
120 } |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
121 else |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
122 printf("Error getting kernel32.dll module handle\n"); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
123 |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
124 /* For Windows XP SP1+ / Server 2003 we use SetDllDirectory to avoid dll hell */ |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
125 if(MySetDllDirectory) { |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
126 printf("Using SetDllDirectory\n"); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
127 MySetDllDirectory(path); |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
128 } |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
129 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
130 /* For the rest, we set the current directory and make sure SafeDllSearch is set |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
131 to 0 where needed. */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
132 else { |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
133 OSVERSIONINFO osinfo; |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
134 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
135 printf("Setting current directory to GTK+ dll directory\n"); |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
136 SetCurrentDirectory(path); |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
137 /* For Windows 2000 (SP3+) / WinXP (No SP): |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
138 * If SafeDllSearchMode is set to 1, Windows system directories are |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
139 * searched for dlls before the current directory. Therefore we set it |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
140 * to 0. |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
141 */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
142 osinfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO); |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
143 GetVersionEx(&osinfo); |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
144 if((osinfo.dwMajorVersion == 5 && |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
145 osinfo.dwMinorVersion == 0 && |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
146 strcmp(osinfo.szCSDVersion, "Service Pack 3") >= 0) || |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
147 (osinfo.dwMajorVersion == 5 && |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
148 osinfo.dwMinorVersion == 1 && |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
149 strcmp(osinfo.szCSDVersion, "") >= 0) |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
150 ) { |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
151 DWORD regval = 1; |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
152 DWORD reglen = sizeof(DWORD); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
153 |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
154 printf("Using Win2k (SP3+) / WinXP (No SP).. Checking SafeDllSearch\n"); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
155 read_reg_string(HKEY_LOCAL_MACHINE, |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
156 "System\\CurrentControlSet\\Control\\Session Manager", |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
157 "SafeDllSearchMode", |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
158 (LPBYTE)®val, |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
159 ®len); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
160 |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
161 if(regval != 0) { |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
162 printf("Trying to set SafeDllSearchMode to 0\n"); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
163 regval = 0; |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
164 if(RegOpenKeyEx(HKEY_LOCAL_MACHINE, |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
165 "System\\CurrentControlSet\\Control\\Session Manager", |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
166 0, KEY_SET_VALUE, &hkey) == ERROR_SUCCESS) { |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
167 if(RegSetValueEx(hkey, |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
168 "SafeDllSearchMode", |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
169 0, |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
170 REG_DWORD, |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
171 (LPBYTE) ®val, |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
172 sizeof(DWORD)) != ERROR_SUCCESS) |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
173 printf("Error writing SafeDllSearchMode. Error: %u\n", |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
174 (UINT)GetLastError()); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
175 RegCloseKey(hkey); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
176 } |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
177 else |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
178 printf("Error opening Session Manager key for writing. Error: %u\n", |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
179 (UINT)GetLastError()); |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
180 } |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
181 else |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
182 printf("SafeDllSearchMode is set to 0\n"); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
183 }/*end else*/ |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
184 } |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
185 } |
4490 | 186 |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
187 static char* wgaim_lcid_to_posix(LCID lcid) { |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
188 switch(lcid) { |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
189 case 1026: return "bg"; /* bulgarian */ |
10521
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
190 case 2125: return "my_MM"; /* burmese (Myanmar) */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
191 case 1027: return "ca"; /* catalan */ |
10521
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
192 case 1050: return "hr"; /* croatian */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
193 case 1029: return "cs"; /* czech */ |
8735
92cbf9713795
[gaim-migrate @ 9490]
Christian Hammond <chipx86@chipx86.com>
parents:
8046
diff
changeset
|
194 case 1030: return "da"; /* danish */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
195 case 1043: return "nl"; /* dutch - netherlands */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
196 case 1033: return "en"; /* english - us */ |
10521
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
197 case 3081: return "en_AU"; /* english - australia */ |
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
198 case 4105: return "en_CA"; /* english - canada */ |
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
199 case 2057: return "en_GB"; /* english - great britain */ |
8735
92cbf9713795
[gaim-migrate @ 9490]
Christian Hammond <chipx86@chipx86.com>
parents:
8046
diff
changeset
|
200 case 1035: return "fi"; /* finnish */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
201 case 1036: return "fr"; /* french - france */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
202 case 1031: return "de"; /* german - germany */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
203 case 1032: return "el"; /* greek */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
204 case 1037: return "he"; /* hebrew */ |
10521
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
205 case 1081: return "hi"; /* hindi */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
206 case 1038: return "hu"; /* hungarian */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
207 case 1040: return "it"; /* italian - italy */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
208 case 1041: return "ja"; /* japanese */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
209 case 1042: return "ko"; /* korean */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
210 case 1063: return "lt"; /* lithuanian */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
211 case 1071: return "mk"; /* macedonian */ |
10521
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
212 case 1044: return "no"; /* norwegian */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
213 case 1045: return "pl"; /* polish */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
214 case 2070: return "pt"; /* portuguese - portugal */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
215 case 1046: return "pt_BR"; /* portuguese - brazil */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
216 case 1048: return "ro"; /* romanian - romania */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
217 case 1049: return "ru"; /* russian - russia */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
218 case 2074: return "sr@Latn"; /* serbian - latin */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
219 case 3098: return "sr"; /* serbian - cyrillic */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
220 case 2052: return "zh_CN"; /* chinese - china (simple) */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
221 case 1051: return "sk"; /* slovak */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
222 case 1060: return "sl"; /* slovenian */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
223 case 1034: return "es"; /* spanish */ |
10095
b28f9be379b3
[gaim-migrate @ 11114]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
8735
diff
changeset
|
224 case 1052: return "sq"; /* albanian */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
225 case 1053: return "sv"; /* swedish */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
226 case 1054: return "th"; /* thai */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
227 case 1028: return "zh_TW"; /* chinese - taiwan (traditional) */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
228 case 1055: return "tr"; /* turkish */ |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
229 case 1058: return "uk"; /* ukrainian */ |
10521
db44efdf6565
[gaim-migrate @ 11836]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10330
diff
changeset
|
230 case 1066: return "vi"; /* vietnamese */ |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
231 default: |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
232 return NULL; |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
233 } |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
234 } |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
235 |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
236 /* Determine and set Gaim locale as follows (in order of priority): |
10210
4d3c2749deec
[gaim-migrate @ 11332]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10095
diff
changeset
|
237 - Check GAIMLANG env var |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
238 - Check NSIS Installer Language reg value |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
239 - Use default user locale |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
240 */ |
10330 | 241 static const char* wgaim_get_locale() { |
242 const char* locale=NULL; | |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
243 char data[10]; |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
244 DWORD datalen = 10; |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
245 LCID lcid; |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
246 |
10210
4d3c2749deec
[gaim-migrate @ 11332]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10095
diff
changeset
|
247 /* Check if user set GAIMLANG env var */ |
10330 | 248 if((locale = getenv("GAIMLANG"))) |
249 return locale; | |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
250 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
251 if(read_reg_string(HKEY_CURRENT_USER, "SOFTWARE\\gaim", "Installer Language", (LPBYTE)&data, &datalen)) { |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
252 if((locale = wgaim_lcid_to_posix(atoi(data)))) |
10330 | 253 return locale; |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
254 } |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
255 |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
256 lcid = GetUserDefaultLCID(); |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
257 if((locale = wgaim_lcid_to_posix(lcid))) |
10330 | 258 return locale; |
259 | |
260 return "en"; | |
261 } | |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
262 |
10330 | 263 static void wgaim_set_locale() { |
264 const char* locale=NULL; | |
265 char envstr[25]; | |
266 | |
267 locale = wgaim_get_locale(); | |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
268 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
269 snprintf(envstr, 25, "LANG=%s", locale); |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
270 printf("Setting locale: %s\n", envstr); |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
271 putenv(envstr); |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
272 } |
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
273 |
10212
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
274 static BOOL wgaim_set_running() { |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
275 HANDLE h; |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
276 |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
277 if((h=CreateMutex(NULL, FALSE, "gaim_is_running"))) { |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
278 if(GetLastError() == ERROR_ALREADY_EXISTS) { |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
279 MessageBox(NULL, "An instance of Gaim is already running", NULL, MB_OK | MB_TOPMOST); |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
280 return FALSE; |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
281 } |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
282 } |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
283 return TRUE; |
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
284 } |
7350
e28728795a45
[gaim-migrate @ 7941]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6890
diff
changeset
|
285 |
4490 | 286 #ifdef __GNUC__ |
287 # ifndef _stdcall | |
288 # define _stdcall __attribute__((stdcall)) | |
289 # endif | |
290 #endif | |
291 | |
292 int _stdcall | |
293 WinMain (struct HINSTANCE__ *hInstance, | |
294 struct HINSTANCE__ *hPrevInstance, | |
295 char *lpszCmdLine, | |
296 int nCmdShow) | |
297 { | |
7477
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
298 char errbuf[512]; |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
299 char gaimdir[MAX_PATH]; |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
300 HMODULE hmod; |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
301 |
11060
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
302 /* If debug or help flag used, create console for output */ |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
303 if (strstr(lpszCmdLine, "-d") || strstr(lpszCmdLine, "-h")) { |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
304 LPFNATTACHCONSOLE MyAttachConsole = NULL; |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
305 if ((hmod = GetModuleHandle("kernel32.dll"))) { |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
306 MyAttachConsole = |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
307 (LPFNATTACHCONSOLE) |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
308 GetProcAddress(hmod, "AttachConsole"); |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
309 } |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
310 if ((MyAttachConsole && MyAttachConsole(ATTACH_PARENT_PROCESS)) |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
311 || AllocConsole()) |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
312 freopen("CONOUT$", "w", stdout); |
52d6b10025ca
[gaim-migrate @ 13014]
Daniel Atallah <daniel.atallah@gmail.com>
parents:
10898
diff
changeset
|
313 } |
7802
f1d2907db5be
[gaim-migrate @ 8448]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7522
diff
changeset
|
314 |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
315 /* Load exception handler if we have it */ |
7477
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
316 if(GetModuleFileName(NULL, gaimdir, MAX_PATH) != 0) { |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
317 char *tmp = gaimdir; |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
318 char *prev = NULL; |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
319 |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
320 while((tmp=strchr(tmp, '\\'))) { |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
321 prev = tmp; |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
322 tmp+=1; |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
323 } |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
324 if(prev) { |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
325 prev[0] = '\0'; |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
326 strcat(gaimdir, "\\exchndl.dll"); |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
327 if(LoadLibrary(gaimdir)) |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
328 printf("Loaded exchndl.dll\n"); |
7477
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
329 } |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
330 } |
7477
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
331 else { |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
332 snprintf(errbuf, 512, "Error getting module filename. Error: %u", (UINT)GetLastError()); |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
333 MessageBox(NULL, errbuf, NULL, MB_OK | MB_TOPMOST); |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
334 } |
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
335 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
336 if(!getenv("GAIM_NO_DLL_CHECK")) |
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
337 dll_prep(); |
6816
5aeba37b303c
[gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
4490
diff
changeset
|
338 |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
339 wgaim_set_locale(); |
10227
53c9ba039354
[gaim-migrate @ 11361]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10212
diff
changeset
|
340 if(!getenv("GAIM_MULTI_INST") && !wgaim_set_running()) |
10212
08251403c871
[gaim-migrate @ 11336]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
10210
diff
changeset
|
341 return 0; |
7477
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
342 |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
343 /* Now we are ready for Gaim .. */ |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
344 if((hmod=LoadLibrary("gaim.dll"))) { |
7522
07156f873116
[gaim-migrate @ 8135]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7477
diff
changeset
|
345 gaim_main = (LPFNGAIMMAIN)GetProcAddress(hmod, "gaim_main"); |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
346 } |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
347 |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
348 if(!gaim_main) { |
7477
29d69daa1ede
[gaim-migrate @ 8090]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7363
diff
changeset
|
349 snprintf(errbuf, 512, "Error loading gaim.dll. Error: %u", (UINT)GetLastError()); |
7356
be11a6f2fe00
[gaim-migrate @ 7949]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
7350
diff
changeset
|
350 MessageBox(NULL, errbuf, NULL, MB_OK | MB_TOPMOST); |
6890
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
351 return 0; |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
352 } |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
353 else |
4eee806af511
[gaim-migrate @ 7436]
Herman Bloggs <hermanator12002@yahoo.com>
parents:
6816
diff
changeset
|
354 return gaim_main (hInstance, __argc, __argv); |
4490 | 355 } |
356 |