261#define MAX_PATH 260_IK
262#define MAX_NAME 260_IK
264#define MAX_PATH 4096_IK
265#define MAX_NAME 255_IK
270#define BIND2(X)bind(C, name = X)
284 integer ,
private :: i
290#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
296#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
300#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
304#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
308#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
312#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
316#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
325#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
368#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
369 !DIR$ ATTRIBUTES DLLEXPORT ::
verbatim
403#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
431#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
479#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
497#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
513#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
530#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
543#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
602#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
662#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
677#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
695#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
707#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
884 module function ls_BSSK(path, sort, showdir, showfile, showhidden, reversed)
result(list)
885#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
886 !DEC$ ATTRIBUTES DLLEXPORT :: ls_BSSK
889 character(
*,SKG) ,
intent(in) :: path
890 character(
*, SK) ,
intent(in) ,
optional :: sort
891 logical(LK) ,
intent(in) ,
optional :: showdir, showfile, showhidden, reversed
892 type(css_type) ,
allocatable :: list(:)
956 module function glob_BSSK(pattern)
result(list)
957#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
958 !DEC$ ATTRIBUTES DLLEXPORT :: glob_BSSK
961 character(
*,SKG) ,
intent(in) :: pattern
962 type(css_type) ,
allocatable :: list(:)
1106 module function isFailedGlob_SK(pattern, list, index, errmsg)
result(failed)
1107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1108 !DEC$ ATTRIBUTES DLLEXPORT :: isFailedGlob_SK
1111 character(
*,SKG) ,
intent(in) :: pattern
1112 character(:,SKG) ,
intent(out) ,
allocatable :: list
1113 integer(IK) ,
intent(out) ,
allocatable ::
index(:,:)
1114 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
1115 logical(LK) :: failed
1118 module function isFailedGlob_BSSK(pattern, list, errmsg)
result(failed)
1119#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1120 !DEC$ ATTRIBUTES DLLEXPORT :: isFailedGlob_BSSK
1124 character(
*,SKG) ,
intent(in) :: pattern
1125 type(css_type) ,
intent(out) ,
allocatable :: list(:)
1126 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
1127 logical(LK) :: failed
1259 module function isFailedList_SK(path, list, index, sort, showdir, showfile, showhidden, reversed, errmsg)
result(failed)
1260#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1261 !DEC$ ATTRIBUTES DLLEXPORT :: isFailedList_SK
1264 character(
*,SKG) ,
intent(in) :: path
1265 character(:,SKG) ,
intent(out) ,
allocatable :: list
1266 integer(IK) ,
intent(out) ,
allocatable ::
index(:,:)
1267 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
1268 character(
*, SK) ,
intent(in) ,
optional :: sort
1269 logical(LK) ,
intent(in) ,
optional :: showdir, showfile, showhidden, reversed
1270 logical(LK) :: failed
1273 module function isFailedList_BSSK(path, list, sort, showdir, showfile, showhidden, reversed, errmsg)
result(failed)
1274#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1275 !DEC$ ATTRIBUTES DLLEXPORT :: isFailedList_BSSK
1279 character(
*,SKG) ,
intent(in) :: path
1280 type(css_type) ,
intent(out) ,
allocatable :: list(:)
1281 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
1282 character(
*, SK) ,
intent(in) ,
optional :: sort
1283 logical(LK) ,
intent(in) ,
optional :: showdir, showfile, showhidden, reversed
1284 logical(LK) :: failed
1345 PURE module function getPathPosixEscaped_D0_SK5(path)
result(pathEscaped)
1346#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1347 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosixEscaped_D0_SK5
1350 character(
*,SKG) ,
intent(in) :: path
1351 character(:,SKG) ,
allocatable :: pathEscaped
1356 PURE module function getPathPosixEscaped_D0_SK4(path)
result(pathEscaped)
1357#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1358 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosixEscaped_D0_SK4
1361 character(
*,SKG) ,
intent(in) :: path
1362 character(:,SKG) ,
allocatable :: pathEscaped
1367 PURE module function getPathPosixEscaped_D0_SK3(path)
result(pathEscaped)
1368#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1369 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosixEscaped_D0_SK3
1372 character(
*,SKG) ,
intent(in) :: path
1373 character(:,SKG) ,
allocatable :: pathEscaped
1378 PURE module function getPathPosixEscaped_D0_SK2(path)
result(pathEscaped)
1379#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1380 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosixEscaped_D0_SK2
1383 character(
*,SKG) ,
intent(in) :: path
1384 character(:,SKG) ,
allocatable :: pathEscaped
1389 PURE module function getPathPosixEscaped_D0_SK1(path)
result(pathEscaped)
1390#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1391 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosixEscaped_D0_SK1
1394 character(
*,SKG) ,
intent(in) :: path
1395 character(:,SKG) ,
allocatable :: pathEscaped
1459 PURE module subroutine setPathPosixEscaped_D0_SK5(pathEscaped, path)
1460#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1461 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosixEscaped_D0_SK5
1464 character(:,SKG) ,
intent(out) ,
allocatable :: pathEscaped
1465 character(
*,SKG) ,
intent(in) :: path
1470 PURE module subroutine setPathPosixEscaped_D0_SK4(pathEscaped, path)
1471#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1472 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosixEscaped_D0_SK4
1475 character(:,SKG) ,
intent(out) ,
allocatable :: pathEscaped
1476 character(
*,SKG) ,
intent(in) :: path
1481 PURE module subroutine setPathPosixEscaped_D0_SK3(pathEscaped, path)
1482#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1483 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosixEscaped_D0_SK3
1486 character(:,SKG) ,
intent(out) ,
allocatable :: pathEscaped
1487 character(
*,SKG) ,
intent(in) :: path
1492 PURE module subroutine setPathPosixEscaped_D0_SK2(pathEscaped, path)
1493#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1494 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosixEscaped_D0_SK2
1497 character(:,SKG) ,
intent(out) ,
allocatable :: pathEscaped
1498 character(
*,SKG) ,
intent(in) :: path
1503 PURE module subroutine setPathPosixEscaped_D0_SK1(pathEscaped, path)
1504#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1505 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosixEscaped_D0_SK1
1508 character(:,SKG) ,
intent(out) ,
allocatable :: pathEscaped
1509 character(
*,SKG) ,
intent(in) :: path
1582 PURE module function getPathPosix_D0_SK5(path, ignore)
result(pathPosix)
1583#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1584 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosix_D0_SK5
1587 character(
*,SKG) ,
intent(in) :: path
1588 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1589 character(:,SKG) ,
allocatable :: pathPosix
1594 PURE module function getPathPosix_D0_SK4(path, ignore)
result(pathPosix)
1595#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1596 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosix_D0_SK4
1599 character(
*,SKG) ,
intent(in) :: path
1600 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1601 character(:,SKG) ,
allocatable :: pathPosix
1606 PURE module function getPathPosix_D0_SK3(path, ignore)
result(pathPosix)
1607#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1608 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosix_D0_SK3
1611 character(
*,SKG) ,
intent(in) :: path
1612 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1613 character(:,SKG) ,
allocatable :: pathPosix
1618 PURE module function getPathPosix_D0_SK2(path, ignore)
result(pathPosix)
1619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1620 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosix_D0_SK2
1623 character(
*,SKG) ,
intent(in) :: path
1624 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1625 character(:,SKG) ,
allocatable :: pathPosix
1630 PURE module function getPathPosix_D0_SK1(path, ignore)
result(pathPosix)
1631#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1632 !DEC$ ATTRIBUTES DLLEXPORT :: getPathPosix_D0_SK1
1635 character(
*,SKG) ,
intent(in) :: path
1636 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1637 character(:,SKG) ,
allocatable :: pathPosix
1731 PURE module subroutine setPathPosix_D0_SK5(path, ignore)
1732#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1733 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosix_D0_SK5
1736 character(:,SKG) ,
intent(inout) ,
allocatable :: path
1737 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1742 PURE module subroutine setPathPosix_D0_SK4(path, ignore)
1743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1744 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosix_D0_SK4
1747 character(:,SKG) ,
intent(inout) ,
allocatable :: path
1748 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1753 PURE module subroutine setPathPosix_D0_SK3(path, ignore)
1754#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1755 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosix_D0_SK3
1758 character(:,SKG) ,
intent(inout) ,
allocatable :: path
1759 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1764 PURE module subroutine setPathPosix_D0_SK2(path, ignore)
1765#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1766 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosix_D0_SK2
1769 character(:,SKG) ,
intent(inout) ,
allocatable :: path
1770 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1775 PURE module subroutine setPathPosix_D0_SK1(path, ignore)
1776#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1777 !DEC$ ATTRIBUTES DLLEXPORT :: setPathPosix_D0_SK1
1780 character(:,SKG) ,
intent(inout) ,
allocatable :: path
1781 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1862 pure module function getPathWindows_D0_SK5(path, ignore)
result(pathWindows)
1863#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1864 !DEC$ ATTRIBUTES DLLEXPORT :: getPathWindows_D0_SK5
1867 character(
*,SKG) ,
intent(in) :: path
1868 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1869 character(:,SKG) ,
allocatable :: pathWindows
1874 pure module function getPathWindows_D0_SK4(path, ignore)
result(pathWindows)
1875#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1876 !DEC$ ATTRIBUTES DLLEXPORT :: getPathWindows_D0_SK4
1879 character(
*,SKG) ,
intent(in) :: path
1880 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1881 character(:,SKG) ,
allocatable :: pathWindows
1886 pure module function getPathWindows_D0_SK3(path, ignore)
result(pathWindows)
1887#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1888 !DEC$ ATTRIBUTES DLLEXPORT :: getPathWindows_D0_SK3
1891 character(
*,SKG) ,
intent(in) :: path
1892 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1893 character(:,SKG) ,
allocatable :: pathWindows
1898 pure module function getPathWindows_D0_SK2(path, ignore)
result(pathWindows)
1899#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1900 !DEC$ ATTRIBUTES DLLEXPORT :: getPathWindows_D0_SK2
1903 character(
*,SKG) ,
intent(in) :: path
1904 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1905 character(:,SKG) ,
allocatable :: pathWindows
1910 pure module function getPathWindows_D0_SK1(path, ignore)
result(pathWindows)
1911#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1912 !DEC$ ATTRIBUTES DLLEXPORT :: getPathWindows_D0_SK1
1915 character(
*,SKG) ,
intent(in) :: path
1916 character(
*,SKG) ,
intent(in) ,
optional :: ignore
1917 character(:,SKG) ,
allocatable :: pathWindows
2004 pure module subroutine setPathWindows_D0_SK5(path, ignore)
2005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2006 !DEC$ ATTRIBUTES DLLEXPORT :: setPathWindows_D0_SK5
2009 character(:,SKG) ,
intent(inout) ,
allocatable :: path
2010 character(
*,SKG) ,
intent(in) ,
optional :: ignore
2015 pure module subroutine setPathWindows_D0_SK4(path, ignore)
2016#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2017 !DEC$ ATTRIBUTES DLLEXPORT :: setPathWindows_D0_SK4
2020 character(:,SKG) ,
intent(inout) ,
allocatable :: path
2021 character(
*,SKG) ,
intent(in) ,
optional :: ignore
2026 pure module subroutine setPathWindows_D0_SK3(path, ignore)
2027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2028 !DEC$ ATTRIBUTES DLLEXPORT :: setPathWindows_D0_SK3
2031 character(:,SKG) ,
intent(inout) ,
allocatable :: path
2032 character(
*,SKG) ,
intent(in) ,
optional :: ignore
2037 pure module subroutine setPathWindows_D0_SK2(path, ignore)
2038#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2039 !DEC$ ATTRIBUTES DLLEXPORT :: setPathWindows_D0_SK2
2042 character(:,SKG) ,
intent(inout) ,
allocatable :: path
2043 character(
*,SKG) ,
intent(in) ,
optional :: ignore
2048 pure module subroutine setPathWindows_D0_SK1(path, ignore)
2049#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2050 !DEC$ ATTRIBUTES DLLEXPORT :: setPathWindows_D0_SK1
2053 character(:,SKG) ,
intent(inout) ,
allocatable :: path
2054 character(
*,SKG) ,
intent(in) ,
optional :: ignore
2140 pure module function getPathHostNameIndex_SK5(path, dirsep)
result(index)
2141#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2142 !DEC$ ATTRIBUTES DLLEXPORT :: getPathHostNameIndex_SK5
2145 character(
*,SKG) ,
intent(in) :: path, dirsep
2146 integer(IK) :: index
2151 pure module function getPathHostNameIndex_SK4(path, dirsep)
result(index)
2152#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2153 !DEC$ ATTRIBUTES DLLEXPORT :: getPathHostNameIndex_SK4
2156 character(
*,SKG) ,
intent(in) :: path, dirsep
2157 integer(IK) :: index
2162 pure module function getPathHostNameIndex_SK3(path, dirsep)
result(index)
2163#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2164 !DEC$ ATTRIBUTES DLLEXPORT :: getPathHostNameIndex_SK3
2167 character(
*,SKG) ,
intent(in) :: path, dirsep
2168 integer(IK) :: index
2173 pure module function getPathHostNameIndex_SK2(path, dirsep)
result(index)
2174#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2175 !DEC$ ATTRIBUTES DLLEXPORT :: getPathHostNameIndex_SK2
2178 character(
*,SKG) ,
intent(in) :: path, dirsep
2179 integer(IK) :: index
2184 pure module function getPathHostNameIndex_SK1(path, dirsep)
result(index)
2185#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2186 !DEC$ ATTRIBUTES DLLEXPORT :: getPathHostNameIndex_SK1
2189 character(
*,SKG) ,
intent(in) :: path, dirsep
2190 integer(IK) :: index
2252 pure elemental module function hasDriveLetter_SK5(path)
result(pathHasDriveLetter)
2253#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2254 !DEC$ ATTRIBUTES DLLEXPORT :: hasDriveLetter_SK5
2257 character(
*,SKG) ,
intent(in) :: path
2258 logical(LK) :: pathHasDriveLetter
2263 pure elemental module function hasDriveLetter_SK4(path)
result(pathHasDriveLetter)
2264#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2265 !DEC$ ATTRIBUTES DLLEXPORT :: hasDriveLetter_SK4
2268 character(
*,SKG) ,
intent(in) :: path
2269 logical(LK) :: pathHasDriveLetter
2274 pure elemental module function hasDriveLetter_SK3(path)
result(pathHasDriveLetter)
2275#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2276 !DEC$ ATTRIBUTES DLLEXPORT :: hasDriveLetter_SK3
2279 character(
*,SKG) ,
intent(in) :: path
2280 logical(LK) :: pathHasDriveLetter
2285 pure elemental module function hasDriveLetter_SK2(path)
result(pathHasDriveLetter)
2286#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2287 !DEC$ ATTRIBUTES DLLEXPORT :: hasDriveLetter_SK2
2290 character(
*,SKG) ,
intent(in) :: path
2291 logical(LK) :: pathHasDriveLetter
2296 pure elemental module function hasDriveLetter_SK1(path)
result(pathHasDriveLetter)
2297#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2298 !DEC$ ATTRIBUTES DLLEXPORT :: hasDriveLetter_SK1
2301 character(
*,SKG) ,
intent(in) :: path
2302 logical(LK) :: pathHasDriveLetter
2377 pure elemental module function isPathAbsWindows_SK5(path)
result(pathIsAbs)
2378#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2379 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsWindows_SK5
2382 character(
*,SKG) ,
intent(in) :: path
2383 logical(LK) :: pathIsAbs
2388 pure elemental module function isPathAbsWindows_SK4(path)
result(pathIsAbs)
2389#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2390 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsWindows_SK4
2393 character(
*,SKG) ,
intent(in) :: path
2394 logical(LK) :: pathIsAbs
2399 pure elemental module function isPathAbsWindows_SK3(path)
result(pathIsAbs)
2400#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2401 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsWindows_SK3
2404 character(
*,SKG) ,
intent(in) :: path
2405 logical(LK) :: pathIsAbs
2410 pure elemental module function isPathAbsWindows_SK2(path)
result(pathIsAbs)
2411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2412 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsWindows_SK2
2415 character(
*,SKG) ,
intent(in) :: path
2416 logical(LK) :: pathIsAbs
2421 pure elemental module function isPathAbsWindows_SK1(path)
result(pathIsAbs)
2422#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2423 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsWindows_SK1
2426 character(
*,SKG) ,
intent(in) :: path
2427 logical(LK) :: pathIsAbs
2489 pure elemental module function isPathAbsPosix_SK5(path)
result(pathIsAbs)
2490#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2491 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsPosix_SK5
2494 character(
*,SKG) ,
intent(in) :: path
2495 logical(LK) :: pathIsAbs
2500 pure elemental module function isPathAbsPosix_SK4(path)
result(pathIsAbs)
2501#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2502 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsPosix_SK4
2505 character(
*,SKG) ,
intent(in) :: path
2506 logical(LK) :: pathIsAbs
2511 pure elemental module function isPathAbsPosix_SK3(path)
result(pathIsAbs)
2512#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2513 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsPosix_SK3
2516 character(
*,SKG) ,
intent(in) :: path
2517 logical(LK) :: pathIsAbs
2522 pure elemental module function isPathAbsPosix_SK2(path)
result(pathIsAbs)
2523#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2524 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsPosix_SK2
2527 character(
*,SKG) ,
intent(in) :: path
2528 logical(LK) :: pathIsAbs
2533 pure elemental module function isPathAbsPosix_SK1(path)
result(pathIsAbs)
2534#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2535 !DEC$ ATTRIBUTES DLLEXPORT :: isPathAbsPosix_SK1
2538 character(
*,SKG) ,
intent(in) :: path
2539 logical(LK) :: pathIsAbs
2645 impure module function getPathAbs(path)
result(pathAbs)
2646#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2650 character(
*,SKG),
intent(in) :: path
2651 character(:,SKG),
allocatable :: pathAbs
2656 impure module function getPathAbsFailed(path, failed)
result(pathAbs)
2657#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2658 !DEC$ ATTRIBUTES DLLEXPORT :: getPathAbsFailed
2661 character(
*,SKG),
intent(in) :: path
2662 logical(LK) ,
intent(out) :: failed
2663 character(:,SKG),
allocatable :: pathAbs
2668 impure module function getPathAbsFailedMsg(path, failed, errmsg)
result(pathAbs)
2669#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2670 !DEC$ ATTRIBUTES DLLEXPORT :: getPathAbsFailedMsg
2673 character(
*,SKG),
intent(in) :: path
2674 logical(LK) ,
intent(out) :: failed
2675 character(
*, SK),
intent(inout) :: errmsg
2676 character(:,SKG),
allocatable :: pathAbs
2764#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2768 character(:,SKG),
allocatable :: dirCurrent
2773 impure module function getDirCurrentFailed(failed)
result(dirCurrent)
2774#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2775 !DEC$ ATTRIBUTES DLLEXPORT :: getDirCurrentFailed
2778 logical(LK) ,
intent(out) :: failed
2779 character(:,SKG),
allocatable :: dirCurrent
2784 impure module function getDirCurrentFailedMsg(failed, errmsg)
result(dirCurrent)
2785#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2786 !DEC$ ATTRIBUTES DLLEXPORT :: getDirCurrentFailedMsg
2789 logical(LK) ,
intent(out) :: failed
2790 character(
*, SK),
intent(inout) :: errmsg
2791 character(:,SKG),
allocatable :: dirCurrent
2883 impure module function getDirHome(user, failed, errmsg)
result(dirHome)
2884#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2888 character(
*,SKG),
intent(in) ,
optional :: user
2889 logical(LK) ,
intent(out) ,
optional :: failed
2890 character(
*, SK),
intent(inout) ,
optional :: errmsg
2891 character(:,SKG) ,
allocatable :: dirHome
2992#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2996 character(
*, SK),
intent(in) :: path
2997 character(:,SKG),
allocatable :: pathExpandedUser
3002 impure module function getPathExpandedUserFailed(path, failed)
result(pathExpandedUser)
3003#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3004 !DEC$ ATTRIBUTES DLLEXPORT :: getPathExpandedUserFailed
3007 character(
*, SK),
intent(in) :: path
3008 logical(LK) ,
intent(out) :: failed
3009 character(:,SKG),
allocatable :: pathExpandedUser
3014 impure module function getPathExpandedUserFailedMsg(path, failed, errmsg)
result(pathExpandedUser)
3015#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3016 !DEC$ ATTRIBUTES DLLEXPORT :: getPathExpandedUserFailedMsg
3019 character(
*, SK),
intent(in) :: path
3020 logical(LK) ,
intent(out) :: failed
3021 character(
*, SK),
intent(inout) :: errmsg
3022 character(:,SKG),
allocatable :: pathExpandedUser
3090#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3094 character(
*,SKG),
intent(in) :: dir
3095 logical(LK) :: failed
3229 impure module function isFailedMakeDir(path, wait, ntry, errmsg)
result(failed)
3230#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3234 character(
*,SKG) ,
intent(in) :: path
3235 logical(LK) ,
intent(in) ,
optional :: wait
3236 integer(IK) ,
intent(in) ,
optional :: ntry
3237 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
3238 logical(LK) :: failed
3313#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3317 character(:,SKG) ,
intent(out) ,
allocatable :: path
3318 character(
*,SKG) ,
intent(in) ,
optional :: parent
3319 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
3320 logical(LK) :: failed
3485 module function isFailedCopy(from, to, recursive, forced, wait, ntry, errmsg)
result(failed)
3486#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3490 character(
*,SKG),
intent(in) :: from, to
3491 logical(LK) ,
intent(in) ,
optional :: recursive
3492 logical(LK) ,
intent(in) ,
optional :: forced
3493 logical(LK) ,
intent(in) ,
optional :: wait
3494 integer(IK) ,
intent(in) ,
optional :: ntry
3495 character(
*, SK),
intent(inout) ,
optional :: errmsg
3496 logical(LK) :: failed
3627 module function isFailedMove(from, to, forced, wait, ntry, errmsg)
result(failed)
3628#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3632 character(
*,SKG),
intent(in) :: from, to
3633 logical(LK) ,
intent(in) ,
optional :: forced
3634 logical(LK) ,
intent(in) ,
optional :: wait
3635 integer(IK) ,
intent(in) ,
optional :: ntry
3636 character(
*, SK),
intent(inout) ,
optional :: errmsg
3637 logical(LK) :: failed
3750 recursive module function isFailedRemove(path, recursive, forced, wait, ntry, errmsg)
result(failed)
3751#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3755 character(
*,SKG),
intent(in) :: path
3756 logical(LK) ,
intent(in) ,
optional :: recursive
3757 logical(LK) ,
intent(in) ,
optional :: forced
3758 logical(LK) ,
intent(in) ,
optional :: wait
3759 integer(IK) ,
intent(in) ,
optional :: ntry
3760 character(
*, SK),
intent(inout) ,
optional :: errmsg
3761 logical(LK) :: failed
3847 impure module function getDirSep_SK(failed, errmsg)
result(dirsep)
3848#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3849 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSep_SK
3852 logical(LK) ,
intent(out) ,
optional :: failed
3853 character(
*, SK),
intent(inout) ,
optional :: errmsg
3854 character(
1,SKG) :: dirsep
3860 impure module function getDirSep_SK5(mold, failed, errmsg)
result(dirsep)
3861#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3862 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSep_SK5
3865 character(
1,SKG),
intent(in) :: mold
3866 logical(LK) ,
intent(out) ,
optional :: failed
3867 character(
*, SK),
intent(inout) ,
optional :: errmsg
3868 character(
1,SKG) :: dirsep
3873 impure module function getDirSep_SK4(mold, failed, errmsg)
result(dirsep)
3874#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3875 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSep_SK4
3878 character(
1,SKG),
intent(in) :: mold
3879 logical(LK) ,
intent(out) ,
optional :: failed
3880 character(
*, SK),
intent(inout) ,
optional :: errmsg
3881 character(
1,SKG) :: dirsep
3886 impure module function getDirSep_SK3(mold, failed, errmsg)
result(dirsep)
3887#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3888 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSep_SK3
3891 character(
1,SKG),
intent(in) :: mold
3892 logical(LK) ,
intent(out) ,
optional :: failed
3893 character(
*, SK),
intent(inout) ,
optional :: errmsg
3894 character(
1,SKG) :: dirsep
3899 impure module function getDirSep_SK2(mold, failed, errmsg)
result(dirsep)
3900#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3901 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSep_SK2
3904 character(
1,SKG),
intent(in) :: mold
3905 logical(LK) ,
intent(out) ,
optional :: failed
3906 character(
*, SK),
intent(inout) ,
optional :: errmsg
3907 character(
1,SKG) :: dirsep
3912 impure module function getDirSep_SK1(mold, failed, errmsg)
result(dirsep)
3913#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3914 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSep_SK1
3917 character(
1,SKG),
intent(in) :: mold
3918 logical(LK) ,
intent(out) ,
optional :: failed
3919 character(
*, SK),
intent(inout) ,
optional :: errmsg
3920 character(
1,SKG) :: dirsep
4013 impure module function getDirSeps_SK(failed, errmsg)
result(dirseps)
4014#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4015 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSeps_SK
4018 logical(LK) ,
intent(out) ,
optional :: failed
4019 character(
*, SK),
intent(inout) ,
optional :: errmsg
4020 character(:,SKG),
allocatable :: dirseps
4026 impure module function getDirSeps_SK5(mold, failed, errmsg)
result(dirseps)
4027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4028 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSeps_SK5
4031 character(
1,SKG),
intent(in) :: mold
4032 logical(LK) ,
intent(out) ,
optional :: failed
4033 character(
*, SK),
intent(inout) ,
optional :: errmsg
4034 character(:,SKG),
allocatable :: dirseps
4039 impure module function getDirSeps_SK4(mold, failed, errmsg)
result(dirseps)
4040#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4041 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSeps_SK4
4044 character(
1,SKG),
intent(in) :: mold
4045 logical(LK) ,
intent(out) ,
optional :: failed
4046 character(
*, SK),
intent(inout) ,
optional :: errmsg
4047 character(:,SKG),
allocatable :: dirseps
4052 impure module function getDirSeps_SK3(mold, failed, errmsg)
result(dirseps)
4053#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4054 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSeps_SK3
4057 character(
1,SKG),
intent(in) :: mold
4058 logical(LK) ,
intent(out) ,
optional :: failed
4059 character(
*, SK),
intent(inout) ,
optional :: errmsg
4060 character(:,SKG),
allocatable :: dirseps
4065 impure module function getDirSeps_SK2(mold, failed, errmsg)
result(dirseps)
4066#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4067 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSeps_SK2
4070 character(
1,SKG),
intent(in) :: mold
4071 logical(LK) ,
intent(out) ,
optional :: failed
4072 character(
*, SK),
intent(inout) ,
optional :: errmsg
4073 character(:,SKG),
allocatable :: dirseps
4078 impure module function getDirSeps_SK1(mold, failed, errmsg)
result(dirseps)
4079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4080 !DEC$ ATTRIBUTES DLLEXPORT :: getDirSeps_SK1
4083 character(
1,SKG),
intent(in) :: mold
4084 logical(LK) ,
intent(out) ,
optional :: failed
4085 character(
*, SK),
intent(inout) ,
optional :: errmsg
4086 character(:,SKG),
allocatable :: dirseps
4167 impure module function getPathSep_SK(failed, errmsg)
result(pathsep)
4168#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4169 !DEC$ ATTRIBUTES DLLEXPORT :: getPathSep_SK
4172 logical(LK) ,
intent(out) ,
optional :: failed
4173 character(
*, SK),
intent(inout) ,
optional :: errmsg
4174 character(
1,SKG) :: pathsep
4180 impure module function getPathSep_SK5(mold, failed, errmsg)
result(pathsep)
4181#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4182 !DEC$ ATTRIBUTES DLLEXPORT :: getPathSep_SK5
4185 character(
1,SKG),
intent(in) :: mold
4186 logical(LK) ,
intent(out) ,
optional :: failed
4187 character(
*, SK),
intent(inout) ,
optional :: errmsg
4188 character(
1,SKG) :: pathsep
4193 impure module function getPathSep_SK4(mold, failed, errmsg)
result(pathsep)
4194#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4195 !DEC$ ATTRIBUTES DLLEXPORT :: getPathSep_SK4
4198 character(
1,SKG),
intent(in) :: mold
4199 logical(LK) ,
intent(out) ,
optional :: failed
4200 character(
*, SK),
intent(inout) ,
optional :: errmsg
4201 character(
1,SKG) :: pathsep
4206 impure module function getPathSep_SK3(mold, failed, errmsg)
result(pathsep)
4207#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4208 !DEC$ ATTRIBUTES DLLEXPORT :: getPathSep_SK3
4211 character(
1,SKG),
intent(in) :: mold
4212 logical(LK) ,
intent(out) ,
optional :: failed
4213 character(
*, SK),
intent(inout) ,
optional :: errmsg
4214 character(
1,SKG) :: pathsep
4219 impure module function getPathSep_SK2(mold, failed, errmsg)
result(pathsep)
4220#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4221 !DEC$ ATTRIBUTES DLLEXPORT :: getPathSep_SK2
4224 character(
1,SKG),
intent(in) :: mold
4225 logical(LK) ,
intent(out) ,
optional :: failed
4226 character(
*, SK),
intent(inout) ,
optional :: errmsg
4227 character(
1,SKG) :: pathsep
4232 impure module function getPathSep_SK1(mold, failed, errmsg)
result(pathsep)
4233#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4234 !DEC$ ATTRIBUTES DLLEXPORT :: getPathSep_SK1
4237 character(
1,SKG),
intent(in) :: mold
4238 logical(LK) ,
intent(out) ,
optional :: failed
4239 character(
*, SK),
intent(inout) ,
optional :: errmsg
4240 character(
1,SKG) :: pathsep
4368 module function getPathNew(dir, prefix, sep, ext, pid, failed)
result(pathNew)
4369#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4373 character(
*,SKG) ,
intent(in) ,
optional :: dir, prefix, sep, ext
4374 integer(IK) ,
intent(in) ,
optional :: pid
4375 logical(LK) ,
intent(out) ,
optional :: failed
4376 character(:,SKG) ,
allocatable :: pathNew
4499 module function getPathTemp(prefix, sep, ext, pid, failed)
result(pathTemp)
4500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4504 character(
*,SKG) ,
intent(in) ,
optional :: prefix, sep, ext
4505 integer(IK) ,
intent(in) ,
optional :: pid
4506 logical(LK) ,
intent(out) ,
optional :: failed
4507 character(:,SKG) ,
allocatable :: pathTemp
4576 impure module function getPathJoined(p1, p2)
result(pathJoined)
4577#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4581 character(
*,SKG) ,
intent(in) :: p1, p2
4582 character(:,SKG) ,
allocatable :: pathJoined
4585 impure module function getPathJoinedFailed(p1, p2, failed, errmsg)
result(pathJoined)
4586#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4587 !DEC$ ATTRIBUTES DLLEXPORT :: getPathJoinedFailed
4590 character(
*,SKG) ,
intent(in) :: p1, p2
4591 logical(LK) ,
intent(out) :: failed
4592 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
4593 character(:,SKG) ,
allocatable :: pathJoined
4674 impure elemental module function isFileDD(path)
result(pathIsFile)
4675#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4676 !DEC$ ATTRIBUTES DLLEXPORT :: isFileDD
4679 character(
*,SKG),
intent(in) :: path
4680 logical(LK) :: pathIsFile
4683 impure elemental module function isFileII(path, iostat, iomsg)
result(pathIsFile)
4684#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4685 !DEC$ ATTRIBUTES DLLEXPORT :: isFileII
4688 character(
*,SKG),
intent(in) :: path
4689 logical(LK) :: pathIsFile
4690 integer(IK) ,
intent(out) :: iostat
4691 character(
*, SK),
intent(inout) ,
optional :: iomsg
4773 impure elemental module function isDirDD(path)
result(pathIsDir)
4774#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4775 !DEC$ ATTRIBUTES DLLEXPORT :: isDirDD
4778 character(
*,SKG),
intent(in) :: path
4779 logical(LK) :: pathIsDir
4782 impure elemental module function isDirII(path, iostat, iomsg)
result(pathIsDir)
4783#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4784 !DEC$ ATTRIBUTES DLLEXPORT :: isDirII
4787 character(
*,SKG),
intent(in) :: path
4788 integer(IK) ,
intent(out) :: iostat
4789 character(
*, SK),
intent(inout) ,
optional :: iomsg
4790 logical(LK) :: pathIsDir
4861 impure elemental module function isExtantDD(path)
result(extant)
4862#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4863 !DEC$ ATTRIBUTES DLLEXPORT :: isExtantDD
4866 character(
*,SKG),
intent(in) :: path
4867 logical(LK) :: extant
4870 impure elemental module function isExtantII(path, iostat, iomsg)
result(extant)
4871#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4872 !DEC$ ATTRIBUTES DLLEXPORT :: isExtantII
4875 character(
*,SKG),
intent(in) :: path
4876 integer(IK) ,
intent(out) :: iostat
4877 character(
*, SK),
intent(inout) ,
optional :: iomsg
4878 logical(LK) :: extant
4960 PURE module function getPathVerbatimCMD_SK5(path)
result(pathVerbatim)
4961#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4962 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimCMD_SK5
4965 character(
*,SKG) ,
intent(in) :: path
4966 character(:,SKG) ,
allocatable :: pathVerbatim
4971 PURE module function getPathVerbatimCMD_SK4(path)
result(pathVerbatim)
4972#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4973 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimCMD_SK4
4976 character(
*,SKG) ,
intent(in) :: path
4977 character(:,SKG) ,
allocatable :: pathVerbatim
4982 PURE module function getPathVerbatimCMD_SK3(path)
result(pathVerbatim)
4983#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4984 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimCMD_SK3
4987 character(
*,SKG) ,
intent(in) :: path
4988 character(:,SKG) ,
allocatable :: pathVerbatim
4993 PURE module function getPathVerbatimCMD_SK2(path)
result(pathVerbatim)
4994#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4995 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimCMD_SK2
4998 character(
*,SKG) ,
intent(in) :: path
4999 character(:,SKG) ,
allocatable :: pathVerbatim
5004 PURE module function getPathVerbatimCMD_SK1(path)
result(pathVerbatim)
5005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5006 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimCMD_SK1
5009 character(
*,SKG) ,
intent(in) :: path
5010 character(:,SKG) ,
allocatable :: pathVerbatim
5082 PURE module function getPathVerbatimPowerShell_SK5(path)
result(pathVerbatim)
5083#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5084 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPowerShell_SK5
5087 character(
*,SKG) ,
intent(in) :: path
5088 character(:,SKG) ,
allocatable :: pathVerbatim
5093 PURE module function getPathVerbatimPowerShell_SK4(path)
result(pathVerbatim)
5094#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5095 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPowerShell_SK4
5098 character(
*,SKG) ,
intent(in) :: path
5099 character(:,SKG) ,
allocatable :: pathVerbatim
5104 PURE module function getPathVerbatimPowerShell_SK3(path)
result(pathVerbatim)
5105#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5106 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPowerShell_SK3
5109 character(
*,SKG) ,
intent(in) :: path
5110 character(:,SKG) ,
allocatable :: pathVerbatim
5115 PURE module function getPathVerbatimPowerShell_SK2(path)
result(pathVerbatim)
5116#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5117 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPowerShell_SK2
5120 character(
*,SKG) ,
intent(in) :: path
5121 character(:,SKG) ,
allocatable :: pathVerbatim
5126 PURE module function getPathVerbatimPowerShell_SK1(path)
result(pathVerbatim)
5127#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5128 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPowerShell_SK1
5131 character(
*,SKG) ,
intent(in) :: path
5132 character(:,SKG) ,
allocatable :: pathVerbatim
5204 PURE module function getPathVerbatimPosix_SK5(path)
result(pathVerbatim)
5205#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5206 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPosix_SK5
5209 character(
*,SKG) ,
intent(in) :: path
5210 character(:,SKG) ,
allocatable :: pathVerbatim
5215 PURE module function getPathVerbatimPosix_SK4(path)
result(pathVerbatim)
5216#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5217 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPosix_SK4
5220 character(
*,SKG) ,
intent(in) :: path
5221 character(:,SKG) ,
allocatable :: pathVerbatim
5226 PURE module function getPathVerbatimPosix_SK3(path)
result(pathVerbatim)
5227#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5228 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPosix_SK3
5231 character(
*,SKG) ,
intent(in) :: path
5232 character(:,SKG) ,
allocatable :: pathVerbatim
5237 PURE module function getPathVerbatimPosix_SK2(path)
result(pathVerbatim)
5238#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5239 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPosix_SK2
5242 character(
*,SKG) ,
intent(in) :: path
5243 character(:,SKG) ,
allocatable :: pathVerbatim
5248 PURE module function getPathVerbatimPosix_SK1(path)
result(pathVerbatim)
5249#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5250 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimPosix_SK1
5253 character(
*,SKG) ,
intent(in) :: path
5254 character(:,SKG) ,
allocatable :: pathVerbatim
5327 PURE module function getPathVerbatimFish_SK5(path)
result(pathVerbatim)
5328#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5329 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimFish_SK5
5332 character(
*,SKG) ,
intent(in) :: path
5333 character(:,SKG) ,
allocatable :: pathVerbatim
5338 PURE module function getPathVerbatimFish_SK4(path)
result(pathVerbatim)
5339#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5340 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimFish_SK4
5343 character(
*,SKG) ,
intent(in) :: path
5344 character(:,SKG) ,
allocatable :: pathVerbatim
5349 PURE module function getPathVerbatimFish_SK3(path)
result(pathVerbatim)
5350#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5351 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimFish_SK3
5354 character(
*,SKG) ,
intent(in) :: path
5355 character(:,SKG) ,
allocatable :: pathVerbatim
5360 PURE module function getPathVerbatimFish_SK2(path)
result(pathVerbatim)
5361#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5362 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimFish_SK2
5365 character(
*,SKG) ,
intent(in) :: path
5366 character(:,SKG) ,
allocatable :: pathVerbatim
5371 PURE module function getPathVerbatimFish_SK1(path)
result(pathVerbatim)
5372#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5373 !DEC$ ATTRIBUTES DLLEXPORT :: getPathVerbatimFish_SK1
5376 character(
*,SKG) ,
intent(in) :: path
5377 character(:,SKG) ,
allocatable :: pathVerbatim
5456 impure module function getPathVerbatim(path, failed, errmsg)
result(pathVerbatim)
5457#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5461 character(
*,SKG) ,
intent(in) :: path
5462 logical(LK) ,
intent(out) ,
optional :: failed
5463 character(
*, SK) ,
intent(inout) ,
optional :: errmsg
5464 character(:,SKG) ,
allocatable :: pathVerbatim
5563 PURE elemental module function getIndexDirNameDef(path, dirsep)
result(index)
5564#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5565 !DEC$ ATTRIBUTES DLLEXPORT :: getIndexDirNameDef
5568 character(
*,SKG) ,
intent(in) :: path
5569 character(
*,SKG) ,
intent(in) :: dirsep
5570 integer(IK) :: index
5573 PURE elemental module function getIndexDirNamePM(path, dirsep, style)
result(index)
5574#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5575 !DEC$ ATTRIBUTES DLLEXPORT :: getIndexDirNamePM
5578 character(
*,SKG) ,
intent(in) :: path
5579 character(
*,SKG) ,
intent(in) :: dirsep
5580 type(verbatim_type) ,
intent(in) :: style
5581 integer(IK) :: index
5668 PURE elemental module function getIndexBaseNameDef(path, dirsep)
result(index)
5669#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5670 !DEC$ ATTRIBUTES DLLEXPORT :: getIndexBaseNameDef
5673 character(
*,SKG) ,
intent(in) :: path
5674 character(
*,SKG) ,
intent(in) :: dirsep
5675 integer(IK) :: index
5678 PURE elemental module function getIndexBaseNamePM(path, dirsep, style)
result(index)
5679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5680 !DEC$ ATTRIBUTES DLLEXPORT :: getIndexBaseNamePM
5683 character(
*,SKG) ,
intent(in) :: path
5684 character(
*,SKG) ,
intent(in) :: dirsep
5685 type(verbatim_type) ,
intent(in) :: style
5686 integer(IK) :: index
5759 PURE elemental module function getIndexExtName(path, dirsep)
result(indexExtName)
5760#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5764 character(
*,SKG),
intent(in) :: path
5765 character(
*,SKG),
intent(in) :: dirsep
5766 integer(IK) :: indexExtName
5876 PURE module function getDirNameDef(path, dirsep)
result(dirname)
5877#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5878 !DEC$ ATTRIBUTES DLLEXPORT :: getDirNameDef
5880 character(
*, SK) ,
intent(in) :: path
5881 character(
*, SK) ,
intent(in) :: dirsep
5882 character(:, SK) ,
allocatable :: dirname
5885 PURE module function getDirNamePM(path, dirsep, style)
result(dirname)
5886#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5887 !DEC$ ATTRIBUTES DLLEXPORT :: getDirNamePM
5889 character(
*, SK) ,
intent(in) :: path
5890 character(
*, SK) ,
intent(in) :: dirsep
5891 type(verbatim_type) ,
intent(in) :: style
5892 character(:, SK) ,
allocatable :: dirname
5962 PURE module function getExtName(path, dirsep)
result(extname)
5963#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5967 character(
*,SKG),
intent(in) :: path
5968 character(
*,SKG),
intent(in) :: dirsep
5969 character(:,SKG),
allocatable :: extname
6052 PURE module function getBaseNameDef(path, dirsep)
result(basename)
6053#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6054 !DEC$ ATTRIBUTES DLLEXPORT :: getBaseNameDef
6057 character(
*,SKG) ,
intent(in) :: path
6058 character(
*,SKG) ,
intent(in) :: dirsep
6059 character(:,SKG) ,
allocatable :: basename
6062 PURE module function getBaseNamePM(path, dirsep, style)
result(basename)
6063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6064 !DEC$ ATTRIBUTES DLLEXPORT :: getBaseNamePM
6067 character(
*,SKG) ,
intent(in) :: path
6068 character(
*,SKG) ,
intent(in) :: dirsep
6069 type(verbatim_type) ,
intent(in) :: style
6070 character(:,SKG) ,
allocatable :: basename
6141 PURE module function getFileName(path, dirsep)
result(filename)
6142#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6146 character(
*,SKG),
intent(in) :: path
6147 character(
*,SKG),
intent(in) :: dirsep
6148 character(:,SKG),
allocatable :: filename
6228 module function getPathMatch(key, sep, inc, failed, errmsg)
result(list)
6229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6234 character(
*,SKG),
intent(in) ,
optional :: key
6235 character(
*,SKG),
intent(in) ,
optional :: inc
6236 character(
1,SKG),
intent(in) ,
optional :: sep
6237 logical(LK) ,
intent(out) ,
optional :: failed
6238 character(
*,SKG),
intent(inout) ,
optional :: errmsg
6239 type(css_type) ,
allocatable :: list(:)
6339 module subroutine setPathMatch(key, inc, sep, list, lenList)
6340#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6344 character(
*,SKG),
intent(in) :: key
6345 character(
*,SKG),
intent(in) :: inc
6346 character(
1,SKG),
intent(in) :: sep
6347 character(
*,SKG),
intent(out) :: list
6348 integer(IK) ,
intent(inout) :: lenList
Generate and return the basename part of the input path (i.e., all characters that appear after the l...
Generate and return the Current Working Directory (CWD) of the runtime shell.
Generate and return the Home Directory of the current user in the current runtime shell.
Generate and return the dirname (directory name) part of the input path.
Generate and return the directory separator symbol based on the runtime system shell.
Generate and return all the directory separator symbols supported by the current runtime operating sy...
Generate and return the file extension part of the input path (including the leading dot in the file ...
Generate and return the filename part of the input path.
Generate and return the index of the first character of the basename part of the input path.
Generate and return the index of the last character of the dirname (directory part) of the input path...
Generate and return the index of the first character of the file extension of the input path (if any ...
Generate and return the absolute path corresponding to the input (potentially relative) path.
Generate and return the input path wherein the initial tilde character (~) is expanded to the home di...
Generate and return the index of the last character of the hostname part of the input UNC path.
Generate and return the path that results from joining the two input path parts, separated by the spe...
Generate and return a list of directory paths matching a requested system application.
Generate and return a unique (directory or file) path name in the specified directory or the default ...
Generate and return a POSIX standard (Unix-like) version of the input POSIX-style-separated path wher...
Generate and return a POSIX-standard (Unix-like) path from the input Windows-style path.
Generate and return the path separator character used by the runtime processor shell for separating p...
Generate and return a unique (directory or file) path name in the temporary directory of the system o...
Generate and return a path quoted with double quotation marks where all instances of double quotes w...
Generate and return a path quoted with single quotation marks where all instances of backslashes with...
Generate and return a path quoted with single quotation marks where all instances of single quotes w...
Generate and return a path quoted with single quotation marks where all instances of single quotes w...
Generate and return a path quoted with single or double quotation marks whose metacharacters are also...
Generate and return a normalized Windows-style path from the input POSIX-style or Windows-style path,...
Generate and return the result of globing the specified input pattern.
Generate and return .true. is the input Windows-style path begins with a drive-letter pattern like C:...
Generate and return .true. is the input path is an extant system directory, otherwise return ....
Generate and return .true. if the input path (whether a file or a directory) exists and ....
Generate and return .true. if the attempt to set the current working directory to the input dir fails...
Generate and return .true. if the requested copy action failed, otherwise return ....
Generate and return .true. if the attempt to globing the specified input pattern fails,...
Generate and return .true. if the attempt to fetch the directory listing of the specified input path ...
Generate and return .true. if the attempt to create a temporary directory fails. Otherwise return ....
Generate and return .true. if the attempt to create the requested directory path fails,...
Generate and return .true. if the requested move action failed, otherwise return ....
Generate and return .true. if the requested path removal action from the file system failed,...
Generate and return .true. is the input path is a file (not a directory), otherwise return ....
Generate and return .true. is the input path is an absolute POSIX path (whether existing or virtual),...
Generate and return .true. is the input path is an absolute Windows path (whether existing or virtual...
Generate and return a list of all paths within the specified input path.
Return a list of directory paths matching a requested system application.
Return a POSIX standard (Unix-like) version of the input POSIX-style-separated path where all the rel...
Return a POSIX-standard (Unix-like) path from the input (Windows-style) path.
Normalize the input POSIX-style or Windows-style path to a Windows-style path, such that it conforms ...
This module contains the derived types for generating allocatable containers of scalar,...
This module defines the relevant Fortran kind type-parameters frequently used in the ParaMonte librar...
integer, parameter LK
The default logical kind in the ParaMonte library: kind(.true.) in Fortran, kind(....
integer, parameter IK
The default integer kind in the ParaMonte library: int32 in Fortran, c_int32_t in C-Fortran Interoper...
integer, parameter SK
The default character kind in the ParaMonte library: kind("a") in Fortran, c_char in C-Fortran Intero...
This module contains classes and procedures for manipulating system file/folder paths.
character(*, SK), parameter PATH_SEP_WINDOWS
The scalar character constant of default kind SK, containing the preferred directory separator charac...
character(*, SK), parameter PATH_SEP_ALL
The scalar character constant of default kind SK, containing the directory separator characters recog...
character(*, SK), parameter PATH_SEP_POSIX
The scalar character constant of default kind SK, containing the preferred directory separator charac...
character(*, SK), parameter ASCII_CONTROL_STR
The scalar character of default kind SK containing the ASCII control characters that need special car...
character(1, SK), dimension(*), parameter POSIX_RESERVED_CHR
The vector character constant of default kind SK of len = 1 containing the individual characters in P...
type(verbatim_type), parameter verbatim
The scalar constant of type verbatim_type that can be used to signify the verbatim interpretation of ...
character(*, SK), parameter WINDOWS_CMD_METACHAR_STR
The scalar character constant of default kind SK, containing the Windows CMD shell metacharacters.
character(*, SK), parameter WIN32_NAMESPACE_DEVICE
The scalar character constant of default kind SK, containing the operating systems path-separator sym...
integer(IK), parameter MAX_LEN_FILE_PATH
The scalar integer constant of default kind IK, representing the maximum system-allowed path length (...
character(1, SK), dimension(*), parameter POSIX_RESERVED_DQUOTE_CHR
The vector character constant of default kind SK of len = 1 containing the individual characters in P...
character(*, SK), parameter DIR_SEP_WINDOWS_ALL
The scalar character constant of default kind SK, containing the directory separator characters recog...
character(*, SK), parameter POSIX_RESERVED_STR
The scalar character constant of default kind SK, containing the ASCII characters that require escapi...
character(*, SK), parameter POSIX_RESERVED_DQUOTE_STR
The scalar character constant of default kind SK, containing the ASCII characters that require escapi...
character(*, SK), parameter DIR_SEP_WINDOWS
The scalar character constant of default kind SK, containing the preferred directory separator charac...
integer(IK), parameter MAX_LEN_FILE_NAME
The scalar integer constant of default kind IK, representing the maximum system-allowed path length (...
character(*, SK), parameter WINDOWS_RESERVED_STR
The scalar character constant of default kind SK, containing the Windows reserved characters not allo...
character(*, SK), parameter DIR_SEP_POSIX
The scalar character constant of default kind SK, containing the preferred directory separator charac...
character(1, SK), dimension(*), parameter WINDOWS_RESERVED_CHR
The vector character constant of default kind SK of len = 1 containing the individual characters in W...
character(4, SK), dimension(*), parameter WINDOWS_RESERVED_DEVICE_NAME
The vector character constant of default kind SK, containing the Windows reserved (forbidden) file na...
character(1, SK), dimension(*), parameter WINDOWS_CMD_METACHAR_CHR
The vector character constant of default kind SK of len = 1 containing the individual characters in W...
character(*, SK), parameter MODULE_NAME
character(*, SK), parameter DIR_SEP_ALL
The scalar character constant of default kind SK, containing the directory separator characters recog...
character(*, SK), parameter DIR_SEP_POSIX_ALL
The scalar character constant of default kind SK, containing the directory separator characters recog...
character(*, SK), parameter WIN32_NAMESPACE_FILE
The scalar character constant of default kind SK, containing the prefix operating systems path-separa...
This is the css_type type for generating instances of container of scalar of string objects.
This is the derived type with no components, whose instantiated objects are used to signify the verba...