PROCEDURE GetFile(VAR path: ARRAY OF CHAR; VAR loc: Files.Locator; VAR name: Files.Name);
VAR i, j: INTEGER; ch: CHAR;
BEGIN
i := 0; ch := path[0]; loc := Files.dir.This(""); name := "";
WHILE (ch # 0X) & (loc.res = 0) DO
j := 0;
WHILE (ch # 0X) & (ch # Separator)&(ch # Separator2) DO name[j] := ch; INC(j); INC(i); ch := path[i] END;
name[j] := 0X;
IF (ch = Separator) OR (ch = Separator2) THEN loc := loc.This(name); INC(i); ch := path[i] END;
END;
IF loc.res # 0 THEN loc := NIL END;
path[i] := 0X
END GetFile;
The docu of StdCoder.EncodeFileList says that "/" should be used as separator.
It does not mention "\". Using "\" as separator makes implicit use of
the fact that under Windows (HostFiles) "\" can be used as a file separator.
Supporting "\" in StdCoder.EncodeFileList is tempting but has the disadvantage of
making StdCoder dependent on a particular HostFiles implementation without
showing this dependency in the import list.
that means it's not a bug...
But how was the example file created? Under which release?
Can our center distribution create such a file?
Maybe Ivan can get the answer form its author.
The center version can create such a file and the center version can even decode such a file
but only if all directories already exist. It fails when creation of a directory is required because
it skips the separator that marks the directory name needed for creating a new directory.
Creating a file and creating a directory are separated under Windows and are also separated
in the BlackBox Files module.
Josef Templ wrote:The center version can create such a file and the center version can even decode such a file
but only if all directories already exist.
But with Luowy's patches the directory is created during decode automatically.
- Helmut
Well, there are other modules as well that use "\" as alternative separator, for example StdApi.
It seems that this violation of abstraction is unavoidable unless there is some
additional (Files) function that checks for valid file names.
Given that observation I tend to agree with luowy's proposal.
I have just looked at HostFiles.Diff & HostFiles.NewLocator, both chosen rather at random.
In each case there is explicit code to allow either "/" or "\" as the separator.
So it seems to be the case that BlackBox generally allows the choice, and to be consistent we should also allow it in StdCoder (and update the documentation to reflect this change).
This change also makes things a little more convenient for the user.
It is clear that the separators are hard-coded in HostFiles.
This is where they belong to. Hard coding them outside HostFiles is not very clean
but as I mentioned before, it seems to be unavoidable and it should be done in
StdCoder as luowy pointed out.