771 lines
26 KiB
Nim
771 lines
26 KiB
Nim
# Copyright (c) 2020-2022 Status Research & Development GmbH
|
|
# Licensed and distributed under either of
|
|
# * MIT license: http://opensource.org/licenses/MIT
|
|
# * Apache License, Version 2.0: http://www.apache.org/licenses/LICENSE-2.0
|
|
# at your option. This file may not be copied, modified, or distributed except according to those terms.
|
|
|
|
{.used.}
|
|
|
|
import unittest2
|
|
import std/[osproc, strutils, algorithm]
|
|
import ../stew/io2
|
|
|
|
from os import getAppDir
|
|
|
|
when defined(posix):
|
|
from std/posix import EAGAIN
|
|
|
|
suite "OS Input/Output procedures test suite":
|
|
test "getCurrentDir() test":
|
|
let res = getCurrentDir()
|
|
check:
|
|
res.isOk() == true
|
|
len(res.get()) > 0
|
|
test "splitDrive() test":
|
|
when defined(windows):
|
|
check:
|
|
splitDrive("c:\\foo\\bar") == ("c:", "\\foo\\bar")
|
|
splitDrive("c:/foo/bar") == ("c:", "/foo/bar")
|
|
splitDrive("\\\\conky\\mountpoint\\foo\\bar") ==
|
|
("\\\\conky\\mountpoint", "\\foo\\bar")
|
|
splitDrive("//conky/mountpoint/foo/bar") ==
|
|
("//conky/mountpoint", "/foo/bar")
|
|
splitDrive("\\\\\\conky\\mountpoint\\foo\\bar") ==
|
|
("", "\\\\\\conky\\mountpoint\\foo\\bar")
|
|
splitDrive("///conky/mountpoint/foo/bar") ==
|
|
("", "///conky/mountpoint/foo/bar")
|
|
splitDrive("\\\\conky\\\\mountpoint\\foo\\bar") ==
|
|
("", "\\\\conky\\\\mountpoint\\foo\\bar")
|
|
splitDrive("//conky//mountpoint/foo/bar") ==
|
|
("", "//conky//mountpoint/foo/bar")
|
|
splitDrive("") == ("", "")
|
|
splitDrive("C") == ("", "C")
|
|
splitDrive("C:") == ("C:", "")
|
|
splitDrive("\\") == ("", "\\")
|
|
splitDrive("\\\\") == ("", "\\\\")
|
|
splitDrive("\\\\\\") == ("", "\\\\\\")
|
|
splitDrive("/") == ("", "/")
|
|
splitDrive("//") == ("", "//")
|
|
splitDrive("///") == ("", "///")
|
|
splitDrive("//conky/MOUNTPOİNT/foo/bar") ==
|
|
("//conky/MOUNTPOİNT", "/foo/bar")
|
|
elif defined(posix):
|
|
check:
|
|
splitDrive("c:\\foo\\bar") == ("", "c:\\foo\\bar")
|
|
splitDrive("c:/foo/bar") == ("", "c:/foo/bar")
|
|
splitDrive("\\\\conky\\mountpoint\\foo\\bar") ==
|
|
("", "\\\\conky\\mountpoint\\foo\\bar")
|
|
splitDrive("") == ("", "")
|
|
splitDrive("C") == ("", "C")
|
|
splitDrive("C:") == ("", "C:")
|
|
splitDrive("\\") == ("", "\\")
|
|
splitDrive("\\\\") == ("", "\\\\")
|
|
splitDrive("\\\\\\") == ("", "\\\\\\")
|
|
splitDrive("/") == ("", "/")
|
|
splitDrive("//") == ("", "//")
|
|
splitDrive("///") == ("", "///")
|
|
splitDrive("//conky/MOUNTPOİNT/foo/bar") ==
|
|
("", "//conky/MOUNTPOİNT/foo/bar")
|
|
else:
|
|
skip()
|
|
|
|
test "splitPath() test":
|
|
when defined(windows):
|
|
check:
|
|
splitPath("c:\\foo\\bar") == ("c:\\foo", "bar")
|
|
splitPath("\\\\conky\\mountpoint\\foo\\bar") ==
|
|
("\\\\conky\\mountpoint\\foo", "bar")
|
|
splitPath("c:\\") == ("c:\\", "")
|
|
splitPath("\\\\conky\\mountpoint\\") ==
|
|
("\\\\conky\\mountpoint\\", "")
|
|
splitPath("c:/") == ("c:/", "")
|
|
splitPath("//conky/mountpoint/") == ("//conky/mountpoint/", "")
|
|
elif defined(posix):
|
|
check:
|
|
splitPath("/foo/bar") == ("/foo", "bar")
|
|
splitPath("/") == ("/", "")
|
|
splitPath("foo") == ("", "foo")
|
|
splitPath("////foo") == ("////", "foo")
|
|
splitPath("//foo//bar") == ("//foo", "bar")
|
|
else:
|
|
skip()
|
|
|
|
test "createPath()/removeDir() test":
|
|
let curdir = getCurrentDir().tryGet()
|
|
when defined(windows):
|
|
let
|
|
path13s = curdir & "\\s1\\s2\\s3"
|
|
path12s = curdir & "\\s1\\s2"
|
|
path11s = curdir & "\\s1"
|
|
path23s = curdir & "\\s4\\s5\\s6"
|
|
path22s = curdir & "\\s4\\s5"
|
|
path21s = curdir & "\\s4"
|
|
path33s = curdir & "\\s7\\s8\\s9"
|
|
path32s = curdir & "\\s7\\s8"
|
|
path31s = curdir & "\\s7"
|
|
path13d = "d1\\d2\\d3"
|
|
path12d = "d1\\d2"
|
|
path11d = "d1"
|
|
path23d = "d4\\d5\\d6"
|
|
path22d = "d4\\d5"
|
|
path21d = "d4"
|
|
path33d = "d7\\d8\\d9"
|
|
path32d = "d7\\d8"
|
|
path31d = "d7"
|
|
elif defined(posix):
|
|
let
|
|
path13s = curdir & "/s1/s2/s3"
|
|
path12s = curdir & "/s1/s2"
|
|
path11s = curdir & "/s1"
|
|
path23s = curdir & "/s4/s5/s6"
|
|
path22s = curdir & "/s4/s5"
|
|
path21s = curdir & "/s4"
|
|
path33s = curdir & "/s7/s8/s9"
|
|
path32s = curdir & "/s7/s8"
|
|
path31s = curdir & "/s7"
|
|
path13d = "d1/d2/d3"
|
|
path12d = "d1/d2"
|
|
path11d = "d1"
|
|
path23d = "d4/d5/d6"
|
|
path22d = "d4/d5"
|
|
path21d = "d4"
|
|
path33d = "d7/d8/d9"
|
|
path32d = "d7/d8"
|
|
path31d = "d7"
|
|
|
|
check:
|
|
createPath(path13s, 0o700).isOk()
|
|
createPath(path23s, 0o775).isOk()
|
|
createPath(path33s, 0o777).isOk()
|
|
createPath(path13d, 0o770).isOk()
|
|
createPath(path23d, 0o752).isOk()
|
|
createPath(path33d, 0o772).isOk()
|
|
checkPermissions(path13s, 0o700) == true
|
|
checkPermissions(path23s, 0o775) == true
|
|
checkPermissions(path33s, 0o777) == true
|
|
checkPermissions(path13d, 0o770) == true
|
|
checkPermissions(path23d, 0o752) == true
|
|
checkPermissions(path33d, 0o772) == true
|
|
removeDir(path13s).isOk()
|
|
removeDir(path12s).isOk()
|
|
removeDir(path11s).isOk()
|
|
removeDir(path23s).isOk()
|
|
removeDir(path22s).isOk()
|
|
removeDir(path21s).isOk()
|
|
removeDir(path33s).isOk()
|
|
removeDir(path32s).isOk()
|
|
removeDir(path31s).isOk()
|
|
removeDir(path13d).isOk()
|
|
removeDir(path12d).isOk()
|
|
removeDir(path11d).isOk()
|
|
removeDir(path23d).isOk()
|
|
removeDir(path22d).isOk()
|
|
removeDir(path21d).isOk()
|
|
removeDir(path33d).isOk()
|
|
removeDir(path32d).isOk()
|
|
removeDir(path31d).isOk()
|
|
|
|
test "writeFile() to existing file with different permissions":
|
|
check:
|
|
writeFile("testblob0", "BLOCK0", 0o666).isOk()
|
|
checkPermissions("testblob0", 0o666) == true
|
|
writeFile("testblob0", "BLOCK1", 0o600).isOk()
|
|
checkPermissions("testblob0", 0o600) == true
|
|
writeFile("testblob0", "BLOCK2", 0o777).isOk()
|
|
checkPermissions("testblob0", 0o777) == true
|
|
removeFile("testblob0").isOk()
|
|
|
|
test "setPermissions(handle)/getPermissions(handle)":
|
|
proc performTest(pathName: string,
|
|
permissions: int): IoResult[int] =
|
|
let msg = "BLOCK"
|
|
let flags = {OpenFlags.Write, OpenFlags.Truncate, OpenFlags.Create}
|
|
let handle = ? openFile(pathName, flags)
|
|
let wcount {.used.} = ? writeFile(handle, msg)
|
|
let oldPermissions = ? getPermissions(handle)
|
|
? setPermissions(handle, permissions)
|
|
let permissions = ? getPermissions(handle)
|
|
? setPermissions(handle, oldPermissions)
|
|
? closeFile(handle)
|
|
? removeFile(pathName)
|
|
ok(permissions)
|
|
|
|
let r000 = performTest("testblob0", 0o000)
|
|
|
|
let r100 = performTest("testblob0", 0o100)
|
|
let r200 = performTest("testblob0", 0o200)
|
|
let r300 = performTest("testblob0", 0o300)
|
|
let r400 = performTest("testblob0", 0o400)
|
|
let r500 = performTest("testblob0", 0o500)
|
|
let r600 = performTest("testblob0", 0o600)
|
|
let r700 = performTest("testblob0", 0o700)
|
|
|
|
let r010 = performTest("testblob0", 0o010)
|
|
let r020 = performTest("testblob0", 0o020)
|
|
let r030 = performTest("testblob0", 0o030)
|
|
let r040 = performTest("testblob0", 0o040)
|
|
let r050 = performTest("testblob0", 0o050)
|
|
let r060 = performTest("testblob0", 0o060)
|
|
let r070 = performTest("testblob0", 0o070)
|
|
|
|
let r001 = performTest("testblob0", 0o001)
|
|
let r002 = performTest("testblob0", 0o002)
|
|
let r003 = performTest("testblob0", 0o003)
|
|
let r004 = performTest("testblob0", 0o004)
|
|
let r005 = performTest("testblob0", 0o005)
|
|
let r006 = performTest("testblob0", 0o006)
|
|
let r007 = performTest("testblob0", 0o007)
|
|
|
|
when defined(windows):
|
|
check:
|
|
r000.tryGet() == 0o555
|
|
r100.tryGet() == 0o555
|
|
r200.tryGet() == 0o777
|
|
r300.tryGet() == 0o777
|
|
r400.tryGet() == 0o555
|
|
r500.tryGet() == 0o555
|
|
r600.tryGet() == 0o777
|
|
r700.tryGet() == 0o777
|
|
r010.tryGet() == 0o555
|
|
r020.tryGet() == 0o777
|
|
r030.tryGet() == 0o777
|
|
r040.tryGet() == 0o555
|
|
r050.tryGet() == 0o555
|
|
r060.tryGet() == 0o777
|
|
r070.tryGet() == 0o777
|
|
r001.tryGet() == 0o555
|
|
r002.tryGet() == 0o777
|
|
r003.tryGet() == 0o777
|
|
r004.tryGet() == 0o555
|
|
r005.tryGet() == 0o555
|
|
r006.tryGet() == 0o777
|
|
r007.tryGet() == 0o777
|
|
else:
|
|
check:
|
|
r000.tryGet() == 0o000
|
|
r100.tryGet() == 0o100
|
|
r200.tryGet() == 0o200
|
|
r300.tryGet() == 0o300
|
|
r400.tryGet() == 0o400
|
|
r500.tryGet() == 0o500
|
|
r600.tryGet() == 0o600
|
|
r700.tryGet() == 0o700
|
|
r010.tryGet() == 0o010
|
|
r020.tryGet() == 0o020
|
|
r030.tryGet() == 0o030
|
|
r040.tryGet() == 0o040
|
|
r050.tryGet() == 0o050
|
|
r060.tryGet() == 0o060
|
|
r070.tryGet() == 0o070
|
|
r001.tryGet() == 0o001
|
|
r002.tryGet() == 0o002
|
|
r003.tryGet() == 0o003
|
|
r004.tryGet() == 0o004
|
|
r005.tryGet() == 0o005
|
|
r006.tryGet() == 0o006
|
|
r007.tryGet() == 0o007
|
|
|
|
test "setPermissions(path)/getPermissions(path)":
|
|
proc performTest(pathName: string,
|
|
permissions: int): IoResult[int] =
|
|
let msg = "BLOCK"
|
|
? io2.writeFile(pathName, msg)
|
|
let oldPermissions = ? getPermissions(pathName)
|
|
? setPermissions(pathName, permissions)
|
|
let permissions = ? getPermissions(pathName)
|
|
? setPermissions(pathName, oldPermissions)
|
|
? removeFile(pathName)
|
|
ok(permissions)
|
|
|
|
let r000 = performTest("testblob1", 0o000)
|
|
|
|
let r100 = performTest("testblob1", 0o100)
|
|
let r200 = performTest("testblob1", 0o200)
|
|
let r300 = performTest("testblob1", 0o300)
|
|
let r400 = performTest("testblob1", 0o400)
|
|
let r500 = performTest("testblob1", 0o500)
|
|
let r600 = performTest("testblob1", 0o600)
|
|
let r700 = performTest("testblob1", 0o700)
|
|
|
|
let r010 = performTest("testblob1", 0o010)
|
|
let r020 = performTest("testblob1", 0o020)
|
|
let r030 = performTest("testblob1", 0o030)
|
|
let r040 = performTest("testblob1", 0o040)
|
|
let r050 = performTest("testblob1", 0o050)
|
|
let r060 = performTest("testblob1", 0o060)
|
|
let r070 = performTest("testblob1", 0o070)
|
|
|
|
let r001 = performTest("testblob1", 0o001)
|
|
let r002 = performTest("testblob1", 0o002)
|
|
let r003 = performTest("testblob1", 0o003)
|
|
let r004 = performTest("testblob1", 0o004)
|
|
let r005 = performTest("testblob1", 0o005)
|
|
let r006 = performTest("testblob1", 0o006)
|
|
let r007 = performTest("testblob1", 0o007)
|
|
|
|
when defined(windows):
|
|
check:
|
|
r000.tryGet() == 0o555
|
|
r100.tryGet() == 0o555
|
|
r200.tryGet() == 0o777
|
|
r300.tryGet() == 0o777
|
|
r400.tryGet() == 0o555
|
|
r500.tryGet() == 0o555
|
|
r600.tryGet() == 0o777
|
|
r700.tryGet() == 0o777
|
|
r010.tryGet() == 0o555
|
|
r020.tryGet() == 0o777
|
|
r030.tryGet() == 0o777
|
|
r040.tryGet() == 0o555
|
|
r050.tryGet() == 0o555
|
|
r060.tryGet() == 0o777
|
|
r070.tryGet() == 0o777
|
|
r001.tryGet() == 0o555
|
|
r002.tryGet() == 0o777
|
|
r003.tryGet() == 0o777
|
|
r004.tryGet() == 0o555
|
|
r005.tryGet() == 0o555
|
|
r006.tryGet() == 0o777
|
|
r007.tryGet() == 0o777
|
|
else:
|
|
check:
|
|
r000.tryGet() == 0o000
|
|
r100.tryGet() == 0o100
|
|
r200.tryGet() == 0o200
|
|
r300.tryGet() == 0o300
|
|
r400.tryGet() == 0o400
|
|
r500.tryGet() == 0o500
|
|
r600.tryGet() == 0o600
|
|
r700.tryGet() == 0o700
|
|
r010.tryGet() == 0o010
|
|
r020.tryGet() == 0o020
|
|
r030.tryGet() == 0o030
|
|
r040.tryGet() == 0o040
|
|
r050.tryGet() == 0o050
|
|
r060.tryGet() == 0o060
|
|
r070.tryGet() == 0o070
|
|
r001.tryGet() == 0o001
|
|
r002.tryGet() == 0o002
|
|
r003.tryGet() == 0o003
|
|
r004.tryGet() == 0o004
|
|
r005.tryGet() == 0o005
|
|
r006.tryGet() == 0o006
|
|
r007.tryGet() == 0o007
|
|
|
|
test "writeFile()/read[File(),AllBytes(),AllChars(),AllFile()] test":
|
|
check:
|
|
writeFile("testblob1", "BLOCK1", 0o600).isOk()
|
|
writeFile("testblob2", "BLOCK2", 0o660).isOk()
|
|
writeFile("testblob3", "BLOCK3", 0o666).isOk()
|
|
writeFile("testblob4", "BLOCK4", 0o700).isOk()
|
|
writeFile("testblob5", "BLOCK5", 0o770).isOk()
|
|
writeFile("testblob6", "BLOCK6", 0o777).isOk()
|
|
checkPermissions("testblob1", 0o600) == true
|
|
checkPermissions("testblob2", 0o660) == true
|
|
checkPermissions("testblob3", 0o666) == true
|
|
checkPermissions("testblob4", 0o700) == true
|
|
checkPermissions("testblob5", 0o770) == true
|
|
checkPermissions("testblob6", 0o777) == true
|
|
check:
|
|
readAllChars("testblob1").tryGet() == "BLOCK1"
|
|
block:
|
|
# readFile(path, var openArray[byte])
|
|
var data = newSeq[byte](6)
|
|
check:
|
|
readFile("testblob2", data.toOpenArray(0, len(data) - 1)).tryGet() ==
|
|
6'u
|
|
data == @[66'u8, 76'u8, 79'u8, 67'u8, 75'u8, 50'u8]
|
|
block:
|
|
# readFile(path, var openArray[char])
|
|
var data = newString(6)
|
|
check:
|
|
readFile("testblob3", data.toOpenArray(0, len(data) - 1)).tryGet() ==
|
|
6'u
|
|
data == "BLOCK3"
|
|
block:
|
|
# readFile(path, var seq[byte])
|
|
var data: seq[byte]
|
|
check:
|
|
readFile("testblob4", data).isOk()
|
|
data == @[66'u8, 76'u8, 79'u8, 67'u8, 75'u8, 52'u8]
|
|
block:
|
|
# readFile(path, var string)
|
|
var data: string
|
|
check:
|
|
readFile("testblob5", data).isOk()
|
|
data == "BLOCK5"
|
|
check:
|
|
readAllBytes("testblob6").tryGet() ==
|
|
@[66'u8, 76'u8, 79'u8, 67'u8, 75'u8, 54'u8]
|
|
check:
|
|
removeFile("testblob1").isOk()
|
|
removeFile("testblob2").isOk()
|
|
removeFile("testblob3").isOk()
|
|
removeFile("testblob4").isOk()
|
|
removeFile("testblob5").isOk()
|
|
removeFile("testblob6").isOk()
|
|
|
|
test "openFile()/readFile()/writeFile() test":
|
|
var buffer = newString(10)
|
|
let flags = {OpenFlags.Write, OpenFlags.Truncate, OpenFlags.Create}
|
|
|
|
var fdres = openFile("testfile.txt", flags)
|
|
check:
|
|
fdres.isOk()
|
|
readFile(fdres.get(), buffer).isErr()
|
|
writeFile(fdres.get(), "TEST").isOk()
|
|
readFile(fdres.get(), buffer).isErr()
|
|
closeFile(fdres.get()).isOk()
|
|
|
|
fdres = openFile("testfile.txt", {OpenFlags.Read})
|
|
check:
|
|
fdres.isOk()
|
|
readFile(fdres.get(), buffer).isOk()
|
|
writeFile(fdres.get(), "TEST2").isErr()
|
|
readFile(fdres.get(), buffer).isOk()
|
|
closeFile(fdres.get()).isOk()
|
|
|
|
fdres = openFile("testfile.txt", {OpenFlags.Read, OpenFlags.Write})
|
|
check:
|
|
fdres.isOk()
|
|
readFile(fdres.get(), buffer).isOk()
|
|
writeFile(fdres.get(), "TEST2").isOk()
|
|
closeFile(fdres.get()).isOk()
|
|
|
|
check:
|
|
removeFile("testfile.txt").isOk()
|
|
|
|
test "toString(set[Permission]) test":
|
|
let emptyMask: set[Permission] = {}
|
|
check:
|
|
{UserRead, UserWrite, UserExec}.toString() == "0700 (rwx------)"
|
|
{GroupRead, GroupWrite, GroupExec}.toString() == "0070 (---rwx---)"
|
|
{OtherRead, OtherWrite, OtherExec}.toString() == "0007 (------rwx)"
|
|
{UserExec, GroupExec, OtherExec}.toString() == "0111 (--x--x--x)"
|
|
{UserRead .. OtherExec}.toString() == "0777 (rwxrwxrwx)"
|
|
emptyMask.toString() == "0000 (---------)"
|
|
|
|
test "toInt(set[Permission]) test":
|
|
let emptyMask: set[Permission] = {}
|
|
check:
|
|
{UserRead, UserWrite, UserExec}.toInt() == 0o700
|
|
{GroupRead, GroupWrite, GroupExec}.toInt() == 0o070
|
|
{OtherRead, OtherWrite, OtherExec}.toInt() == 0o007
|
|
{UserExec, GroupExec, OtherExec}.toInt() == 0o111
|
|
{UserRead .. OtherExec}.toInt() == 0o777
|
|
emptyMask.toInt() == 0o000
|
|
|
|
test "set[Permission].toPermissions(int) test":
|
|
check:
|
|
0o700.toPermissions() == {UserRead, UserWrite, UserExec}
|
|
0o070.toPermissions() == {GroupRead, GroupWrite, GroupExec}
|
|
0o007.toPermissions() == {OtherRead, OtherWrite, OtherExec}
|
|
0o111.toPermissions() == {UserExec, GroupExec, OtherExec}
|
|
0o777.toPermissions() == {UserRead .. OtherExec}
|
|
0o000.toPermissions() == {}
|
|
|
|
test "getFileSize(handle)/getFileSize(path) test":
|
|
proc performTest(path: string): IoResult[
|
|
tuple[s0, s1, s2, s3, s4: int64]
|
|
] =
|
|
let flags = {OpenFlags.Write, OpenFlags.Truncate, OpenFlags.Create}
|
|
let handle = ? openFile(path, flags)
|
|
let psize0 = ? getFileSize(path)
|
|
let hsize0 = ? getFileSize(handle)
|
|
let msg = "BLOCK"
|
|
discard ? io2.writeFile(handle, msg)
|
|
let psize1 = ? getFileSize(path)
|
|
let hsize1 = ? getFileSize(handle)
|
|
? closeFile(handle)
|
|
let psize2 = ? getFileSize(path)
|
|
? removeFile(path)
|
|
ok((psize0, hsize0, psize1, hsize1, psize2))
|
|
|
|
let res = performTest("testblob2")
|
|
check res.isOk()
|
|
let sizes = res.get()
|
|
when defined(windows):
|
|
check:
|
|
sizes[0] == 0'i64
|
|
sizes[1] == 0'i64
|
|
sizes[2] == 0'i64
|
|
sizes[3] == 5'i64
|
|
sizes[4] == 5'i64
|
|
elif defined(posix):
|
|
check:
|
|
sizes[0] == 0'i64
|
|
sizes[1] == 0'i64
|
|
sizes[2] == 5'i64
|
|
sizes[3] == 5'i64
|
|
sizes[4] == 5'i64
|
|
|
|
test "getFilePos(handle)/setFilePos(handle) test":
|
|
proc performTest(path: string): IoResult[
|
|
tuple[s0, s1, s2, s3, s4: int64]
|
|
] =
|
|
let flags = {OpenFlags.Write, OpenFlags.Truncate, OpenFlags.Create}
|
|
let handle = ? openFile(path, flags)
|
|
let pos0 = ? getFilePos(handle)
|
|
let msg = "AAAAABBBBBCCCCCDDDDD"
|
|
discard ? io2.writeFile(handle, msg)
|
|
let pos1 = ? getFilePos(handle)
|
|
? setFilePos(handle, 0'i64, SeekBegin)
|
|
let pos2 = ? getFilePos(handle)
|
|
? setFilePos(handle, 10'i64, SeekCurrent)
|
|
let pos3 = ? getFilePos(handle)
|
|
? setFilePos(handle, 0'i64, SeekEnd)
|
|
let pos4 = ? getFilePos(handle)
|
|
? closeFile(handle)
|
|
? removeFile(path)
|
|
ok((pos0, pos1, pos2, pos3, pos4))
|
|
let res = performTest("testblob3")
|
|
check res.isOk()
|
|
let positions = res.get()
|
|
check:
|
|
positions[0] == 0'i64
|
|
positions[1] == 20'i64
|
|
positions[2] == 0'i64
|
|
positions[3] == 10'i64
|
|
positions[4] == 20'i64
|
|
|
|
test "lockFile(handle)/unlockFile(handle) test":
|
|
type
|
|
TestResult = object
|
|
output: string
|
|
status: int
|
|
|
|
proc createLockFile(path: string): IoResult[void] =
|
|
io2.writeFile(path, "LOCKFILEDATA")
|
|
|
|
proc removeLockFile(path: string): IoResult[void] =
|
|
io2.removeFile(path)
|
|
|
|
proc lockTest(path: string, flags: set[OpenFlags],
|
|
lockType: LockType): IoResult[array[3, TestResult]] =
|
|
let helperPath = getAppDir() & "/test_helper "
|
|
let
|
|
handle = ? openFile(path, flags)
|
|
lock = ? lockFile(handle, lockType)
|
|
let res1 =
|
|
try:
|
|
execCmdEx(helperPath & path)
|
|
except CatchableError as exc:
|
|
echo "Exception happens [", $exc.name, "]: ", $exc.msg
|
|
("", -1)
|
|
? unlockFile(lock)
|
|
let res2 =
|
|
try:
|
|
execCmdEx(helperPath & path)
|
|
except CatchableError as exc:
|
|
echo "Exception happens [", $exc.name, "]: ", $exc.msg
|
|
("", -1)
|
|
? closeFile(handle)
|
|
let res3 =
|
|
try:
|
|
execCmdEx(helperPath & path)
|
|
except CatchableError as exc:
|
|
echo "Exception happens [", $exc.name, "]: ", $exc.msg
|
|
("", -1)
|
|
ok([
|
|
TestResult(output: strip(res1.output), status: res1.exitCode),
|
|
TestResult(output: strip(res2.output), status: res2.exitCode),
|
|
TestResult(output: strip(res3.output), status: res3.exitCode),
|
|
])
|
|
|
|
proc performTest(): IoResult[void] =
|
|
let path1 = "testfile.lock"
|
|
|
|
when defined(windows):
|
|
const
|
|
ERROR_LOCK_VIOLATION = 33
|
|
ERROR_SHARING_VIOLATION = 32
|
|
let
|
|
LockTests = [
|
|
(
|
|
{OpenFlags.Read},
|
|
LockType.Shared,
|
|
"OK:E$1:E$1:E$1:OK:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:E$1:E$1:E$1:OK:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Write},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write},
|
|
LockType.Shared,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.ShareRead},
|
|
LockType.Shared,
|
|
"OK:E$1:E$1:E$1:OK:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:E$1:E$1:E$1:OK:E$1:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Write, OpenFlags.ShareWrite},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$2:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION, $ERROR_LOCK_VIOLATION],
|
|
"E$1:E$1:E$1:E$1:E$1:OK:E$1:E$1" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write, OpenFlags.ShareRead,
|
|
OpenFlags.ShareWrite},
|
|
LockType.Shared,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:OK:E$2" %
|
|
[$ERROR_SHARING_VIOLATION, $ERROR_LOCK_VIOLATION],
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:OK:OK" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write, OpenFlags.ShareRead,
|
|
OpenFlags.ShareWrite},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$2:E$2" %
|
|
[$ERROR_SHARING_VIOLATION, $ERROR_LOCK_VIOLATION],
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:OK:OK" %
|
|
[$ERROR_SHARING_VIOLATION],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
]
|
|
else:
|
|
let
|
|
LockTests = [
|
|
(
|
|
{OpenFlags.Read},
|
|
LockType.Shared,
|
|
"OK:E$1:OK:E$1:OK:E$1:OK:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Write},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write},
|
|
LockType.Shared,
|
|
"OK:E$1:OK:E$1:OK:E$1:OK:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.ShareRead},
|
|
LockType.Shared,
|
|
"OK:E$1:OK:E$1:OK:E$1:OK:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Write, OpenFlags.ShareWrite},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write, OpenFlags.ShareRead,
|
|
OpenFlags.ShareWrite},
|
|
LockType.Shared,
|
|
"OK:E$1:OK:E$1:OK:E$1:OK:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
),
|
|
(
|
|
{OpenFlags.Read, OpenFlags.Write, OpenFlags.ShareRead,
|
|
OpenFlags.ShareWrite},
|
|
LockType.Exclusive,
|
|
"E$1:E$1:E$1:E$1:E$1:E$1:E$1:E$1" % [$EAGAIN],
|
|
"OK:OK:OK:OK:OK:OK:OK:OK",
|
|
"OK:OK:OK:OK:OK:OK:OK:OK"
|
|
),
|
|
]
|
|
|
|
? createLockFile(path1)
|
|
for item in LockTests:
|
|
let res = ? lockTest(path1, item[0], item[1])
|
|
check:
|
|
res[0].status == 0
|
|
res[1].status == 0
|
|
res[2].status == 0
|
|
res[0].output == item[2]
|
|
res[1].output == item[3]
|
|
res[2].output == item[4]
|
|
? removeLockFile(path1)
|
|
ok()
|
|
|
|
check performTest().isOk()
|
|
|
|
test "Long path directory/file management test":
|
|
const MAX_PATH = 260 - 12
|
|
var
|
|
parentName = newString(MAX_PATH)
|
|
directoryName = newString(MAX_PATH)
|
|
fileName = newString(MAX_PATH)
|
|
parentName.fill('1')
|
|
directoryName.fill('2')
|
|
fileName.fill('3')
|
|
|
|
let workingDir = getAppDir()
|
|
let
|
|
firstDir = workingDir & DirSep & parentName
|
|
destDir = firstDir & DirSep & directoryName
|
|
destFile = firstDir & DirSep & fileName
|
|
|
|
check:
|
|
createPath(firstDir).isOk() == true
|
|
createPath(destDir).isOk() == true
|
|
io2.writeFile(destFile, "test").isOk() == true
|
|
isDir(destDir) == true
|
|
isDir(firstDir) == true
|
|
isFile(destFile) == true
|
|
|
|
let data = readAllChars(destFile).tryGet()
|
|
|
|
check:
|
|
data == "test"
|
|
removeFile(destFile).isOk() == true
|
|
removeDir(destDir).isOk() == true
|
|
removeDir(firstDir).isOk() == true
|
|
isDir(destDir) == false
|
|
isDir(firstDir) == false
|
|
isFile(destFile) == false
|