From df7e6104b6b639d0040034c45508bbe74fdec85d Mon Sep 17 00:00:00 2001 From: Eugene Sandulenko Date: Tue, 10 May 2005 00:58:08 +0000 Subject: Last bit of AmigaOS4 patch. Apparently this was missed by mistake. svn-id: r18018 --- backends/fs/amigaos4/.cvsignore | 1 + backends/fs/amigaos4/amigaos4-fs.cpp | 377 +++++++++++++++++++++++++++++++++++ 2 files changed, 378 insertions(+) create mode 100644 backends/fs/amigaos4/.cvsignore create mode 100644 backends/fs/amigaos4/amigaos4-fs.cpp (limited to 'backends/fs/amigaos4') diff --git a/backends/fs/amigaos4/.cvsignore b/backends/fs/amigaos4/.cvsignore new file mode 100644 index 0000000000..39a06683b7 --- /dev/null +++ b/backends/fs/amigaos4/.cvsignore @@ -0,0 +1 @@ +.deps diff --git a/backends/fs/amigaos4/amigaos4-fs.cpp b/backends/fs/amigaos4/amigaos4-fs.cpp new file mode 100644 index 0000000000..1726f82b31 --- /dev/null +++ b/backends/fs/amigaos4/amigaos4-fs.cpp @@ -0,0 +1,377 @@ +/* ScummVM - Scumm Interpreter + * Copyright (C) 2005 The ScummVM project, contribution by Hans-Jörg Frieden and Juha Niemimäki + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. + * + * This program 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 General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + * + * $Header$ + */ + +#if defined(__amigaos4__) +#ifdef __USE_INLINE__ +#undef __USE_INLINE__ +#endif + +#include +#include +#include + +#ifndef USE_NEWLIB +#include +#endif + +#include + +#include "util.h" + +#include "base/engine.h" +#include "../fs.h" + +#define ENTER() /* debug(6, "Enter\n") */ +#define LEAVE() /* debug(6, "Leave\n") */ + + +const uint32 ExAllBufferSize = 40960; + +class AmigaOSFilesystemNode : public AbstractFilesystemNode { + protected: + BPTR _pFileLock; + String _sDisplayName; + bool _bIsDirectory; + bool _bIsValid; + String _sPath; + + public: + AmigaOSFilesystemNode(); + AmigaOSFilesystemNode(const AmigaOSFilesystemNode *pNode); + AmigaOSFilesystemNode(BPTR pLock, const char *pDisplayName = 0); + AmigaOSFilesystemNode(const String &p); + + ~AmigaOSFilesystemNode(); + + virtual String displayName() const { return _sDisplayName; }; + virtual bool isValid() const { return _bIsValid; }; + virtual bool isDirectory() const { return _bIsDirectory; }; + virtual String path() const { return _sPath; }; + + virtual FSList listDir(ListMode mode = kListDirectoriesOnly) const; + virtual FSList listVolumes(void) const; + virtual AbstractFilesystemNode *parent() const; + virtual AbstractFilesystemNode *clone() const { return new AmigaOSFilesystemNode(this); }; +}; + +AbstractFilesystemNode *FilesystemNode::getRoot() { + return new AmigaOSFilesystemNode(); +} + +AbstractFilesystemNode *FilesystemNode::getNodeForPath(const String &path) { + return new AmigaOSFilesystemNode(path); +} + +AmigaOSFilesystemNode::AmigaOSFilesystemNode() { + ENTER(); + _sDisplayName = "Available Disks"; + _bIsValid = true; + _bIsDirectory = true; + _sPath = ""; + _pFileLock = 0; + LEAVE(); +} + + +AmigaOSFilesystemNode::AmigaOSFilesystemNode(const String &p) { + ENTER(); + + int len = 0, offset = p.size(); + + assert(offset > 0); + + _sPath = p; + + // Extract last component from path + const char *str = p.c_str(); + + while (offset > 0 && (str[offset-1] == '/' || str[offset-1] == ':')) + offset--; + + while (offset > 0 && (str[offset-1] != '/' && str[offset-1] != ':')) { + len++; + offset--; + } + + _sDisplayName = String(str + offset, len); + + // Check whether it is a directory, and whether the file actually exists + + struct FileInfoBlock *fib = (struct FileInfoBlock *)IDOS->AllocDosObject(DOS_FIB, NULL); + if (!fib) { + debug(6, "fib == 0\n"); + LEAVE(); + return; + } + + BPTR pLock = IDOS->Lock( (char *)_sPath.c_str(), SHARED_LOCK); + if (pLock) { + if (IDOS->Examine(pLock, fib) != DOSFALSE) { + if (fib->fib_EntryType > 0) + _bIsDirectory = true; + else + _bIsDirectory = false; + + if (_bIsDirectory) { + if (fib->fib_EntryType != ST_ROOT) + _sPath += "/"; + + _pFileLock = IDOS->DupLock(pLock); + _bIsValid = (_pFileLock != 0); + } + else _bIsValid = true; + } + } + + IDOS->FreeDosObject(DOS_FIB, fib); + LEAVE(); +} + +AmigaOSFilesystemNode::AmigaOSFilesystemNode(BPTR pLock, const char *pDisplayName) { + ENTER(); + int bufsize = 256; + _pFileLock = 0; + + while (1) { + char *name = new char[bufsize]; + if (IDOS->NameFromLock(pLock, name, bufsize) != DOSFALSE) { + _sPath = name; + _sDisplayName = pDisplayName ? pDisplayName : IDOS->FilePart(name); + delete name; + break; + } + + if (IDOS->IoErr() != ERROR_LINE_TOO_LONG) { + _bIsValid = false; + debug(6, "Error\n"); + LEAVE(); + delete name; + return; + } + bufsize *= 2; + delete name; + } + + _bIsValid = false; + + struct FileInfoBlock *fib = (struct FileInfoBlock *)IDOS->AllocDosObject(DOS_FIB, NULL); + if (!fib) { + debug(6, "fib == 0\n"); + LEAVE(); + return; + } + + if (IDOS->Examine(pLock, fib) != DOSFALSE) { + if (fib->fib_EntryType > 0) + _bIsDirectory = true; + else + _bIsDirectory = false; + + if (_bIsDirectory) { + if (fib->fib_EntryType != ST_ROOT) + _sPath += "/"; + + _pFileLock = IDOS->DupLock(pLock); + _bIsValid = (_pFileLock != 0); + } + else _bIsValid = true; + } + + IDOS->FreeDosObject(DOS_FIB, fib); + LEAVE(); +} + +AmigaOSFilesystemNode::AmigaOSFilesystemNode(const AmigaOSFilesystemNode *node) { + ENTER(); + _sDisplayName = node->_sDisplayName; + _bIsValid = node->_bIsValid; + _bIsDirectory = node->_bIsDirectory; + _sPath = node->_sPath; + _pFileLock = IDOS->DupLock(node->_pFileLock); + LEAVE(); +} + +AmigaOSFilesystemNode::~AmigaOSFilesystemNode() { + ENTER(); + if (_pFileLock) + IDOS->UnLock(_pFileLock); + LEAVE(); +} + +FSList AmigaOSFilesystemNode::listDir(ListMode mode) const { + ENTER(); + + if (!_bIsValid) { + debug(6, "Invalid node\n"); + LEAVE(); + //return 0; + } + + if (!_bIsDirectory) { + debug(6, "Not a directory\n"); + LEAVE(); + //return 0; + } + + if (_pFileLock == 0) { + debug(6, "Root node\n"); + LEAVE(); + return listVolumes(); + } + + //FSList *myList = new FSList(); + FSList myList; + + struct ExAllControl *eac; + struct ExAllData *data, *ead; + BOOL bExMore; + + eac = (struct ExAllControl *)IDOS->AllocDosObject(DOS_EXALLCONTROL, 0); + if (eac) { + data = (struct ExAllData *)IExec->AllocVec(ExAllBufferSize, MEMF_ANY); + if (data) { + eac->eac_LastKey = 0; + do { + bExMore = IDOS->ExAll(_pFileLock, data, ExAllBufferSize, + ED_TYPE, eac); + + LONG error = IDOS->IoErr(); + if (!bExMore && error != ERROR_NO_MORE_ENTRIES) + break; + + if (eac->eac_Entries == 0) + continue; + + ead = data; + do { + AmigaOSFilesystemNode *entry; + String full_path; + BPTR lock; + + if ((ead->ed_Type > 0 && (mode & kListDirectoriesOnly)) || + (ead->ed_Type < 0 && (mode & kListFilesOnly))) { + full_path = _sPath; + full_path += (char*)ead->ed_Name; + lock = IDOS->Lock((char *)full_path.c_str(), SHARED_LOCK); + if (lock) { + entry = new AmigaOSFilesystemNode(lock, (char *)ead->ed_Name); + if (entry) { + if (entry->isValid()) + myList.push_back(wrap(entry)); + else + delete entry; + } + IDOS->UnLock(lock); + } + } + ead = ead->ed_Next; + } while (ead); + } while (bExMore); + + IExec->FreeVec(data); + } + + IDOS->FreeDosObject(DOS_EXALLCONTROL, eac); + } + LEAVE(); + return myList; +} + +AbstractFilesystemNode *AmigaOSFilesystemNode::parent() const { + ENTER(); + AmigaOSFilesystemNode *node; + + if (!_bIsDirectory) { + debug(6, "No directory\n"); + LEAVE(); + return 0; + } + + if (_pFileLock == 0) { + debug(6, "Root node\n"); + LEAVE(); + return clone(); + } + + BPTR parent = IDOS->ParentDir(_pFileLock); + if (parent) { + node = new AmigaOSFilesystemNode(parent); + IDOS->UnLock(parent); + } + else + node = new AmigaOSFilesystemNode(); + + LEAVE(); + return node; +} + +FSList AmigaOSFilesystemNode::listVolumes(void) const { + ENTER(); + //FSList *myList = new FSList(); + FSList myList; + + struct DosList *dosList; + + const uint32 lockFlags = LDF_READ | LDF_VOLUMES; + char name[256]; + + dosList = IDOS->LockDosList(lockFlags); + if (!dosList) { + debug(6, "Cannot lock dos list\n"); + LEAVE(); + return myList; + } + + + dosList = IDOS->NextDosEntry(dosList, LDF_VOLUMES); + while (dosList) { + if (dosList->dol_Type == DLT_VOLUME && + dosList->dol_Name && + dosList->dol_Task) { + AmigaOSFilesystemNode *entry; + const char *volname = (const char *)BADDR(dosList->dol_Name)+1; + const char *devname = (const char *)((struct Task *)dosList->dol_Task->mp_SigTask)->tc_Node.ln_Name; + + strcpy(name, volname); + strcat(name, ":"); + + BPTR volume_lock = IDOS->Lock(name, SHARED_LOCK); + if (volume_lock) { + sprintf(name, "%s (%s)", volname, devname); + entry = new AmigaOSFilesystemNode(volume_lock, name); + if (entry) { + if (entry->isValid()) + myList.push_back(wrap(entry)); + else + delete entry; + } + IDOS->UnLock(volume_lock); + } + } + dosList = IDOS->NextDosEntry(dosList, LDF_VOLUMES); + } + + IDOS->UnLockDosList(lockFlags); + + LEAVE(); + return myList; +} + +#endif -- cgit v1.2.3