libexfat/utils.c

   1 /*
   2         utils.c (04.09.09)
   3         exFAT file system implementation library.
   4
   5         Free exFAT implementation.
   6         Copyright (C) 2010-2016  Andrew Nayenko
   7
   8         This program is free software; you can redistribute it and/or modify
   9         it under the terms of the GNU General Public License as published by
  10         the Free Software Foundation, either version 2 of the License, or
  11         (at your option) any later version.
  12
  13         This program is distributed in the hope that it will be useful,
  14         but WITHOUT ANY WARRANTY; without even the implied warranty of
  15         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16         GNU General Public License for more details.
  17
  18         You should have received a copy of the GNU General Public License along
  19         with this program; if not, write to the Free Software Foundation, Inc.,
  20         51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  21 */
  22
  23 #include "exfat.h"
  24 #include <string.h>
  25 #include <stdio.h>
  26 #include <inttypes.h>
  27
  28 void exfat_stat(const struct exfat* ef, const struct exfat_node* node,
  29                 struct stat* stbuf)
  30 {
  31         memset(stbuf, 0, sizeof(struct stat));
  32         if (node->flags & EXFAT_ATTRIB_DIR)
  33                 stbuf->st_mode = S_IFDIR | (0777 & ~ef->dmask);
  34         else
  35                 stbuf->st_mode = S_IFREG | (0777 & ~ef->fmask);
  36         stbuf->st_nlink = 1;
  37         stbuf->st_uid = ef->uid;
  38         stbuf->st_gid = ef->gid;
  39         stbuf->st_size = node->size;
  40         stbuf->st_blocks = DIV_ROUND_UP(node->size, CLUSTER_SIZE(*ef->sb)) *
  41                 CLUSTER_SIZE(*ef->sb) / 512;
  42         stbuf->st_mtime = node->mtime;
  43         stbuf->st_atime = node->atime;
  44         /* set ctime to mtime to ensure we don't break programs that rely on ctime
  45            (e.g. rsync) */
  46         stbuf->st_ctime = node->mtime;
  47 }
  48
  49 void exfat_get_name(const struct exfat_node* node,
  50                 char buffer[EXFAT_UTF8_NAME_BUFFER_MAX])
  51 {
  52         if (utf16_to_utf8(buffer, node->name, EXFAT_UTF8_NAME_BUFFER_MAX,
  53                                 EXFAT_NAME_MAX) != 0)
  54                 exfat_bug("failed to convert name to UTF-8");
  55 }
  56
  57 static uint16_t add_checksum_byte(uint16_t sum, uint8_t byte)
  58 {
  59         return ((sum << 15) | (sum >> 1)) + byte;
  60 }
  61
  62 static uint16_t add_checksum_bytes(uint16_t sum, const void* buffer, size_t n)
  63 {
  64         int i;
  65
  66         for (i = 0; i < n; i++)
  67                 sum = add_checksum_byte(sum, ((const uint8_t*) buffer)[i]);
  68         return sum;
  69 }
  70
  71 uint16_t exfat_start_checksum(const struct exfat_entry_meta1* entry)
  72 {
  73         uint16_t sum = 0;
  74         int i;
  75
  76         for (i = 0; i < sizeof(struct exfat_entry); i++)
  77                 if (i != 2 && i != 3) /* skip checksum field itself */
  78                         sum = add_checksum_byte(sum, ((const uint8_t*) entry)[i]);
  79         return sum;
  80 }
  81
  82 uint16_t exfat_add_checksum(const void* entry, uint16_t sum)
  83 {
  84         return add_checksum_bytes(sum, entry, sizeof(struct exfat_entry));
  85 }
  86
  87 le16_t exfat_calc_checksum(const struct exfat_entry_meta1* meta1,
  88                 const struct exfat_entry_meta2* meta2, const le16_t* name)
  89 {
  90         uint16_t checksum;
  91         const int name_entries = DIV_ROUND_UP(meta2->name_length, EXFAT_ENAME_MAX);
  92         int i;
  93
  94         checksum = exfat_start_checksum(meta1);
  95         checksum = exfat_add_checksum(meta2, checksum);
  96         for (i = 0; i < name_entries; i++)
  97         {
  98                 checksum = add_checksum_byte(checksum, EXFAT_ENTRY_FILE_NAME);
  99                 checksum = add_checksum_byte(checksum, 0);
 100                 checksum = add_checksum_bytes(checksum, name + i * EXFAT_ENAME_MAX,
 101                                 EXFAT_ENAME_MAX * sizeof(le16_t));
 102         }
 103         return cpu_to_le16(checksum);
 104 }
 105
 106 uint32_t exfat_vbr_start_checksum(const void* sector, size_t size)
 107 {
 108         size_t i;
 109         uint32_t sum = 0;
 110
 111         for (i = 0; i < size; i++)
 112                 /* skip volume_state and allocated_percent fields */
 113                 if (i != 0x6a && i != 0x6b && i != 0x70)
 114                         sum = ((sum << 31) | (sum >> 1)) + ((const uint8_t*) sector)[i];
 115         return sum;
 116 }
 117
 118 uint32_t exfat_vbr_add_checksum(const void* sector, size_t size, uint32_t sum)
 119 {
 120         size_t i;
 121
 122         for (i = 0; i < size; i++)
 123                 sum = ((sum << 31) | (sum >> 1)) + ((const uint8_t*) sector)[i];
 124         return sum;
 125 }
 126
 127 le16_t exfat_calc_name_hash(const struct exfat* ef, const le16_t* name,
 128                 size_t length)
 129 {
 130         size_t i;
 131         uint16_t hash = 0;
 132
 133         for (i = 0; i < length; i++)
 134         {
 135                 uint16_t c = le16_to_cpu(name[i]);
 136
 137                 /* convert to upper case */
 138                 c = ef->upcase[c];
 139
 140                 hash = ((hash << 15) | (hash >> 1)) + (c & 0xff);
 141                 hash = ((hash << 15) | (hash >> 1)) + (c >> 8);
 142         }
 143         return cpu_to_le16(hash);
 144 }
 145
 146 void exfat_humanize_bytes(uint64_t value, struct exfat_human_bytes* hb)
 147 {
 148         size_t i;
 149         /* 16 EB (minus 1 byte) is the largest size that can be represented by
 150            uint64_t */
 151         const char* units[] = {"bytes", "KB", "MB", "GB", "TB", "PB", "EB"};
 152         uint64_t divisor = 1;
 153         uint64_t temp = 0;
 154
 155         for (i = 0; ; i++, divisor *= 1024)
 156         {
 157                 temp = (value + divisor / 2) / divisor;
 158
 159                 if (temp == 0)
 160                         break;
 161                 if (temp / 1024 * 1024 == temp)
 162                         continue;
 163                 if (temp < 10240)
 164                         break;
 165         }
 166         hb->value = temp;
 167         hb->unit = units[i];
 168 }
 169
 170 void exfat_print_info(const struct exfat_super_block* sb,
 171                 uint32_t free_clusters)
 172 {
 173         struct exfat_human_bytes hb;
 174         off_t total_space = le64_to_cpu(sb->sector_count) * SECTOR_SIZE(*sb);
 175         off_t avail_space = (off_t) free_clusters * CLUSTER_SIZE(*sb);
 176
 177         printf("File system version           %hhu.%hhu\n",
 178                         sb->version.major, sb->version.minor);
 179         exfat_humanize_bytes(SECTOR_SIZE(*sb), &hb);
 180         printf("Sector size          %10"PRIu64" %s\n", hb.value, hb.unit);
 181         exfat_humanize_bytes(CLUSTER_SIZE(*sb), &hb);
 182         printf("Cluster size         %10"PRIu64" %s\n", hb.value, hb.unit);
 183         exfat_humanize_bytes(total_space, &hb);
 184         printf("Volume size          %10"PRIu64" %s\n", hb.value, hb.unit);
 185         exfat_humanize_bytes(total_space - avail_space, &hb);
 186         printf("Used space           %10"PRIu64" %s\n", hb.value, hb.unit);
 187         exfat_humanize_bytes(avail_space, &hb);
 188         printf("Available space      %10"PRIu64" %s\n", hb.value, hb.unit);
 189 }