|  | /* | 
|  | * 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 | 
|  |  | 
|  | #include "config.h" | 
|  | #include "wine/port.h" | 
|  |  | 
|  | #include <windows.h> | 
|  | #include <shlwapi.h> | 
|  | #include <ddeml.h> | 
|  | #include <stdio.h> | 
|  | #include <stdlib.h> | 
|  | #include <errno.h> | 
|  | #include "wine/debug.h" | 
|  |  | 
|  | WINE_DEFAULT_DEBUG_CHANNEL(winebrowser); | 
|  |  | 
|  | typedef LPSTR (*wine_get_unix_file_name_t)(LPCWSTR unixname); | 
|  |  | 
|  | /* try to launch an app from a comma separated string of app names */ | 
|  | static int launch_app( char *candidates, const char *argv1 ) | 
|  | { | 
|  | char *app; | 
|  | const char *argv_new[3]; | 
|  |  | 
|  | app = strtok( candidates, "," ); | 
|  | while (app) | 
|  | { | 
|  | argv_new[0] = app; | 
|  | argv_new[1] = argv1; | 
|  | argv_new[2] = NULL; | 
|  |  | 
|  | WINE_TRACE( "Considering: %s\n", app ); | 
|  | WINE_TRACE( "argv[1]: %s\n", argv1 ); | 
|  |  | 
|  | spawnvp( _P_OVERLAY, app, argv_new );  /* only returns on error */ | 
|  | app = strtok( NULL, "," );  /* grab the next app */ | 
|  | } | 
|  | fprintf( stderr, "winebrowser: could not find a suitable app to run\n" ); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | static int open_http_url( const char *url ) | 
|  | { | 
|  | static const char *defaultbrowsers = | 
|  | "xdg-open,firefox,konqueror,mozilla,netscape,galeon,opera,dillo"; | 
|  | char browsers[256]; | 
|  |  | 
|  | DWORD length, type; | 
|  | HKEY key; | 
|  | LONG r; | 
|  |  | 
|  | length = sizeof(browsers); | 
|  | /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */ | 
|  | if  (!(r = RegOpenKey( HKEY_CURRENT_USER, "Software\\Wine\\WineBrowser", &key ))) | 
|  | { | 
|  | r = RegQueryValueExA( key, "Browsers", 0, &type, (LPBYTE)browsers, &length ); | 
|  | RegCloseKey( key ); | 
|  | } | 
|  | if (r != ERROR_SUCCESS) | 
|  | strcpy( browsers, defaultbrowsers ); | 
|  |  | 
|  | return launch_app( browsers, url ); | 
|  | } | 
|  |  | 
|  | static int open_mailto_url( const char *url ) | 
|  | { | 
|  | static const char *defaultmailers = | 
|  | "xdg-email,mozilla-thunderbird,thunderbird,evolution"; | 
|  | char mailers[256]; | 
|  |  | 
|  | DWORD length, type; | 
|  | HKEY key; | 
|  | LONG r; | 
|  |  | 
|  | length = sizeof(mailers); | 
|  | /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */ | 
|  | if (!(r = RegOpenKey( HKEY_CURRENT_USER, "Software\\Wine\\WineBrowser", &key ))) | 
|  | { | 
|  | r = RegQueryValueExA( key, "Mailers", 0, &type, (LPBYTE)mailers, &length ); | 
|  | RegCloseKey( key ); | 
|  | } | 
|  | if (r != ERROR_SUCCESS) | 
|  | strcpy( mailers, defaultmailers ); | 
|  |  | 
|  | return launch_app( mailers, url ); | 
|  | } | 
|  |  | 
|  | /***************************************************************************** | 
|  | * DDE helper functions. | 
|  | */ | 
|  |  | 
|  | static char *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 = DdeQueryString(ddeInst, hsz2, NULL, 0, CP_WINANSI))) | 
|  | WINE_ERR("DdeQueryString returned zero size of request string\n"); | 
|  | else if (!(ddeString = HeapAlloc(GetProcessHeap(), 0, size+1))) | 
|  | WINE_ERR("Out of memory\n"); | 
|  | else if (DdeQueryString(ddeInst, hsz2, ddeString, size+1, CP_WINANSI) != size) | 
|  | WINE_WARN("DdeQueryString did not return %d bytes\n", size); | 
|  | else | 
|  | ret = -2; /* acknowledgment */ | 
|  | return DdeCreateDataHandle(ddeInst, (LPBYTE)&ret, sizeof(ret), 0, | 
|  | hszReturn, CF_TEXT, 0); | 
|  |  | 
|  | default: | 
|  | return NULL; | 
|  | } | 
|  | } | 
|  |  | 
|  | static char *get_url_from_dde(void) | 
|  | { | 
|  | static const char szApplication[] = "IExplore"; | 
|  | static const char szTopic[] = "WWW_OpenURL"; | 
|  | static const char szReturn[] = "Return"; | 
|  |  | 
|  | HSZ hszApplication = 0; | 
|  | UINT_PTR timer = 0; | 
|  | int rc; | 
|  | char *ret = NULL; | 
|  |  | 
|  | rc = DdeInitializeA(&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 = DdeCreateStringHandleA(ddeInst, szApplication, CP_WINANSI); | 
|  | if (!hszApplication) | 
|  | { | 
|  | WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n"); | 
|  | goto done; | 
|  | } | 
|  |  | 
|  | hszTopic = DdeCreateStringHandleA(ddeInst, szTopic, CP_WINANSI); | 
|  | if (!hszTopic) | 
|  | { | 
|  | WINE_ERR("Unable to initialize DDE, DdeCreateStringHandle failed\n"); | 
|  | goto done; | 
|  | } | 
|  |  | 
|  | hszReturn = DdeCreateStringHandleA(ddeInst, szReturn, CP_WINANSI); | 
|  | 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 (!GetMessage(&msg, NULL, 0, 0)) break; | 
|  | if (msg.message == WM_TIMER) break; | 
|  | DispatchMessage(&msg); | 
|  | } | 
|  |  | 
|  | if (ddeString) | 
|  | { | 
|  | if (*ddeString == '"') | 
|  | { | 
|  | char *endquote = strchr(ddeString+1, '"'); | 
|  | if (!endquote) | 
|  | { | 
|  | WINE_ERR("Unabled to retrieve URL from string '%s'\n", 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; | 
|  | } | 
|  |  | 
|  | /***************************************************************************** | 
|  | * Main entry point. This is a console application so we have a main() not a | 
|  | * winmain(). | 
|  | */ | 
|  | int main(int argc, char *argv[]) | 
|  | { | 
|  | char *url = argv[1]; | 
|  | wine_get_unix_file_name_t wine_get_unix_file_name_ptr; | 
|  | int ret = 1; | 
|  |  | 
|  | /* DDE used only if -nohome is specified; avoids delay in printing usage info | 
|  | * when no parameters are passed */ | 
|  | if (url && !strcasecmp( url, "-nohome" )) | 
|  | url = argc > 2 ? argv[2] : get_url_from_dde(); | 
|  |  | 
|  | if (!url) | 
|  | { | 
|  | fprintf( stderr, "Usage: winebrowser URL\n" ); | 
|  | goto done; | 
|  | } | 
|  |  | 
|  | /* handle an RFC1738 file URL */ | 
|  | if (!strncasecmp( url, "file:", 5 )) | 
|  | { | 
|  | char *p; | 
|  | DWORD len = lstrlenA( url ) + 1; | 
|  |  | 
|  | if (UrlUnescapeA( url, NULL, &len, URL_UNESCAPE_INPLACE ) != S_OK) | 
|  | { | 
|  | fprintf( stderr, "winebrowser: unescaping URL failed: %s\n", url ); | 
|  | goto done; | 
|  | } | 
|  |  | 
|  | /* look for a Windows path after 'file:' */ | 
|  | p = url + 5; | 
|  | while (*p) | 
|  | { | 
|  | if (isalpha( p[0] ) && (p[1] == ':' || p[1] == '|')) break; | 
|  | p++; | 
|  | } | 
|  | if (!*p) | 
|  | { | 
|  | fprintf( stderr, "winebrowser: no valid Windows path in: %s\n", url ); | 
|  | goto done; | 
|  | } | 
|  |  | 
|  | if (p[1] == '|') p[1] = ':'; | 
|  | url = p; | 
|  |  | 
|  | while (*p) | 
|  | { | 
|  | if (*p == '/') *p = '\\'; | 
|  | p++; | 
|  | } | 
|  | } | 
|  |  | 
|  | /* check if the argument is a local file */ | 
|  | wine_get_unix_file_name_ptr = (wine_get_unix_file_name_t) | 
|  | GetProcAddress( GetModuleHandle( "KERNEL32" ), "wine_get_unix_file_name" ); | 
|  |  | 
|  | if (wine_get_unix_file_name_ptr == NULL) | 
|  | { | 
|  | WINE_ERR( "cannot get the address of 'wine_get_unix_file_name'\n" ); | 
|  | } | 
|  | else | 
|  | { | 
|  | char *unixpath; | 
|  | WCHAR unixpathW[MAX_PATH]; | 
|  |  | 
|  | MultiByteToWideChar( CP_UNIXCP, 0, url, -1, unixpathW, MAX_PATH ); | 
|  | if ((unixpath = wine_get_unix_file_name_ptr( unixpathW ))) | 
|  | { | 
|  | struct stat dummy; | 
|  |  | 
|  | if (stat( unixpath, &dummy ) >= 0) | 
|  | { | 
|  | ret = open_http_url( unixpath ); | 
|  | goto done; | 
|  | } | 
|  | } | 
|  | } | 
|  |  | 
|  | if (!strncasecmp( url, "mailto:", 7 )) | 
|  | ret = open_mailto_url( url ); | 
|  | else | 
|  | /* let the browser decide how to handle the given url */ | 
|  | ret = open_http_url( url ); | 
|  |  | 
|  | done: | 
|  | HeapFree(GetProcessHeap(), 0, ddeString); | 
|  | return ret; | 
|  | } |