X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=flower%2Ffile-path.cc;h=513a146ad609823e2266f02a0ec1ab8c72f429d9;hb=39c0e8adb498996f5e414b1d0bc3a20ac81aa619;hp=501554ea656580ef87c357412fa29bd5ad406dea;hpb=ce9845392e4e22ae9c5f6ec1da914eb301f1892c;p=lilypond.git diff --git a/flower/file-path.cc b/flower/file-path.cc index 501554ea65..513a146ad6 100644 --- a/flower/file-path.cc +++ b/flower/file-path.cc @@ -1,161 +1,196 @@ /* - path.cc - manipulation of paths and filenames. -*/ + file-path.cc - implement File_path + source file of the Flower Library -#include -#include -#include + (c) 1997--2009 Han-Wen Nienhuys + Jan Nieuwenhuizen +*/ -#include "config.h" #include "file-path.hh" -#include "flower-debug.hh" -#ifndef DIRSEP -#define DIRSEP '/' +#include +#include + +#include "config.hh" +#if HAVE_SYS_STAT_H +#include +#endif + +#ifdef __CYGWIN__ +#include #endif +#include "file-name.hh" +#include "warn.hh" + #ifndef PATHSEP #define PATHSEP ':' #endif -/** - @param path the original full filename - @return 4 components of the path. They can be empty -*/ +vector +File_path::directories () const +{ + return dirs_; +} + +#include void -split_path (String path, - String &drive, String &dirs, String &filebase, String &extension) +File_path::parse_path (string p) { - // peel off components, one by one. - int di = path.index_i (':'); - if (di >= 0) - { - drive = path.left_str (di + 1); - path = path.right_str (path.length_i () - di -1); - } - else - drive = ""; + concat (dirs_, string_split (p, PATHSEP)); +} - di = path.index_last_i (DIRSEP); - if (di >=0) - { - dirs = path.left_str (di + 1); - path = path.right_str (path.length_i ()-di -1); - } - else - dirs = ""; +bool +is_file (string file_name) +{ +#if !STAT_MACROS_BROKEN + struct stat sbuf; + if (stat (file_name.c_str (), &sbuf) != 0) + return false; - di = path.index_last_i ('.'); - if (di >= 0) - { - filebase = path.left_str (di); - extension =path.right_str (path.length_i ()-di); - } - else + return !S_ISDIR (sbuf.st_mode); +#endif + + if (FILE *f = fopen (file_name.c_str (), "r")) { - extension = ""; - filebase = path; + fclose (f); + return true; } + + return false; } -void -File_path::parse_path (String p) +bool +is_dir (string file_name) { - int l; + /* + canonicalize; in particular, trailing slashes should disappear. + */ + file_name = File_name (file_name).to_string (); - while ( (l = p.length_i ()) ) +#if !STAT_MACROS_BROKEN + struct stat sbuf; + if (stat (file_name.c_str (), &sbuf) != 0) + return false; + + return S_ISDIR (sbuf.st_mode); +#endif + + if (FILE *f = fopen (file_name.c_str (), "r")) { - int i = p.index_i(PATHSEP); - if (i <0) - i = l; - add (p.left_str(i)); - p = p.right_str (l- i - 1); + fclose (f); + return true; } + return false; } +/** Find a file. +Check absolute file name, search in the current dir (DUH! FIXME!), +in the construction-arg (what's that?), and in any other appended +directory, in this order. +@return +The file name if found, or empty string if not found. */ -/** Find a file. - It will search in the current dir, in the construction-arg, and - in any other added path, in this order. - - @return - The full path if found, or empty string if not found - */ -String -File_path::find (String nm) const +string +File_path::find (string name) const { - DEBUG_OUT << "looking for" << nm << ": "; - if (!nm.length_i() || (nm == "-") ) - return nm; - for (int i=0; i < size(); i++) + if (!name.length () || (name == "-")) + return name; + +#ifdef __MINGW32__ + if (name.find ('\\') != NPOS) + programming_error ("file name not normalized: " + name); +#endif /* __MINGW32__ */ + + /* Handle absolute file name. */ + File_name file_name (name); + if (file_name.dir_[0] == DIRSEP && is_file (file_name.to_string ())) + return file_name.to_string (); + + for (vsize i = 0; i < dirs_.size (); i++) { - String path = elem(i); - String sep = to_str (DIRSEP); - String right(path.right_str (1)); - if (path.length_i () && right != sep) - path += to_str (DIRSEP); - - path += nm; - - DEBUG_OUT << path << "? "; - - /* - Check if directory. TODO: encapsulate for autoconf - */ - struct stat sbuf; - if (stat (path.ch_C(), &sbuf) == ENOENT) - continue; - - if (!(sbuf.st_mode & __S_IFREG)) - continue; - - FILE *f = fopen (path.ch_C(), "r"); // ugh! - if (f) - { - DEBUG_OUT << "found\n"; - fclose (f); - return path; - } + File_name file_name (name); + File_name dir = (string) dirs_[i]; + file_name.root_ = dir.root_; + dir.root_ = ""; + if (file_name.dir_.empty ()) + file_name.dir_ = dir.to_string (); + else if (!dir.to_string ().empty ()) + file_name.dir_ = dir.to_string () + + ::to_string (DIRSEP) + file_name.dir_; + if (is_file (file_name.to_string ())) + return file_name.to_string (); } - DEBUG_OUT << '\n'; return ""; } -/** - Add an directory, return false if failed - */ -bool -File_path::try_add (String s) +/* + Try to find + + file.EXT, + + where EXT is from EXTENSIONS. +*/ +string +File_path::find (string name, char const *extensions[]) { - if (s == "") - s = "."; - FILE * f = fopen (s.ch_C(), "r"); - if (!f) - return false; - fclose (f); - - push (s); - return true; + if (name.empty () || name == "-") + return name; + + File_name file_name (name); + string orig_ext = file_name.ext_; + for (int i = 0; extensions[i]; i++) + { + file_name.ext_ = orig_ext; + if (*extensions[i] && !file_name.ext_.empty ()) + file_name.ext_ += "."; + file_name.ext_ += extensions[i]; + string found = find (file_name.to_string ()); + if (!found.empty ()) + return found; + } + + return ""; } -void -File_path::add (String s) +/** Append a directory, return false if failed. */ +bool +File_path::try_append (string s) { - push (s); + if (s == "") + s = "."; + if (is_dir (s)) + { + append (s); + return true; + } + return false; } -String -File_path::str () const +string +File_path::to_string () const { - String s; - for (int i=0; i< size (); i++) + string s; + for (vsize i = 0; i < dirs_.size (); i++) { - s = s + elem (i); - if (i < size () -1 ) - s += ":"; + s = s + dirs_[i]; + if (i < dirs_.size () - 1) + s += ::to_string (PATHSEP); } return s; } + +void +File_path::append (string str) +{ + dirs_.push_back (str); +} + +void +File_path::prepend (string str) +{ + dirs_.insert (dirs_.begin (), str); +}