4 * Written 1992,1993 by Werner Almesberger
6 * Mar 1999. AV. Changed cache, so that it uses the starting cluster instead
8 * May 1999. AV. Fixed the bogosity with FAT32 (read "FAT28"). Fscking lusers.
12 #include <linux/msdos_fs.h>
13 #include <linux/buffer_head.h>
15 int __fat_access(struct super_block
*sb
, int nr
, int new_value
)
17 struct msdos_sb_info
*sbi
= MSDOS_SB(sb
);
18 struct buffer_head
*bh
, *bh2
, *c_bh
, *c_bh2
;
19 unsigned char *p_first
, *p_last
;
20 int copy
, first
, last
, next
, b
;
22 if (sbi
->fat_bits
== 32) {
24 } else if (sbi
->fat_bits
== 16) {
30 b
= sbi
->fat_start
+ (first
>> sb
->s_blocksize_bits
);
31 if (!(bh
= sb_bread(sb
, b
))) {
32 printk(KERN_ERR
"FAT: bread(block %d) in"
33 " fat_access failed\n", b
);
36 if ((first
>> sb
->s_blocksize_bits
) == (last
>> sb
->s_blocksize_bits
)) {
39 if (!(bh2
= sb_bread(sb
, b
+ 1))) {
41 printk(KERN_ERR
"FAT: bread(block %d) in"
42 " fat_access failed\n", b
+ 1);
46 if (sbi
->fat_bits
== 32) {
47 p_first
= p_last
= NULL
; /* GCC needs that stuff */
48 next
= CF_LE_L(((__u32
*) bh
->b_data
)[(first
&
49 (sb
->s_blocksize
- 1)) >> 2]);
50 /* Fscking Microsoft marketing department. Their "32" is 28. */
52 } else if (sbi
->fat_bits
== 16) {
53 p_first
= p_last
= NULL
; /* GCC needs that stuff */
54 next
= CF_LE_W(((__u16
*) bh
->b_data
)[(first
&
55 (sb
->s_blocksize
- 1)) >> 1]);
57 p_first
= &((__u8
*)bh
->b_data
)[first
& (sb
->s_blocksize
- 1)];
58 p_last
= &((__u8
*)bh2
->b_data
)[(first
+ 1) & (sb
->s_blocksize
- 1)];
60 next
= ((*p_first
>> 4) | (*p_last
<< 4)) & 0xfff;
62 next
= (*p_first
+(*p_last
<< 8)) & 0xfff;
64 if (new_value
!= -1) {
65 if (sbi
->fat_bits
== 32) {
66 ((__u32
*)bh
->b_data
)[(first
& (sb
->s_blocksize
- 1)) >> 2]
68 } else if (sbi
->fat_bits
== 16) {
69 ((__u16
*)bh
->b_data
)[(first
& (sb
->s_blocksize
- 1)) >> 1]
73 *p_first
= (*p_first
& 0xf) | (new_value
<< 4);
74 *p_last
= new_value
>> 4;
77 *p_first
= new_value
& 0xff;
78 *p_last
= (*p_last
& 0xf0) | (new_value
>> 8);
80 mark_buffer_dirty(bh2
);
82 mark_buffer_dirty(bh
);
83 for (copy
= 1; copy
< sbi
->fats
; copy
++) {
84 b
= sbi
->fat_start
+ (first
>> sb
->s_blocksize_bits
)
85 + sbi
->fat_length
* copy
;
86 if (!(c_bh
= sb_bread(sb
, b
)))
89 if (!(c_bh2
= sb_bread(sb
, b
+1))) {
93 memcpy(c_bh2
->b_data
, bh2
->b_data
, sb
->s_blocksize
);
94 mark_buffer_dirty(c_bh2
);
97 memcpy(c_bh
->b_data
, bh
->b_data
, sb
->s_blocksize
);
98 mark_buffer_dirty(c_bh
);
109 * Returns the this'th FAT entry, -1 if it is an end-of-file entry. If
110 * new_value is != -1, that FAT entry is replaced by it.
112 int fat_access(struct super_block
*sb
, int nr
, int new_value
)
117 if (nr
< 2 || MSDOS_SB(sb
)->clusters
+ 2 <= nr
) {
118 fat_fs_panic(sb
, "invalid access to FAT (entry 0x%08x)", nr
);
121 if (new_value
== FAT_ENT_EOF
)
122 new_value
= EOF_FAT(sb
);
124 next
= __fat_access(sb
, nr
, new_value
);
127 if (next
>= BAD_FAT(sb
))
133 void fat_cache_init(struct super_block
*sb
)
135 struct msdos_sb_info
*sbi
= MSDOS_SB(sb
);
138 spin_lock_init(&sbi
->cache_lock
);
140 for (count
= 0; count
< FAT_CACHE_NR
- 1; count
++) {
141 sbi
->cache_array
[count
].start_cluster
= 0;
142 sbi
->cache_array
[count
].next
= &sbi
->cache_array
[count
+ 1];
144 sbi
->cache_array
[count
].start_cluster
= 0;
145 sbi
->cache_array
[count
].next
= NULL
;
146 sbi
->cache
= sbi
->cache_array
;
149 void fat_cache_lookup(struct inode
*inode
, int cluster
, int *f_clu
, int *d_clu
)
151 struct msdos_sb_info
*sbi
= MSDOS_SB(inode
->i_sb
);
152 struct fat_cache
*walk
;
155 BUG_ON(cluster
== 0);
157 first
= MSDOS_I(inode
)->i_start
;
161 spin_lock(&sbi
->cache_lock
);
163 if (MSDOS_I(inode
)->disk_cluster
&&
164 MSDOS_I(inode
)->file_cluster
<= cluster
) {
165 *d_clu
= MSDOS_I(inode
)->disk_cluster
;
166 *f_clu
= MSDOS_I(inode
)->file_cluster
;
169 for (walk
= sbi
->cache
; walk
; walk
= walk
->next
) {
170 if (walk
->start_cluster
== first
171 && walk
->file_cluster
<= cluster
172 && walk
->file_cluster
> *f_clu
) {
173 *d_clu
= walk
->disk_cluster
;
174 *f_clu
= walk
->file_cluster
;
176 printk("cache hit: %d (%d)\n", *f_clu
, *d_clu
);
178 if (*f_clu
== cluster
)
183 printk("cache miss\n");
186 spin_unlock(&sbi
->cache_lock
);
190 static void list_cache(struct super_block
*sb
)
192 struct msdos_sb_info
*sbi
= MSDOS_SB(sb
);
193 struct fat_cache
*walk
;
195 for (walk
= sbi
->cache
; walk
; walk
= walk
->next
) {
196 if (walk
->start_cluster
)
197 printk("<%s,%d>(%d,%d) ", sb
->s_id
,
198 walk
->start_cluster
, walk
->file_cluster
,
208 * Cache invalidation occurs rarely, thus the LRU chain is not updated. It
209 * fixes itself after a while.
211 static void __fat_cache_inval_inode(struct inode
*inode
)
213 struct fat_cache
*walk
;
214 int first
= MSDOS_I(inode
)->i_start
;
215 MSDOS_I(inode
)->file_cluster
= MSDOS_I(inode
)->disk_cluster
= 0;
216 for (walk
= MSDOS_SB(inode
->i_sb
)->cache
; walk
; walk
= walk
->next
)
217 if (walk
->start_cluster
== first
)
218 walk
->start_cluster
= 0;
221 void fat_cache_inval_inode(struct inode
*inode
)
223 struct msdos_sb_info
*sbi
= MSDOS_SB(inode
->i_sb
);
224 spin_lock(&sbi
->cache_lock
);
225 __fat_cache_inval_inode(inode
);
226 spin_unlock(&sbi
->cache_lock
);
229 void fat_cache_add(struct inode
*inode
, int f_clu
, int d_clu
)
231 struct msdos_sb_info
*sbi
= MSDOS_SB(inode
->i_sb
);
232 struct fat_cache
*walk
, *last
;
233 int first
, prev_f_clu
, prev_d_clu
;
237 first
= MSDOS_I(inode
)->i_start
;
242 spin_lock(&sbi
->cache_lock
);
244 if (MSDOS_I(inode
)->file_cluster
== f_clu
)
247 prev_f_clu
= MSDOS_I(inode
)->file_cluster
;
248 prev_d_clu
= MSDOS_I(inode
)->disk_cluster
;
249 MSDOS_I(inode
)->file_cluster
= f_clu
;
250 MSDOS_I(inode
)->disk_cluster
= d_clu
;
257 for (walk
= sbi
->cache
; walk
->next
; walk
= (last
= walk
)->next
) {
258 if (walk
->start_cluster
== first
&&
259 walk
->file_cluster
== f_clu
) {
260 if (walk
->disk_cluster
!= d_clu
) {
261 printk(KERN_ERR
"FAT: cache corruption "
262 "(i_pos %lld)\n", MSDOS_I(inode
)->i_pos
);
263 __fat_cache_inval_inode(inode
);
270 last
->next
= walk
->next
;
271 walk
->next
= sbi
->cache
;
279 walk
->start_cluster
= first
;
280 walk
->file_cluster
= f_clu
;
281 walk
->disk_cluster
= d_clu
;
283 walk
->next
= sbi
->cache
;
289 spin_unlock(&sbi
->cache_lock
);
292 int fat_get_cluster(struct inode
*inode
, int cluster
, int *fclus
, int *dclus
)
294 struct super_block
*sb
= inode
->i_sb
;
295 const int limit
= sb
->s_maxbytes
>> MSDOS_SB(sb
)->cluster_bits
;
298 BUG_ON(MSDOS_I(inode
)->i_start
== 0);
301 *dclus
= MSDOS_I(inode
)->i_start
;
305 fat_cache_lookup(inode
, cluster
, fclus
, dclus
);
306 while (*fclus
< cluster
) {
307 /* prevent the infinite loop of cluster chain */
308 if (*fclus
> limit
) {
309 fat_fs_panic(sb
, "%s: detected the cluster chain loop"
310 " (i_pos %lld)", __FUNCTION__
,
311 MSDOS_I(inode
)->i_pos
);
315 nr
= fat_access(sb
, *dclus
, -1);
318 else if (nr
== FAT_ENT_FREE
) {
319 fat_fs_panic(sb
, "%s: invalid cluster chain"
320 " (i_pos %lld)", __FUNCTION__
,
321 MSDOS_I(inode
)->i_pos
);
323 } else if (nr
== FAT_ENT_EOF
) {
324 fat_cache_add(inode
, *fclus
, *dclus
);
330 fat_cache_add(inode
, *fclus
, *dclus
);
334 static int fat_bmap_cluster(struct inode
*inode
, int cluster
)
336 struct super_block
*sb
= inode
->i_sb
;
337 int ret
, fclus
, dclus
;
339 if (MSDOS_I(inode
)->i_start
== 0)
342 ret
= fat_get_cluster(inode
, cluster
, &fclus
, &dclus
);
345 else if (ret
== FAT_ENT_EOF
) {
346 fat_fs_panic(sb
, "%s: request beyond EOF (i_pos %lld)",
347 __FUNCTION__
, MSDOS_I(inode
)->i_pos
);
353 int fat_bmap(struct inode
*inode
, sector_t sector
, sector_t
*phys
)
355 struct super_block
*sb
= inode
->i_sb
;
356 struct msdos_sb_info
*sbi
= MSDOS_SB(sb
);
361 if ((sbi
->fat_bits
!= 32) &&
362 (inode
->i_ino
== MSDOS_ROOT_INO
|| (S_ISDIR(inode
->i_mode
) &&
363 !MSDOS_I(inode
)->i_start
))) {
364 if (sector
< (sbi
->dir_entries
>> sbi
->dir_per_block_bits
))
365 *phys
= sector
+ sbi
->dir_start
;
368 last_block
= (MSDOS_I(inode
)->mmu_private
+ (sb
->s_blocksize
- 1))
369 >> sb
->s_blocksize_bits
;
370 if (sector
>= last_block
)
373 cluster
= sector
>> (sbi
->cluster_bits
- sb
->s_blocksize_bits
);
374 offset
= sector
& (sbi
->sec_per_clus
- 1);
375 cluster
= fat_bmap_cluster(inode
, cluster
);
379 *phys
= ((sector_t
)cluster
- 2) * sbi
->sec_per_clus
380 + sbi
->data_start
+ offset
;
385 /* Free all clusters after the skip'th cluster. */
386 int fat_free(struct inode
*inode
, int skip
)
388 struct super_block
*sb
= inode
->i_sb
;
389 int nr
, ret
, fclus
, dclus
;
391 if (MSDOS_I(inode
)->i_start
== 0)
395 ret
= fat_get_cluster(inode
, skip
- 1, &fclus
, &dclus
);
398 else if (ret
== FAT_ENT_EOF
)
401 nr
= fat_access(sb
, dclus
, -1);
402 if (nr
== FAT_ENT_EOF
)
406 * write a new EOF, and get the remaining cluster
409 nr
= fat_access(sb
, dclus
, FAT_ENT_EOF
);
414 fat_cache_inval_inode(inode
);
416 fat_cache_inval_inode(inode
);
418 nr
= MSDOS_I(inode
)->i_start
;
419 MSDOS_I(inode
)->i_start
= 0;
420 MSDOS_I(inode
)->i_logstart
= 0;
421 mark_inode_dirty(inode
);
426 nr
= fat_access(sb
, nr
, FAT_ENT_FREE
);
429 else if (nr
== FAT_ENT_FREE
) {
430 fat_fs_panic(sb
, "%s: deleting beyond EOF (i_pos %lld)",
431 __FUNCTION__
, MSDOS_I(inode
)->i_pos
);
435 if (MSDOS_SB(sb
)->free_clusters
!= -1)
436 MSDOS_SB(sb
)->free_clusters
++;
437 inode
->i_blocks
-= MSDOS_SB(sb
)->cluster_size
>> 9;
438 } while (nr
!= FAT_ENT_EOF
);
439 fat_clusters_flush(sb
);