home *** CD-ROM | disk | FTP | other *** search
- /////////////////////////////////////////////////////////////////////////////
- // Name: filesys.cpp
- // Purpose: wxFileSystem class - interface for opening files
- // Author: Vaclav Slavik
- // Copyright: (c) 1999 Vaclav Slavik
- // CVS-ID: $Id: filesys.cpp,v 1.36.2.5 2002/12/16 00:10:27 VS Exp $
- // Licence: wxWindows Licence
- /////////////////////////////////////////////////////////////////////////////
-
- #ifdef __GNUG__
- #pragma implementation "filesys.h"
- #endif
-
- #include "wx/wxprec.h"
-
- #ifdef __BORLANDC__
- #pragma hdrstop
- #endif
-
-
- #if wxUSE_FILESYSTEM
-
- #include "wx/wfstream.h"
- #include "wx/module.h"
- #include "wx/filesys.h"
- #include "wx/mimetype.h"
- #include "wx/filename.h"
- #include "wx/log.h"
-
-
-
- //--------------------------------------------------------------------------------
- // wxFileSystemHandler
- //--------------------------------------------------------------------------------
-
- IMPLEMENT_ABSTRACT_CLASS(wxFileSystemHandler, wxObject)
-
-
- #if wxUSE_MIMETYPE
- static wxFileTypeInfo *gs_FSMimeFallbacks = NULL;
- #endif
-
- wxString wxFileSystemHandler::GetMimeTypeFromExt(const wxString& location)
- {
- wxString ext, mime;
- wxString loc = GetRightLocation(location);
- char c;
- int l = loc.Length(), l2;
-
- l2 = l;
- for (int i = l-1; i >= 0; i--)
- {
- c = loc[(unsigned int) i];
- if ( c == wxT('#') )
- l2 = i + 1;
- if ( c == wxT('.') )
- {
- ext = loc.Right(l2-i-1);
- break;
- }
- if ( (c == wxT('/')) || (c == wxT('\\')) || (c == wxT(':')) )
- return wxEmptyString;
- }
-
- #if wxUSE_MIMETYPE
- static bool s_MinimalMimeEnsured = FALSE;
- if (!s_MinimalMimeEnsured) {
- wxTheMimeTypesManager->AddFallbacks(gs_FSMimeFallbacks);
- s_MinimalMimeEnsured = TRUE;
- }
-
- wxFileType *ft = wxTheMimeTypesManager->GetFileTypeFromExtension(ext);
- if ( !ft || !ft -> GetMimeType(&mime) )
- {
- mime = wxEmptyString;
- }
-
- delete ft;
-
- return mime;
- #else
- if ( ext.IsSameAs(wxT("htm"), FALSE) || ext.IsSameAs(_T("html"), FALSE) )
- return wxT("text/html");
- if ( ext.IsSameAs(wxT("jpg"), FALSE) || ext.IsSameAs(_T("jpeg"), FALSE) )
- return wxT("image/jpeg");
- if ( ext.IsSameAs(wxT("gif"), FALSE) )
- return wxT("image/gif");
- if ( ext.IsSameAs(wxT("png"), FALSE) )
- return wxT("image/png");
- if ( ext.IsSameAs(wxT("bmp"), FALSE) )
- return wxT("image/bmp");
- return wxEmptyString;
- #endif
- }
-
-
-
- wxString wxFileSystemHandler::GetProtocol(const wxString& location) const
- {
- wxString s = wxEmptyString;
- int i, l = location.Length();
- bool fnd;
-
- fnd = FALSE;
- for (i = l-1; (i >= 0) && ((location[i] != wxT('#')) || (!fnd)); i--) {
- if ((location[i] == wxT(':')) && (i != 1 /*win: C:\path*/)) fnd = TRUE;
- }
- if (!fnd) return wxT("file");
- for (++i; (i < l) && (location[i] != wxT(':')); i++) s << location[i];
- return s;
- }
-
-
- wxString wxFileSystemHandler::GetLeftLocation(const wxString& location) const
- {
- int i;
- bool fnd;
-
- fnd = FALSE;
- for (i = location.Length()-1; i >= 0; i--) {
- if ((location[i] == wxT(':')) && (i != 1 /*win: C:\path*/)) fnd = TRUE;
- else if (fnd && (location[i] == wxT('#'))) return location.Left(i);
- }
- return wxEmptyString;
- }
-
- wxString wxFileSystemHandler::GetRightLocation(const wxString& location) const
- {
- int i, l = location.Length();
- int l2 = l + 1;
-
- for (i = l-1;
- (i >= 0) &&
- ((location[i] != wxT(':')) || (i == 1) || (location[i-2] == wxT(':')));
- i--)
- {
- if (location[i] == wxT('#')) l2 = i + 1;
- }
- if (i == 0) return wxEmptyString;
- else return location.Mid(i + 1, l2 - i - 2);
- }
-
- wxString wxFileSystemHandler::GetAnchor(const wxString& location) const
- {
- char c;
- int l = location.Length();
-
- for (int i = l-1; i >= 0; i--) {
- c = location[i];
- if (c == wxT('#')) return location.Right(l-i-1);
- else if ((c == wxT('.')) || (c == wxT('/')) || (c == wxT('\\')) || (c == wxT(':'))) return wxEmptyString;
- }
- return wxEmptyString;
- }
-
-
- wxString wxFileSystemHandler::FindFirst(const wxString& WXUNUSED(spec),
- int WXUNUSED(flags))
- {
- return wxEmptyString;
- }
-
- wxString wxFileSystemHandler::FindNext()
- {
- return wxEmptyString;
- }
-
- //--------------------------------------------------------------------------------
- // wxLocalFSHandler
- //--------------------------------------------------------------------------------
-
-
- wxString wxLocalFSHandler::ms_root;
-
- bool wxLocalFSHandler::CanOpen(const wxString& location)
- {
- return GetProtocol(location) == wxT("file");
- }
-
- wxFSFile* wxLocalFSHandler::OpenFile(wxFileSystem& WXUNUSED(fs), const wxString& location)
- {
- // location has Unix path separators
- wxString right = GetRightLocation(location);
- wxFileName fn = wxFileSystem::URLToFileName(right);
- wxString fullpath = ms_root + fn.GetFullPath();
-
- if (!wxFileExists(fullpath))
- return (wxFSFile*) NULL;
-
- return new wxFSFile(new wxFFileInputStream(fullpath),
- right,
- GetMimeTypeFromExt(location),
- GetAnchor(location),
- wxDateTime(wxFileModificationTime(fullpath)));
- }
-
- wxString wxLocalFSHandler::FindFirst(const wxString& spec, int flags)
- {
- wxFileName fn = wxFileSystem::URLToFileName(GetRightLocation(spec));
- return wxFindFirstFile(ms_root + fn.GetFullPath(), flags);
- }
-
- wxString wxLocalFSHandler::FindNext()
- {
- return wxFindNextFile();
- }
-
-
-
- //-----------------------------------------------------------------------------
- // wxFileSystem
- //-----------------------------------------------------------------------------
-
- IMPLEMENT_DYNAMIC_CLASS(wxFileSystem, wxObject)
- IMPLEMENT_ABSTRACT_CLASS(wxFSFile, wxObject)
-
-
- wxList wxFileSystem::m_Handlers;
-
-
- static wxString MakeCorrectPath(const wxString& path)
- {
- wxString p(path);
- wxString r;
- int i, j, cnt;
-
- cnt = p.Length();
- for (i = 0; i < cnt; i++)
- if (p.GetChar(i) == wxT('\\')) p.GetWritableChar(i) = wxT('/'); // Want to be windows-safe
-
- if (p.Left(2) == wxT("./")) { p = p.Mid(2); cnt -= 2; }
-
- if (cnt < 3) return p;
-
- r << p.GetChar(0) << p.GetChar(1);
-
- // skip trailing ../.., if any
- for (i = 2; i < cnt && (p.GetChar(i) == wxT('/') || p.GetChar(i) == wxT('.')); i++) r << p.GetChar(i);
-
- // remove back references: translate dir1/../dir2 to dir2
- for (; i < cnt; i++)
- {
- r << p.GetChar(i);
- if (p.GetChar(i) == wxT('/') && p.GetChar(i-1) == wxT('.') && p.GetChar(i-2) == wxT('.'))
- {
- for (j = r.Length() - 2; j >= 0 && r.GetChar(j) != wxT('/') && r.GetChar(j) != wxT(':'); j--) {}
- if (j >= 0 && r.GetChar(j) != wxT(':'))
- {
- for (j = j - 1; j >= 0 && r.GetChar(j) != wxT('/') && r.GetChar(j) != wxT(':'); j--) {}
- r.Remove(j + 1);
- }
- }
- }
-
- for (; i < cnt; i++) r << p.GetChar(i);
-
- return r;
- }
-
-
- void wxFileSystem::ChangePathTo(const wxString& location, bool is_dir)
- {
- int i, pathpos = -1;
-
- m_Path = MakeCorrectPath(location);
-
- if (is_dir)
- {
- if (m_Path.Length() > 0 && m_Path.Last() != wxT('/') && m_Path.Last() != wxT(':'))
- m_Path << wxT('/');
- }
-
- else
- {
- for (i = m_Path.Length()-1; i >= 0; i--)
- {
- if (m_Path[(unsigned int) i] == wxT('/'))
- {
- if ((i > 1) && (m_Path[(unsigned int) (i-1)] == wxT('/')) && (m_Path[(unsigned int) (i-2)] == wxT(':')))
- {
- i -= 2;
- continue;
- }
- else
- {
- pathpos = i;
- break;
- }
- }
- else if (m_Path[(unsigned int) i] == wxT(':')) {
- pathpos = i;
- break;
- }
- }
- if (pathpos == -1)
- {
- for (i = 0; i < (int) m_Path.Length(); i++)
- {
- if (m_Path[(unsigned int) i] == wxT(':'))
- {
- m_Path.Remove(i+1);
- break;
- }
- }
- if (i == (int) m_Path.Length())
- m_Path = wxEmptyString;
- }
- else
- {
- m_Path.Remove(pathpos+1);
- }
- }
- }
-
-
-
- wxFSFile* wxFileSystem::OpenFile(const wxString& location)
- {
- wxString loc = MakeCorrectPath(location);
- unsigned i, ln;
- char meta;
- wxFSFile *s = NULL;
- wxNode *node;
-
- ln = loc.Length();
- meta = 0;
- for (i = 0; i < ln; i++)
- {
- switch (loc[i])
- {
- case wxT('/') : case wxT(':') : case wxT('#') :
- meta = loc[i];
- break;
- }
- if (meta != 0) break;
- }
- m_LastName = wxEmptyString;
-
- // try relative paths first :
- if (meta != wxT(':'))
- {
- node = m_Handlers.GetFirst();
- while (node)
- {
- wxFileSystemHandler *h = (wxFileSystemHandler*) node -> GetData();
- if (h->CanOpen(m_Path + loc))
- {
- s = h->OpenFile(*this, m_Path + loc);
- if (s) { m_LastName = m_Path + loc; break; }
- }
- node = node->GetNext();
- }
- }
-
- // if failed, try absolute paths :
- if (s == NULL)
- {
- node = m_Handlers.GetFirst();
- while (node)
- {
- wxFileSystemHandler *h = (wxFileSystemHandler*) node->GetData();
- if (h->CanOpen(loc))
- {
- s = h->OpenFile(*this, loc);
- if (s) { m_LastName = loc; break; }
- }
- node = node->GetNext();
- }
- }
- return (s);
- }
-
-
-
- wxString wxFileSystem::FindFirst(const wxString& spec, int flags)
- {
- wxNode *node;
- wxString spec2(spec);
-
- m_FindFileHandler = NULL;
-
- for (int i = spec2.Length()-1; i >= 0; i--)
- if (spec2[(unsigned int) i] == wxT('\\')) spec2.GetWritableChar(i) = wxT('/'); // Want to be windows-safe
-
- node = m_Handlers.GetFirst();
- while (node)
- {
- m_FindFileHandler = (wxFileSystemHandler*) node -> GetData();
- if (m_FindFileHandler -> CanOpen(m_Path + spec2))
- return m_FindFileHandler -> FindFirst(m_Path + spec2, flags);
- node = node->GetNext();
- }
-
- node = m_Handlers.GetFirst();
- while (node)
- {
- m_FindFileHandler = (wxFileSystemHandler*) node -> GetData();
- if (m_FindFileHandler -> CanOpen(spec2))
- return m_FindFileHandler -> FindFirst(spec2, flags);
- node = node->GetNext();
- }
-
- return wxEmptyString;
- }
-
-
-
- wxString wxFileSystem::FindNext()
- {
- if (m_FindFileHandler == NULL) return wxEmptyString;
- else return m_FindFileHandler -> FindNext();
- }
-
-
-
- void wxFileSystem::AddHandler(wxFileSystemHandler *handler)
- {
- m_Handlers.Append(handler);
- }
-
-
- void wxFileSystem::CleanUpHandlers()
- {
- m_Handlers.DeleteContents(TRUE);
- m_Handlers.Clear();
- }
-
- const static wxString g_unixPathString(wxT("/"));
- const static wxString g_nativePathString(wxFILE_SEP_PATH);
-
- // Returns the native path for a file URL
- wxFileName wxFileSystem::URLToFileName(const wxString& url)
- {
- wxString path = url;
-
- if ( path.Find(wxT("file://")) == 0 )
- {
- path = path.Mid(7);
- }
- else if ( path.Find(wxT("file:")) == 0 )
- {
- path = path.Mid(5);
- }
- // Remove preceding double slash on Mac Classic
- #if defined(__WXMAC__) && !defined(__UNIX__)
- else if ( path.Find(wxT("//")) == 0 )
- path = path.Mid(2);
- #endif
-
- path.Replace(wxT("%25"), wxT("%"));
- path.Replace(wxT("%3A"), wxT(":"));
-
- #ifdef __WXMSW__
- // file urls either start with a forward slash (local harddisk),
- // otherwise they have a servername/sharename notation,
- // which only exists on msw and corresponds to a unc
- if ( path[0u] == wxT('/') && path [1u] != wxT('/'))
- {
- path = path.Mid(1);
- }
- else if ( (url.Find(wxT("file://")) == 0) &&
- (path.Find(wxT('/')) != wxNOT_FOUND) &&
- (path.Length() > 1) && (path[1u] != wxT(':')) )
- {
- path = wxT("//") + path;
- }
- #endif
-
- path.Replace(g_unixPathString, g_nativePathString);
-
- return wxFileName(path, wxPATH_NATIVE);
- }
-
- // Returns the file URL for a native path
- wxString wxFileSystem::FileNameToURL(const wxFileName& filename)
- {
- wxFileName fn = filename;
- fn.Normalize(wxPATH_NORM_DOTS | wxPATH_NORM_TILDE | wxPATH_NORM_ABSOLUTE);
- wxString url = fn.GetFullPath(wxPATH_NATIVE);
-
- #ifndef __UNIX__
- // unc notation, wxMSW
- if ( url.Find(wxT("\\\\")) == 0 )
- {
- url = url.Mid(2);
- }
- else
- {
- url = wxT("/") + url;
- #ifdef __WXMAC__
- url = wxT("/") + url;
- #endif
-
- }
- #endif
-
- url.Replace(g_nativePathString, g_unixPathString);
- url.Replace(wxT("%"), wxT("%25"));
- url.Replace(wxT(":"), wxT("%3A"));
- url = wxT("file:") + url;
- return url;
- }
-
-
- ///// Module:
-
- class wxFileSystemModule : public wxModule
- {
- DECLARE_DYNAMIC_CLASS(wxFileSystemModule)
-
- public:
- virtual bool OnInit()
- {
- wxFileSystem::AddHandler(new wxLocalFSHandler);
-
- #if wxUSE_MIMETYPE
- gs_FSMimeFallbacks = new wxFileTypeInfo[6];
- gs_FSMimeFallbacks[0] =
- wxFileTypeInfo(_T("image/jpeg"),
- _T(""),
- _T(""),
- _T("JPEG image (from fallback)"),
- _T("jpg"), _T("jpeg"), NULL);
- gs_FSMimeFallbacks[1] =
- wxFileTypeInfo(_T("image/gif"),
- _T(""),
- _T(""),
- _T("GIF image (from fallback)"),
- _T("gif"), NULL);
- gs_FSMimeFallbacks[2] =
- wxFileTypeInfo(_T("image/png"),
- _T(""),
- _T(""),
- _T("PNG image (from fallback)"),
- _T("png"), NULL);
- gs_FSMimeFallbacks[3] =
- wxFileTypeInfo(_T("image/bmp"),
- _T(""),
- _T(""),
- _T("windows bitmap image (from fallback)"),
- _T("bmp"), NULL);
- gs_FSMimeFallbacks[4] =
- wxFileTypeInfo(_T("text/html"),
- _T(""),
- _T(""),
- _T("HTML document (from fallback)"),
- _T("htm"), _T("html"), NULL);
- gs_FSMimeFallbacks[5] =
- // must terminate the table with this!
- wxFileTypeInfo();
- #endif
- return TRUE;
- }
- virtual void OnExit()
- {
- #if wxUSE_MIMETYPE
- delete [] gs_FSMimeFallbacks;
- #endif
- wxFileSystem::CleanUpHandlers();
- }
- };
-
- IMPLEMENT_DYNAMIC_CLASS(wxFileSystemModule, wxModule)
-
- #endif
- // wxUSE_FILESYSTEM
-
-
-
-