Retrieve information from entry (file and directory) headers on virtual ADF devices. Get information like entry name, modification date, file size etc.
Usage
adf_entry_info(x, path, ...)
# S3 method for class 'adf_device'
adf_entry_info(x, path, ...)
# S3 method for class 'virtual_path'
adf_entry_info.adf_device(x, path, ...)
# S3 method for class 'character'
adf_entry_info.adf_device(x, path, ...)
# S3 method for class 'virtual_path'
adf_entry_info(x, path, ...)
# S3 method for class 'adf_file_con'
adf_entry_info(x, path, ...)Arguments
- x
Either a virtual device or virtual path.
- path
A
virtual_path()pointing to the targeted entry (file or directory). Should be omitted whenxis already a virtual path.- ...
Ignored
Value
Returns a list of named lists of entry properties.
Elements included in the named list
depend on the type of entry (root, directory or file).
Examples
## First setup a connection to a virtual device
adz_file <- system.file("example.adz", package = "adfExplorer2")
my_device <- connect_adf(adz_file)
adf_entry_info(my_device, "DF0:")
#> [[1]]
#> [[1]]$type
#> [1] "HEADER"
#>
#> [[1]]$headerKey
#> [1] 0
#>
#> [[1]]$highSeq
#> [1] 0
#>
#> [[1]]$firstData
#> [1] 0
#>
#> [[1]]$checkSum
#> [1] -161088455
#>
#> [[1]]$hashTable
#> [1] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [20] 0 0 0 883 0 882 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [39] 0 0 0 0 0 0 0 0 0 0 885 0 0 884 0 0 0 0 0
#> [58] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#>
#> [[1]]$bitmapFlag
#> [1] TRUE
#>
#> [[1]]$bmPages
#> [1] 881 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [20] 0 0 0 0 0 0
#>
#> [[1]]$bmExt
#> [1] 0
#>
#> [[1]]$creation
#> [1] "2017-10-17 10:37:36 UTC"
#>
#> [[1]]$diskName
#> [1] "adfExampleOFS"
#>
#> [[1]]$access
#> [1] "2017-10-17 11:33:35 UTC"
#>
#> [[1]]$creation_o
#> [1] "2017-10-17 07:32:40 UTC"
#>
#> [[1]]$nextSameHash
#> [1] 0
#>
#> [[1]]$parent
#> [1] 0
#>
#> [[1]]$extension
#> [1] 0
#>
#> [[1]]$secType
#> [1] "ROOT"
#>
#>
adf_entry_info(my_device, "s")
#> [[1]]
#> [[1]]$type
#> [1] "HEADER"
#>
#> [[1]]$sector
#> [1] 882
#>
#> [[1]]$highSeq
#> [1] 0
#>
#> [[1]]$checkSum
#> [1] -22236329
#>
#> [[1]]$hashTable
#> [1] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [20] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [39] 0 0 0 0 0 0 0 0 0 0 0 915 0 0 0 0 0 0 0
#> [58] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#>
#> [[1]]$access
#> D E W R A P S H
#> FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
#>
#> [[1]]$comment
#> [1] ""
#>
#> [[1]]$modified
#> [1] "2017-10-17 11:33:34 UTC"
#>
#> [[1]]$dirname
#> [1] "S"
#>
#> [[1]]$real
#> [1] 0
#>
#> [[1]]$nextLink
#> [1] 0
#>
#> [[1]]$nextSameHash
#> [1] 0
#>
#> [[1]]$parent
#> [1] 880
#>
#> [[1]]$extension
#> [1] 0
#>
#> [[1]]$secType
#> [1] "DIR"
#>
#>
adf_entry_info(my_device, "s/startup-sequence")
#> [[1]]
#> [[1]]$type
#> [1] "HEADER"
#>
#> [[1]]$headerKey
#> [1] 915
#>
#> [[1]]$highSeq
#> [1] 2
#>
#> [[1]]$dataSize
#> [1] 0
#>
#> [[1]]$firstData
#> [1] 916
#>
#> [[1]]$checkSum
#> [1] 1967975386
#>
#> [[1]]$dataBlocks
#> [1] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [20] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [39] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [58] 0 0 0 0 0 0 0 0 0 0 0 0 0 917 916
#>
#> [[1]]$access
#> D E W R A P S H
#> FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
#>
#> [[1]]$byteSize
#> [1] 664
#>
#> [[1]]$comment
#> [1] ""
#>
#> [[1]]$modified
#> [1] "2017-10-17 11:33:34 UTC"
#>
#> [[1]]$filename
#> [1] "Startup-Sequence"
#>
#> [[1]]$real
#> [1] 0
#>
#> [[1]]$nextLink
#> [1] 0
#>
#> [[1]]$nextSameHash
#> [1] 0
#>
#> [[1]]$parent
#> [1] 882
#>
#> [[1]]$extension
#> [1] 0
#>
#> [[1]]$secType
#> [1] "FILE"
#>
#>
close(my_device)