/* * winebrowser - winelib app to launch native OS browser or mail client. * * Copyright (C) 2004 Chris Morgan * Copyright (C) 2005 Hans Leidekker * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library 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 * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA * * NOTES: * Winebrowser is a winelib application that will start the appropriate * native browser or mail client for a wine installation that lacks a * windows browser/mail client. For example, you will be able to open * URLs via native mozilla if no browser has yet been installed in wine. * * The application to launch is chosen from a default set or, if set, * taken from a registry key. * * The argument may be a regular Windows file name, a file URL, an * URL or a mailto URL. In the first three cases the argument * will be fed to a web browser. In the last case the argument is fed * to a mail client. A mailto URL is composed as follows: * * mailto:[E-MAIL]?subject=[TOPIC]&cc=[E-MAIL]&bcc=[E-MAIL]&body=[TEXT] */ #define WIN32_LEAN_AND_MEAN #define COBJMACROS #include "config.h" #include "wine/port.h" #include "wine/debug.h" #include "wine/unicode.h" #include <windows.h> #include <shlwapi.h> #include <urlmon.h> #include <ddeml.h> #include <stdio.h> #include <stdlib.h> #include <errno.h> WINE_DEFAULT_DEBUG_CHANNEL(winebrowser); typedef LPSTR (*wine_get_unix_file_name_t)(LPCWSTR unixname); static const WCHAR browser_key[] = {'S','o','f','t','w','a','r','e','\\','W','i','n','e','\\', 'W','i','n','e','B','r','o','w','s','e','r',0}; static char *strdup_unixcp( const WCHAR *str ) { char *ret; int len = WideCharToMultiByte( CP_UNIXCP, 0, str, -1, NULL, 0, NULL, NULL ); if ((ret = HeapAlloc( GetProcessHeap(), 0, len ))) WideCharToMultiByte( CP_UNIXCP, 0, str, -1, ret, len, NULL, NULL ); return ret; } /* try to launch a unix app from a comma separated string of app names */ static int launch_app( WCHAR *candidates, const WCHAR *argv1 ) { char *app, *applist, *cmdline; const char *argv_new[3]; if (!(applist = strdup_unixcp( candidates ))) return 1; if (!(cmdline = strdup_unixcp( argv1 ))) { HeapFree( GetProcessHeap(), 0, applist ); return 1; } app = strtok( applist, "," ); while (app) { WINE_TRACE( "Considering: %s\n", wine_dbgstr_a(app) ); WINE_TRACE( "argv[1]: %s\n", wine_dbgstr_a(cmdline) ); argv_new[0] = app; argv_new[1] = cmdline; argv_new[2] = NULL; spawnvp( _P_OVERLAY, app, argv_new ); /* only returns on error */ app = strtok( NULL, "," ); /* grab the next app */ } WINE_ERR( "could not find a suitable app to run\n" ); HeapFree( GetProcessHeap(), 0, applist ); HeapFree( GetProcessHeap(), 0, cmdline ); return 1; } static int open_http_url( const WCHAR *url ) { #ifdef __APPLE__ static const WCHAR defaultbrowsers[] = { '/', 'u', 's', 'r', '/', 'b', 'i', 'n', '/', 'o', 'p', 'e', 'n', 0 }; #else static const WCHAR defaultbrowsers[] = {'x','d','g','-','o','p','e','n',',','f','i','r','e','f','o','x',',', 'k','o','n','q','u','e','r','o','r',',','m','o','z','i','l','l','a',',', 'n','e','t','s','c','a','p','e',',','g','a','l','e','o','n',',', 'o','p','e','r','a',',','d','i','l','l','o',0}; #endif static const WCHAR browsersW[] = {'B','r','o','w','s','e','r','s',0}; WCHAR browsers[256]; DWORD length, type; HKEY key; LONG r; length = sizeof(browsers); /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */ if (!(r = RegOpenKeyW( HKEY_CURRENT_USER, browser_key, &key ))) { r = RegQueryValueExW( key, browsersW, 0, &type, (LPBYTE)browsers, &length ); RegCloseKey( key ); } if (r != ERROR_SUCCESS) strcpyW( browsers, defaultbrowsers ); return launch_app( browsers, url ); } static int open_mailto_url( const WCHAR *url ) { #ifdef __APPLE__ static const WCHAR defaultmailers[] = { '/', 'u', 's', 'r', '/', 'b', 'i', 'n', '/', 'o', 'p', 'e', 'n', 0 }; #else static const WCHAR defaultmailers[] = {'x','d','g','-','e','m','a','i','l',',', 'm','o','z','i','l','l','a','-','t','h','u','n','d','e','r','b','i','r','d',',', 't','h','u','n','d','e','r','b','i','r','d',',', 'e','v','o','l','u','t','i','o','n',0}; #endif static const WCHAR mailersW[] = {'M','a','i','l','e','r','s',0}; WCHAR mailers[256]; DWORD length, type; HKEY key; LONG r; length = sizeof(mailers); /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */ if (!(r = RegOpenKeyW( HKEY_CURRENT_USER, browser_key, &key ))) { r = RegQueryValueExW( key, mailersW, 0, &type, (LPBYTE)mailers, &length ); RegCloseKey( key ); } if (r != ERROR_SUCCESS) strcpyW( mailers, defaultmailers ); return launch_app( mailers, url ); } /***************************************************************************** * DDE helper functions. */ static WCHAR *ddeString = NULL; static HSZ hszTopic = 0, hszReturn = 0; static DWORD ddeInst = 0; /* Dde callback, save the execute or request string for processing */ static HDDEDATA CALLBACK ddeCb(UINT uType, UINT uFmt, HCONV hConv, HSZ hsz1, HSZ hsz2, HDDEDATA hData, ULONG_PTR dwData1, ULONG_PTR dwData2) { DWORD size = 0, ret = 0; WINE_TRACE("dde_cb: %04x, %04x, %p, %p, %p, %p, %08lx, %08lx\n", uType, uFmt, hConv, hsz1, hsz2, hData, dwData1, dwData2); switch (uType) { case XTYP_CONNECT: if (!DdeCmpStringHandles(hsz1, hszTopic)) return (HDDEDATA)TRUE; return (HDDEDATA)FALSE; case XTYP_EXECUTE: if (!(size = DdeGetData(hData, NULL, 0, 0))) WINE_ERR("DdeGetData returned zero size of execute string\n"); else if (!(ddeString = HeapAlloc(GetProcessHeap(), 0, size))) WINE_ERR("Out of memory\n"); else if (DdeGetData(hData, (LPBYTE)ddeString, size, 0) != size) WINE_WARN("DdeGetData did not return %d bytes\n", size); DdeFreeDataHandle(hData); return (HDDEDATA)DDE_FACK; case XTYP_REQUEST: ret = -3; /* error */ if (!(size = DdeQueryStringW(ddeInst, hsz2, NULL, 0, CP_WINUNICODE))) WINE_ERR("DdeQueryString returned zero size of request string\n"); else if (!(ddeString = HeapAlloc(GetProcessHeap(), 0, (size + 1) * sizeof(WCHAR)))) WINE_ERR("Out of memory\n"); else if (DdeQueryStringW(ddeInst, hsz2, ddeString, size + 1, CP_WINUNICODE) != size) WINE_WARN("DdeQueryString did not return %d characters\n", size); else ret = -2; /* acknowledgment */ return DdeCreateDataHandle(ddeInst, (LPBYTE)&ret, sizeof(ret), 0, hszReturn, CF_TEXT, 0); default: return NULL; } } static WCHAR *get_url_from_dde(void) { static const WCHAR szApplication[] = {'I','E','x','p','l','o','r','e',0}; static const WCHAR szTopic[] = {'W','W','W','_','O','p','e','n','U','R','L',0}; static const WCHAR szReturn[] = {'R','e','t','u','r','n',0}; HSZ hszApplication = 0; UINT_PTR timer = 0; int rc; WCHAR *ret = NULL; rc = DdeInitializeW(&ddeInst, ddeCb, CBF_SKIP_ALLNOTIFICATIONS | CBF_FAIL_ADVISES | CBF_FAIL_POKES, 0); if (rc != DMLERR_NO_ERROR) { WINE_ERR("Unable to initialize DDE, DdeInitialize returned %d\n", rc); goto done; } hszApplication = DdeCreateStringHandleW(ddeInst, szApplication, CP_WINUNICODE); if (!hszApplication) { WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n"); goto done; } hszTopic = DdeCreateStringHandleW(ddeInst, szTopic, CP_WINUNICODE); if (!hszTopic) { WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n"); goto done; } hszReturn = DdeCreateStringHandleW(ddeInst, szReturn, CP_WINUNICODE); if (!hszReturn) { WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n"); goto done; } if (!DdeNameService(ddeInst, hszApplication, 0, DNS_REGISTER)) { WINE_ERR("Unable to initialize DDE, DdeNameService failed\n"); goto done; } timer = SetTimer(NULL, 0, 5000, NULL); if (!timer) { WINE_ERR("SetTimer failed to create timer\n"); goto done; } while (!ddeString) { MSG msg; if (!GetMessageW(&msg, NULL, 0, 0)) break; if (msg.message == WM_TIMER) break; DispatchMessageW(&msg); } if (ddeString) { if (*ddeString == '"') { WCHAR *endquote = strchrW(ddeString + 1, '"'); if (!endquote) { WINE_ERR("Unable to retrieve URL from string %s\n", wine_dbgstr_w(ddeString)); goto done; } *endquote = 0; ret = ddeString+1; } else ret = ddeString; } done: if (timer) KillTimer(NULL, timer); if (ddeInst) { if (hszTopic && hszApplication) DdeNameService(ddeInst, hszApplication, 0, DNS_UNREGISTER); if (hszReturn) DdeFreeStringHandle(ddeInst, hszReturn); if (hszTopic) DdeFreeStringHandle(ddeInst, hszTopic); if (hszApplication) DdeFreeStringHandle(ddeInst, hszApplication); DdeUninitialize(ddeInst); } return ret; } static IUri *convert_file_uri(IUri *uri) { wine_get_unix_file_name_t wine_get_unix_file_name_ptr; IUriBuilder *uri_builder; struct stat dummy; WCHAR *new_path; char *unixpath; BSTR filename; IUri *new_uri; HRESULT hres; /* check if the argument is a local file */ wine_get_unix_file_name_ptr = (wine_get_unix_file_name_t) GetProcAddress( GetModuleHandleA( "KERNEL32" ), "wine_get_unix_file_name" ); if(!wine_get_unix_file_name_ptr) return NULL; hres = IUri_GetPath(uri, &filename); if(FAILED(hres)) return NULL; unixpath = wine_get_unix_file_name_ptr(filename); SysFreeString(filename); if(unixpath && stat(unixpath, &dummy) >= 0) { int len; len = MultiByteToWideChar(CP_UNIXCP, 0, unixpath, -1, NULL, 0); new_path = HeapAlloc(GetProcessHeap(), 0, len*sizeof(WCHAR)); if(new_path) MultiByteToWideChar(CP_UNIXCP, 0, unixpath, -1, new_path, len); HeapFree(GetProcessHeap(), 0, unixpath); }else { WINE_WARN("File %s does not exist\n", wine_dbgstr_a(unixpath)); HeapFree(GetProcessHeap(), 0, unixpath); new_path = NULL; } hres = CreateIUriBuilder(uri, 0, 0, &uri_builder); if(SUCCEEDED(hres) && new_path) hres = IUriBuilder_SetPath(uri_builder, new_path); HeapFree(GetProcessHeap(), 0, new_path); if(FAILED(hres)) return NULL; hres = IUriBuilder_CreateUri(uri_builder, 0, 0, 0, &new_uri); IUriBuilder_Release(uri_builder); if(FAILED(hres)) return NULL; return new_uri; } /***************************************************************************** * Main entry point. This is a console application so we have a wmain() not a * winmain(). */ int wmain(int argc, WCHAR *argv[]) { static const WCHAR nohomeW[] = {'-','n','o','h','o','m','e',0}; WCHAR *url = argv[1]; BSTR display_uri; DWORD scheme; IUri *uri; HRESULT hres; int ret = 1; /* DDE used only if -nohome is specified; avoids delay in printing usage info * when no parameters are passed */ if (url && !strcmpiW( url, nohomeW )) url = argc > 2 ? argv[2] : get_url_from_dde(); if (!url) { WINE_ERR( "Usage: winebrowser URL\n" ); return -1; } hres = CreateUri(url, Uri_CREATE_ALLOW_IMPLICIT_FILE_SCHEME|Uri_CREATE_FILE_USE_DOS_PATH, 0, &uri); if(FAILED(hres)) { WINE_ERR("Failed to parse URL\n"); ret = open_http_url(url); HeapFree(GetProcessHeap(), 0, ddeString); return ret; } HeapFree(GetProcessHeap(), 0, ddeString); IUri_GetScheme(uri, &scheme); if(scheme == URL_SCHEME_FILE) { IUri *file_uri; file_uri = convert_file_uri(uri); if(file_uri) { IUri_Release(uri); uri = file_uri; }else { WINE_ERR("Failed to convert file URL to unix path\n"); } } hres = IUri_GetDisplayUri(uri, &display_uri); IUri_Release(uri); if(FAILED(hres)) return -1; WINE_TRACE("opening %s\n", wine_dbgstr_w(display_uri)); if(scheme == URL_SCHEME_MAILTO) ret = open_mailto_url(display_uri); else /* let the browser decide how to handle the given url */ ret = open_http_url(display_uri); SysFreeString(display_uri); return ret; }