// Licence: wxWindows licence (part of wxExtra library)
/////////////////////////////////////////////////////////////////////////////
-// known bugs; there may be others!! chris elliott, biol75@york.ac.uk 27 Mar 01
-
-// 1) .mailcap and .mimetypes can be either in a netscape or metamail format
-// and entries may get confused during writing (I've tried to fix this; please let me know
-// any files that fail)
-// 2) KDE and Gnome do not yet fully support international read/write
-// 3) Gnome key lines like open.latex."LaTeX this file"=latex %f will have odd results
-// 4) writing to files comments out the existing data; I hope this avoids losing
-// any data which we could not read, and data which we did not store like test=
-// 5) results from reading files with multiple entries (especially matches with type/* )
-// may (or may not) work for getXXX commands
-// 6) Loading the png icons in Gnome doesn't work for me...
-// 7) In Gnome, if keys.mime exists but keys.users does not, there is
-// an error message in debug mode, but the file is still written OK
-// 8) Deleting entries is only allowed from the user file; sytem wide entries
-// will be preserved during unassociate
-// 9) KDE does not yet handle multiple actions; Netscape mode never will
-
-// TODO: this file is a mess, we need to split it and review everything (VZ)
-
// for compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#include "wx/app.h"
#include "wx/apptrait.h"
-#if wxUSE_LIBGNOMEVFS
- // Not GUI dependent
- #include "wx/gtk/gnome/gvfs.h"
-#endif
-
// other standard headers
#include <ctype.h>
-// this class is a wxTextFile specialization for dealing with files storing
-// various MIME-related information
-//
-// it should be used instead of wxTextFile even if none of its additional
-// methods are used just because it handles files with mixed encodings (often
-// the case for MIME files which contain strings for different languages)
-// correctly, see OnRead()
-class wxMimeTextFile : public wxTextFile
+class wxMimeTextFile
{
public:
- // constructors
- wxMimeTextFile () : wxTextFile () { }
- wxMimeTextFile(const wxString& strFile) : wxTextFile(strFile) { }
+ wxMimeTextFile()
+ {
+ }
+
+ wxMimeTextFile(const wxString& fname)
+ {
+ m_fname = fname;
+ }
+
+ void AddLine( const wxString &line ) { }
+
+ bool Open( const wxString &fname )
+ {
+ m_fname = fname;
+ wxFFile file( fname );
+ if (!file.IsOpened())
+ return false;
+ size_t size = file.Length();
+ wxCharBuffer buffer( size );
+ file.Read( (void*) (const char*) buffer, size );
+ wxString all = wxString::FromUTF8( buffer, size );
+
+ wxStringTokenizer tok( all, "\n" );
+ while (tok.HasMoreTokens())
+ {
+ wxString t = tok.GetNextToken();
+ t.MakeLower();
+ if ((!!t) && (t.Find( "comment" ) != 0) && (t.Find( "generic" ) != 0))
+ m_text.Add( t );
+ }
+ return true;
+ }
+ bool Open() { return Open(m_fname); }
+ bool Create( const wxString &fname ) { return false; }
+ bool Write() { return false; }
+ bool Close() { return false; }
+
+ unsigned int GetLineCount() const { return m_text.GetCount(); }
+ wxString &GetLine( unsigned int line ) { return m_text[line]; }
int pIndexOf(const wxString& sSearch,
bool bIncludeComments = false,
sTest.MakeLower();
for(size_t i = iStart; i < GetLineCount(); i++)
{
- wxString sLine = GetLine(i).Trim(false);
+ wxString sLine = GetLine(i);
if(bIncludeComments || ! sLine.StartsWith(wxT("#")))
{
- sLine.MakeLower();
if(sLine.StartsWith(sTest))
return (int)i;
}
wxString sTmp = GetLine(i).AfterFirst(wxT('='));
return sTmp;
}
+
+private:
+ wxArrayString m_text;
+ wxString m_fname;
};
// ----------------------------------------------------------------------------
#define TRACE_MIME_TEST wxT("mimetest")
// ----------------------------------------------------------------------------
-// private functions
-// ----------------------------------------------------------------------------
-
-// there are some fields which we don't understand but for which we don't give
-// warnings as we know that they're not important - this function is used to
-// test for them
-static bool IsKnownUnimportantField(const wxString& field);
-
-// ----------------------------------------------------------------------------
-// private classes
-// ----------------------------------------------------------------------------
-
-
-// This class uses both mailcap and mime.types to gather information about file
-// types.
-//
-// The information about mailcap file was extracted from metamail(1) sources
-// and documentation and subsequently revised when I found the RFC 1524
-// describing it.
-//
-// Format of mailcap file: spaces are ignored, each line is either a comment
-// (starts with '#') or a line of the form <field1>;<field2>;...;<fieldN>.
-// A backslash can be used to quote semicolons and newlines (and, in fact,
-// anything else including itself).
-//
-// The first field is always the MIME type in the form of type/subtype (see RFC
-// 822) where subtype may be '*' meaning "any". Following metamail, we accept
-// "type" which means the same as "type/*", although I'm not sure whether this
-// is standard.
-//
-// The second field is always the command to run. It is subject to
-// parameter/filename expansion described below.
-//
-// All the following fields are optional and may not be present at all. If
-// they're present they may appear in any order, although each of them should
-// appear only once. The optional fields are the following:
-// * notes=xxx is an uninterpreted string which is silently ignored
-// * test=xxx is the command to be used to determine whether this mailcap line
-// applies to our data or not. The RHS of this field goes through the
-// parameter/filename expansion (as the 2nd field) and the resulting string
-// is executed. The line applies only if the command succeeds, i.e. returns 0
-// exit code.
-// * print=xxx is the command to be used to print (and not view) the data of
-// this type (parameter/filename expansion is done here too)
-// * edit=xxx is the command to open/edit the data of this type
-// * needsterminal means that a new interactive console must be created for
-// the viewer
-// * copiousoutput means that the viewer doesn't interact with the user but
-// produces (possibly) a lof of lines of output on stdout (i.e. "cat" is a
-// good example), thus it might be a good idea to use some kind of paging
-// mechanism.
-// * textualnewlines means not to perform CR/LF translation (not honored)
-// * compose and composetyped fields are used to determine the program to be
-// called to create a new message pert in the specified format (unused).
-//
-// Parameter/filename expansion:
-// * %s is replaced with the (full) file name
-// * %t is replaced with MIME type/subtype of the entry
-// * for multipart type only %n is replaced with the nnumber of parts and %F is
-// replaced by an array of (content-type, temporary file name) pairs for all
-// message parts (TODO)
-// * %{parameter} is replaced with the value of parameter taken from
-// Content-type header line of the message.
-//
-//
-// There are 2 possible formats for mime.types file, one entry per line (used
-// for global mime.types and called Mosaic format) and "expanded" format where
-// an entry takes multiple lines (used for users mime.types and called
-// Netscape format).
-//
-// For both formats spaces are ignored and lines starting with a '#' are
-// comments. Each record has one of two following forms:
-// a) for "brief" format:
-// <mime type> <space separated list of extensions>
-// b) for "expanded" format:
-// type=<mime type> BACKSLASH
-// desc="<description>" BACKSLASH
-// exts="<comma separated list of extensions>"
-//
-// (where BACKSLASH is a literal '\\' which we can't put here because cpp
-// misinterprets it)
-//
-// We try to autodetect the format of mime.types: if a non-comment line starts
-// with "type=" we assume the second format, otherwise the first one.
-
-// there may be more than one entry for one and the same mime type, to
-// choose the right one we have to run the command specified in the test
-// field on our data.
-
-// ----------------------------------------------------------------------------
-// wxGNOME
-// ----------------------------------------------------------------------------
-
-// GNOME stores the info we're interested in in several locations:
-// 1. xxx.keys files under /usr/share/mime-info
-// 2. xxx.keys files under ~/.gnome/mime-info
-//
-// Update (Chris Elliott): apparently there may be an optional "[lang]" prefix
-// just before the field name.
-
-
-void wxMimeTypesManagerImpl::LoadGnomeDataFromKeyFile(const wxString& filename,
- const wxArrayString& dirs)
-{
- wxMimeTextFile textfile(filename);
- if ( !textfile.Open() )
- return;
-
- wxLogTrace(TRACE_MIME, wxT("--- Opened Gnome file %s ---"),
- filename.c_str());
-
- wxArrayString search_dirs( dirs );
-
- // values for the entry being parsed
- wxString curMimeType, curIconFile;
- wxMimeTypeCommands * entry = new wxMimeTypeCommands;
-
- wxArrayString strExtensions;
- wxString strDesc;
-
- const wxChar *pc;
- size_t nLineCount = textfile.GetLineCount();
- size_t nLine = 0;
- while ( nLine < nLineCount )
- {
- pc = textfile[nLine].c_str();
- if ( *pc != wxT('#') )
- {
-
- wxLogTrace(TRACE_MIME, wxT("--- Reading from Gnome file %s '%s' ---"),
- filename.c_str(), pc);
-
- // trim trailing space and tab
- while ((*pc == wxT(' ')) || (*pc == wxT('\t')))
- pc++;
-
- wxString sTmp(pc);
- int equal_pos = sTmp.Find( wxT('=') );
- if (equal_pos > 0)
- {
- wxString left_of_equal = sTmp.Left( equal_pos );
- const wxChar *right_of_equal = pc;
- right_of_equal += equal_pos+1;
-
- if (left_of_equal == wxT("icon_filename"))
- {
- // GNOME 2:
- curIconFile = right_of_equal;
-
- wxFileName newFile( curIconFile );
- if (newFile.IsRelative() || newFile.FileExists())
- {
- size_t nDirs = search_dirs.GetCount();
-
- for (size_t nDir = 0; nDir < nDirs; nDir++)
- {
- newFile.SetPath( search_dirs[nDir] );
- newFile.AppendDir( wxT("pixmaps") );
- newFile.AppendDir( wxT("document-icons") );
- newFile.SetExt( wxT("png") );
- if (newFile.FileExists())
- {
- curIconFile = newFile.GetFullPath();
- // reorder search_dirs for speedup (fewer
- // calls to FileExist() required)
- if (nDir != 0)
- {
- const wxString &tmp = search_dirs[nDir];
- search_dirs.RemoveAt( nDir );
- search_dirs.Insert( tmp, 0 );
- }
- break;
- }
- }
- }
- }
- else if (left_of_equal == wxT("open"))
- {
- sTmp = right_of_equal;
- sTmp.Replace( wxT("%f"), wxT("%s") );
- sTmp.Prepend( wxT("open=") );
- entry->Add(sTmp);
- }
- else if (left_of_equal == wxT("view"))
- {
- sTmp = right_of_equal;
- sTmp.Replace( wxT("%f"), wxT("%s") );
- sTmp.Prepend( wxT("view=") );
- entry->Add(sTmp);
- }
- else if (left_of_equal == wxT("print"))
- {
- sTmp = right_of_equal;
- sTmp.Replace( wxT("%f"), wxT("%s") );
- sTmp.Prepend( wxT("print=") );
- entry->Add(sTmp);
- }
- else if (left_of_equal == wxT("description"))
- {
- strDesc = right_of_equal;
- }
- else if (left_of_equal == wxT("short_list_application_ids_for_novice_user_level"))
- {
- sTmp = right_of_equal;
- if (sTmp.Contains( wxT(",") ))
- sTmp = sTmp.BeforeFirst( wxT(',') );
- sTmp.Prepend( wxT("open=") );
- sTmp.Append( wxT(" %s") );
- entry->Add(sTmp);
- }
-
- } // emd of has an equals sign
- else
- {
- // not a comment and not an equals sign
- if (sTmp.Contains(wxT('/')))
- {
- // this is the start of the new mimetype
- // overwrite any existing data
- if (! curMimeType.empty())
- {
- AddToMimeData( curMimeType, curIconFile, entry, strExtensions, strDesc );
-
- // now get ready for next bit
- entry = new wxMimeTypeCommands;
- }
-
- curMimeType = sTmp.BeforeFirst(wxT(':'));
- }
- }
- } // end of not a comment
-
- // ignore blank lines
- nLine++;
- } // end of while, save any data
-
- if ( curMimeType.empty() )
- delete entry;
- else
- AddToMimeData( curMimeType, curIconFile, entry, strExtensions, strDesc);
-}
-
-void wxMimeTypesManagerImpl::LoadGnomeMimeTypesFromMimeFile(const wxString& filename)
-{
- wxMimeTextFile textfile(filename);
- if ( !textfile.Open() )
- return;
-
- wxLogTrace(TRACE_MIME,
- wxT("--- Opened Gnome file %s ---"),
- filename.c_str());
-
- // values for the entry being parsed
- wxString curMimeType, curExtList;
-
- const wxChar *pc;
- size_t nLineCount = textfile.GetLineCount();
- for ( size_t nLine = 0; /* nothing */; nLine++ )
- {
- if ( nLine < nLineCount )
- {
- pc = textfile[nLine].c_str();
- if ( *pc == wxT('#') )
- {
- // skip comments
- continue;
- }
- }
- else
- {
- // so that we will fall into the "if" below
- pc = NULL;
- }
-
- if ( !pc || !*pc )
- {
- // end of the entry
- if ( !curMimeType.empty() && !curExtList.empty() )
- {
- wxLogTrace(TRACE_MIME,
- wxT("--- At end of Gnome file finding mimetype %s ---"),
- curMimeType.c_str());
-
- AddMimeTypeInfo(curMimeType, curExtList, wxEmptyString);
- }
-
- if ( !pc )
- {
- // the end: this can only happen if nLine == nLineCount
- break;
- }
-
- curExtList.Empty();
-
- continue;
- }
-
- // what do we have here?
- if ( *pc == wxT('\t') )
- {
- // this is a field=value ling
- pc++; // skip leading TAB
-
- static const int lenField = 5; // strlen("ext: ")
- if ( wxStrncmp(pc, wxT("ext: "), lenField) == 0 )
- {
- // skip it and take everything left until the end of line
- curExtList = pc + lenField;
- }
- //else: some other field, we don't care
- }
- else
- {
- // this is the start of the new section
- wxLogTrace(TRACE_MIME,
- wxT("--- In Gnome file finding mimetype %s ---"),
- curMimeType.c_str());
-
- if (! curMimeType.empty())
- AddMimeTypeInfo(curMimeType, curExtList, wxEmptyString);
-
- curMimeType.Empty();
-
- while ( *pc != wxT(':') && *pc != wxT('\0') )
- {
- curMimeType += *pc++;
- }
- }
- }
-}
-
-
-void wxMimeTypesManagerImpl::LoadGnomeMimeFilesFromDir(
- const wxString& dirbase, const wxArrayString& dirs)
-{
- wxASSERT_MSG( !dirbase.empty() && !wxEndsWithPathSeparator(dirbase),
- wxT("base directory shouldn't end with a slash") );
-
- wxString dirname = dirbase;
- dirname << wxT("/mime-info");
-
- // Don't complain if we don't have permissions to read - it confuses users
- wxLogNull logNull;
-
- if ( !wxDir::Exists(dirname) )
- return;
-
- wxDir dir(dirname);
- if ( !dir.IsOpened() )
- return;
-
- // we will concatenate it with filename to get the full path below
- dirname += wxT('/');
-
- wxString filename;
- bool cont;
-
- cont = dir.GetFirst(&filename, wxT("*.mime"), wxDIR_FILES);
- while ( cont )
- {
- LoadGnomeMimeTypesFromMimeFile(dirname + filename);
-
- cont = dir.GetNext(&filename);
- }
-
- cont = dir.GetFirst(&filename, wxT("*.keys"), wxDIR_FILES);
- while ( cont )
- {
- LoadGnomeDataFromKeyFile(dirname + filename, dirs);
-
- cont = dir.GetNext(&filename);
- }
-
- // FIXME: Hack alert: We scan all icons and deduce the
- // mime-type from the file name.
- dirname = dirbase;
- dirname << wxT("/pixmaps/document-icons");
-
- // these are always empty in this file
- wxArrayString strExtensions;
- wxString strDesc;
-
- if ( !wxDir::Exists(dirname) )
- {
- // Just test for default GPE dir also
- dirname = wxT("/usr/share/gpe/pixmaps/default/filemanager/document-icons");
-
- if ( !wxDir::Exists(dirname) )
- return;
- }
-
- wxDir dir2( dirname );
-
- cont = dir2.GetFirst(&filename, wxT("gnome-*.png"), wxDIR_FILES);
- while ( cont )
- {
- wxString mimeType = filename;
- mimeType.Remove( 0, 6 ); // remove "gnome-"
- mimeType.Remove( mimeType.Len() - 4, 4 ); // remove ".png"
- int pos = mimeType.Find( wxT("-") );
- if (pos != wxNOT_FOUND)
- {
- mimeType.SetChar( pos, wxT('/') );
- wxString iconFile = dirname;
- iconFile << wxT("/");
- iconFile << filename;
- AddToMimeData( mimeType, iconFile, NULL, strExtensions, strDesc, true );
- }
-
- cont = dir2.GetNext(&filename);
- }
-}
-
-void wxMimeTypesManagerImpl::GetGnomeMimeInfo(const wxString& sExtraDir)
-{
- wxArrayString dirs;
-
- wxString gnomedir = wxGetenv( wxT("GNOMEDIR") );
- if (!gnomedir.empty())
- {
- gnomedir << wxT("/share");
- dirs.Add( gnomedir );
- }
-
- dirs.Add(wxT("/usr/share"));
- dirs.Add(wxT("/usr/local/share"));
-
- gnomedir = wxGetHomeDir();
- gnomedir << wxT("/.gnome");
- dirs.Add( gnomedir );
-
- if (!sExtraDir.empty())
- dirs.Add( sExtraDir );
-
- size_t nDirs = dirs.GetCount();
- for ( size_t nDir = 0; nDir < nDirs; nDir++ )
- {
- LoadGnomeMimeFilesFromDir(dirs[nDir], dirs);
- }
-}
// ----------------------------------------------------------------------------
// KDE
return bTemp;
}
-void wxMimeTypesManagerImpl::LoadKDELinksForMimeSubtype(const wxString& dirbase,
- const wxString& subdir,
- const wxString& filename,
- const wxArrayString& icondirs)
-{
- wxFileName fullname(dirbase, filename);
- wxLogTrace(TRACE_MIME, wxT("loading KDE file %s"),
- fullname.GetFullPath().c_str());
-
- wxMimeTextFile file;
- if ( !file.Open(fullname.GetFullPath()) )
- return;
-
- wxMimeTypeCommands * entry = new wxMimeTypeCommands;
- wxArrayString sExts;
- wxString mimetype, mime_desc, strIcon;
-
- int nIndex = file.pIndexOf( wxT("MimeType=") );
- if (nIndex == wxNOT_FOUND)
- {
- // construct mimetype from the directory name and the basename of the
- // file (it always has .kdelnk extension)
- mimetype << subdir << wxT('/') << filename.BeforeLast( wxT('.') );
- }
- else
- mimetype = file.GetCmd(nIndex);
-
- // first find the description string: it is the value in either "Comment="
- // line or "Comment[<locale_name>]=" one
- nIndex = wxNOT_FOUND;
-
- wxString comment;
-
-#if wxUSE_INTL
- wxLocale *locale = wxGetLocale();
- if ( locale )
- {
- // try "Comment[locale name]" first
- comment << wxT("Comment[") + locale->GetName() + wxT("]=");
- nIndex = file.pIndexOf(comment);
- }
-#endif
-
- if ( nIndex == wxNOT_FOUND )
- {
- comment = wxT("Comment=");
- nIndex = file.pIndexOf(comment);
- }
-
- if ( nIndex != wxNOT_FOUND )
- mime_desc = file.GetCmd(nIndex);
- //else: no description
-
- // next find the extensions
- wxString mime_extension;
-
- nIndex = file.pIndexOf(wxT("Patterns="));
- if ( nIndex != wxNOT_FOUND )
- {
- wxString exts = file.GetCmd(nIndex);
-
- wxStringTokenizer tokenizer(exts, wxT(";"));
- while ( tokenizer.HasMoreTokens() )
- {
- wxString e = tokenizer.GetNextToken();
-
- // don't support too difficult patterns
- if ( e.Left(2) != wxT("*.") )
- continue;
-
- if ( !mime_extension.empty() )
- {
- // separate from the previous ext
- mime_extension << wxT(' ');
- }
-
- mime_extension << e.Mid(2);
- }
- }
-
- sExts.Add(mime_extension);
-
- // ok, now we can take care of icon:
-
- nIndex = file.pIndexOf(wxT("Icon="));
- if ( nIndex != wxNOT_FOUND )
- {
- strIcon = file.GetCmd(nIndex);
-
- wxLogTrace(TRACE_MIME, wxT(" icon %s"), strIcon.c_str());
-
- // it could be the real path, but more often a short name
- if (!wxFileExists(strIcon))
- {
- // icon is just the short name
- if ( !strIcon.empty() )
- {
- // we must check if the file exists because it may be stored
- // in many locations, at least ~/.kde and $KDEDIR
- size_t nDir, nDirs = icondirs.GetCount();
- for ( nDir = 0; nDir < nDirs; nDir++ )
- {
- wxFileName fnameIcon( strIcon );
- wxFileName fname( icondirs[nDir], fnameIcon.GetName() );
- fname.SetExt( wxT("png") );
- if (fname.FileExists())
- {
- strIcon = fname.GetFullPath();
- wxLogTrace(TRACE_MIME, wxT(" iconfile %s"), strIcon.c_str());
- break;
- }
- }
- }
- }
- }
-
- // now look for lines which know about the application
- // exec= or DefaultApp=
-
- nIndex = file.pIndexOf(wxT("DefaultApp"));
-
- if ( nIndex == wxNOT_FOUND )
- {
- // no entry try exec
- nIndex = file.pIndexOf(wxT("Exec"));
- }
-
- if ( nIndex != wxNOT_FOUND )
- {
- // we expect %f; others including %F and %U and %u are possible
- wxString sTmp = file.GetCmd(nIndex);
- if (0 == sTmp.Replace( wxT("%f"), wxT("%s") ))
- sTmp += wxT(" %s");
- entry->AddOrReplaceVerb(wxString(wxT("open")), sTmp );
- }
-
- AddToMimeData(mimetype, strIcon, entry, sExts, mime_desc);
-}
-
-void wxMimeTypesManagerImpl::LoadKDELinksForMimeType(const wxString& dirbase,
- const wxString& subdir,
- const wxArrayString& icondirs)
-{
- wxFileName dirname(dirbase, wxEmptyString);
- dirname.AppendDir(subdir);
-
- // Don't complain if we don't have permissions to read - it confuses users
- wxLogNull logNull;
-
- wxDir dir(dirname.GetPath());
- if(! dir.IsOpened())
- return;
-
- wxLogTrace(TRACE_MIME, wxT("--- Loading from KDE directory %s ---"),
- dirname.GetPath().c_str());
-
- wxString filename;
- bool cont = dir.GetFirst(&filename, wxT("*.kdelnk"), wxDIR_FILES);
- while(cont) {
- LoadKDELinksForMimeSubtype(dirname.GetPath(), subdir,
- filename, icondirs);
- cont = dir.GetNext(&filename);
- }
-
- // new standard for Gnome and KDE
- cont = dir.GetFirst(&filename, wxT("*.desktop"), wxDIR_FILES);
- while(cont) {
- LoadKDELinksForMimeSubtype(dirname.GetPath(), subdir,
- filename, icondirs);
- cont = dir.GetNext(&filename);
- }
-}
-
-void wxMimeTypesManagerImpl::LoadKDELinkFilesFromDir(const wxString& dirname,
- const wxArrayString& icondirs)
-{
- // Don't complain if we don't have permissions to read - it confuses users
- wxLogNull logNull;
-
- if(! wxDir::Exists(dirname))
- return;
-
- wxDir dir(dirname);
- if ( !dir.IsOpened() )
- return;
-
- wxString subdir;
- bool cont = dir.GetFirst(&subdir, wxEmptyString, wxDIR_DIRS);
- while ( cont )
- {
- LoadKDELinksForMimeType(dirname, subdir, icondirs);
-
- cont = dir.GetNext(&subdir);
- }
-}
-
// Read a KDE .desktop file of type 'Application'
void wxMimeTypesManagerImpl::LoadKDEApp(const wxString& filename)
{
wxMimeTextFile file;
if ( !file.Open(filename) )
return;
-
+
// Here, only type 'Application' should be considered.
- int nIndex = file.pIndexOf( wxT("Type=") );
- if (nIndex != wxNOT_FOUND &&
- file.GetCmd(nIndex).Lower() != wxT("application"))
+ int nIndex = file.pIndexOf( "Type=" );
+ if (nIndex != wxNOT_FOUND && file.GetCmd(nIndex) != "application")
return;
// The hidden entry specifies a file to be ignored.
- nIndex = file.pIndexOf( wxT("Hidden=") );
- if (nIndex != wxNOT_FOUND && file.GetCmd(nIndex).Lower() == wxT("true"))
+ nIndex = file.pIndexOf( "Hidden=" );
+ if (nIndex != wxNOT_FOUND && file.GetCmd(nIndex) == "true")
return;
// Semicolon separated list of mime types handled by the application.
wxString filename;
// Look into .desktop files
bool cont = dir.GetFirst(&filename, _T("*.desktop"), wxDIR_FILES);
- while(cont) {
+ while (cont)
+ {
wxFileName p(dirname, filename);
LoadKDEApp( p.GetFullPath() );
cont = dir.GetNext(&filename);
}
+
+ return;
+
// Look recursively into subdirs
cont = dir.GetFirst(&filename, wxEmptyString, wxDIR_DIRS);
- while(cont) {
+ while (cont)
+ {
wxFileName p(dirname, wxEmptyString);
p.AppendDir(filename);
LoadKDEAppsFilesFromDir( p.GetPath() );
}
}
-// Return base KDE directories.
-// 1) Environment variable $KDEHOME, or "~/.kde" if not set.
-// 2) List of directories in colon separated environment variable $KDEDIRS.
-// 3) Environment variable $KDEDIR in case $KDEDIRS is not set.
-// Notice at least the local kde directory is added to the list. If it is the
-// only one, use later the application 'kde-config' to get additional paths.
-static void GetKDEBaseDirs(wxArrayString& basedirs)
-{
- wxString env = wxGetenv( wxT("KDEHOME") );
- if(env.IsEmpty())
- env = wxGetHomeDir() + wxT("/.kde");
- basedirs.Add(env);
-
- env = wxGetenv( wxT("KDEDIRS") );
- if(env.IsEmpty()) {
- env = wxGetenv( wxT("KDEDIR") );
- if(! env.IsEmpty())
- basedirs.Add(env);
- } else {
- wxStringTokenizer tokenizer(env, wxT(":"));
- while(tokenizer.HasMoreTokens())
- basedirs.Add( tokenizer.GetNextToken() );
- }
-}
-
-static wxString ReadPathFromKDEConfig(const wxString& request)
-{
- wxString str;
- wxArrayString output;
- if(wxExecute(wxT("kde-config --path ")+request, output) == 0 &&
- output.GetCount() > 0)
- str = output.Item(0);
- return str;
-}
-
-// Try to find the "Theme" entry in the configuration file, provided it exists.
-static wxString GetKDEThemeInFile(const wxFileName& filename)
-{
- wxString theme;
- wxMimeTextFile config;
- if ( filename.FileExists() && config.Open(filename.GetFullPath()) )
- {
- size_t cnt = config.GetLineCount();
- for ( size_t i = 0; i < cnt; i++ )
- {
- if ( config[i].StartsWith(wxT("Theme="), &theme) )
- break;
- }
- }
-
- return theme;
-}
-
-// Try to find a file "kdeglobals" in one of the directories and read the
-// "Theme" entry there.
-static wxString GetKDETheme(const wxArrayString& basedirs)
-{
- wxString theme;
- for(size_t i = 0; i < basedirs.GetCount(); i++) {
- wxFileName filename(basedirs.Item(i), wxEmptyString);
- filename.AppendDir( wxT("share") );
- filename.AppendDir( wxT("config") );
- filename.SetName( wxT("kdeglobals") );
- theme = GetKDEThemeInFile(filename);
- if(! theme.IsEmpty())
- return theme;
- }
- // If $KDEDIRS and $KDEDIR were set, we try nothing more. Otherwise, we
- // try to get the configuration file with 'kde-config'.
- if(basedirs.GetCount() > 1)
- return theme;
- wxString paths = ReadPathFromKDEConfig(wxT("config"));
- if(! paths.IsEmpty()) {
- wxStringTokenizer tokenizer(paths, wxT(":"));
- while( tokenizer.HasMoreTokens() ) {
- wxFileName filename(tokenizer.GetNextToken(), wxT("kdeglobals"));
- theme = GetKDEThemeInFile(filename);
- if(! theme.IsEmpty())
- return theme;
- }
- }
- return theme;
-}
-
-// Get list of directories of icons.
-static void GetKDEIconDirs(const wxArrayString& basedirs,
- wxArrayString& icondirs)
-{
- wxString theme = GetKDETheme(basedirs);
- if(theme.IsEmpty())
- theme = wxT("default.kde");
-
- for(size_t i = 0; i < basedirs.GetCount(); i++) {
- wxFileName dirname(basedirs.Item(i), wxEmptyString);
- dirname.AppendDir( wxT("share") );
- dirname.AppendDir( wxT("icons") );
- dirname.AppendDir(theme);
- dirname.AppendDir( wxT("32x32") );
- dirname.AppendDir( wxT("mimetypes") );
- if( wxDir::Exists( dirname.GetPath() ) )
- icondirs.Add( dirname.GetPath() );
- }
-
- // If $KDEDIRS and $KDEDIR were not set, use 'kde-config'
- if(basedirs.GetCount() > 1)
- return;
- wxString paths = ReadPathFromKDEConfig(wxT("icon"));
- if(! paths.IsEmpty()) {
- wxStringTokenizer tokenizer(paths, wxT(":"));
- while( tokenizer.HasMoreTokens() ) {
- wxFileName dirname(tokenizer.GetNextToken(), wxEmptyString);
- dirname.AppendDir(theme);
- dirname.AppendDir( wxT("32x32") );
- dirname.AppendDir( wxT("mimetypes") );
- if(icondirs.Index(dirname.GetPath()) == wxNOT_FOUND &&
- wxDir::Exists( dirname.GetPath() ) )
- icondirs.Add( dirname.GetPath() );
- }
- }
-}
-
-// Get list of directories of mime types.
-static void GetKDEMimeDirs(const wxArrayString& basedirs,
- wxArrayString& mimedirs)
-{
- for(size_t i = 0; i < basedirs.GetCount(); i++) {
- wxFileName dirname(basedirs.Item(i), wxEmptyString);
- dirname.AppendDir( wxT("share") );
- dirname.AppendDir( wxT("mimelnk") );
- if( wxDir::Exists( dirname.GetPath() ) )
- mimedirs.Add( dirname.GetPath() );
- }
-
- // If $KDEDIRS and $KDEDIR were not set, use 'kde-config'
- if(basedirs.GetCount() > 1)
- return;
- wxString paths = ReadPathFromKDEConfig(wxT("mime"));
- if(! paths.IsEmpty()) {
- wxStringTokenizer tokenizer(paths, wxT(":"));
- while( tokenizer.HasMoreTokens() ) {
- wxFileName p(tokenizer.GetNextToken(), wxEmptyString);
- wxString dirname = p.GetPath(); // To remove possible trailing '/'
- if(mimedirs.Index(dirname) == wxNOT_FOUND &&
- wxDir::Exists(dirname) )
- mimedirs.Add(dirname);
- }
- }
-}
-
-// Get list of directories of application desktop files.
-static void GetKDEAppsDirs(const wxArrayString& basedirs,
- wxArrayString& appsdirs)
-{
- for(size_t i = 0; i < basedirs.GetCount(); i++) {
- wxFileName dirname(basedirs.Item(i), wxEmptyString);
- dirname.AppendDir( wxT("share") );
- dirname.AppendDir( wxT("applnk") );
- if( wxDir::Exists( dirname.GetPath() ) )
- appsdirs.Add( dirname.GetPath() );
- }
-
- // If $KDEDIRS and $KDEDIR were not set, use 'kde-config'
- if(basedirs.GetCount() > 1)
- return;
- wxString paths = ReadPathFromKDEConfig(wxT("apps"));
- if(! paths.IsEmpty()) {
- wxStringTokenizer tokenizer(paths, wxT(":"));
- while( tokenizer.HasMoreTokens() ) {
- wxFileName p(tokenizer.GetNextToken(), wxEmptyString);
- wxString dirname = p.GetPath(); // To remove possible trailing '/'
- if(appsdirs.Index(dirname) == wxNOT_FOUND &&
- wxDir::Exists(dirname) )
- appsdirs.Add(dirname);
- }
- }
- paths = ReadPathFromKDEConfig(wxT("xdgdata-apps"));
- if(! paths.IsEmpty()) {
- wxStringTokenizer tokenizer(paths, wxT(":"));
- while( tokenizer.HasMoreTokens() ) {
- wxFileName p(tokenizer.GetNextToken(), wxEmptyString);
- wxString dirname = p.GetPath(); // To remove possible trailing '/'
- if(appsdirs.Index(dirname) == wxNOT_FOUND &&
- wxDir::Exists(dirname) )
- appsdirs.Add(dirname);
- }
- }
-}
-
-// Fill database with all mime types.
-void wxMimeTypesManagerImpl::GetKDEMimeInfo(const wxString& sExtraDir)
-{
- wxArrayString basedirs;
- GetKDEBaseDirs(basedirs);
-
- wxArrayString icondirs;
- GetKDEIconDirs(basedirs, icondirs);
- wxArrayString mimedirs;
- GetKDEMimeDirs(basedirs, mimedirs);
- wxArrayString appsdirs;
- GetKDEAppsDirs(basedirs, appsdirs);
-
- if(! sExtraDir.IsEmpty()) {
- icondirs.Add(sExtraDir + wxT("/icons"));
- mimedirs.Add(sExtraDir + wxT("/mimelnk"));
- appsdirs.Add(sExtraDir + wxT("/applnk"));
- }
-
- // Load mime types
- size_t nDirs = mimedirs.GetCount(), nDir;
- for(nDir = 0; nDir < nDirs; nDir++)
- LoadKDELinkFilesFromDir(mimedirs[nDir], icondirs);
-
- // Load application files and associate them to corresponding mime types.
- nDirs = appsdirs.GetCount();
- for(nDir = 0; nDir < nDirs; nDir++)
- LoadKDEAppsFilesFromDir(appsdirs[nDir]);
-}
// ----------------------------------------------------------------------------
// wxFileTypeImpl (Unix)
wxMimeTypesManagerImpl::wxMimeTypesManagerImpl()
{
m_initialized = false;
- m_mailcapStylesInited = 0;
}
void wxMimeTypesManagerImpl::InitIfNeeded()
void wxMimeTypesManagerImpl::Initialize(int mailcapStyles,
const wxString& sExtraDir)
{
- // read mimecap amd mime.types
- if ( (mailcapStyles & wxMAILCAP_NETSCAPE) ||
- (mailcapStyles & wxMAILCAP_STANDARD) )
- GetMimeInfo(sExtraDir);
-
- // read GNOME tables
- if (mailcapStyles & wxMAILCAP_GNOME)
- GetGnomeMimeInfo(sExtraDir);
-
- // read KDE tables which are never installed on OpenVMS
-#ifndef __VMS
- if (mailcapStyles & wxMAILCAP_KDE)
- GetKDEMimeInfo(sExtraDir);
+#ifdef __VMS
+ // XDG tables are never installed on OpenVMS
+ return;
#endif
// Load desktop files for Gnome, and then override them with the Gnome defaults.
// We will override them one desktop file at a time, rather
// than one mime type at a time, but it should be a reasonable
// heuristic.
- if (mailcapStyles & wxMAILCAP_GNOME)
{
wxString xdgDataHome = wxGetenv(wxT("XDG_DATA_HOME"));
if ( xdgDataHome.empty() )
size_t i;
for (i = 0; i < dirs.GetCount(); i++)
{
- wxString f(dirs[i] + wxT("/applications/defaults.list"));
+ wxString f = dirs[i];
+ if (f.Last() != '/') f += '/';
+ f += "applications/defaults.list";
if (wxFileExists(f))
{
defaultsList = f;
size_t nDirs = dirs.GetCount();
for (size_t nDir = 0; nDir < nDirs; nDir++)
{
- wxString dirStr(dirs[nDir] + wxT("/applications"));
+ wxString dirStr = dirs[nDir];
+ if (dirStr.Last() != '/') dirStr += '/';
+ dirStr += "applications";
LoadKDEAppsFilesFromDir(dirStr);
}
{
for (i = nIndex+1; i < textfile.GetLineCount(); i++)
{
- if (textfile[i].Find(wxT("=")) != wxNOT_FOUND)
+ if (textfile.GetLine(i).Find(wxT("=")) != wxNOT_FOUND)
{
wxString mimeType = textfile.GetVerb(i);
wxString desktopFile = textfile.GetCmd(i);
-
+
if (deskTopFilesSeen.Index(desktopFile) == wxNOT_FOUND)
{
deskTopFilesSeen.Add(desktopFile);
size_t j;
- for (j = 0; j < dirs.GetCount(); j++)
- {
- wxString desktopPath(dirs[j] + wxT("/applications/") + desktopFile);
- if (wxFileExists(desktopPath))
- {
- LoadKDEApp(desktopPath);
- }
- }
- }
- }
- }
- }
- }
- }
- }
-
- m_mailcapStylesInited |= mailcapStyles;
-}
-
-// clear data so you can read another group of WM files
-void wxMimeTypesManagerImpl::ClearData()
-{
- m_aTypes.Clear();
- m_aIcons.Clear();
- m_aExtensions.Clear();
- m_aDescriptions.Clear();
-
- WX_CLEAR_ARRAY(m_aEntries);
- m_aEntries.Empty();
-
- m_mailcapStylesInited = 0;
-}
-
-wxMimeTypesManagerImpl::~wxMimeTypesManagerImpl()
-{
- ClearData();
-}
-
-void wxMimeTypesManagerImpl::GetMimeInfo(const wxString& sExtraDir)
-{
- // read this for netscape or Metamail formats
-
- // directories where we look for mailcap and mime.types by default
- // used by netscape and pine and other mailers, using 2 different formats!
-
- // (taken from metamail(1) sources)
- //
- // although RFC 1524 specifies the search path of
- // /etc/:/usr/etc:/usr/local/etc only, it doesn't hurt to search in more
- // places - OTOH, the RFC also says that this path can be changed with
- // MAILCAPS environment variable (containing the colon separated full
- // filenames to try) which is not done yet (TODO?)
-
- wxString strHome = wxGetenv(wxT("HOME"));
-
- wxArrayString dirs;
- dirs.Add( strHome + wxT("/.") );
- dirs.Add( wxT("/etc/") );
- dirs.Add( wxT("/usr/etc/") );
- dirs.Add( wxT("/usr/local/etc/") );
- dirs.Add( wxT("/etc/mail/") );
- dirs.Add( wxT("/usr/public/lib/") );
- if (!sExtraDir.empty())
- dirs.Add( sExtraDir + wxT("/") );
-
- wxString file;
- size_t nDirs = dirs.GetCount();
- for ( size_t nDir = 0; nDir < nDirs; nDir++ )
- {
- file = dirs[nDir];
- file += wxT("mailcap");
- if ( wxFile::Exists(file) )
- {
- ReadMailcap(file);
- }
-
- file = dirs[nDir];
- file += wxT("mime.types");
- if ( wxFile::Exists(file) )
- ReadMimeTypes(file);
- }
-}
-
-bool wxMimeTypesManagerImpl::WriteToMimeTypes(int index, bool delete_index)
-{
- // check we have the right manager
- if (! ( m_mailcapStylesInited & wxMAILCAP_STANDARD) )
- return false;
-
- bool bTemp;
- wxString strHome = wxGetenv(wxT("HOME"));
-
- // and now the users mailcap
- wxString strUserMailcap = strHome + wxT("/.mime.types");
-
- wxMimeTextFile file;
- if ( wxFile::Exists(strUserMailcap) )
- {
- bTemp = file.Open(strUserMailcap);
- }
- else
- {
- if (delete_index)
- return false;
-
- bTemp = file.Create(strUserMailcap);
- }
-
- if (bTemp)
- {
- int nIndex;
- // test for netscape's header and return false if its found
- nIndex = file.pIndexOf(wxT("#--Netscape"));
- if (nIndex != wxNOT_FOUND)
- {
- wxFAIL_MSG(wxT("Error in .mime.types\nTrying to mix Netscape and Metamail formats\nFile not modified"));
- return false;
- }
-
- // write it in alternative format
- // get rid of unwanted entries
- wxString strType = m_aTypes[index];
- nIndex = file.pIndexOf(strType);
-
- // get rid of all the unwanted entries...
- if (nIndex != wxNOT_FOUND)
- file.CommentLine(nIndex);
-
- if (!delete_index)
- {
- // add the new entries in
- wxString sTmp = strType.Append( wxT(' '), 40 - strType.Len() );
- sTmp += m_aExtensions[index];
- file.AddLine(sTmp);
- }
-
- bTemp = file.Write();
- file.Close();
- }
-
- return bTemp;
-}
-
-bool wxMimeTypesManagerImpl::WriteToNSMimeTypes(int index, bool delete_index)
-{
- //check we have the right managers
- if (! ( m_mailcapStylesInited & wxMAILCAP_NETSCAPE) )
- return false;
-
- bool bTemp;
- wxString strHome = wxGetenv(wxT("HOME"));
-
- // and now the users mailcap
- wxString strUserMailcap = strHome + wxT("/.mime.types");
-
- wxMimeTextFile file;
- if ( wxFile::Exists(strUserMailcap) )
- {
- bTemp = file.Open(strUserMailcap);
- }
- else
- {
- if (delete_index)
- return false;
-
- bTemp = file.Create(strUserMailcap);
- }
-
- if (bTemp)
- {
- // write it in the format that Netscape uses
- int nIndex;
- // test for netscape's header and insert if required...
- // this is a comment so use true
- nIndex = file.pIndexOf(wxT("#--Netscape"), true);
- if (nIndex == wxNOT_FOUND)
- {
- // either empty file or metamail format
- // at present we can't cope with mixed formats, so exit to preseve
- // metamail entreies
- if (file.GetLineCount() > 0)
- {
- wxFAIL_MSG(wxT(".mime.types File not in Netscape format\nNo entries written to\n.mime.types or to .mailcap"));
- return false;
- }
-
- file.InsertLine(wxT( "#--Netscape Communications Corporation MIME Information" ), 0);
- nIndex = 0;
- }
-
- wxString strType = wxT("type=") + m_aTypes[index];
- nIndex = file.pIndexOf(strType);
-
- // get rid of all the unwanted entries...
- if (nIndex != wxNOT_FOUND)
- {
- wxString sOld = file[nIndex];
- while ( (sOld.Contains(wxT("\\"))) && (nIndex < (int) file.GetLineCount()) )
- {
- file.CommentLine(nIndex);
- sOld = file[nIndex];
-
- wxLogTrace(TRACE_MIME, wxT("--- Deleting from mime.types line '%d %s' ---"), nIndex, sOld.c_str());
-
- nIndex++;
- }
-
- if (nIndex < (int) file.GetLineCount())
- file.CommentLine(nIndex);
- }
- else
- nIndex = (int) file.GetLineCount();
-
- wxString sTmp = strType + wxT(" \\");
- if (!delete_index)
- file.InsertLine(sTmp, nIndex);
-
- if ( ! m_aDescriptions.Item(index).empty() )
- {
- sTmp = wxT("desc=\"") + m_aDescriptions[index]+ wxT("\" \\"); //.trim ??
- if (!delete_index)
- {
- nIndex++;
- file.InsertLine(sTmp, nIndex);
- }
- }
-
- wxString sExts = m_aExtensions.Item(index);
- sTmp = wxT("exts=\"") + sExts.Trim(false).Trim() + wxT("\"");
- if (!delete_index)
- {
- nIndex++;
- file.InsertLine(sTmp, nIndex);
- }
-
- bTemp = file.Write();
- file.Close();
- }
-
- return bTemp;
-}
-
-bool wxMimeTypesManagerImpl::WriteToMailCap(int index, bool delete_index)
-{
- //check we have the right managers
- if ( !( ( m_mailcapStylesInited & wxMAILCAP_NETSCAPE) ||
- ( m_mailcapStylesInited & wxMAILCAP_STANDARD) ) )
- return false;
-
- bool bTemp = false;
- wxString strHome = wxGetenv(wxT("HOME"));
-
- // and now the users mailcap
- wxString strUserMailcap = strHome + wxT("/.mailcap");
-
- wxMimeTextFile file;
- if ( wxFile::Exists(strUserMailcap) )
- {
- bTemp = file.Open(strUserMailcap);
- }
- else
- {
- if (delete_index)
- return false;
-
- bTemp = file.Create(strUserMailcap);
- }
-
- if (bTemp)
- {
- // now got a file we can write to ....
- wxMimeTypeCommands * entries = m_aEntries[index];
- size_t iOpen;
- wxString sCmd = entries->GetCommandForVerb(wxT("open"), &iOpen);
- wxString sTmp;
-
- sTmp = m_aTypes[index];
- wxString sOld;
- int nIndex = file.pIndexOf(sTmp);
-
- // get rid of all the unwanted entries...
- if (nIndex == wxNOT_FOUND)
- {
- nIndex = (int) file.GetLineCount();
- }
- else
- {
- sOld = file[nIndex];
- wxLogTrace(TRACE_MIME, wxT("--- Deleting from mailcap line '%d' ---"), nIndex);
-
- while ( (sOld.Contains(wxT("\\"))) && (nIndex < (int) file.GetLineCount()) )
- {
- file.CommentLine(nIndex);
- if (nIndex < (int) file.GetLineCount())
- sOld = sOld + file[nIndex];
- }
-
- if (nIndex < (int)
- file.GetLineCount()) file.CommentLine(nIndex);
- }
-
- sTmp += wxT(";") + sCmd; //includes wxT(" %s ");
-
- // write it in the format that Netscape uses (default)
- if (! ( m_mailcapStylesInited & wxMAILCAP_STANDARD ) )
- {
- if (! delete_index)
- file.InsertLine(sTmp, nIndex);
- nIndex++;
- }
- else
- {
- // write extended format
-
- // TODO - FIX this code:
- // ii) lost entries
- // sOld holds all the entries, but our data store only has some
- // eg test= is not stored
-
- // so far we have written the mimetype and command out
- wxStringTokenizer sT(sOld, wxT(";\\"));
- if (sT.CountTokens() > 2)
- {
- // first one mimetype; second one command, rest unknown...
- wxString s;
- s = sT.GetNextToken();
- s = sT.GetNextToken();
-
- // first unknown
- s = sT.GetNextToken();
- while ( ! s.empty() )
- {
- bool bKnownToken = false;
- if (s.Contains(wxT("description=")))
- bKnownToken = true;
- if (s.Contains(wxT("x11-bitmap=")))
- bKnownToken = true;
-
- size_t i;
- size_t nCount = entries->GetCount();
- for (i=0; i < nCount; i++)
- {
- if (s.Contains(entries->GetVerb(i)))
- bKnownToken = true;
- }
-
- if (!bKnownToken)
- {
- sTmp += wxT("; \\");
- file.InsertLine(sTmp, nIndex);
- sTmp = s;
- }
-
- s = sT.GetNextToken();
- }
- }
-
- if (! m_aDescriptions[index].empty() )
- {
- sTmp += wxT("; \\");
- file.InsertLine(sTmp, nIndex);
- nIndex++;
- sTmp = wxT(" description=\"") + m_aDescriptions[index] + wxT("\"");
- }
-
- if (! m_aIcons[index].empty() )
- {
- sTmp += wxT("; \\");
- file.InsertLine(sTmp, nIndex);
- nIndex++;
- sTmp = wxT(" x11-bitmap=\"") + m_aIcons[index] + wxT("\"");
- }
-
- if ( entries->GetCount() > 1 )
- {
- size_t i;
- for (i=0; i < entries->GetCount(); i++)
- if ( i != iOpen )
- {
- sTmp += wxT("; \\");
- file.InsertLine(sTmp, nIndex);
- nIndex++;
- sTmp = wxT(" ") + entries->GetVerbCmd(i);
+ for (j = 0; j < dirs.GetCount(); j++)
+ {
+ wxString desktopPath = dirs[j];
+ if (desktopPath.Last() == '/')
+ desktopPath += "applications/";
+ else
+ desktopPath += "/applications/";
+ desktopPath += desktopFile;
+
+ if (wxFileExists(desktopPath))
+ LoadKDEApp(desktopPath);
+ }
+ }
+ }
}
+ }
}
-
- file.InsertLine(sTmp, nIndex);
- nIndex++;
}
-
- bTemp = file.Write();
- file.Close();
}
+}
- return bTemp;
+// clear data so you can read another group of WM files
+void wxMimeTypesManagerImpl::ClearData()
+{
+ m_aTypes.Clear();
+ m_aIcons.Clear();
+ m_aExtensions.Clear();
+ m_aDescriptions.Clear();
+
+ WX_CLEAR_ARRAY(m_aEntries);
+ m_aEntries.Empty();
+}
+
+wxMimeTypesManagerImpl::~wxMimeTypesManagerImpl()
+{
+ ClearData();
}
wxFileType * wxMimeTypesManagerImpl::Associate(const wxFileTypeInfo& ftInfo)
{
bool ok = true;
- if ( m_mailcapStylesInited & wxMAILCAP_STANDARD )
- {
- // write in metamail format;
- if (WriteToMimeTypes(nIndex, delete_mime) )
- if ( WriteToMailCap(nIndex, delete_mime) )
- ok = false;
- }
-
- if ( m_mailcapStylesInited & wxMAILCAP_NETSCAPE )
- {
- // write in netsacpe format;
- if (WriteToNSMimeTypes(nIndex, delete_mime) )
- if ( WriteToMailCap(nIndex, delete_mime) )
- ok = false;
- }
-
// Don't write GNOME files here as this is not
// allowed and simply doesn't work
- if (m_mailcapStylesInited & wxMAILCAP_KDE)
+ // if (m_mailcapStylesInited & wxMAILCAP_KDE)
{
// write in KDE format;
if (WriteKDEMimeFile(nIndex, delete_mime) )
AddMimeTypeInfo(filetype.GetMimeType(),
extensions,
filetype.GetDescription());
-
- AddMailcapInfo(filetype.GetMimeType(),
- filetype.GetOpenCommand(),
- filetype.GetPrintCommand(),
- wxT(""),
- filetype.GetDescription());
}
void wxMimeTypesManagerImpl::AddMimeTypeInfo(const wxString& strMimeType,
AddToMimeData(strMimeType, strIcon, NULL, sExts, strDesc, true);
}
-void wxMimeTypesManagerImpl::AddMailcapInfo(const wxString& strType,
- const wxString& strOpenCmd,
- const wxString& strPrintCmd,
- const wxString& strTest,
- const wxString& strDesc)
-{
- InitIfNeeded();
-
- wxMimeTypeCommands *entry = new wxMimeTypeCommands;
- entry->Add(wxT("open=") + strOpenCmd);
- entry->Add(wxT("print=") + strPrintCmd);
- entry->Add(wxT("test=") + strTest);
-
- wxString strIcon;
- wxArrayString strExtensions;
-
- AddToMimeData(strType, strIcon, entry, strExtensions, strDesc, true);
-}
-
-bool wxMimeTypesManagerImpl::ReadMimeTypes(const wxString& strFileName)
-{
- wxLogTrace(TRACE_MIME, wxT("--- Parsing mime.types file '%s' ---"),
- strFileName.c_str());
-
- wxMimeTextFile file(strFileName);
- if ( !file.Open() )
- return false;
-
- // the information we extract
- wxString strMimeType, strDesc, strExtensions;
-
- size_t nLineCount = file.GetLineCount();
- const wxChar *pc = NULL;
- for ( size_t nLine = 0; nLine < nLineCount; nLine++ )
- {
- if ( pc == NULL )
- {
- // now we're at the start of the line
- pc = file[nLine].c_str();
- }
- else
- {
- // we didn't finish with the previous line yet
- nLine--;
- }
-
- // skip whitespace
- while ( wxIsspace(*pc) )
- pc++;
-
- // comment or blank line?
- if ( *pc == wxT('#') || !*pc )
- {
- // skip the whole line
- pc = NULL;
- continue;
- }
-
- // detect file format
- const wxChar *pEqualSign = wxStrchr(pc, wxT('='));
- if ( pEqualSign == NULL )
- {
- // brief format
- // ------------
-
- // first field is mime type
- for ( strMimeType.Empty(); !wxIsspace(*pc) && *pc != wxT('\0'); pc++ )
- {
- strMimeType += *pc;
- }
-
- // skip whitespace
- while ( wxIsspace(*pc) )
- pc++;
-
- // take all the rest of the string
- strExtensions = pc;
-
- // no description...
- strDesc.Empty();
- }
- else
- {
- // expanded format
- // ---------------
-
- // the string on the left of '=' is the field name
- wxString strLHS(pc, pEqualSign - pc);
-
- // eat whitespace
- for ( pc = pEqualSign + 1; wxIsspace(*pc); pc++ )
- ;
-
- const wxChar *pEnd;
- if ( *pc == wxT('"') )
- {
- // the string is quoted and ends at the matching quote
- pEnd = wxStrchr(++pc, wxT('"'));
- if ( pEnd == NULL )
- {
- wxLogWarning(wxT("Mime.types file %s, line %lu: unterminated quoted string."),
- strFileName.c_str(), nLine + 1L);
- }
- }
- else
- {
- // unquoted string ends at the first space or at the end of
- // line
- for ( pEnd = pc; *pEnd && !wxIsspace(*pEnd); pEnd++ )
- ;
- }
-
- // now we have the RHS (field value)
- wxString strRHS(pc, pEnd - pc);
-
- // check what follows this entry
- if ( *pEnd == wxT('"') )
- {
- // skip this quote
- pEnd++;
- }
-
- for ( pc = pEnd; wxIsspace(*pc); pc++ )
- ;
-
- // if there is something left, it may be either a '\\' to continue
- // the line or the next field of the same entry
- bool entryEnded = *pc == wxT('\0');
- bool nextFieldOnSameLine = false;
- if ( !entryEnded )
- {
- nextFieldOnSameLine = ((*pc != wxT('\\')) || (pc[1] != wxT('\0')));
- }
-
- // now see what we got
- if ( strLHS == wxT("type") )
- {
- strMimeType = strRHS;
- }
- else if ( strLHS.StartsWith(wxT("desc")) )
- {
- strDesc = strRHS;
- }
- else if ( strLHS == wxT("exts") )
- {
- strExtensions = strRHS;
- }
- else if ( strLHS == wxT("icon") )
- {
- // this one is simply ignored: it usually refers to Netscape
- // built in icons which are useless for us anyhow
- }
- else if ( !strLHS.StartsWith(wxT("x-")) )
- {
- // we suppose that all fields starting with "X-" are
- // unregistered extensions according to the standard practice,
- // but it may be worth telling the user about other junk in
- // his mime.types file
- wxLogWarning(wxT("Unknown field in file %s, line %lu: '%s'."),
- strFileName.c_str(), nLine + 1L, strLHS.c_str());
- }
-
- if ( !entryEnded )
- {
- if ( !nextFieldOnSameLine )
- pc = NULL;
- //else: don't reset it
-
- // as we don't reset strMimeType, the next field in this entry
- // will be interpreted correctly.
-
- continue;
- }
- }
-
- // depending on the format (Mosaic or Netscape) either space or comma
- // is used to separate the extensions
- strExtensions.Replace(wxT(","), wxT(" "));
-
- // also deal with the leading dot
- if ( !strExtensions.empty() && strExtensions[0u] == wxT('.') )
- {
- strExtensions.erase(0, 1);
- }
-
- wxLogTrace(TRACE_MIME, wxT("mime.types: '%s' => '%s' (%s)"),
- strExtensions.c_str(),
- strMimeType.c_str(),
- strDesc.c_str());
-
- AddMimeTypeInfo(strMimeType, strExtensions, strDesc);
-
- // finished with this line
- pc = NULL;
- }
-
- return true;
-}
-
-// ----------------------------------------------------------------------------
-// UNIX mailcap files parsing
-// ----------------------------------------------------------------------------
-
-// the data for a single MIME type
-struct MailcapLineData
-{
- // field values
- wxString type,
- cmdOpen,
- test,
- icon,
- desc;
-
- wxArrayString verbs,
- commands;
-
- // flags
- bool testfailed,
- needsterminal,
- copiousoutput;
-
- MailcapLineData() { testfailed = needsterminal = copiousoutput = false; }
-};
-
-// process a non-standard (i.e. not the first or second one) mailcap field
-bool
-wxMimeTypesManagerImpl::ProcessOtherMailcapField(MailcapLineData& data,
- const wxString& curField)
-{
- if ( curField.empty() )
- {
- // we don't care
- return true;
- }
-
- // is this something of the form foo=bar?
- if ( curField.find('=') != wxString::npos )
- {
- // split "LHS = RHS" in 2
- wxString lhs = curField.BeforeFirst(wxT('=')),
- rhs = curField.AfterFirst(wxT('='));
-
- lhs.Trim(true); // from right
- rhs.Trim(false); // from left
-
- // it might be quoted
- if ( !rhs.empty() && rhs[0u] == wxT('"') && rhs.Last() == wxT('"') )
- {
- rhs = rhs.Mid(1, rhs.length() - 2);
- }
-
- // is it a command verb or something else?
- if ( lhs == wxT("test") )
- {
- if ( wxSystem(rhs) == 0 )
- {
- // ok, test passed
- wxLogTrace(TRACE_MIME_TEST,
- wxT("Test '%s' for mime type '%s' succeeded."),
- rhs.c_str(), data.type.c_str());
- }
- else
- {
- wxLogTrace(TRACE_MIME_TEST,
- wxT("Test '%s' for mime type '%s' failed, skipping."),
- rhs.c_str(), data.type.c_str());
-
- data.testfailed = true;
- }
- }
- else if ( lhs == wxT("desc") )
- {
- data.desc = rhs;
- }
- else if ( lhs == wxT("x11-bitmap") )
- {
- data.icon = rhs;
- }
- else if ( lhs == wxT("notes") )
- {
- // ignore
- }
- else // not a (recognized) special case, must be a verb (e.g. "print")
- {
- data.verbs.Add(lhs);
- data.commands.Add(rhs);
- }
- }
- else // '=' not found
- {
- // so it must be a simple flag
- if ( curField == wxT("needsterminal") )
- {
- data.needsterminal = true;
- }
- else if ( curField == wxT("copiousoutput"))
- {
- // copiousoutput impies that the viewer is a console program
- data.needsterminal =
- data.copiousoutput = true;
- }
- else if ( !IsKnownUnimportantField(curField) )
- {
- return false;
- }
- }
-
- return true;
-}
-
-bool wxMimeTypesManagerImpl::ReadMailcap(const wxString& strFileName,
- bool fallback)
-{
- wxLogTrace(TRACE_MIME, wxT("--- Parsing mailcap file '%s' ---"),
- strFileName.c_str());
-
- wxMimeTextFile file(strFileName);
- if ( !file.Open() )
- return false;
-
- // indices of MIME types (in m_aTypes) we already found in this file
- //
- // (see the comments near the end of function for the reason we need this)
- wxArrayInt aIndicesSeenHere;
-
- // accumulator for the current field
- wxString curField;
- curField.reserve(1024);
-
- const wxChar *pPagerEnv = wxGetenv(wxT("PAGER"));
-
- const wxArrayString empty_extensions_list;
-
- size_t nLineCount = file.GetLineCount();
- for ( size_t nLine = 0; nLine < nLineCount; nLine++ )
- {
- // now we're at the start of the line
- const wxChar *pc = file[nLine].c_str();
-
- // skip whitespace
- while ( wxIsspace(*pc) )
- pc++;
-
- // comment or empty string?
- if ( *pc == wxT('#') || *pc == wxT('\0') )
- continue;
-
- // no, do parse
- // ------------
-
- // what field are we currently in? The first 2 are fixed and there may
- // be an arbitrary number of other fields parsed by
- // ProcessOtherMailcapField()
- //
- // the first field is the MIME type
- enum
- {
- Field_Type,
- Field_OpenCmd,
- Field_Other
- } currentToken = Field_Type;
-
- // the flags and field values on the current line
- MailcapLineData data;
-
- bool cont = true;
- while ( cont )
- {
- switch ( *pc )
- {
- case wxT('\\'):
- // interpret the next character literally (notice that
- // backslash can be used for line continuation)
- if ( *++pc == wxT('\0') )
- {
- // fetch the next line if there is one
- if ( nLine == nLineCount - 1 )
- {
- // something is wrong, bail out
- cont = false;
-
- wxLogDebug(wxT("Mailcap file %s, line %lu: '\\' on the end of the last line ignored."),
- strFileName.c_str(),
- nLine + 1L);
- }
- else
- {
- // pass to the beginning of the next line
- pc = file[++nLine].c_str();
-
- // skip pc++ at the end of the loop
- continue;
- }
- }
- else
- {
- // just a normal character
- curField += *pc;
- }
- break;
-
- case wxT('\0'):
- cont = false; // end of line reached, exit the loop
-
- // fall through to still process this field
-
- case wxT(';'):
- // trim whitespaces from both sides
- curField.Trim(true).Trim(false);
-
- switch ( currentToken )
- {
- case Field_Type:
- data.type = curField.Lower();
- if ( data.type.empty() )
- {
- // I don't think that this is a valid mailcap
- // entry, but try to interpret it somehow
- data.type = wxT('*');
- }
-
- if ( data.type.Find(wxT('/')) == wxNOT_FOUND )
- {
- // we interpret "type" as "type/*"
- data.type += wxT("/*");
- }
-
- currentToken = Field_OpenCmd;
- break;
-
- case Field_OpenCmd:
- data.cmdOpen = curField;
-
- currentToken = Field_Other;
- break;
-
- case Field_Other:
- if ( !ProcessOtherMailcapField(data, curField) )
- {
- // don't flood the user with error messages if
- // we don't understand something in his
- // mailcap, but give them in debug mode because
- // this might be useful for the programmer
- wxLogDebug
- (
- wxT("Mailcap file %s, line %lu: unknown field '%s' for the MIME type '%s' ignored."),
- strFileName.c_str(),
- nLine + 1L,
- curField.c_str(),
- data.type.c_str()
- );
- }
- else if ( data.testfailed )
- {
- // skip this entry entirely
- cont = false;
- }
-
- // it already has this value
- //currentToken = Field_Other;
- break;
-
- default:
- wxFAIL_MSG(wxT("unknown field type in mailcap"));
- }
-
- // next token starts immediately after ';'
- curField.Empty();
- break;
-
- default:
- curField += *pc;
- }
-
- // continue in the same line
- pc++;
- }
-
- // we read the entire entry, check what have we got
- // ------------------------------------------------
-
- // check that we really read something reasonable
- if ( currentToken < Field_Other )
- {
- wxLogWarning(wxT("Mailcap file %s, line %lu: incomplete entry ignored."),
- strFileName.c_str(), nLine + 1L);
-
- continue;
- }
-
- // if the test command failed, it's as if the entry were not there at all
- if ( data.testfailed )
- {
- continue;
- }
-
- // support for flags:
- // 1. create an xterm for 'needsterminal'
- // 2. append "| $PAGER" for 'copiousoutput'
- //
- // Note that the RFC says that having both needsterminal and
- // copiousoutput is probably a mistake, so it seems that running
- // programs with copiousoutput inside an xterm as it is done now
- // is a bad idea (FIXME)
- if ( data.copiousoutput )
- {
- data.cmdOpen << wxT(" | ") << (pPagerEnv ? pPagerEnv : wxT("more"));
- }
-
- if ( data.needsterminal )
- {
- data.cmdOpen.insert(0, wxT("xterm -e sh -c '"));
- data.cmdOpen.append(wxT("'"));
- }
-
- if ( !data.cmdOpen.empty() )
- {
- data.verbs.Insert(wxT("open"), 0);
- data.commands.Insert(data.cmdOpen, 0);
- }
-
- // we have to decide whether the new entry should replace any entries
- // for the same MIME type we had previously found or not
- bool overwrite;
-
- // the fall back entries have the lowest priority, by definition
- if ( fallback )
- {
- overwrite = false;
- }
- else
- {
- // have we seen this one before?
- int nIndex = m_aTypes.Index(data.type);
-
- // and if we have, was it in this file? if not, we should
- // overwrite the previously seen one
- overwrite = nIndex == wxNOT_FOUND ||
- aIndicesSeenHere.Index(nIndex) == wxNOT_FOUND;
- }
-
- wxLogTrace(TRACE_MIME, wxT("mailcap %s: %s [%s]"),
- data.type.c_str(), data.cmdOpen.c_str(),
- overwrite ? wxT("replace") : wxT("add"));
-
- int n = AddToMimeData
- (
- data.type,
- data.icon,
- new wxMimeTypeCommands(data.verbs, data.commands),
- empty_extensions_list,
- data.desc,
- overwrite
- );
-
- if ( overwrite )
- {
- aIndicesSeenHere.Add(n);
- }
- }
-
- return true;
-}
-
size_t wxMimeTypesManagerImpl::EnumAllFileTypes(wxArrayString& mimetypes)
{
InitIfNeeded();
return true;
}
-// ----------------------------------------------------------------------------
-// private functions
-// ----------------------------------------------------------------------------
-
-static bool IsKnownUnimportantField(const wxString& fieldAll)
-{
- static const wxChar * const knownFields[] =
- {
- wxT("x-mozilla-flags"),
- wxT("nametemplate"),
- wxT("textualnewlines"),
- };
-
- wxString field = fieldAll.BeforeFirst(wxT('='));
- for ( size_t n = 0; n < WXSIZEOF(knownFields); n++ )
- {
- if ( field.CmpNoCase(knownFields[n]) == 0 )
- return true;
- }
-
- return false;
-}
-
#endif
// wxUSE_MIMETYPE && wxUSE_FILE && wxUSE_TEXTFILE
projects / wxWidgets.git / commitdiff
