DOORS 9.7 : DXL and mkdir
Under DOORS 9.7, with DXL, I want to create a directory on my WINDOWS 11 workstation.
So I use the command: mkdir ("C:\Toto", "")
The "C:\Toto" directory is successfully created.
Then I use the command: mkdir ("C:\Toto\Tata\Titi", "")
The command fails and the "C:\Toto\Tata\Titi" directory is not created because "C:\Toto\Tata" does not yet exist...
Is there an option that allows "C:\Toto\Tata\Titi" to be created even if "C:\Toto\Tata" does not exist (an equivalent of "-p" under UNIX)? I should point out that my DOORS 9.7 client is running under WINDOWS 11.
Thank you for your help.
One answer
In the meantime, I work around the problem with a function that takes care of creating the non-existent subdirectories :
void createUpDir (string rootDir) {
Regexp SUBDIR = regexp2 "^(.)\\[^\\]+
void createUpDir (string rootDir) {
Regexp SUBDIR = regexp2 "^(.)\\[^\\]+$"
string myUpDir
Stat dirHandle
if (SUBDIR rootDir) {
myUpDir = rootDir[match 1]
dirHandle = create (myUpDir)
if (null dirHandle) { // ---- Directory does not exists ! Create it ...
print "Create Upper Dir = " myUpDir "\n"
createUpDir (myUpDir) // ---- Recursive call to create upper upper directory, if necessary
mkdir (myUpDir, "")
}
}
return
}
quot;
string myUpDir
Stat dirHandle
if (SUBDIR rootDir) {
myUpDir = rootDir[match 1]
dirHandle = create (myUpDir)
if (null dirHandle) { // ---- Directory does not exists ! Create it ...
print "Create Upper Dir = " myUpDir "\n"
createUpDir (myUpDir) // ---- Recursive call to create upper upper directory, if necessary
mkdir (myUpDir, "")
}
}
return
}