balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Target only USB ledger with interface number 0

Browse Source
This commit is contained in:
Sebastien Mondet 2018-10-10 19:19:02 -04:00
parent f4e07221f1
commit 02bc43b094
1 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/lib_signer_backends/ledger.ml
View File

@ -304,12 +304,18 @@ let find_ledgers ?id () =
log_info "Found %d Ledger(s)" (List.length ledgers) ;
filter_map_s begin fun device_info ->
log_info "Processing Ledger at path [%s]" device_info.Hidapi.path ;
match Hidapi.(open_path device_info.path) with
| None -> return_none
| Some h ->
Lwt.finalize
(fun () -> Ledger.of_hidapi ?id device_info h)
(fun () -> Hidapi.close h ; Lwt.return_unit)
if device_info.Hidapi.interface_number <> 0
then
(* HID interfaces get number 0:
https://github.com/LedgerHQ/ledger-nano-s/issues/48 *)
return_none
else
match Hidapi.(open_path device_info.path) with
| None -> return_none
| Some h ->
Lwt.finalize
(fun () -> Ledger.of_hidapi ?id device_info h)
(fun () -> Hidapi.close h ; Lwt.return_unit)
end ledgers
let with_ledger id f =