Run grand replace for 2015.

[lilypond.git] / flower / file-name.cc

diff --git a/flower/file-name.cc b/flower/file-name.cc
index 74a45fd6514c93f8d1c45c5ad52601f8874b5c95..eaadadf3efc071f34ac0610d7cc5db3ef55beded 100644 (file)
--- a/flower/file-name.cc
+++ b/flower/file-name.cc
@@ -1,16 +1,30 @@
 /*
-  file-name.cc - implement File_name
+  This file is part of LilyPond, the GNU music typesetter.
 
-  source file of the Flower Library
-
-  (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  Copyright (C) 1997--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
   Jan Nieuwenhuizen <janneke@gnu.org>
+
+  LilyPond 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 3 of the License, or
+  (at your option) any later version.
+
+  LilyPond 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 LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "file-name.hh"
 
 #include <cstdio>
 #include <cerrno>
+#include <unistd.h>
+#include <limits.h>
+
 using namespace std;
 
 #include "config.hh"
@@ -36,52 +50,99 @@ using namespace std;
 #endif
 
 #ifdef __CYGWIN__
-static String
-dos_to_posix (String file_name)
+static string
+dos_to_posix (const string &file_name)
 {
   char buf[PATH_MAX] = "";
-  char *s = file_name.get_copy_str0 ();
+  char s[PATH_MAX] = {0};
+  file_name.copy (s, PATH_MAX - 1);
   /* ugh: char const* argument gets modified.  */
   int fail = cygwin_conv_to_posix_path (s, buf);
-  delete s;
   if (!fail)
     return buf;
   return file_name;
 }
 #endif /* __CYGWIN__ */
 
-#ifdef __MINGW32__
 /** Use slash as directory separator.  On Windows, they can pretty
     much be exchanged.  */
-static String
-slashify (String file_name)
+#if 0
+static /* avoid warning */
+#endif
+string
+slashify (string file_name)
 {
-  file_name.substitute ('\\', '/');
-  file_name.substitute ("//", "/");
+  replace_all (&file_name, '\\', '/');
+  replace_all (&file_name, string ("//"), "/");
   return file_name;
 }
-#endif /* __MINGW32__ */
+
+string
+dir_name (const string &file_name)
+{
+  string s = file_name;
+  s = slashify (s);
+  ssize n = s.length ();
+  if (n && s[n - 1] == '/')
+    s[n - 1] = 0;
+  if (s.rfind ('/') != NPOS)
+    s = s.substr (0, s.rfind ('/'));
+  else
+    s = "";
+
+  return s;
+}
+
+string
+get_working_directory ()
+{
+  char cwd[PATH_MAX];
+  // getcwd returns NULL upon a failure, contents of cwd would be undefined!
+  return string (getcwd (cwd, PATH_MAX));
+}
 
 /* Join components to full file_name. */
-String
-File_name::to_string () const
+string
+File_name::dir_part () const
 {
-  String s;
-  if (!root_.is_empty ())
+  string s;
+  if (!root_.empty ())
     s = root_ + ::to_string (ROOTSEP);
-  if (!dir_.is_empty ())
+
+  if (!dir_.empty ())
     {
       s += dir_;
-      if (!base_.is_empty () || !ext_.is_empty ())
-       s += ::to_string (DIRSEP);
     }
-  s += base_;
-  if (!ext_.is_empty ())
+
+  return s;
+}
+
+string
+File_name::file_part () const
+{
+  string s;
+  s = base_;
+  if (!ext_.empty ())
     s += ::to_string (EXTSEP) + ext_;
   return s;
 }
 
-File_name::File_name (String file_name)
+string
+File_name::to_string () const
+{
+  string d = dir_part ();
+  string f = file_part ();
+
+  if (!f.empty ()
+      && !dir_.empty ())
+    {
+      d += ::to_string (DIRSEP);
+    }
+
+  return d + f;
+}
+
+File_name::File_name (string file_name)
 {
 #ifdef __CYGWIN__
   /* All system functions would work, even if we do not convert to
@@ -93,26 +154,57 @@ File_name::File_name (String file_name)
   file_name = slashify (file_name);
 #endif
 
-  int i = file_name.index (ROOTSEP);
-  if (i >= 0)
+  ssize i = file_name.find (ROOTSEP);
+  if (i != NPOS)
     {
-      root_ = file_name.left_string (i);
-      file_name = file_name.right_string (file_name.length () - i - 1);
+      root_ = file_name.substr (0, i);
+      file_name = file_name.substr (i + 1);
     }
 
-  i = file_name.index_last (DIRSEP);
-  if (i >= 0)
+  i = file_name.rfind (DIRSEP);
+  if (i != NPOS)
     {
-      dir_ = file_name.left_string (i);
-      file_name = file_name.right_string (file_name.length () - i - 1);
+      dir_ = file_name.substr (0, i);
+      file_name = file_name.substr (i + 1);
     }
 
-  i = file_name.index_last ('.');
-  if (i >= 0)
+  i = file_name.rfind ('.');
+  if (i != NPOS)
     {
-      base_ = file_name.left_string (i);
-      ext_ = file_name.right_string (file_name.length () - i - 1);
+      base_ = file_name.substr (0, i);
+      ext_ = file_name.substr (i + 1);
     }
   else
     base_ = file_name;
 }
+
+bool
+File_name::is_absolute () const
+{
+  /*
+    Hmm. Is c:foo absolute?
+   */
+  return (dir_.length () && dir_[0] == DIRSEP) || root_.length ();
+}
+
+File_name
+File_name::canonicalized () const
+{
+  File_name c = *this;
+
+  replace_all (&c.dir_, string ("//"), string ("/"));
+
+  vector<string> components = string_split (c.dir_, '/');
+  vector<string> new_components;
+
+  for (vsize i = 0; i < components.size (); i++)
+    {
+      if (components[i] == "..")
+        new_components.pop_back ();
+      else
+        new_components.push_back (components[i]);
+    }
+
+  c.dir_ = string_join (new_components, "/");
+  return c;
+}