fs/fat/cache.c

   1 /*
   2  *  linux/fs/fat/cache.c
   3  *
   4  *  Written 1992,1993 by Werner Almesberger
   5  *
   6  *  Mar 1999. AV. Changed cache, so that it uses the starting cluster instead
   7  *      of inode number.
   8  *  May 1999. AV. Fixed the bogosity with FAT32 (read "FAT28"). Fscking lusers.
   9  */
  10
  11 #include <linux/slab.h>
  12 #include "fat.h"
  13
  14 /* this must be > 0. */
  15 #define FAT_MAX_CACHE   8
  16
  17 struct fat_cache {
  18         struct list_head cache_list;
  19         int nr_contig;  /* number of contiguous clusters */
  20         int fcluster;   /* cluster number in the file. */
  21         int dcluster;   /* cluster number on disk. */
  22 };
  23
  24 struct fat_cache_id {
  25         unsigned int id;
  26         int nr_contig;
  27         int fcluster;
  28         int dcluster;
  29 };
  30
  31 static inline int fat_max_cache(struct inode *inode)
  32 {
  33         return FAT_MAX_CACHE;
  34 }
  35
  36 static struct kmem_cache *fat_cache_cachep;
  37
  38 static void init_once(void *foo)
  39 {
  40         struct fat_cache *cache = (struct fat_cache *)foo;
  41
  42         INIT_LIST_HEAD(&cache->cache_list);
  43 }
  44
  45 int __init fat_cache_init(void)
  46 {
  47         fat_cache_cachep = kmem_cache_create("fat_cache",
  48                                 sizeof(struct fat_cache),
  49                                 0, SLAB_RECLAIM_ACCOUNT|SLAB_MEM_SPREAD,
  50                                 init_once);
  51         if (fat_cache_cachep == NULL)
  52                 return -ENOMEM;
  53         return 0;
  54 }
  55
  56 void fat_cache_destroy(void)
  57 {
  58         kmem_cache_destroy(fat_cache_cachep);
  59 }
  60
  61 static inline struct fat_cache *fat_cache_alloc(struct inode *inode)
  62 {
  63         return kmem_cache_alloc(fat_cache_cachep, GFP_NOFS);
  64 }
  65
  66 static inline void fat_cache_free(struct fat_cache *cache)
  67 {
  68         BUG_ON(!list_empty(&cache->cache_list));
  69         kmem_cache_free(fat_cache_cachep, cache);
  70 }
  71
  72 static inline void fat_cache_update_lru(struct inode *inode,
  73                                         struct fat_cache *cache)
  74 {
  75         if (MSDOS_I(inode)->cache_lru.next != &cache->cache_list)
  76                 list_move(&cache->cache_list, &MSDOS_I(inode)->cache_lru);
  77 }
  78
  79 static int fat_cache_lookup(struct inode *inode, int fclus,
  80                             struct fat_cache_id *cid,
  81                             int *cached_fclus, int *cached_dclus)
  82 {
  83         static struct fat_cache nohit = { .fcluster = 0, };
  84
  85         struct fat_cache *hit = &nohit, *p;
  86         int offset = -1;
  87
  88         spin_lock(&MSDOS_I(inode)->cache_lru_lock);
  89         list_for_each_entry(p, &MSDOS_I(inode)->cache_lru, cache_list) {
  90                 /* Find the cache of "fclus" or nearest cache. */
  91                 if (p->fcluster <= fclus && hit->fcluster < p->fcluster) {
  92                         hit = p;
  93                         if ((hit->fcluster + hit->nr_contig) < fclus) {
  94                                 offset = hit->nr_contig;
  95                         } else {
  96                                 offset = fclus - hit->fcluster;
  97                                 break;
  98                         }
  99                 }
 100         }
 101         if (hit != &nohit) {
 102                 fat_cache_update_lru(inode, hit);
 103
 104                 cid->id = MSDOS_I(inode)->cache_valid_id;
 105                 cid->nr_contig = hit->nr_contig;
 106                 cid->fcluster = hit->fcluster;
 107                 cid->dcluster = hit->dcluster;
 108                 *cached_fclus = cid->fcluster + offset;
 109                 *cached_dclus = cid->dcluster + offset;
 110         }
 111         spin_unlock(&MSDOS_I(inode)->cache_lru_lock);
 112
 113         return offset;
 114 }
 115
 116 static struct fat_cache *fat_cache_merge(struct inode *inode,
 117                                          struct fat_cache_id *new)
 118 {
 119         struct fat_cache *p;
 120
 121         list_for_each_entry(p, &MSDOS_I(inode)->cache_lru, cache_list) {
 122                 /* Find the same part as "new" in cluster-chain. */
 123                 if (p->fcluster == new->fcluster) {
 124                         BUG_ON(p->dcluster != new->dcluster);
 125                         if (new->nr_contig > p->nr_contig)
 126                                 p->nr_contig = new->nr_contig;
 127                         return p;
 128                 }
 129         }
 130         return NULL;
 131 }
 132
 133 static void fat_cache_add(struct inode *inode, struct fat_cache_id *new)
 134 {
 135         struct fat_cache *cache, *tmp;
 136
 137         if (new->fcluster == -1) /* dummy cache */
 138                 return;
 139
 140         spin_lock(&MSDOS_I(inode)->cache_lru_lock);
 141         if (new->id != FAT_CACHE_VALID &&
 142             new->id != MSDOS_I(inode)->cache_valid_id)
 143                 goto out;       /* this cache was invalidated */
 144
 145         cache = fat_cache_merge(inode, new);
 146         if (cache == NULL) {
 147                 if (MSDOS_I(inode)->nr_caches < fat_max_cache(inode)) {
 148                         MSDOS_I(inode)->nr_caches++;
 149                         spin_unlock(&MSDOS_I(inode)->cache_lru_lock);
 150
 151                         tmp = fat_cache_alloc(inode);
 152                         if (!tmp) {
 153                                 spin_lock(&MSDOS_I(inode)->cache_lru_lock);
 154                                 MSDOS_I(inode)->nr_caches--;
 155                                 spin_unlock(&MSDOS_I(inode)->cache_lru_lock);
 156                                 return;
 157                         }
 158
 159                         spin_lock(&MSDOS_I(inode)->cache_lru_lock);
 160                         cache = fat_cache_merge(inode, new);
 161                         if (cache != NULL) {
 162                                 MSDOS_I(inode)->nr_caches--;
 163                                 fat_cache_free(tmp);
 164                                 goto out_update_lru;
 165                         }
 166                         cache = tmp;
 167                 } else {
 168                         struct list_head *p = MSDOS_I(inode)->cache_lru.prev;
 169                         cache = list_entry(p, struct fat_cache, cache_list);
 170                 }
 171                 cache->fcluster = new->fcluster;
 172                 cache->dcluster = new->dcluster;
 173                 cache->nr_contig = new->nr_contig;
 174         }
 175 out_update_lru:
 176         fat_cache_update_lru(inode, cache);
 177 out:
 178         spin_unlock(&MSDOS_I(inode)->cache_lru_lock);
 179 }
 180
 181 /*
 182  * Cache invalidation occurs rarely, thus the LRU chain is not updated. It
 183  * fixes itself after a while.
 184  */
 185 static void __fat_cache_inval_inode(struct inode *inode)
 186 {
 187         struct msdos_inode_info *i = MSDOS_I(inode);
 188         struct fat_cache *cache;
 189
 190         while (!list_empty(&i->cache_lru)) {
 191                 cache = list_entry(i->cache_lru.next,
 192                                    struct fat_cache, cache_list);
 193                 list_del_init(&cache->cache_list);
 194                 i->nr_caches--;
 195                 fat_cache_free(cache);
 196         }
 197         /* Update. The copy of caches before this id is discarded. */
 198         i->cache_valid_id++;
 199         if (i->cache_valid_id == FAT_CACHE_VALID)
 200                 i->cache_valid_id++;
 201 }
 202
 203 void fat_cache_inval_inode(struct inode *inode)
 204 {
 205         spin_lock(&MSDOS_I(inode)->cache_lru_lock);
 206         __fat_cache_inval_inode(inode);
 207         spin_unlock(&MSDOS_I(inode)->cache_lru_lock);
 208 }
 209
 210 static inline int cache_contiguous(struct fat_cache_id *cid, int dclus)
 211 {
 212         cid->nr_contig++;
 213         return ((cid->dcluster + cid->nr_contig) == dclus);
 214 }
 215
 216 static inline void cache_init(struct fat_cache_id *cid, int fclus, int dclus)
 217 {
 218         cid->id = FAT_CACHE_VALID;
 219         cid->fcluster = fclus;
 220         cid->dcluster = dclus;
 221         cid->nr_contig = 0;
 222 }
 223
 224 int fat_get_cluster(struct inode *inode, int cluster, int *fclus, int *dclus)
 225 {
 226         struct super_block *sb = inode->i_sb;
 227         struct msdos_sb_info *sbi = MSDOS_SB(sb);
 228         const int limit = sb->s_maxbytes >> sbi->cluster_bits;
 229         struct fat_entry fatent;
 230         struct fat_cache_id cid;
 231         int nr;
 232
 233         BUG_ON(MSDOS_I(inode)->i_start == 0);
 234
 235         *fclus = 0;
 236         *dclus = MSDOS_I(inode)->i_start;
 237         if (!fat_valid_entry(sbi, *dclus)) {
 238                 fat_fs_error_ratelimit(sb,
 239                         "%s: invalid start cluster (i_pos %lld, start %08x)",
 240                         __func__, MSDOS_I(inode)->i_pos, *dclus);
 241                 return -EIO;
 242         }
 243         if (cluster == 0)
 244                 return 0;
 245
 246         if (fat_cache_lookup(inode, cluster, &cid, fclus, dclus) < 0) {
 247                 /*
 248                  * dummy, always not contiguous
 249                  * This is reinitialized by cache_init(), later.
 250                  */
 251                 cache_init(&cid, -1, -1);
 252         }
 253
 254         fatent_init(&fatent);
 255         while (*fclus < cluster) {
 256                 /* prevent the infinite loop of cluster chain */
 257                 if (*fclus > limit) {
 258                         fat_fs_error_ratelimit(sb,
 259                                 "%s: detected the cluster chain loop (i_pos %lld)",
 260                                 __func__, MSDOS_I(inode)->i_pos);
 261                         nr = -EIO;
 262                         goto out;
 263                 }
 264
 265                 nr = fat_ent_read(inode, &fatent, *dclus);
 266                 if (nr < 0)
 267                         goto out;
 268                 else if (nr == FAT_ENT_FREE) {
 269                         fat_fs_error_ratelimit(sb,
 270                                 "%s: invalid cluster chain (i_pos %lld)",
 271                                 __func__, MSDOS_I(inode)->i_pos);
 272                         nr = -EIO;
 273                         goto out;
 274                 } else if (nr == FAT_ENT_EOF) {
 275                         fat_cache_add(inode, &cid);
 276                         goto out;
 277                 }
 278                 (*fclus)++;
 279                 *dclus = nr;
 280                 if (!cache_contiguous(&cid, *dclus))
 281                         cache_init(&cid, *fclus, *dclus);
 282         }
 283         nr = 0;
 284         fat_cache_add(inode, &cid);
 285 out:
 286         fatent_brelse(&fatent);
 287         return nr;
 288 }
 289
 290 static int fat_bmap_cluster(struct inode *inode, int cluster)
 291 {
 292         struct super_block *sb = inode->i_sb;
 293         int ret, fclus, dclus;
 294
 295         if (MSDOS_I(inode)->i_start == 0)
 296                 return 0;
 297
 298         ret = fat_get_cluster(inode, cluster, &fclus, &dclus);
 299         if (ret < 0)
 300                 return ret;
 301         else if (ret == FAT_ENT_EOF) {
 302                 fat_fs_error(sb, "%s: request beyond EOF (i_pos %lld)",
 303                              __func__, MSDOS_I(inode)->i_pos);
 304                 return -EIO;
 305         }
 306         return dclus;
 307 }
 308
 309 int fat_bmap(struct inode *inode, sector_t sector, sector_t *phys,
 310              unsigned long *mapped_blocks, int create)
 311 {
 312         struct super_block *sb = inode->i_sb;
 313         struct msdos_sb_info *sbi = MSDOS_SB(sb);
 314         const unsigned long blocksize = sb->s_blocksize;
 315         const unsigned char blocksize_bits = sb->s_blocksize_bits;
 316         sector_t last_block;
 317         int cluster, offset;
 318
 319         *phys = 0;
 320         *mapped_blocks = 0;
 321         if ((sbi->fat_bits != 32) && (inode->i_ino == MSDOS_ROOT_INO)) {
 322                 if (sector < (sbi->dir_entries >> sbi->dir_per_block_bits)) {
 323                         *phys = sector + sbi->dir_start;
 324                         *mapped_blocks = 1;
 325                 }
 326                 return 0;
 327         }
 328
 329         last_block = (i_size_read(inode) + (blocksize - 1)) >> blocksize_bits;
 330         if (sector >= last_block) {
 331                 if (!create)
 332                         return 0;
 333
 334                 /*
 335                  * ->mmu_private can access on only allocation path.
 336                  * (caller must hold ->i_mutex)
 337                  */
 338                 last_block = (MSDOS_I(inode)->mmu_private + (blocksize - 1))
 339                         >> blocksize_bits;
 340                 if (sector >= last_block)
 341                         return 0;
 342         }
 343
 344         cluster = sector >> (sbi->cluster_bits - sb->s_blocksize_bits);
 345         offset  = sector & (sbi->sec_per_clus - 1);
 346         cluster = fat_bmap_cluster(inode, cluster);
 347         if (cluster < 0)
 348                 return cluster;
 349         else if (cluster) {
 350                 *phys = fat_clus_to_blknr(sbi, cluster) + offset;
 351                 *mapped_blocks = sbi->sec_per_clus - offset;
 352                 if (*mapped_blocks > last_block - sector)
 353                         *mapped_blocks = last_block - sector;
 354         }
 355         return 0;
 356 }