Add method ts::getkey
This commit is contained in:
parent
3009b75e01
commit
6ed1cd14ab
|
@ -837,12 +837,12 @@ ts method getkey {mode} {
|
|||
set rfile [file rootname $file]
|
||||
|
||||
# the active key
|
||||
set keys = {}
|
||||
set keys {}
|
||||
set key [string range [system nugget cryptokey -key] 0 31]
|
||||
if {$key ne ""} {
|
||||
lappend keys $key
|
||||
}
|
||||
if { mode ne "dlna" } {
|
||||
if { $mode ne "dlna" } {
|
||||
# also try other keys, such as the native key
|
||||
if {![catch {set fd [open "/mod/boot/cryptokey"]}]} {
|
||||
set bytes [$fd read 16]
|
||||
|
|
Loading…
Reference in New Issue