Overview
| Comment: | Use the user-supplied password |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
b74e661b68ed1a025b4b08a148c3dbab |
| User & Date: | rkeene on 2019-01-11 17:50:11 |
| Other Links: | manifest | tags |
Context
|
2019-01-11
| ||
| 17:50 | Add more TODO check-in: 91adaf3629 user: rkeene tags: trunk | |
| 17:50 | Use the user-supplied password check-in: b74e661b68 user: rkeene tags: trunk | |
| 17:47 | Added support for decoding wallet backups check-in: fe9b42ed61 user: rkeene tags: trunk | |
Changes
Modified nano.tcl from [30e8cf2947] to [c455a1a52a].
| ︙ | ︙ | |||
4094 4095 4096 4097 4098 4099 4100 |
set wallet(seed) [binary decode hex $walletArray(0000000000000000000000000000000000000000000000000000000000000005)]
set wallet(index) [expr 0x$walletArray(0000000000000000000000000000000000000000000000000000000000000006)]
if {$wallet(version) != 4} {
return -code error "Unsupported wallet backup version ($version)"
}
| < | 4094 4095 4096 4097 4098 4099 4100 4101 4102 4103 4104 4105 4106 4107 |
set wallet(seed) [binary decode hex $walletArray(0000000000000000000000000000000000000000000000000000000000000005)]
set wallet(index) [expr 0x$walletArray(0000000000000000000000000000000000000000000000000000000000000006)]
if {$wallet(version) != 4} {
return -code error "Unsupported wallet backup version ($version)"
}
set walletKeyIV [string range $wallet(salt) 0 15]
set seedIV [string range $wallet(salt) 16 end]
# Decrypt seed
set aesKey [::nano::internal::deriveKeyFromPassword $password $wallet(salt)]
set walletKey [::nano::internal::AES256-CTR $aesKey $walletKeyIV $wallet(key)]
set seed [::nano::internal::AES256-CTR $walletKey $seedIV $wallet(seed)]
|
| ︙ | ︙ |