Structure Path
(* OS.Path -- SML Basis Library *)
exception Path
val parentArc : string
val currentArc : string
val fromString : string -> {isAbs : bool, vol : string, arcs : string list}
val toString : {isAbs : bool, vol : string, arcs : string list} -> string
val getVolume : string -> string
val validVolume : {isAbs : bool, vol : string} -> bool
val getParent : string -> string
val isAbsolute : string -> bool
val isRelative : string -> bool
val mkAbsolute : string * string -> string
val mkRelative : string * string -> string
val concat : string * string -> string
val mkCanonical : string -> string
val isCanonical : string -> bool
val splitDirFile : string -> {dir : string, file : string}
val joinDirFile : {dir : string, file : string} -> string
val dir : string -> string
val file : string -> string
val splitBaseExt : string -> {base : string, ext : string option}
val joinBaseExt : {base : string, ext: string option} -> string
val base : string -> string
val ext : string -> string option
(* This module provides OS-independent functions for manipulating
strings that represent file names and paths in a directory
structure. None of these functions accesses the actual filesystem.
Definitions:
* An arc denotes a directory or file. Under Unix or DOS, an arc may
have form "..", ".", "", or "abc", or similar.
* An absolute path has a root: Unix examples include "/", "/a/b";
DOS examples include "\", "\a\b", "A:\a\b".
* A relative path is one without a root: Unix examples include
"..", "a/b"; DOS examples include "..", "a\b", "A:a\b".
* A path has an associated volume. Under Unix, there is only one
volume, whose name is "". Under DOS, the volume names are "",
"A:", "C:", and similar.
* A canonical path contains no occurrences of the empty arc "" or
the current arc ".", and contains or the parent arc ".." only at
the beginning and only if the path is relative.
* All functions (except concat) preserve canonical paths. That is,
if all arguments are canonical, then so will the result be.
* All functions are defined so that they work sensibly on canonical
paths.
* There are three groups of functions, corresponding to three ways
to look at paths, exemplified by the following paths:
Unix: d/e/f/a.b.c and /d/e/f/a.b.c
DOS: A:d\e\f\a.b.c and A:d\e\f\a.b.c
(1) A path consists of a sequence of arcs, possibly preceded by a
volume and a root:
vol [--- arcs ---] vol root [--- arcs ---]
------------------------------------------------------------------
Unix examples: d e f a.b.c / d e f a.b.c
DOS examples: A: d e f a.b A: \ d e f a.b
(2) A path consists of a directory part and a (last) file name part:
directory file directory file
------------------------------------------------------------------
Unix examples: d/e/f a.b.c /d/e/f a.b.c
DOS examples: A:d\e\f a.b A:\d\e\f a.b
(3) A path consists of a base and an extension:
base extension base extension
------------------------------------------------------------------
Unix examples: d/e/f/a.b c /d/e/f/a.b c
DOS examples: A:d\e\f\a b A:\d\e\f\a b
GROUP 0: General functions on paths:
[parentArc] is the arc denoting a parent directory: ".." under
DOS and Unix.
[currentArc] is the arc denoting the current directory: "." under
DOS and Unix.
[isRelative p] returns true if p is a relative path.
[isAbsolute p] returns true if p is an absolute path.
Equals not (isRelative p).
[validVolume {isAbs, vol}] returns true if vol is a valid volume
name for an absolute path (if isAbs=true) resp. for a relative path
(if isAbs=false). Under Unix, the only valid volume name is "";
under DOS the valid volume names are "", "a:", "b:", ..., and "A:",
"B:", ...
[getParent p] returns a string denoting the parent directory of p.
It holds that getParent p = p if and only if p is a root.
[concat (p1, p2)] returns the path consisting of p1 followed by p2.
Does not preserve canonical paths: concat("a/b", "../c") equals
"a/b/../c". This is because "a/b/../c" and "a/c" may not be
equivalent in the presence of symbolic links. Raises Path if p2 is
not a relative path.
[mkAbsolute(p1, p2)] returns the absolute path made by taking path
p2, then p1. That is, returns p1 if p1 is absolute; otherwise
returns the canonicalized concatenation of p2 and p1. Raises Path
if p2 is not absolute (even if p1 is absolute).
[mkRelative(p1, p2)] returns p1 relative to p2. That is, returns
p1 if p1 is already relative; otherwise returns the relative path
leading from p2 to p1. Raises Path if p2 is not absolute (and even
if p1 is relative), or if p1 and p2 are both absolute but have
different roots.
[mkCanonical p] returns a canonical path which is equivalent to p.
Redundant occurrences of the parent arc, the current arc, and the
empty arc are removed. The canonical path will never be the empty
string; the empty path is converted to the current directory path
("." under Unix and DOS).
[isCanonical p] is equal to (p = mkCanonical p).
GROUP 1: Manipulating volumes and arcs:
[fromString s] returns {isAbs=false, vol, arcs} if the path p is
relative, and {isAbs=true, vol, arcs} if the path p is absolute.
In both cases vol is the volume name and arcs is the list of
(possibly empty) arcs of the path. Under Unix, the volume name is
always the empty string ""; under DOS it will have form "A:", "C:",
or similar.
[toString path] reconstitutes a path from its root (if any) and
arcs. Raises Path if applied to a relative path whose first arc is
empty. It holds that toString(fromString p) = p, except that in MS
DOS, slashes "/" in p will be replaced by backslashes "\". It
holds that fromString (toString p) = p when no exception is raised.
It holds that isRelative(toString {isAbs=false, vol, arcs}) = true
when no exception is raised.
GROUP 2: Manipulating directory paths and file names:
[splitDirFile p] returns {dir, file} where file is the last arc in
p, and dir is the path preceding that arc. A typical use is to
split a path into the directory part (dir) and the filename (file).
[joinDirFile {dir, file}] returns the path p obtained by extending
the path dir with the arc file.
[dir p] equals #dir (splitDirFile p).
[file p] equals #file (splitDirFile p).
GROUP 3: Manipulating file names and extensions:
[splitBaseExt s] returns {base, ext} where ext = NONE if s has no
extension, and ext = SOME e if s has extension e; base is the part
of s preceding the extension. A path s is considered having no
extension if its last arc contains no extension separator
(typically ".") or contains an extension separator only as its
leftmost character, or contains an extension separator as its
right-most character. Hence none of "a.b/cd", "a/.login", "a.",
"..", "." and "." has an extension.
[joinBaseExt {base, ext}] returns an arc composed of the base name
and the extension (if different from NONE). It is a left inverse
of splitBaseExt, so joinBaseExt (splitBaseExt s) = s, but the
opposite does not hold (since the extension may be empty, or may
contain extension separators).
[ext s] equals #ext (splitBaseExt s).
[base s] equals #base (splitBaseExt s).
*)
Moscow ML 1.42