programs: Use WIN32_LEAN_AND_MEAN.
[wine] / programs / winebrowser / main.c
1 /*
2  * winebrowser - winelib app to launch native OS browser or mail client.
3  *
4  * Copyright (C) 2004 Chris Morgan
5  * Copyright (C) 2005 Hans Leidekker
6  *
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.
11  *
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.
16  *
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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  *
21  * NOTES:
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.
26  *
27  *  The application to launch is chosen from a default set or, if set,
28  *  taken from a registry key.
29  *  
30  *  The argument may be a regular Windows file name, an http(s) URL or a
31  *  mailto URL. In the first two cases the argument will be fed to a web
32  *  browser. In the third case the argument is fed to a mail client.
33  *  A mailto URL is composed as follows:
34  *
35  *   mailto:[E-MAIL]?subject=[TOPIC]&cc=[E-MAIL]&bcc=[E-MAIL]&body=[TEXT]
36  */
37
38 #define WIN32_LEAN_AND_MEAN
39
40 #include "config.h"
41 #include "wine/port.h"
42
43 #include <windows.h>
44 #include <stdio.h>
45 #include <stdlib.h>
46 #include <errno.h>
47
48 typedef LPSTR (*wine_get_unix_file_name_t)(LPCWSTR unixname);
49
50 /* try to launch an app from a comma separated string of app names */
51 static int launch_app( char *candidates, const char *argv1 )
52 {
53     char *app;
54     const char *argv_new[3];
55
56     app = strtok( candidates, "," );
57     while (app)
58     {
59         argv_new[0] = app;
60         argv_new[1] = argv1;
61         argv_new[2] = NULL;
62
63         fprintf( stderr, "Considering: %s\n", app );
64         fprintf( stderr, "argv[1]: %s\n", argv1 );
65
66         spawnvp( _P_OVERLAY, app, argv_new );  /* only returns on error */
67         app = strtok( NULL, "," );  /* grab the next app */
68     }
69     fprintf( stderr, "winebrowser: could not find a suitable app to run\n" );
70     return 1;
71 }
72
73 static int open_http_url( const char *url )
74 {
75     static const char *defaultbrowsers =
76         "firefox,konqueror,mozilla,netscape,galeon,opera,dillo";
77     char browsers[256];
78
79     DWORD length, type;
80     HKEY key;
81     LONG r;
82
83     length = sizeof(browsers);
84     /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */
85     if  (RegCreateKeyEx( HKEY_CURRENT_USER, "Software\\Wine\\WineBrowser", 0, NULL,
86                          REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &key, NULL))
87     {
88         fprintf( stderr, "winebrowser: cannot create config key\n" );
89         return 1;
90     }
91
92     r = RegQueryValueExA( key, "Browsers", 0, &type, (LPBYTE)browsers, &length );
93     if (r != ERROR_SUCCESS)
94     {
95         /* set value to the default */
96         RegSetValueExA( key, "Browsers", 0, REG_SZ, (LPBYTE)defaultbrowsers,
97                         lstrlen( defaultbrowsers ) + 1 );
98         strcpy( browsers, defaultbrowsers );
99     }
100     RegCloseKey( key );
101
102     return launch_app( browsers, url );
103 }
104
105 static int open_mailto_url( const char *url )
106 {
107     static const char *defaultmailers =
108         "mozilla-thunderbird,thunderbird,evolution";
109     char mailers[256];
110
111     DWORD length, type;
112     HKEY key;
113     LONG r;
114
115     length = sizeof(mailers);
116     /* @@ Wine registry key: HKCU\Software\Wine\WineBrowser */
117     if (RegCreateKeyEx( HKEY_CURRENT_USER, "Software\\Wine\\WineBrowser", 0, NULL,
118                         REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &key, NULL ))
119     {
120         fprintf( stderr, "winebrowser: cannot create config key\n" );
121         return 1;
122     }
123
124     r = RegQueryValueExA( key, "Mailers", 0, &type, (LPBYTE)mailers, &length );
125     if (r != ERROR_SUCCESS)
126     {
127         /* set value to the default */
128         RegSetValueExA( key, "Mailers", 0, REG_SZ, (LPBYTE)defaultmailers,
129                         lstrlen( defaultmailers ) + 1 );
130         strcpy( mailers, defaultmailers );
131     }
132     RegCloseKey( key );
133
134     return launch_app( mailers, url );
135 }
136
137 /*****************************************************************************
138  * Main entry point. This is a console application so we have a main() not a
139  * winmain().
140  */
141 int main(int argc, char *argv[])
142 {
143     wine_get_unix_file_name_t wine_get_unix_file_name_ptr;
144
145     if (argc == 1)
146     {
147         fprintf( stderr, "Usage: winebrowser URL\n" );
148         return 1;
149     }
150
151     /* check if the argument is a local file */
152     wine_get_unix_file_name_ptr = (wine_get_unix_file_name_t)
153         GetProcAddress( GetModuleHandle( "KERNEL32" ), "wine_get_unix_file_name" );
154
155     if (wine_get_unix_file_name_ptr == NULL)
156     {
157         fprintf( stderr,
158             "winebrowser: cannot get the address of 'wine_get_unix_file_name'\n" );
159     }
160     else
161     {
162         char *unixpath;
163         WCHAR unixpathW[MAX_PATH];
164
165         MultiByteToWideChar( CP_ACP, 0, argv[1], -1, unixpathW, MAX_PATH );
166         if ((unixpath = wine_get_unix_file_name_ptr( unixpathW )))
167         {
168             struct stat dummy;
169
170             if (stat( unixpath, &dummy ) >= 0)
171                 return open_http_url( unixpath );
172         }
173     }
174
175     if (!strncasecmp( argv[1], "http:", 5 ) || !strncasecmp( argv[1], "https:", 6 ))
176         return open_http_url( argv[1] );
177
178     if (!strncasecmp( argv[1], "mailto:", 7 ))
179         return open_mailto_url( argv[1] );
180
181     fprintf( stderr, "winebrowser: cannot handle this type of URL\n" );
182     return 1;
183 }