Overview
Comment: | Started work on completely supporting multiple hashing algorithms |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | complete-multihash |
Files: | files | file ages | folders |
SHA1: | 2460a1ddab6f0feb7b713c7117807fd543cc6483 |
User & Date: | rkeene on 2017-01-19 17:49:06 |
Other Links: | manifest | tags |
Context
2017-01-20
| ||
17:19 | More work towards actually doing multiple hashing algorithms Leaf check-in: bfaf95df49 user: rkeene tags: complete-multihash | |
2017-01-19
| ||
17:49 | Started work on completely supporting multiple hashing algorithms check-in: 2460a1ddab user: rkeene tags: complete-multihash | |
2016-07-10
| ||
19:26 | Added support for allowing the user to completely control how downloads are performed as well as configure the default method check-in: 3864351ad4 user: rkeene tags: trunk | |
Changes
Modified appfsd.tcl from [985d2df621] to [bd58d61afc].
40 40 41 41 # User-replaceable function get the home directory of the current user 42 42 proc get_homedir {} { 43 43 return [::appfsd::get_homedir] 44 44 } 45 45 46 46 # User-replacable function to update permissions 47 - proc change_perms {file sha1 perms} { 47 + proc change_perms {file hash perms {hashMethod "sha1"}} { 48 48 if {[info exists ::appfs::user::add_perms($file)]} { 49 49 append perms $::appfs::user::add_perms($file) 50 50 } 51 51 52 - if {[info exists ::appfs::user::add_perms($sha1)]} { 53 - append perms $::appfs::user::add_perms($sha1) 52 + if {[info exists ::appfs::user::add_perms([list $hashMethod $hash])]} { 53 + append perms $::appfs::user::add_perms([list $hashMethod $hash]) 54 + } elseif {$hashMethod eq "sha1" && [info exists ::appfs::user::add_perms($hash)]} { 55 + append perms $::appfs::user::add_perms($hash) 54 56 } 55 57 56 58 return $perms 57 59 } 58 60 59 61 # User-replacable function to fetch a remote file 60 62 proc download_file {url {outputChannel ""}} {