-/*
-This file is part of libmsppath
-Copyright © 2006 Mikko Rasa, Mikkosoft Productions
+/* $Id$
+
+This file is part of libmspfs
+Copyright © 2006-2008 Mikko Rasa, Mikkosoft Productions
Distributed under the LGPL
*/
-#include <dirent.h>
-#include <sys/stat.h>
-#include <errno.h>
+
+#include <cerrno>
+#include <msp/core/except.h>
#ifndef WIN32
#include <fnmatch.h>
+#else
+#include <msp/strings/glob.h>
#endif
-#include <msp/strutils.h>
+#include <msp/strings/utils.h>
+#include "dir.h"
#include "path.h"
#include "utils.h"
using namespace std;
namespace Msp {
-namespace Path {
+namespace FS {
+
+string basename(const Path &p)
+{
+ return p[-1];
+}
+
+Path dirname(const Path &p)
+{
+ return p.subpath(0, p.size()-1);
+}
+
+string basepart(const string &fn)
+{
+ unsigned dot=fn.rfind('.');
+ return fn.substr(0, dot);
+}
+
+string extpart(const string &fn)
+{
+ unsigned dot=fn.rfind('.');
+ if(dot==string::npos)
+ return string();
+ return fn.substr(dot);
+}
-/**
-Fixes the case of the given path to match files / directories on the
-filesystem. Intended to be used in programs that need to interact with
-emulated Windows programs.
-*/
Path fix_case(const Path &path)
{
bool found=true;
Path result;
- for(Path::iterator i=path.begin(); i!=path.end(); ++i)
+ for(Path::Iterator i=path.begin(); i!=path.end(); ++i)
{
if(!found || *i=="/")
result/=*i;
return result;
}
-int mkpath(const Path &path, int mode)
+void unlink(const Path &path)
{
- Path p;
- for(Path::iterator i=path.begin(); i!=path.end(); ++i)
- {
- p/=*i;
-#ifdef WIN32
- if(p.size()==1 && is_windows_drive(*i)) continue;
-#endif
- struct stat st;
- int err=stat(p.str().c_str(),&st);
- if(err==0)
- {
- if(!S_ISDIR(st.st_mode))
- {
- errno=EEXIST;
- return -1;
- }
- continue;
- }
- else if(errno!=ENOENT)
- return -1;
- else
- {
-#ifdef WIN32
- // The win32 version of this function doesn't take the mode argument. Go figure.
- err=mkdir(p.str().c_str());
-#else
- err=mkdir(p.str().c_str(),mode);
-#endif
- if(err==-1) return -1;
- }
- }
-
- return 0;
-}
-
-int rmdir(const Path &path, bool recursive)
-{
- if(recursive)
- {
- list<string> files=list_files(path);
- for(list<string>::iterator i=files.begin(); i!=files.end(); ++i)
- {
- Path p=path/ *i;
- struct stat st;
- stat(p.str().c_str(),&st);
- int err=0;
- if(S_ISDIR(st.st_mode))
- err=rmdir(p,true);
- else
- err=unlink(p.str().c_str());
- if(err) return err;
- }
- }
- return rmdir(path.str().c_str());
-}
-
-/**
-Lists all files in a directory except the implied . and .. entries.
-*/
-list<string> list_files(const Path &path)
-{
- list<string> result;
- DIR *dir=opendir(path.str().c_str());
- if(dir)
- {
- while(dirent *de=readdir(dir))
- {
- const char *fn=de->d_name;
- if(fn[0]=='.' && (fn[1]==0 || (fn[1]=='.' && fn[2]==0))) continue;
- result.push_back(fn);
- }
- closedir(dir);
- }
- return result;
-}
-
-bool exists(const Path &path)
-{
- struct stat st;
- return !stat(path.str().c_str(),&st);
-}
-
-Filename splitext(const string &fn)
-{
- Filename result;
- unsigned dot=fn.rfind('.');
- result.base=fn.substr(0,dot);
- if(dot!=string::npos)
- result.ext=fn.substr(dot);
- return result;
-}
-
-int fnmatch(const string &pat, const Path &fn)
-{
-#ifdef WIN32
- return -1;
-#else
- return ::fnmatch(pat.c_str(), fn.str().c_str(), FNM_PATHNAME);
-#endif
+ if(::unlink(path.str().c_str())==-1)
+ throw SystemError("unlink failed", errno);
}
Path relative(const Path &path, const Path &base)
{
- Path::iterator i=path.begin();
- Path::iterator j=base.begin();
- for(; (i!=path.end() && j!=base.end() && *i==*j); ++i,++j);
+ Path::Iterator i=path.begin();
+ Path::Iterator j=base.begin();
+ for(; (i!=path.end() && j!=base.end() && *i==*j); ++i, ++j) ;
Path result;
for(; j!=base.end(); ++j)
return result;
}
-} // namespace Path
+} // namespace FS
} // namespace Msp