X-Git-Url: https://git.p6c8.net/jirafeau.git/blobdiff_plain/6bb6cfda2f5cbc5c7c9cc25cd228970ce2b582cd..a23a86c48b1675e131fe80e7a332b46422ebf846:/lib/functions.php diff --git a/lib/functions.php b/lib/functions.php index 6d7cb34..10fc0ab 100644 --- a/lib/functions.php +++ b/lib/functions.php @@ -31,6 +31,28 @@ s2p ($s) return $p; } +/** + * Convert base 16 to base 64 + * @returns A string based on 64 characters (0-9, a-z, A-Z, "-" and "_") + */ +function +base_16_to_64 ($num) +{ + $m = '0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ-_'; + $o = ''; + $b = ''; + $i = 0; + $size = strlen ($num); + for ($i = 0; $i < $size; $i++) + $b .= base_convert ($num{$i}, 16, 2); + $size = strlen ($b); + for ($i = $size - 6; $i >= 0; $i -= 6) + $o = $m{bindec (substr ($b, $i, 6))} . $o; + if ($i < 0 && $i > -6) + $o = $m{bindec (substr ($b, 0, $i + 6))} . $o; + return $o; +} + function jirafeau_human_size ($octets) { @@ -315,7 +337,7 @@ jirafeau_upload ($file, $one_time_download, $key, $time, $ip) NL . $md5. NL . ($one_time_download ? 'O' : 'R') . NL.date ('U') . NL. $ip . NL. $delete_link_code . NL); fclose ($handle); - $md5_link = md5_file ($link_tmp_name); + $md5_link = base_16_to_64 (md5_file ($link_tmp_name)); $l = s2p ("$md5_link"); if (!@mkdir (VAR_LINKS . $l, 0755, true) || !rename ($link_tmp_name, VAR_LINKS . $l . $md5_link)) @@ -446,11 +468,11 @@ jirafeau_admin_list ($name, $file_hash, $link_hash) { echo '