2 * winebrowser - winelib app to launch native OS browser or mail client.
4 * Copyright (C) 2004 Chris Morgan
5 * Copyright (C) 2005 Hans Leidekker
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22 * Winebrowser is a winelib application that will start the appropriate
23 * native browser or mail client for a wine installation that lacks a
24 * windows browser/mail client. For example, you will be able to open
25 * URLs via native mozilla if no browser has yet been installed in wine.
27 * The application to launch is chosen from a default set or, if set,
28 * taken from a registry key.
30 * The argument may be a regular Windows file name, a file URL, an
31 * URL or a mailto URL. In the first three cases the argument
32 * will be fed to a web browser. In the last case the argument is fed
33 * to a mail client. A mailto URL is composed as follows:
35 * mailto:[E-MAIL]?subject=[TOPIC]&cc=[E-MAIL]&bcc=[E-MAIL]&body=[TEXT]
38 #define WIN32_LEAN_AND_MEAN
42 #include "wine/port.h"
43 #include "wine/debug.h"
44 #include "wine/unicode.h"
54 WINE_DEFAULT_DEBUG_CHANNEL(winebrowser
);
56 typedef LPSTR (*wine_get_unix_file_name_t
)(LPCWSTR unixname
);
58 static const WCHAR browser_key
[] =
59 {'S','o','f','t','w','a','r','e','\\','W','i','n','e','\\',
60 'W','i','n','e','B','r','o','w','s','e','r',0};
62 static char *strdup_unixcp( const WCHAR
*str
)
65 int len
= WideCharToMultiByte( CP_UNIXCP
, 0, str
, -1, NULL
, 0, NULL
, NULL
);
66 if ((ret
= HeapAlloc( GetProcessHeap(), 0, len
)))
67 WideCharToMultiByte( CP_UNIXCP
, 0, str
, -1, ret
, len
, NULL
, NULL
);
71 /* try to launch a unix app from a comma separated string of app names */
72 static int launch_app( const WCHAR
*candidates
, const WCHAR
*argv1
)
75 const char *argv_new
[3];
77 if (!(cmdline
= strdup_unixcp( argv1
))) return 1;
81 if (!(app
= strdup_unixcp( candidates
))) break;
83 WINE_TRACE( "Considering: %s\n", wine_dbgstr_a(app
) );
84 WINE_TRACE( "argv[1]: %s\n", wine_dbgstr_a(cmdline
) );
87 argv_new
[1] = cmdline
;
90 _spawnvp( _P_OVERLAY
, app
, argv_new
); /* only returns on error */
91 HeapFree( GetProcessHeap(), 0, app
);
92 candidates
+= strlenW( candidates
) + 1; /* grab the next app */
94 WINE_ERR( "could not find a suitable app to run\n" );
96 HeapFree( GetProcessHeap(), 0, cmdline
);
100 static LSTATUS
get_commands( HKEY key
, const WCHAR
*value
, WCHAR
*buffer
, DWORD size
)
105 size
-= sizeof(WCHAR
);
106 if (!(res
= RegQueryValueExW( key
, value
, 0, &type
, (LPBYTE
)buffer
, &size
)) && (type
== REG_SZ
))
108 /* convert to REG_MULTI_SZ type */
110 p
[strlenW(p
) + 1] = 0;
111 while ((p
= strchrW( p
, ',' ))) *p
++ = 0;
116 static int open_http_url( const WCHAR
*url
)
119 static const WCHAR defaultbrowsers
[] =
120 { '/','u','s','r','/','b','i','n','/','o','p','e','n',0,0 };
122 static const WCHAR defaultbrowsers
[] =
123 {'x','d','g','-','o','p','e','n',0,
124 'f','i','r','e','f','o','x',0,
125 'k','o','n','q','u','e','r','o','r',0,
126 'm','o','z','i','l','l','a',0,
127 'n','e','t','s','c','a','p','e',0,
128 'g','a','l','e','o','n',0,
129 'o','p','e','r','a',0,
130 'd','i','l','l','o',0,0};
132 static const WCHAR browsersW
[] =
133 {'B','r','o','w','s','e','r','s',0};
139 /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */
140 if (!(r
= RegOpenKeyW( HKEY_CURRENT_USER
, browser_key
, &key
)))
142 r
= get_commands( key
, browsersW
, browsers
, sizeof(browsers
) );
145 if (r
!= ERROR_SUCCESS
)
146 memcpy( browsers
, defaultbrowsers
, sizeof(defaultbrowsers
) );
148 return launch_app( browsers
, url
);
151 static int open_mailto_url( const WCHAR
*url
)
154 static const WCHAR defaultmailers
[] =
155 { '/','u','s','r','/','b','i','n','/','o','p','e','n',0,0 };
157 static const WCHAR defaultmailers
[] =
158 {'x','d','g','-','e','m','a','i','l',0,
159 'm','o','z','i','l','l','a','-','t','h','u','n','d','e','r','b','i','r','d',0,
160 't','h','u','n','d','e','r','b','i','r','d',0,
161 'e','v','o','l','u','t','i','o','n',0,0 };
163 static const WCHAR mailersW
[] =
164 {'M','a','i','l','e','r','s',0};
170 /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */
171 if (!(r
= RegOpenKeyW( HKEY_CURRENT_USER
, browser_key
, &key
)))
173 r
= get_commands( key
, mailersW
, mailers
, sizeof(mailers
) );
176 if (r
!= ERROR_SUCCESS
)
177 memcpy( mailers
, defaultmailers
, sizeof(defaultmailers
) );
179 return launch_app( mailers
, url
);
182 /*****************************************************************************
183 * DDE helper functions.
186 static WCHAR
*ddeString
= NULL
;
187 static HSZ hszTopic
= 0, hszReturn
= 0;
188 static DWORD ddeInst
= 0;
190 /* Dde callback, save the execute or request string for processing */
191 static HDDEDATA CALLBACK
ddeCb(UINT uType
, UINT uFmt
, HCONV hConv
,
192 HSZ hsz1
, HSZ hsz2
, HDDEDATA hData
,
193 ULONG_PTR dwData1
, ULONG_PTR dwData2
)
195 DWORD size
= 0, ret
= 0;
197 WINE_TRACE("dde_cb: %04x, %04x, %p, %p, %p, %p, %08lx, %08lx\n",
198 uType
, uFmt
, hConv
, hsz1
, hsz2
, hData
, dwData1
, dwData2
);
203 if (!DdeCmpStringHandles(hsz1
, hszTopic
))
204 return (HDDEDATA
)TRUE
;
205 return (HDDEDATA
)FALSE
;
208 if (!(size
= DdeGetData(hData
, NULL
, 0, 0)))
209 WINE_ERR("DdeGetData returned zero size of execute string\n");
210 else if (!(ddeString
= HeapAlloc(GetProcessHeap(), 0, size
)))
211 WINE_ERR("Out of memory\n");
212 else if (DdeGetData(hData
, (LPBYTE
)ddeString
, size
, 0) != size
)
213 WINE_WARN("DdeGetData did not return %d bytes\n", size
);
214 DdeFreeDataHandle(hData
);
215 return (HDDEDATA
)DDE_FACK
;
218 ret
= -3; /* error */
219 if (!(size
= DdeQueryStringW(ddeInst
, hsz2
, NULL
, 0, CP_WINUNICODE
)))
220 WINE_ERR("DdeQueryString returned zero size of request string\n");
221 else if (!(ddeString
= HeapAlloc(GetProcessHeap(), 0, (size
+ 1) * sizeof(WCHAR
))))
222 WINE_ERR("Out of memory\n");
223 else if (DdeQueryStringW(ddeInst
, hsz2
, ddeString
, size
+ 1, CP_WINUNICODE
) != size
)
224 WINE_WARN("DdeQueryString did not return %d characters\n", size
);
226 ret
= -2; /* acknowledgment */
227 return DdeCreateDataHandle(ddeInst
, (LPBYTE
)&ret
, sizeof(ret
), 0,
228 hszReturn
, CF_TEXT
, 0);
235 static WCHAR
*get_url_from_dde(void)
237 static const WCHAR szApplication
[] = {'I','E','x','p','l','o','r','e',0};
238 static const WCHAR szTopic
[] = {'W','W','W','_','O','p','e','n','U','R','L',0};
239 static const WCHAR szReturn
[] = {'R','e','t','u','r','n',0};
241 HSZ hszApplication
= 0;
246 rc
= DdeInitializeW(&ddeInst
, ddeCb
, CBF_SKIP_ALLNOTIFICATIONS
| CBF_FAIL_ADVISES
| CBF_FAIL_POKES
, 0);
247 if (rc
!= DMLERR_NO_ERROR
)
249 WINE_ERR("Unable to initialize DDE, DdeInitialize returned %d\n", rc
);
253 hszApplication
= DdeCreateStringHandleW(ddeInst
, szApplication
, CP_WINUNICODE
);
256 WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n");
260 hszTopic
= DdeCreateStringHandleW(ddeInst
, szTopic
, CP_WINUNICODE
);
263 WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n");
267 hszReturn
= DdeCreateStringHandleW(ddeInst
, szReturn
, CP_WINUNICODE
);
270 WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n");
274 if (!DdeNameService(ddeInst
, hszApplication
, 0, DNS_REGISTER
))
276 WINE_ERR("Unable to initialize DDE, DdeNameService failed\n");
280 timer
= SetTimer(NULL
, 0, 5000, NULL
);
283 WINE_ERR("SetTimer failed to create timer\n");
290 if (!GetMessageW(&msg
, NULL
, 0, 0)) break;
291 if (msg
.message
== WM_TIMER
) break;
292 DispatchMessageW(&msg
);
297 if (*ddeString
== '"')
299 WCHAR
*endquote
= strchrW(ddeString
+ 1, '"');
302 WINE_ERR("Unable to retrieve URL from string %s\n", wine_dbgstr_w(ddeString
));
313 if (timer
) KillTimer(NULL
, timer
);
316 if (hszTopic
&& hszApplication
) DdeNameService(ddeInst
, hszApplication
, 0, DNS_UNREGISTER
);
317 if (hszReturn
) DdeFreeStringHandle(ddeInst
, hszReturn
);
318 if (hszTopic
) DdeFreeStringHandle(ddeInst
, hszTopic
);
319 if (hszApplication
) DdeFreeStringHandle(ddeInst
, hszApplication
);
320 DdeUninitialize(ddeInst
);
325 static WCHAR
*encode_unix_path(const char *src
)
328 WCHAR
*dst
, *tmp_dst
;
329 const char safe_chars
[] = "/-_.~@&=+$,:";
330 const char hex_digits
[] = "0123456789ABCDEF";
331 const WCHAR schema
[] = {'f','i','l','e',':','/','/',0};
332 int len
= sizeof(schema
)/sizeof(schema
[0]);
336 while (*tmp_src
!= 0)
338 if ((*tmp_src
>= 'a' && *tmp_src
<= 'z') ||
339 (*tmp_src
>= 'A' && *tmp_src
<= 'Z') ||
340 (*tmp_src
>= '0' && *tmp_src
<= '9') ||
341 strchr(safe_chars
, *tmp_src
))
348 dst
= HeapAlloc(GetProcessHeap(), 0, len
*sizeof(WCHAR
));
353 strcpyW(dst
, schema
);
356 tmp_dst
= dst
+ strlenW(dst
);
358 while (*tmp_src
!= 0)
360 if ((*tmp_src
>= 'a' && *tmp_src
<= 'z') ||
361 (*tmp_src
>= 'A' && *tmp_src
<= 'Z') ||
362 (*tmp_src
>= '0' && *tmp_src
<= '9') ||
363 strchr(safe_chars
, *tmp_src
))
365 *tmp_dst
++ = *tmp_src
;
370 *tmp_dst
++ = hex_digits
[*(unsigned char*)(tmp_src
) / 16];
371 *tmp_dst
++ = hex_digits
[*tmp_src
& 0xf];
381 static WCHAR
*convert_file_uri(IUri
*uri
)
383 wine_get_unix_file_name_t wine_get_unix_file_name_ptr
;
390 /* check if the argument is a local file */
391 wine_get_unix_file_name_ptr
= (wine_get_unix_file_name_t
)
392 GetProcAddress( GetModuleHandleA( "KERNEL32" ), "wine_get_unix_file_name" );
393 if(!wine_get_unix_file_name_ptr
)
396 hres
= IUri_GetPath(uri
, &filename
);
400 WINE_TRACE("Windows path: %s\n", wine_dbgstr_w(filename
));
402 unixpath
= wine_get_unix_file_name_ptr(filename
);
403 SysFreeString(filename
);
404 if(unixpath
&& stat(unixpath
, &dummy
) >= 0) {
405 WINE_TRACE("Unix path: %s\n", wine_dbgstr_a(unixpath
));
406 new_path
= encode_unix_path(unixpath
);
407 HeapFree(GetProcessHeap(), 0, unixpath
);
409 WINE_WARN("File %s does not exist\n", wine_dbgstr_a(unixpath
));
410 HeapFree(GetProcessHeap(), 0, unixpath
);
414 WINE_TRACE("New path: %s\n", wine_dbgstr_w(new_path
));
419 /*****************************************************************************
420 * Main entry point. This is a console application so we have a wmain() not a
423 int wmain(int argc
, WCHAR
*argv
[])
425 static const WCHAR nohomeW
[] = {'-','n','o','h','o','m','e',0};
427 WCHAR
*url
= argv
[1];
428 BSTR display_uri
= NULL
;
434 /* DDE used only if -nohome is specified; avoids delay in printing usage info
435 * when no parameters are passed */
436 if (url
&& !strcmpiW( url
, nohomeW
))
437 url
= argc
> 2 ? argv
[2] : get_url_from_dde();
440 WINE_ERR( "Usage: winebrowser URL\n" );
444 hres
= CreateUri(url
, Uri_CREATE_ALLOW_IMPLICIT_FILE_SCHEME
|Uri_CREATE_FILE_USE_DOS_PATH
, 0, &uri
);
446 WINE_ERR("Failed to parse URL\n");
447 ret
= open_http_url(url
);
448 HeapFree(GetProcessHeap(), 0, ddeString
);
452 HeapFree(GetProcessHeap(), 0, ddeString
);
453 IUri_GetScheme(uri
, &scheme
);
455 if(scheme
== URL_SCHEME_FILE
) {
456 display_uri
= convert_file_uri(uri
);
458 WINE_ERR("Failed to convert file URL to unix path\n");
463 hres
= IUri_GetDisplayUri(uri
, &display_uri
);
468 WINE_TRACE("opening %s\n", wine_dbgstr_w(display_uri
));
470 if(scheme
== URL_SCHEME_MAILTO
)
471 ret
= open_mailto_url(display_uri
);
473 /* let the browser decide how to handle the given url */
474 ret
= open_http_url(display_uri
);
476 SysFreeString(display_uri
);