Commit | Line | Data |
---|---|---|
1cd04aa2 DW |
1 | ///////////////////////////////////////////////////////////////////////////// |
2 | // Name: common/mimetype.cpp | |
3 | // Purpose: classes and functions to manage MIME types | |
4 | // Author: David Webster | |
5 | // Modified by: | |
6 | // Created: 01.21.00 | |
7 | // RCS-ID: $Id$ | |
8 | // Copyright: Adopted from msw port --(c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr> | |
9 | // Licence: wxWindows license (part of wxExtra library) | |
10 | ///////////////////////////////////////////////////////////////////////////// | |
11 | ||
12 | #define INCL_DOS | |
13 | #define INCL_GPI | |
14 | #define INCL_WIN | |
15 | #include <os2.h> | |
16 | ||
17 | #ifndef WX_PRECOMP | |
18 | #include "wx/string.h" | |
19 | #if wxUSE_GUI | |
20 | #include "wx/icon.h" | |
21 | #endif | |
22 | #endif //WX_PRECOMP | |
23 | ||
24 | #include "wx/log.h" | |
25 | #include "wx/file.h" | |
26 | #include "wx/intl.h" | |
27 | #include "wx/dynarray.h" | |
28 | #include "wx/confbase.h" | |
29 | ||
7e99520b DW |
30 | #if wxUSE_FILE |
31 | ||
1cd04aa2 DW |
32 | #include "wx/os2/mimetype.h" |
33 | ||
34 | // other standard headers | |
35 | #include <ctype.h> | |
36 | ||
37 | // in case we're compiling in non-GUI mode | |
38 | class WXDLLEXPORT wxIcon; | |
39 | ||
40 | // These classes use Windows registry to retrieve the required information. | |
41 | // | |
42 | // Keys used (not all of them are documented, so it might actually stop working | |
43 | // in futur versions of Windows...): | |
44 | // 1. "HKCR\MIME\Database\Content Type" contains subkeys for all known MIME | |
45 | // types, each key has a string value "Extension" which gives (dot preceded) | |
46 | // extension for the files of this MIME type. | |
47 | // | |
48 | // 2. "HKCR\.ext" contains | |
49 | // a) unnamed value containing the "filetype" | |
50 | // b) value "Content Type" containing the MIME type | |
51 | // | |
52 | // 3. "HKCR\filetype" contains | |
53 | // a) unnamed value containing the description | |
54 | // b) subkey "DefaultIcon" with single unnamed value giving the icon index in | |
55 | // an icon file | |
56 | // c) shell\open\command and shell\open\print subkeys containing the commands | |
57 | // to open/print the file (the positional parameters are introduced by %1, | |
58 | // %2, ... in these strings, we change them to %s ourselves) | |
59 | ||
60 | // although I don't know of any official documentation which mentions this | |
61 | // location, uses it, so it isn't likely to change | |
62 | static const wxChar *MIME_DATABASE_KEY = wxT("MIME\\Database\\Content Type\\"); | |
63 | ||
64 | wxString wxFileTypeImpl::GetCommand(const wxChar *verb) const | |
65 | { | |
66 | // TODO: OS/2 doesn't have a registry but uses Prf | |
67 | /* | |
68 | // suppress possible error messages | |
69 | wxLogNull nolog; | |
70 | wxString strKey; | |
71 | ||
72 | if ( wxRegKey(wxRegKey::HKCR, m_ext + _T("\\shell")).Exists() ) | |
73 | strKey = m_ext; | |
74 | if ( wxRegKey(wxRegKey::HKCR, m_strFileType + _T("\\shell")).Exists() ) | |
75 | strKey = m_strFileType; | |
76 | ||
77 | if ( !strKey ) | |
78 | { | |
79 | // no info | |
80 | return wxEmptyString; | |
81 | } | |
82 | ||
83 | strKey << wxT("\\shell\\") << verb; | |
84 | wxRegKey key(wxRegKey::HKCR, strKey + _T("\\command")); | |
85 | wxString command; | |
86 | if ( key.Open() ) { | |
87 | // it's the default value of the key | |
88 | if ( key.QueryValue(wxT(""), command) ) { | |
89 | // transform it from '%1' to '%s' style format string (now also | |
90 | // test for %L - apparently MS started using it as well for the | |
91 | // same purpose) | |
92 | ||
93 | // NB: we don't make any attempt to verify that the string is valid, | |
94 | // i.e. doesn't contain %2, or second %1 or .... But we do make | |
95 | // sure that we return a string with _exactly_ one '%s'! | |
96 | bool foundFilename = FALSE; | |
97 | size_t len = command.Len(); | |
98 | for ( size_t n = 0; (n < len) && !foundFilename; n++ ) { | |
99 | if ( command[n] == wxT('%') && | |
100 | (n + 1 < len) && | |
101 | (command[n + 1] == wxT('1') || | |
102 | command[n + 1] == wxT('L')) ) { | |
103 | // replace it with '%s' | |
104 | command[n + 1] = wxT('s'); | |
105 | ||
106 | foundFilename = TRUE; | |
107 | } | |
108 | } | |
109 | ||
110 | #if wxUSE_DDE | |
111 | // look whether we must issue some DDE requests to the application | |
112 | // (and not just launch it) | |
113 | strKey += _T("\\DDEExec"); | |
114 | wxRegKey keyDDE(wxRegKey::HKCR, strKey); | |
115 | if ( keyDDE.Open() ) { | |
116 | wxString ddeCommand, ddeServer, ddeTopic; | |
117 | keyDDE.QueryValue(_T(""), ddeCommand); | |
118 | ddeCommand.Replace(_T("%1"), _T("%s")); | |
119 | ||
120 | wxRegKey(wxRegKey::HKCR, strKey + _T("\\Application")). | |
121 | QueryValue(_T(""), ddeServer); | |
122 | wxRegKey(wxRegKey::HKCR, strKey + _T("\\Topic")). | |
123 | QueryValue(_T(""), ddeTopic); | |
124 | ||
125 | // HACK: we use a special feature of wxExecute which exists | |
126 | // just because we need it here: it will establish DDE | |
127 | // conversation with the program it just launched | |
128 | command.Prepend(_T("WX_DDE#")); | |
129 | command << _T('#') << ddeServer | |
130 | << _T('#') << ddeTopic | |
131 | << _T('#') << ddeCommand; | |
132 | } | |
133 | else | |
134 | #endif // wxUSE_DDE | |
135 | if ( !foundFilename ) { | |
136 | // we didn't find any '%1' - the application doesn't know which | |
137 | // file to open (note that we only do it if there is no DDEExec | |
138 | // subkey) | |
139 | // | |
140 | // HACK: append the filename at the end, hope that it will do | |
141 | command << wxT(" %s"); | |
142 | } | |
143 | } | |
144 | } | |
145 | //else: no such file type or no value, will return empty string | |
146 | ||
147 | return command; | |
148 | */ | |
149 | return wxEmptyString; | |
150 | } | |
151 | ||
152 | bool | |
153 | wxFileTypeImpl::GetOpenCommand(wxString *openCmd, | |
154 | const wxFileType::MessageParameters& params) | |
155 | const | |
156 | { | |
157 | wxString cmd; | |
158 | if ( m_info ) { | |
159 | cmd = m_info->GetOpenCommand(); | |
160 | } | |
161 | else { | |
162 | cmd = GetCommand(wxT("open")); | |
163 | } | |
164 | ||
165 | *openCmd = wxFileType::ExpandCommand(cmd, params); | |
166 | ||
167 | return !openCmd->IsEmpty(); | |
168 | } | |
169 | ||
170 | bool | |
171 | wxFileTypeImpl::GetPrintCommand(wxString *printCmd, | |
172 | const wxFileType::MessageParameters& params) | |
173 | const | |
174 | { | |
175 | wxString cmd; | |
176 | if ( m_info ) { | |
177 | cmd = m_info->GetPrintCommand(); | |
178 | } | |
179 | else { | |
180 | cmd = GetCommand(wxT("print")); | |
181 | } | |
182 | ||
183 | *printCmd = wxFileType::ExpandCommand(cmd, params); | |
184 | ||
185 | return !printCmd->IsEmpty(); | |
186 | } | |
187 | ||
188 | // TODO this function is half implemented | |
189 | bool wxFileTypeImpl::GetExtensions(wxArrayString& extensions) | |
190 | { | |
191 | if ( m_info ) { | |
192 | extensions = m_info->GetExtensions(); | |
193 | ||
194 | return TRUE; | |
195 | } | |
196 | else if ( m_ext.IsEmpty() ) { | |
197 | // the only way to get the list of extensions from the file type is to | |
198 | // scan through all extensions in the registry - too slow... | |
199 | return FALSE; | |
200 | } | |
201 | else { | |
202 | extensions.Empty(); | |
203 | extensions.Add(m_ext); | |
204 | ||
205 | // it's a lie too, we don't return _all_ extensions... | |
206 | return TRUE; | |
207 | } | |
208 | } | |
209 | ||
210 | bool wxFileTypeImpl::GetMimeType(wxString *mimeType) const | |
211 | { | |
212 | if ( m_info ) { | |
213 | // we already have it | |
214 | *mimeType = m_info->GetMimeType(); | |
215 | ||
216 | return TRUE; | |
217 | } | |
218 | ||
219 | // suppress possible error messages | |
220 | wxLogNull nolog; | |
221 | // TODO: substitue reg key stuff (maybe make a Prf class for OS/2??) | |
222 | /* | |
223 | wxRegKey key(wxRegKey::HKCR, wxT(".") + m_ext); | |
224 | if ( key.Open() && key.QueryValue(wxT("Content Type"), *mimeType) ) { | |
225 | return TRUE; | |
226 | } | |
227 | else { | |
228 | return FALSE; | |
229 | } | |
230 | */ | |
231 | return FALSE; | |
232 | } | |
233 | ||
2a6b16e3 DW |
234 | bool wxFileTypeImpl::GetMimeTypes(wxArrayString& mimeTypes) const |
235 | { | |
236 | wxString s; | |
237 | ||
238 | if (GetMimeType(&s)) | |
239 | { | |
240 | mimeTypes.Clear(); | |
241 | mimeTypes.Add(s); | |
242 | return TRUE; | |
243 | } | |
244 | else | |
245 | return FALSE; | |
246 | } | |
247 | ||
1cd04aa2 DW |
248 | bool wxFileTypeImpl::GetIcon(wxIcon *icon) const |
249 | { | |
250 | #if wxUSE_GUI | |
251 | if ( m_info ) { | |
252 | // we don't have icons in the fallback resources | |
253 | return FALSE; | |
254 | } | |
255 | ||
256 | wxString strIconKey; | |
257 | strIconKey << m_strFileType << wxT("\\DefaultIcon"); | |
258 | ||
259 | // suppress possible error messages | |
260 | wxLogNull nolog; | |
261 | //TODO: | |
262 | /* | |
263 | wxRegKey key(wxRegKey::HKCR, strIconKey); | |
264 | ||
265 | if ( key.Open() ) { | |
266 | wxString strIcon; | |
267 | // it's the default value of the key | |
268 | if ( key.QueryValue(wxT(""), strIcon) ) { | |
269 | // the format is the following: <full path to file>, <icon index> | |
270 | // NB: icon index may be negative as well as positive and the full | |
271 | // path may contain the environment variables inside '%' | |
272 | wxString strFullPath = strIcon.BeforeLast(wxT(',')), | |
273 | strIndex = strIcon.AfterLast(wxT(',')); | |
274 | ||
275 | // index may be omitted, in which case BeforeLast(',') is empty and | |
276 | // AfterLast(',') is the whole string | |
277 | if ( strFullPath.IsEmpty() ) { | |
278 | strFullPath = strIndex; | |
279 | strIndex = wxT("0"); | |
280 | } | |
281 | ||
282 | wxString strExpPath = wxExpandEnvVars(strFullPath); | |
283 | int nIndex = wxAtoi(strIndex); | |
284 | ||
285 | HICON hIcon = ExtractIcon(GetModuleHandle(NULL), strExpPath, nIndex); | |
286 | switch ( (int)hIcon ) { | |
287 | case 0: // means no icons were found | |
288 | case 1: // means no such file or it wasn't a DLL/EXE/OCX/ICO/... | |
289 | wxLogDebug(wxT("incorrect registry entry '%s': no such icon."), | |
290 | key.GetName().c_str()); | |
291 | break; | |
292 | ||
293 | default: | |
294 | icon->SetHICON((WXHICON)hIcon); | |
295 | return TRUE; | |
296 | } | |
297 | } | |
298 | } | |
299 | ||
300 | // no such file type or no value or incorrect icon entry | |
301 | */ | |
302 | #endif // wxUSE_GUI | |
303 | return FALSE; | |
304 | } | |
305 | ||
306 | bool wxFileTypeImpl::GetDescription(wxString *desc) const | |
307 | { | |
308 | if ( m_info ) { | |
309 | // we already have it | |
310 | *desc = m_info->GetDescription(); | |
311 | ||
312 | return TRUE; | |
313 | } | |
314 | ||
315 | // suppress possible error messages | |
316 | wxLogNull nolog; | |
317 | // TODO: | |
318 | /* | |
319 | wxRegKey key(wxRegKey::HKCR, m_strFileType); | |
320 | ||
321 | if ( key.Open() ) { | |
322 | // it's the default value of the key | |
323 | if ( key.QueryValue(wxT(""), *desc) ) { | |
324 | return TRUE; | |
325 | } | |
326 | } | |
327 | */ | |
328 | return FALSE; | |
329 | } | |
330 | ||
331 | // extension -> file type | |
332 | wxFileType * | |
333 | wxMimeTypesManagerImpl::GetFileTypeFromExtension(const wxString& ext) | |
334 | { | |
335 | // add the leading point if necessary | |
336 | wxString str; | |
a4372af6 | 337 | if ( ext[(size_t) 0] != wxT('.') ) { |
1cd04aa2 DW |
338 | str = wxT('.'); |
339 | } | |
340 | str << ext; | |
341 | ||
342 | // suppress possible error messages | |
343 | wxLogNull nolog; | |
344 | ||
345 | bool knownExtension = FALSE; | |
346 | ||
347 | wxString strFileType; | |
348 | // TODO: | |
349 | /* | |
350 | wxRegKey key(wxRegKey::HKCR, str); | |
351 | if ( key.Open() ) { | |
352 | // it's the default value of the key | |
353 | if ( key.QueryValue(wxT(""), strFileType) ) { | |
354 | // create the new wxFileType object | |
355 | wxFileType *fileType = new wxFileType; | |
356 | fileType->m_impl->Init(strFileType, ext); | |
357 | ||
358 | return fileType; | |
359 | } | |
360 | else { | |
361 | // this extension doesn't have a filetype, but it's known to the | |
362 | // system and may be has some other useful keys (open command or | |
363 | // content-type), so still return a file type object for it | |
364 | knownExtension = TRUE; | |
365 | } | |
366 | } | |
367 | */ | |
368 | // check the fallbacks | |
369 | // TODO linear search is potentially slow, perhaps we should use a sorted | |
370 | // array? | |
371 | size_t count = m_fallbacks.GetCount(); | |
372 | for ( size_t n = 0; n < count; n++ ) { | |
373 | if ( m_fallbacks[n].GetExtensions().Index(ext) != wxNOT_FOUND ) { | |
374 | wxFileType *fileType = new wxFileType; | |
375 | fileType->m_impl->Init(m_fallbacks[n]); | |
376 | ||
377 | return fileType; | |
378 | } | |
379 | } | |
380 | ||
381 | if ( knownExtension ) | |
382 | { | |
383 | wxFileType *fileType = new wxFileType; | |
384 | fileType->m_impl->Init(wxEmptyString, ext); | |
385 | ||
386 | return fileType; | |
387 | } | |
388 | else | |
389 | { | |
390 | // unknown extension | |
391 | return NULL; | |
392 | } | |
393 | } | |
394 | ||
395 | // MIME type -> extension -> file type | |
396 | wxFileType * | |
397 | wxMimeTypesManagerImpl::GetFileTypeFromMimeType(const wxString& mimeType) | |
398 | { | |
399 | wxString strKey = MIME_DATABASE_KEY; | |
400 | strKey << mimeType; | |
401 | ||
402 | // suppress possible error messages | |
403 | wxLogNull nolog; | |
404 | ||
405 | wxString ext; | |
406 | // TODO: | |
407 | /* | |
408 | wxRegKey key(wxRegKey::HKCR, strKey); | |
409 | if ( key.Open() ) { | |
410 | if ( key.QueryValue(wxT("Extension"), ext) ) { | |
411 | return GetFileTypeFromExtension(ext); | |
412 | } | |
413 | } | |
414 | ||
415 | // check the fallbacks | |
416 | // TODO linear search is potentially slow, perhaps we should use a sorted | |
417 | // array? | |
418 | size_t count = m_fallbacks.GetCount(); | |
419 | for ( size_t n = 0; n < count; n++ ) { | |
420 | if ( wxMimeTypesManager::IsOfType(mimeType, | |
421 | m_fallbacks[n].GetMimeType()) ) { | |
422 | wxFileType *fileType = new wxFileType; | |
423 | fileType->m_impl->Init(m_fallbacks[n]); | |
424 | ||
425 | return fileType; | |
426 | } | |
427 | } | |
428 | */ | |
429 | // unknown MIME type | |
430 | return NULL; | |
431 | } | |
432 | ||
433 | size_t wxMimeTypesManagerImpl::EnumAllFileTypes(wxArrayString& mimetypes) | |
434 | { | |
435 | // enumerate all keys under MIME_DATABASE_KEY | |
436 | // TODO: | |
437 | /* | |
438 | wxRegKey key(wxRegKey::HKCR, MIME_DATABASE_KEY); | |
439 | ||
440 | wxString type; | |
441 | long cookie; | |
442 | bool cont = key.GetFirstKey(type, cookie); | |
443 | while ( cont ) | |
444 | { | |
445 | mimetypes.Add(type); | |
446 | ||
447 | cont = key.GetNextKey(type, cookie); | |
448 | } | |
449 | ||
450 | return mimetypes.GetCount(); | |
451 | */ | |
452 | return 0; | |
453 | } | |
454 | ||
7e99520b | 455 | #endif //wxUSE_FILE |