udf: Avoid infinite loop when processing indirect ICBs
[pandora-kernel.git] / fs / udf / inode.c
1 /*
2  * inode.c
3  *
4  * PURPOSE
5  *  Inode handling routines for the OSTA-UDF(tm) filesystem.
6  *
7  * COPYRIGHT
8  *  This file is distributed under the terms of the GNU General Public
9  *  License (GPL). Copies of the GPL can be obtained from:
10  *    ftp://prep.ai.mit.edu/pub/gnu/GPL
11  *  Each contributing author retains all rights to their own work.
12  *
13  *  (C) 1998 Dave Boynton
14  *  (C) 1998-2004 Ben Fennema
15  *  (C) 1999-2000 Stelias Computing Inc
16  *
17  * HISTORY
18  *
19  *  10/04/98 dgb  Added rudimentary directory functions
20  *  10/07/98      Fully working udf_block_map! It works!
21  *  11/25/98      bmap altered to better support extents
22  *  12/06/98 blf  partition support in udf_iget, udf_block_map
23  *                and udf_read_inode
24  *  12/12/98      rewrote udf_block_map to handle next extents and descs across
25  *                block boundaries (which is not actually allowed)
26  *  12/20/98      added support for strategy 4096
27  *  03/07/99      rewrote udf_block_map (again)
28  *                New funcs, inode_bmap, udf_next_aext
29  *  04/19/99      Support for writing device EA's for major/minor #
30  */
31
32 #include "udfdecl.h"
33 #include <linux/mm.h>
34 #include <linux/module.h>
35 #include <linux/pagemap.h>
36 #include <linux/buffer_head.h>
37 #include <linux/writeback.h>
38 #include <linux/slab.h>
39 #include <linux/crc-itu-t.h>
40 #include <linux/mpage.h>
41
42 #include "udf_i.h"
43 #include "udf_sb.h"
44
45 MODULE_AUTHOR("Ben Fennema");
46 MODULE_DESCRIPTION("Universal Disk Format Filesystem");
47 MODULE_LICENSE("GPL");
48
49 #define EXTENT_MERGE_SIZE 5
50
51 static mode_t udf_convert_permissions(struct fileEntry *);
52 static int udf_update_inode(struct inode *, int);
53 static void udf_fill_inode(struct inode *, struct buffer_head *);
54 static int udf_sync_inode(struct inode *inode);
55 static int udf_alloc_i_data(struct inode *inode, size_t size);
56 static struct buffer_head *inode_getblk(struct inode *, sector_t, int *,
57                                         sector_t *, int *);
58 static int8_t udf_insert_aext(struct inode *, struct extent_position,
59                               struct kernel_lb_addr, uint32_t);
60 static void udf_split_extents(struct inode *, int *, int, int,
61                               struct kernel_long_ad[EXTENT_MERGE_SIZE], int *);
62 static void udf_prealloc_extents(struct inode *, int, int,
63                                  struct kernel_long_ad[EXTENT_MERGE_SIZE], int *);
64 static void udf_merge_extents(struct inode *,
65                               struct kernel_long_ad[EXTENT_MERGE_SIZE], int *);
66 static void udf_update_extents(struct inode *,
67                                struct kernel_long_ad[EXTENT_MERGE_SIZE], int, int,
68                                struct extent_position *);
69 static int udf_get_block(struct inode *, sector_t, struct buffer_head *, int);
70
71
72 void udf_evict_inode(struct inode *inode)
73 {
74         struct udf_inode_info *iinfo = UDF_I(inode);
75         int want_delete = 0;
76
77         if (!inode->i_nlink && !is_bad_inode(inode)) {
78                 want_delete = 1;
79                 udf_setsize(inode, 0);
80                 udf_update_inode(inode, IS_SYNC(inode));
81         } else
82                 truncate_inode_pages(&inode->i_data, 0);
83         invalidate_inode_buffers(inode);
84         end_writeback(inode);
85         if (iinfo->i_alloc_type != ICBTAG_FLAG_AD_IN_ICB &&
86             inode->i_size != iinfo->i_lenExtents) {
87                 udf_warn(inode->i_sb, "Inode %lu (mode %o) has inode size %llu different from extent length %llu. Filesystem need not be standards compliant.\n",
88                          inode->i_ino, inode->i_mode,
89                          (unsigned long long)inode->i_size,
90                          (unsigned long long)iinfo->i_lenExtents);
91         }
92         kfree(iinfo->i_ext.i_data);
93         iinfo->i_ext.i_data = NULL;
94         if (want_delete) {
95                 udf_free_inode(inode);
96         }
97 }
98
99 static int udf_writepage(struct page *page, struct writeback_control *wbc)
100 {
101         return block_write_full_page(page, udf_get_block, wbc);
102 }
103
104 static int udf_readpage(struct file *file, struct page *page)
105 {
106         return mpage_readpage(page, udf_get_block);
107 }
108
109 static int udf_readpages(struct file *file, struct address_space *mapping,
110                         struct list_head *pages, unsigned nr_pages)
111 {
112         return mpage_readpages(mapping, pages, nr_pages, udf_get_block);
113 }
114
115 static int udf_write_begin(struct file *file, struct address_space *mapping,
116                         loff_t pos, unsigned len, unsigned flags,
117                         struct page **pagep, void **fsdata)
118 {
119         int ret;
120
121         ret = block_write_begin(mapping, pos, len, flags, pagep, udf_get_block);
122         if (unlikely(ret)) {
123                 struct inode *inode = mapping->host;
124                 struct udf_inode_info *iinfo = UDF_I(inode);
125                 loff_t isize = inode->i_size;
126
127                 if (pos + len > isize) {
128                         truncate_pagecache(inode, pos + len, isize);
129                         if (iinfo->i_alloc_type != ICBTAG_FLAG_AD_IN_ICB) {
130                                 down_write(&iinfo->i_data_sem);
131                                 udf_truncate_extents(inode);
132                                 up_write(&iinfo->i_data_sem);
133                         }
134                 }
135         }
136
137         return ret;
138 }
139
140 static sector_t udf_bmap(struct address_space *mapping, sector_t block)
141 {
142         return generic_block_bmap(mapping, block, udf_get_block);
143 }
144
145 const struct address_space_operations udf_aops = {
146         .readpage       = udf_readpage,
147         .readpages      = udf_readpages,
148         .writepage      = udf_writepage,
149         .write_begin            = udf_write_begin,
150         .write_end              = generic_write_end,
151         .bmap           = udf_bmap,
152 };
153
154 /*
155  * Expand file stored in ICB to a normal one-block-file
156  *
157  * This function requires i_data_sem for writing and releases it.
158  * This function requires i_mutex held
159  */
160 int udf_expand_file_adinicb(struct inode *inode)
161 {
162         struct page *page;
163         char *kaddr;
164         struct udf_inode_info *iinfo = UDF_I(inode);
165         int err;
166         struct writeback_control udf_wbc = {
167                 .sync_mode = WB_SYNC_NONE,
168                 .nr_to_write = 1,
169         };
170
171         if (!iinfo->i_lenAlloc) {
172                 if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_USE_SHORT_AD))
173                         iinfo->i_alloc_type = ICBTAG_FLAG_AD_SHORT;
174                 else
175                         iinfo->i_alloc_type = ICBTAG_FLAG_AD_LONG;
176                 /* from now on we have normal address_space methods */
177                 inode->i_data.a_ops = &udf_aops;
178                 up_write(&iinfo->i_data_sem);
179                 mark_inode_dirty(inode);
180                 return 0;
181         }
182         /*
183          * Release i_data_sem so that we can lock a page - page lock ranks
184          * above i_data_sem. i_mutex still protects us against file changes.
185          */
186         up_write(&iinfo->i_data_sem);
187
188         page = find_or_create_page(inode->i_mapping, 0, GFP_NOFS);
189         if (!page)
190                 return -ENOMEM;
191
192         if (!PageUptodate(page)) {
193                 kaddr = kmap(page);
194                 memset(kaddr + iinfo->i_lenAlloc, 0x00,
195                        PAGE_CACHE_SIZE - iinfo->i_lenAlloc);
196                 memcpy(kaddr, iinfo->i_ext.i_data + iinfo->i_lenEAttr,
197                         iinfo->i_lenAlloc);
198                 flush_dcache_page(page);
199                 SetPageUptodate(page);
200                 kunmap(page);
201         }
202         down_write(&iinfo->i_data_sem);
203         memset(iinfo->i_ext.i_data + iinfo->i_lenEAttr, 0x00,
204                iinfo->i_lenAlloc);
205         iinfo->i_lenAlloc = 0;
206         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_USE_SHORT_AD))
207                 iinfo->i_alloc_type = ICBTAG_FLAG_AD_SHORT;
208         else
209                 iinfo->i_alloc_type = ICBTAG_FLAG_AD_LONG;
210         /* from now on we have normal address_space methods */
211         inode->i_data.a_ops = &udf_aops;
212         up_write(&iinfo->i_data_sem);
213         err = inode->i_data.a_ops->writepage(page, &udf_wbc);
214         if (err) {
215                 /* Restore everything back so that we don't lose data... */
216                 lock_page(page);
217                 kaddr = kmap(page);
218                 down_write(&iinfo->i_data_sem);
219                 memcpy(iinfo->i_ext.i_data + iinfo->i_lenEAttr, kaddr,
220                        inode->i_size);
221                 kunmap(page);
222                 unlock_page(page);
223                 iinfo->i_alloc_type = ICBTAG_FLAG_AD_IN_ICB;
224                 inode->i_data.a_ops = &udf_adinicb_aops;
225                 up_write(&iinfo->i_data_sem);
226         }
227         page_cache_release(page);
228         mark_inode_dirty(inode);
229
230         return err;
231 }
232
233 struct buffer_head *udf_expand_dir_adinicb(struct inode *inode, int *block,
234                                            int *err)
235 {
236         int newblock;
237         struct buffer_head *dbh = NULL;
238         struct kernel_lb_addr eloc;
239         uint8_t alloctype;
240         struct extent_position epos;
241
242         struct udf_fileident_bh sfibh, dfibh;
243         loff_t f_pos = udf_ext0_offset(inode);
244         int size = udf_ext0_offset(inode) + inode->i_size;
245         struct fileIdentDesc cfi, *sfi, *dfi;
246         struct udf_inode_info *iinfo = UDF_I(inode);
247
248         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_USE_SHORT_AD))
249                 alloctype = ICBTAG_FLAG_AD_SHORT;
250         else
251                 alloctype = ICBTAG_FLAG_AD_LONG;
252
253         if (!inode->i_size) {
254                 iinfo->i_alloc_type = alloctype;
255                 mark_inode_dirty(inode);
256                 return NULL;
257         }
258
259         /* alloc block, and copy data to it */
260         *block = udf_new_block(inode->i_sb, inode,
261                                iinfo->i_location.partitionReferenceNum,
262                                iinfo->i_location.logicalBlockNum, err);
263         if (!(*block))
264                 return NULL;
265         newblock = udf_get_pblock(inode->i_sb, *block,
266                                   iinfo->i_location.partitionReferenceNum,
267                                 0);
268         if (!newblock)
269                 return NULL;
270         dbh = udf_tgetblk(inode->i_sb, newblock);
271         if (!dbh)
272                 return NULL;
273         lock_buffer(dbh);
274         memset(dbh->b_data, 0x00, inode->i_sb->s_blocksize);
275         set_buffer_uptodate(dbh);
276         unlock_buffer(dbh);
277         mark_buffer_dirty_inode(dbh, inode);
278
279         sfibh.soffset = sfibh.eoffset =
280                         f_pos & (inode->i_sb->s_blocksize - 1);
281         sfibh.sbh = sfibh.ebh = NULL;
282         dfibh.soffset = dfibh.eoffset = 0;
283         dfibh.sbh = dfibh.ebh = dbh;
284         while (f_pos < size) {
285                 iinfo->i_alloc_type = ICBTAG_FLAG_AD_IN_ICB;
286                 sfi = udf_fileident_read(inode, &f_pos, &sfibh, &cfi, NULL,
287                                          NULL, NULL, NULL);
288                 if (!sfi) {
289                         brelse(dbh);
290                         return NULL;
291                 }
292                 iinfo->i_alloc_type = alloctype;
293                 sfi->descTag.tagLocation = cpu_to_le32(*block);
294                 dfibh.soffset = dfibh.eoffset;
295                 dfibh.eoffset += (sfibh.eoffset - sfibh.soffset);
296                 dfi = (struct fileIdentDesc *)(dbh->b_data + dfibh.soffset);
297                 if (udf_write_fi(inode, sfi, dfi, &dfibh, sfi->impUse,
298                                  sfi->fileIdent +
299                                         le16_to_cpu(sfi->lengthOfImpUse))) {
300                         iinfo->i_alloc_type = ICBTAG_FLAG_AD_IN_ICB;
301                         brelse(dbh);
302                         return NULL;
303                 }
304         }
305         mark_buffer_dirty_inode(dbh, inode);
306
307         memset(iinfo->i_ext.i_data + iinfo->i_lenEAttr, 0,
308                 iinfo->i_lenAlloc);
309         iinfo->i_lenAlloc = 0;
310         eloc.logicalBlockNum = *block;
311         eloc.partitionReferenceNum =
312                                 iinfo->i_location.partitionReferenceNum;
313         iinfo->i_lenExtents = inode->i_size;
314         epos.bh = NULL;
315         epos.block = iinfo->i_location;
316         epos.offset = udf_file_entry_alloc_offset(inode);
317         udf_add_aext(inode, &epos, &eloc, inode->i_size, 0);
318         /* UniqueID stuff */
319
320         brelse(epos.bh);
321         mark_inode_dirty(inode);
322         return dbh;
323 }
324
325 static int udf_get_block(struct inode *inode, sector_t block,
326                          struct buffer_head *bh_result, int create)
327 {
328         int err, new;
329         struct buffer_head *bh;
330         sector_t phys = 0;
331         struct udf_inode_info *iinfo;
332
333         if (!create) {
334                 phys = udf_block_map(inode, block);
335                 if (phys)
336                         map_bh(bh_result, inode->i_sb, phys);
337                 return 0;
338         }
339
340         err = -EIO;
341         new = 0;
342         bh = NULL;
343         iinfo = UDF_I(inode);
344
345         down_write(&iinfo->i_data_sem);
346         if (block == iinfo->i_next_alloc_block + 1) {
347                 iinfo->i_next_alloc_block++;
348                 iinfo->i_next_alloc_goal++;
349         }
350
351         err = 0;
352
353         bh = inode_getblk(inode, block, &err, &phys, &new);
354         BUG_ON(bh);
355         if (err)
356                 goto abort;
357         BUG_ON(!phys);
358
359         if (new)
360                 set_buffer_new(bh_result);
361         map_bh(bh_result, inode->i_sb, phys);
362
363 abort:
364         up_write(&iinfo->i_data_sem);
365         return err;
366 }
367
368 static struct buffer_head *udf_getblk(struct inode *inode, long block,
369                                       int create, int *err)
370 {
371         struct buffer_head *bh;
372         struct buffer_head dummy;
373
374         dummy.b_state = 0;
375         dummy.b_blocknr = -1000;
376         *err = udf_get_block(inode, block, &dummy, create);
377         if (!*err && buffer_mapped(&dummy)) {
378                 bh = sb_getblk(inode->i_sb, dummy.b_blocknr);
379                 if (buffer_new(&dummy)) {
380                         lock_buffer(bh);
381                         memset(bh->b_data, 0x00, inode->i_sb->s_blocksize);
382                         set_buffer_uptodate(bh);
383                         unlock_buffer(bh);
384                         mark_buffer_dirty_inode(bh, inode);
385                 }
386                 return bh;
387         }
388
389         return NULL;
390 }
391
392 /* Extend the file by 'blocks' blocks, return the number of extents added */
393 static int udf_do_extend_file(struct inode *inode,
394                               struct extent_position *last_pos,
395                               struct kernel_long_ad *last_ext,
396                               sector_t blocks)
397 {
398         sector_t add;
399         int count = 0, fake = !(last_ext->extLength & UDF_EXTENT_LENGTH_MASK);
400         struct super_block *sb = inode->i_sb;
401         struct kernel_lb_addr prealloc_loc = {};
402         int prealloc_len = 0;
403         struct udf_inode_info *iinfo;
404         int err;
405
406         /* The previous extent is fake and we should not extend by anything
407          * - there's nothing to do... */
408         if (!blocks && fake)
409                 return 0;
410
411         iinfo = UDF_I(inode);
412         /* Round the last extent up to a multiple of block size */
413         if (last_ext->extLength & (sb->s_blocksize - 1)) {
414                 last_ext->extLength =
415                         (last_ext->extLength & UDF_EXTENT_FLAG_MASK) |
416                         (((last_ext->extLength & UDF_EXTENT_LENGTH_MASK) +
417                           sb->s_blocksize - 1) & ~(sb->s_blocksize - 1));
418                 iinfo->i_lenExtents =
419                         (iinfo->i_lenExtents + sb->s_blocksize - 1) &
420                         ~(sb->s_blocksize - 1);
421         }
422
423         /* Last extent are just preallocated blocks? */
424         if ((last_ext->extLength & UDF_EXTENT_FLAG_MASK) ==
425                                                 EXT_NOT_RECORDED_ALLOCATED) {
426                 /* Save the extent so that we can reattach it to the end */
427                 prealloc_loc = last_ext->extLocation;
428                 prealloc_len = last_ext->extLength;
429                 /* Mark the extent as a hole */
430                 last_ext->extLength = EXT_NOT_RECORDED_NOT_ALLOCATED |
431                         (last_ext->extLength & UDF_EXTENT_LENGTH_MASK);
432                 last_ext->extLocation.logicalBlockNum = 0;
433                 last_ext->extLocation.partitionReferenceNum = 0;
434         }
435
436         /* Can we merge with the previous extent? */
437         if ((last_ext->extLength & UDF_EXTENT_FLAG_MASK) ==
438                                         EXT_NOT_RECORDED_NOT_ALLOCATED) {
439                 add = ((1 << 30) - sb->s_blocksize -
440                         (last_ext->extLength & UDF_EXTENT_LENGTH_MASK)) >>
441                         sb->s_blocksize_bits;
442                 if (add > blocks)
443                         add = blocks;
444                 blocks -= add;
445                 last_ext->extLength += add << sb->s_blocksize_bits;
446         }
447
448         if (fake) {
449                 udf_add_aext(inode, last_pos, &last_ext->extLocation,
450                              last_ext->extLength, 1);
451                 count++;
452         } else
453                 udf_write_aext(inode, last_pos, &last_ext->extLocation,
454                                 last_ext->extLength, 1);
455
456         /* Managed to do everything necessary? */
457         if (!blocks)
458                 goto out;
459
460         /* All further extents will be NOT_RECORDED_NOT_ALLOCATED */
461         last_ext->extLocation.logicalBlockNum = 0;
462         last_ext->extLocation.partitionReferenceNum = 0;
463         add = (1 << (30-sb->s_blocksize_bits)) - 1;
464         last_ext->extLength = EXT_NOT_RECORDED_NOT_ALLOCATED |
465                                 (add << sb->s_blocksize_bits);
466
467         /* Create enough extents to cover the whole hole */
468         while (blocks > add) {
469                 blocks -= add;
470                 err = udf_add_aext(inode, last_pos, &last_ext->extLocation,
471                                    last_ext->extLength, 1);
472                 if (err)
473                         return err;
474                 count++;
475         }
476         if (blocks) {
477                 last_ext->extLength = EXT_NOT_RECORDED_NOT_ALLOCATED |
478                         (blocks << sb->s_blocksize_bits);
479                 err = udf_add_aext(inode, last_pos, &last_ext->extLocation,
480                                    last_ext->extLength, 1);
481                 if (err)
482                         return err;
483                 count++;
484         }
485
486 out:
487         /* Do we have some preallocated blocks saved? */
488         if (prealloc_len) {
489                 err = udf_add_aext(inode, last_pos, &prealloc_loc,
490                                    prealloc_len, 1);
491                 if (err)
492                         return err;
493                 last_ext->extLocation = prealloc_loc;
494                 last_ext->extLength = prealloc_len;
495                 count++;
496         }
497
498         /* last_pos should point to the last written extent... */
499         if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_SHORT)
500                 last_pos->offset -= sizeof(struct short_ad);
501         else if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_LONG)
502                 last_pos->offset -= sizeof(struct long_ad);
503         else
504                 return -EIO;
505
506         return count;
507 }
508
509 static int udf_extend_file(struct inode *inode, loff_t newsize)
510 {
511
512         struct extent_position epos;
513         struct kernel_lb_addr eloc;
514         uint32_t elen;
515         int8_t etype;
516         struct super_block *sb = inode->i_sb;
517         sector_t first_block = newsize >> sb->s_blocksize_bits, offset;
518         int adsize;
519         struct udf_inode_info *iinfo = UDF_I(inode);
520         struct kernel_long_ad extent;
521         int err;
522
523         if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_SHORT)
524                 adsize = sizeof(struct short_ad);
525         else if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_LONG)
526                 adsize = sizeof(struct long_ad);
527         else
528                 BUG();
529
530         etype = inode_bmap(inode, first_block, &epos, &eloc, &elen, &offset);
531
532         /* File has extent covering the new size (could happen when extending
533          * inside a block)? */
534         if (etype != -1)
535                 return 0;
536         if (newsize & (sb->s_blocksize - 1))
537                 offset++;
538         /* Extended file just to the boundary of the last file block? */
539         if (offset == 0)
540                 return 0;
541
542         /* Truncate is extending the file by 'offset' blocks */
543         if ((!epos.bh && epos.offset == udf_file_entry_alloc_offset(inode)) ||
544             (epos.bh && epos.offset == sizeof(struct allocExtDesc))) {
545                 /* File has no extents at all or has empty last
546                  * indirect extent! Create a fake extent... */
547                 extent.extLocation.logicalBlockNum = 0;
548                 extent.extLocation.partitionReferenceNum = 0;
549                 extent.extLength = EXT_NOT_RECORDED_NOT_ALLOCATED;
550         } else {
551                 epos.offset -= adsize;
552                 etype = udf_next_aext(inode, &epos, &extent.extLocation,
553                                       &extent.extLength, 0);
554                 extent.extLength |= etype << 30;
555         }
556         err = udf_do_extend_file(inode, &epos, &extent, offset);
557         if (err < 0)
558                 goto out;
559         err = 0;
560         iinfo->i_lenExtents = newsize;
561 out:
562         brelse(epos.bh);
563         return err;
564 }
565
566 static struct buffer_head *inode_getblk(struct inode *inode, sector_t block,
567                                         int *err, sector_t *phys, int *new)
568 {
569         static sector_t last_block;
570         struct buffer_head *result = NULL;
571         struct kernel_long_ad laarr[EXTENT_MERGE_SIZE];
572         struct extent_position prev_epos, cur_epos, next_epos;
573         int count = 0, startnum = 0, endnum = 0;
574         uint32_t elen = 0, tmpelen;
575         struct kernel_lb_addr eloc, tmpeloc;
576         int c = 1;
577         loff_t lbcount = 0, b_off = 0;
578         uint32_t newblocknum, newblock;
579         sector_t offset = 0;
580         int8_t etype;
581         struct udf_inode_info *iinfo = UDF_I(inode);
582         int goal = 0, pgoal = iinfo->i_location.logicalBlockNum;
583         int lastblock = 0;
584         bool isBeyondEOF;
585
586         prev_epos.offset = udf_file_entry_alloc_offset(inode);
587         prev_epos.block = iinfo->i_location;
588         prev_epos.bh = NULL;
589         cur_epos = next_epos = prev_epos;
590         b_off = (loff_t)block << inode->i_sb->s_blocksize_bits;
591
592         /* find the extent which contains the block we are looking for.
593            alternate between laarr[0] and laarr[1] for locations of the
594            current extent, and the previous extent */
595         do {
596                 if (prev_epos.bh != cur_epos.bh) {
597                         brelse(prev_epos.bh);
598                         get_bh(cur_epos.bh);
599                         prev_epos.bh = cur_epos.bh;
600                 }
601                 if (cur_epos.bh != next_epos.bh) {
602                         brelse(cur_epos.bh);
603                         get_bh(next_epos.bh);
604                         cur_epos.bh = next_epos.bh;
605                 }
606
607                 lbcount += elen;
608
609                 prev_epos.block = cur_epos.block;
610                 cur_epos.block = next_epos.block;
611
612                 prev_epos.offset = cur_epos.offset;
613                 cur_epos.offset = next_epos.offset;
614
615                 etype = udf_next_aext(inode, &next_epos, &eloc, &elen, 1);
616                 if (etype == -1)
617                         break;
618
619                 c = !c;
620
621                 laarr[c].extLength = (etype << 30) | elen;
622                 laarr[c].extLocation = eloc;
623
624                 if (etype != (EXT_NOT_RECORDED_NOT_ALLOCATED >> 30))
625                         pgoal = eloc.logicalBlockNum +
626                                 ((elen + inode->i_sb->s_blocksize - 1) >>
627                                  inode->i_sb->s_blocksize_bits);
628
629                 count++;
630         } while (lbcount + elen <= b_off);
631
632         b_off -= lbcount;
633         offset = b_off >> inode->i_sb->s_blocksize_bits;
634         /*
635          * Move prev_epos and cur_epos into indirect extent if we are at
636          * the pointer to it
637          */
638         udf_next_aext(inode, &prev_epos, &tmpeloc, &tmpelen, 0);
639         udf_next_aext(inode, &cur_epos, &tmpeloc, &tmpelen, 0);
640
641         /* if the extent is allocated and recorded, return the block
642            if the extent is not a multiple of the blocksize, round up */
643
644         if (etype == (EXT_RECORDED_ALLOCATED >> 30)) {
645                 if (elen & (inode->i_sb->s_blocksize - 1)) {
646                         elen = EXT_RECORDED_ALLOCATED |
647                                 ((elen + inode->i_sb->s_blocksize - 1) &
648                                  ~(inode->i_sb->s_blocksize - 1));
649                         udf_write_aext(inode, &cur_epos, &eloc, elen, 1);
650                 }
651                 brelse(prev_epos.bh);
652                 brelse(cur_epos.bh);
653                 brelse(next_epos.bh);
654                 newblock = udf_get_lb_pblock(inode->i_sb, &eloc, offset);
655                 *phys = newblock;
656                 return NULL;
657         }
658
659         last_block = block;
660         /* Are we beyond EOF? */
661         if (etype == -1) {
662                 int ret;
663                 isBeyondEOF = 1;
664                 if (count) {
665                         if (c)
666                                 laarr[0] = laarr[1];
667                         startnum = 1;
668                 } else {
669                         /* Create a fake extent when there's not one */
670                         memset(&laarr[0].extLocation, 0x00,
671                                 sizeof(struct kernel_lb_addr));
672                         laarr[0].extLength = EXT_NOT_RECORDED_NOT_ALLOCATED;
673                         /* Will udf_do_extend_file() create real extent from
674                            a fake one? */
675                         startnum = (offset > 0);
676                 }
677                 /* Create extents for the hole between EOF and offset */
678                 ret = udf_do_extend_file(inode, &prev_epos, laarr, offset);
679                 if (ret < 0) {
680                         brelse(prev_epos.bh);
681                         brelse(cur_epos.bh);
682                         brelse(next_epos.bh);
683                         *err = ret;
684                         return NULL;
685                 }
686                 c = 0;
687                 offset = 0;
688                 count += ret;
689                 /* We are not covered by a preallocated extent? */
690                 if ((laarr[0].extLength & UDF_EXTENT_FLAG_MASK) !=
691                                                 EXT_NOT_RECORDED_ALLOCATED) {
692                         /* Is there any real extent? - otherwise we overwrite
693                          * the fake one... */
694                         if (count)
695                                 c = !c;
696                         laarr[c].extLength = EXT_NOT_RECORDED_NOT_ALLOCATED |
697                                 inode->i_sb->s_blocksize;
698                         memset(&laarr[c].extLocation, 0x00,
699                                 sizeof(struct kernel_lb_addr));
700                         count++;
701                         endnum++;
702                 }
703                 endnum = c + 1;
704                 lastblock = 1;
705         } else {
706                 isBeyondEOF = 0;
707                 endnum = startnum = ((count > 2) ? 2 : count);
708
709                 /* if the current extent is in position 0,
710                    swap it with the previous */
711                 if (!c && count != 1) {
712                         laarr[2] = laarr[0];
713                         laarr[0] = laarr[1];
714                         laarr[1] = laarr[2];
715                         c = 1;
716                 }
717
718                 /* if the current block is located in an extent,
719                    read the next extent */
720                 etype = udf_next_aext(inode, &next_epos, &eloc, &elen, 0);
721                 if (etype != -1) {
722                         laarr[c + 1].extLength = (etype << 30) | elen;
723                         laarr[c + 1].extLocation = eloc;
724                         count++;
725                         startnum++;
726                         endnum++;
727                 } else
728                         lastblock = 1;
729         }
730
731         /* if the current extent is not recorded but allocated, get the
732          * block in the extent corresponding to the requested block */
733         if ((laarr[c].extLength >> 30) == (EXT_NOT_RECORDED_ALLOCATED >> 30))
734                 newblocknum = laarr[c].extLocation.logicalBlockNum + offset;
735         else { /* otherwise, allocate a new block */
736                 if (iinfo->i_next_alloc_block == block)
737                         goal = iinfo->i_next_alloc_goal;
738
739                 if (!goal) {
740                         if (!(goal = pgoal)) /* XXX: what was intended here? */
741                                 goal = iinfo->i_location.logicalBlockNum + 1;
742                 }
743
744                 newblocknum = udf_new_block(inode->i_sb, inode,
745                                 iinfo->i_location.partitionReferenceNum,
746                                 goal, err);
747                 if (!newblocknum) {
748                         brelse(prev_epos.bh);
749                         brelse(cur_epos.bh);
750                         brelse(next_epos.bh);
751                         *err = -ENOSPC;
752                         return NULL;
753                 }
754                 if (isBeyondEOF)
755                         iinfo->i_lenExtents += inode->i_sb->s_blocksize;
756         }
757
758         /* if the extent the requsted block is located in contains multiple
759          * blocks, split the extent into at most three extents. blocks prior
760          * to requested block, requested block, and blocks after requested
761          * block */
762         udf_split_extents(inode, &c, offset, newblocknum, laarr, &endnum);
763
764 #ifdef UDF_PREALLOCATE
765         /* We preallocate blocks only for regular files. It also makes sense
766          * for directories but there's a problem when to drop the
767          * preallocation. We might use some delayed work for that but I feel
768          * it's overengineering for a filesystem like UDF. */
769         if (S_ISREG(inode->i_mode))
770                 udf_prealloc_extents(inode, c, lastblock, laarr, &endnum);
771 #endif
772
773         /* merge any continuous blocks in laarr */
774         udf_merge_extents(inode, laarr, &endnum);
775
776         /* write back the new extents, inserting new extents if the new number
777          * of extents is greater than the old number, and deleting extents if
778          * the new number of extents is less than the old number */
779         udf_update_extents(inode, laarr, startnum, endnum, &prev_epos);
780
781         brelse(prev_epos.bh);
782         brelse(cur_epos.bh);
783         brelse(next_epos.bh);
784
785         newblock = udf_get_pblock(inode->i_sb, newblocknum,
786                                 iinfo->i_location.partitionReferenceNum, 0);
787         if (!newblock)
788                 return NULL;
789         *phys = newblock;
790         *err = 0;
791         *new = 1;
792         iinfo->i_next_alloc_block = block;
793         iinfo->i_next_alloc_goal = newblocknum;
794         inode->i_ctime = current_fs_time(inode->i_sb);
795
796         if (IS_SYNC(inode))
797                 udf_sync_inode(inode);
798         else
799                 mark_inode_dirty(inode);
800
801         return result;
802 }
803
804 static void udf_split_extents(struct inode *inode, int *c, int offset,
805                               int newblocknum,
806                               struct kernel_long_ad laarr[EXTENT_MERGE_SIZE],
807                               int *endnum)
808 {
809         unsigned long blocksize = inode->i_sb->s_blocksize;
810         unsigned char blocksize_bits = inode->i_sb->s_blocksize_bits;
811
812         if ((laarr[*c].extLength >> 30) == (EXT_NOT_RECORDED_ALLOCATED >> 30) ||
813             (laarr[*c].extLength >> 30) ==
814                                 (EXT_NOT_RECORDED_NOT_ALLOCATED >> 30)) {
815                 int curr = *c;
816                 int blen = ((laarr[curr].extLength & UDF_EXTENT_LENGTH_MASK) +
817                             blocksize - 1) >> blocksize_bits;
818                 int8_t etype = (laarr[curr].extLength >> 30);
819
820                 if (blen == 1)
821                         ;
822                 else if (!offset || blen == offset + 1) {
823                         laarr[curr + 2] = laarr[curr + 1];
824                         laarr[curr + 1] = laarr[curr];
825                 } else {
826                         laarr[curr + 3] = laarr[curr + 1];
827                         laarr[curr + 2] = laarr[curr + 1] = laarr[curr];
828                 }
829
830                 if (offset) {
831                         if (etype == (EXT_NOT_RECORDED_ALLOCATED >> 30)) {
832                                 udf_free_blocks(inode->i_sb, inode,
833                                                 &laarr[curr].extLocation,
834                                                 0, offset);
835                                 laarr[curr].extLength =
836                                         EXT_NOT_RECORDED_NOT_ALLOCATED |
837                                         (offset << blocksize_bits);
838                                 laarr[curr].extLocation.logicalBlockNum = 0;
839                                 laarr[curr].extLocation.
840                                                 partitionReferenceNum = 0;
841                         } else
842                                 laarr[curr].extLength = (etype << 30) |
843                                         (offset << blocksize_bits);
844                         curr++;
845                         (*c)++;
846                         (*endnum)++;
847                 }
848
849                 laarr[curr].extLocation.logicalBlockNum = newblocknum;
850                 if (etype == (EXT_NOT_RECORDED_NOT_ALLOCATED >> 30))
851                         laarr[curr].extLocation.partitionReferenceNum =
852                                 UDF_I(inode)->i_location.partitionReferenceNum;
853                 laarr[curr].extLength = EXT_RECORDED_ALLOCATED |
854                         blocksize;
855                 curr++;
856
857                 if (blen != offset + 1) {
858                         if (etype == (EXT_NOT_RECORDED_ALLOCATED >> 30))
859                                 laarr[curr].extLocation.logicalBlockNum +=
860                                                                 offset + 1;
861                         laarr[curr].extLength = (etype << 30) |
862                                 ((blen - (offset + 1)) << blocksize_bits);
863                         curr++;
864                         (*endnum)++;
865                 }
866         }
867 }
868
869 static void udf_prealloc_extents(struct inode *inode, int c, int lastblock,
870                                  struct kernel_long_ad laarr[EXTENT_MERGE_SIZE],
871                                  int *endnum)
872 {
873         int start, length = 0, currlength = 0, i;
874
875         if (*endnum >= (c + 1)) {
876                 if (!lastblock)
877                         return;
878                 else
879                         start = c;
880         } else {
881                 if ((laarr[c + 1].extLength >> 30) ==
882                                         (EXT_NOT_RECORDED_ALLOCATED >> 30)) {
883                         start = c + 1;
884                         length = currlength =
885                                 (((laarr[c + 1].extLength &
886                                         UDF_EXTENT_LENGTH_MASK) +
887                                 inode->i_sb->s_blocksize - 1) >>
888                                 inode->i_sb->s_blocksize_bits);
889                 } else
890                         start = c;
891         }
892
893         for (i = start + 1; i <= *endnum; i++) {
894                 if (i == *endnum) {
895                         if (lastblock)
896                                 length += UDF_DEFAULT_PREALLOC_BLOCKS;
897                 } else if ((laarr[i].extLength >> 30) ==
898                                 (EXT_NOT_RECORDED_NOT_ALLOCATED >> 30)) {
899                         length += (((laarr[i].extLength &
900                                                 UDF_EXTENT_LENGTH_MASK) +
901                                     inode->i_sb->s_blocksize - 1) >>
902                                     inode->i_sb->s_blocksize_bits);
903                 } else
904                         break;
905         }
906
907         if (length) {
908                 int next = laarr[start].extLocation.logicalBlockNum +
909                         (((laarr[start].extLength & UDF_EXTENT_LENGTH_MASK) +
910                           inode->i_sb->s_blocksize - 1) >>
911                           inode->i_sb->s_blocksize_bits);
912                 int numalloc = udf_prealloc_blocks(inode->i_sb, inode,
913                                 laarr[start].extLocation.partitionReferenceNum,
914                                 next, (UDF_DEFAULT_PREALLOC_BLOCKS > length ?
915                                 length : UDF_DEFAULT_PREALLOC_BLOCKS) -
916                                 currlength);
917                 if (numalloc)   {
918                         if (start == (c + 1))
919                                 laarr[start].extLength +=
920                                         (numalloc <<
921                                          inode->i_sb->s_blocksize_bits);
922                         else {
923                                 memmove(&laarr[c + 2], &laarr[c + 1],
924                                         sizeof(struct long_ad) * (*endnum - (c + 1)));
925                                 (*endnum)++;
926                                 laarr[c + 1].extLocation.logicalBlockNum = next;
927                                 laarr[c + 1].extLocation.partitionReferenceNum =
928                                         laarr[c].extLocation.
929                                                         partitionReferenceNum;
930                                 laarr[c + 1].extLength =
931                                         EXT_NOT_RECORDED_ALLOCATED |
932                                         (numalloc <<
933                                          inode->i_sb->s_blocksize_bits);
934                                 start = c + 1;
935                         }
936
937                         for (i = start + 1; numalloc && i < *endnum; i++) {
938                                 int elen = ((laarr[i].extLength &
939                                                 UDF_EXTENT_LENGTH_MASK) +
940                                             inode->i_sb->s_blocksize - 1) >>
941                                             inode->i_sb->s_blocksize_bits;
942
943                                 if (elen > numalloc) {
944                                         laarr[i].extLength -=
945                                                 (numalloc <<
946                                                  inode->i_sb->s_blocksize_bits);
947                                         numalloc = 0;
948                                 } else {
949                                         numalloc -= elen;
950                                         if (*endnum > (i + 1))
951                                                 memmove(&laarr[i],
952                                                         &laarr[i + 1],
953                                                         sizeof(struct long_ad) *
954                                                         (*endnum - (i + 1)));
955                                         i--;
956                                         (*endnum)--;
957                                 }
958                         }
959                         UDF_I(inode)->i_lenExtents +=
960                                 numalloc << inode->i_sb->s_blocksize_bits;
961                 }
962         }
963 }
964
965 static void udf_merge_extents(struct inode *inode,
966                               struct kernel_long_ad laarr[EXTENT_MERGE_SIZE],
967                               int *endnum)
968 {
969         int i;
970         unsigned long blocksize = inode->i_sb->s_blocksize;
971         unsigned char blocksize_bits = inode->i_sb->s_blocksize_bits;
972
973         for (i = 0; i < (*endnum - 1); i++) {
974                 struct kernel_long_ad *li /*l[i]*/ = &laarr[i];
975                 struct kernel_long_ad *lip1 /*l[i plus 1]*/ = &laarr[i + 1];
976
977                 if (((li->extLength >> 30) == (lip1->extLength >> 30)) &&
978                         (((li->extLength >> 30) ==
979                                 (EXT_NOT_RECORDED_NOT_ALLOCATED >> 30)) ||
980                         ((lip1->extLocation.logicalBlockNum -
981                           li->extLocation.logicalBlockNum) ==
982                         (((li->extLength & UDF_EXTENT_LENGTH_MASK) +
983                         blocksize - 1) >> blocksize_bits)))) {
984
985                         if (((li->extLength & UDF_EXTENT_LENGTH_MASK) +
986                                 (lip1->extLength & UDF_EXTENT_LENGTH_MASK) +
987                                 blocksize - 1) & ~UDF_EXTENT_LENGTH_MASK) {
988                                 lip1->extLength = (lip1->extLength -
989                                                   (li->extLength &
990                                                    UDF_EXTENT_LENGTH_MASK) +
991                                                    UDF_EXTENT_LENGTH_MASK) &
992                                                         ~(blocksize - 1);
993                                 li->extLength = (li->extLength &
994                                                  UDF_EXTENT_FLAG_MASK) +
995                                                 (UDF_EXTENT_LENGTH_MASK + 1) -
996                                                 blocksize;
997                                 lip1->extLocation.logicalBlockNum =
998                                         li->extLocation.logicalBlockNum +
999                                         ((li->extLength &
1000                                                 UDF_EXTENT_LENGTH_MASK) >>
1001                                                 blocksize_bits);
1002                         } else {
1003                                 li->extLength = lip1->extLength +
1004                                         (((li->extLength &
1005                                                 UDF_EXTENT_LENGTH_MASK) +
1006                                          blocksize - 1) & ~(blocksize - 1));
1007                                 if (*endnum > (i + 2))
1008                                         memmove(&laarr[i + 1], &laarr[i + 2],
1009                                                 sizeof(struct long_ad) *
1010                                                 (*endnum - (i + 2)));
1011                                 i--;
1012                                 (*endnum)--;
1013                         }
1014                 } else if (((li->extLength >> 30) ==
1015                                 (EXT_NOT_RECORDED_ALLOCATED >> 30)) &&
1016                            ((lip1->extLength >> 30) ==
1017                                 (EXT_NOT_RECORDED_NOT_ALLOCATED >> 30))) {
1018                         udf_free_blocks(inode->i_sb, inode, &li->extLocation, 0,
1019                                         ((li->extLength &
1020                                           UDF_EXTENT_LENGTH_MASK) +
1021                                          blocksize - 1) >> blocksize_bits);
1022                         li->extLocation.logicalBlockNum = 0;
1023                         li->extLocation.partitionReferenceNum = 0;
1024
1025                         if (((li->extLength & UDF_EXTENT_LENGTH_MASK) +
1026                              (lip1->extLength & UDF_EXTENT_LENGTH_MASK) +
1027                              blocksize - 1) & ~UDF_EXTENT_LENGTH_MASK) {
1028                                 lip1->extLength = (lip1->extLength -
1029                                                    (li->extLength &
1030                                                    UDF_EXTENT_LENGTH_MASK) +
1031                                                    UDF_EXTENT_LENGTH_MASK) &
1032                                                    ~(blocksize - 1);
1033                                 li->extLength = (li->extLength &
1034                                                  UDF_EXTENT_FLAG_MASK) +
1035                                                 (UDF_EXTENT_LENGTH_MASK + 1) -
1036                                                 blocksize;
1037                         } else {
1038                                 li->extLength = lip1->extLength +
1039                                         (((li->extLength &
1040                                                 UDF_EXTENT_LENGTH_MASK) +
1041                                           blocksize - 1) & ~(blocksize - 1));
1042                                 if (*endnum > (i + 2))
1043                                         memmove(&laarr[i + 1], &laarr[i + 2],
1044                                                 sizeof(struct long_ad) *
1045                                                 (*endnum - (i + 2)));
1046                                 i--;
1047                                 (*endnum)--;
1048                         }
1049                 } else if ((li->extLength >> 30) ==
1050                                         (EXT_NOT_RECORDED_ALLOCATED >> 30)) {
1051                         udf_free_blocks(inode->i_sb, inode,
1052                                         &li->extLocation, 0,
1053                                         ((li->extLength &
1054                                                 UDF_EXTENT_LENGTH_MASK) +
1055                                          blocksize - 1) >> blocksize_bits);
1056                         li->extLocation.logicalBlockNum = 0;
1057                         li->extLocation.partitionReferenceNum = 0;
1058                         li->extLength = (li->extLength &
1059                                                 UDF_EXTENT_LENGTH_MASK) |
1060                                                 EXT_NOT_RECORDED_NOT_ALLOCATED;
1061                 }
1062         }
1063 }
1064
1065 static void udf_update_extents(struct inode *inode,
1066                                struct kernel_long_ad laarr[EXTENT_MERGE_SIZE],
1067                                int startnum, int endnum,
1068                                struct extent_position *epos)
1069 {
1070         int start = 0, i;
1071         struct kernel_lb_addr tmploc;
1072         uint32_t tmplen;
1073
1074         if (startnum > endnum) {
1075                 for (i = 0; i < (startnum - endnum); i++)
1076                         udf_delete_aext(inode, *epos, laarr[i].extLocation,
1077                                         laarr[i].extLength);
1078         } else if (startnum < endnum) {
1079                 for (i = 0; i < (endnum - startnum); i++) {
1080                         udf_insert_aext(inode, *epos, laarr[i].extLocation,
1081                                         laarr[i].extLength);
1082                         udf_next_aext(inode, epos, &laarr[i].extLocation,
1083                                       &laarr[i].extLength, 1);
1084                         start++;
1085                 }
1086         }
1087
1088         for (i = start; i < endnum; i++) {
1089                 udf_next_aext(inode, epos, &tmploc, &tmplen, 0);
1090                 udf_write_aext(inode, epos, &laarr[i].extLocation,
1091                                laarr[i].extLength, 1);
1092         }
1093 }
1094
1095 struct buffer_head *udf_bread(struct inode *inode, int block,
1096                               int create, int *err)
1097 {
1098         struct buffer_head *bh = NULL;
1099
1100         bh = udf_getblk(inode, block, create, err);
1101         if (!bh)
1102                 return NULL;
1103
1104         if (buffer_uptodate(bh))
1105                 return bh;
1106
1107         ll_rw_block(READ, 1, &bh);
1108
1109         wait_on_buffer(bh);
1110         if (buffer_uptodate(bh))
1111                 return bh;
1112
1113         brelse(bh);
1114         *err = -EIO;
1115         return NULL;
1116 }
1117
1118 int udf_setsize(struct inode *inode, loff_t newsize)
1119 {
1120         int err;
1121         struct udf_inode_info *iinfo;
1122         int bsize = 1 << inode->i_blkbits;
1123
1124         if (!(S_ISREG(inode->i_mode) || S_ISDIR(inode->i_mode) ||
1125               S_ISLNK(inode->i_mode)))
1126                 return -EINVAL;
1127         if (IS_APPEND(inode) || IS_IMMUTABLE(inode))
1128                 return -EPERM;
1129
1130         iinfo = UDF_I(inode);
1131         if (newsize > inode->i_size) {
1132                 down_write(&iinfo->i_data_sem);
1133                 if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_IN_ICB) {
1134                         if (bsize <
1135                             (udf_file_entry_alloc_offset(inode) + newsize)) {
1136                                 err = udf_expand_file_adinicb(inode);
1137                                 if (err)
1138                                         return err;
1139                                 down_write(&iinfo->i_data_sem);
1140                         } else
1141                                 iinfo->i_lenAlloc = newsize;
1142                 }
1143                 err = udf_extend_file(inode, newsize);
1144                 if (err) {
1145                         up_write(&iinfo->i_data_sem);
1146                         return err;
1147                 }
1148                 truncate_setsize(inode, newsize);
1149                 up_write(&iinfo->i_data_sem);
1150         } else {
1151                 if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_IN_ICB) {
1152                         down_write(&iinfo->i_data_sem);
1153                         memset(iinfo->i_ext.i_data + iinfo->i_lenEAttr + newsize,
1154                                0x00, bsize - newsize -
1155                                udf_file_entry_alloc_offset(inode));
1156                         iinfo->i_lenAlloc = newsize;
1157                         truncate_setsize(inode, newsize);
1158                         up_write(&iinfo->i_data_sem);
1159                         goto update_time;
1160                 }
1161                 err = block_truncate_page(inode->i_mapping, newsize,
1162                                           udf_get_block);
1163                 if (err)
1164                         return err;
1165                 down_write(&iinfo->i_data_sem);
1166                 truncate_setsize(inode, newsize);
1167                 udf_truncate_extents(inode);
1168                 up_write(&iinfo->i_data_sem);
1169         }
1170 update_time:
1171         inode->i_mtime = inode->i_ctime = current_fs_time(inode->i_sb);
1172         if (IS_SYNC(inode))
1173                 udf_sync_inode(inode);
1174         else
1175                 mark_inode_dirty(inode);
1176         return 0;
1177 }
1178
1179 /*
1180  * Maximum length of linked list formed by ICB hierarchy. The chosen number is
1181  * arbitrary - just that we hopefully don't limit any real use of rewritten
1182  * inode on write-once media but avoid looping for too long on corrupted media.
1183  */
1184 #define UDF_MAX_ICB_NESTING 1024
1185
1186 static void __udf_read_inode(struct inode *inode)
1187 {
1188         struct buffer_head *bh = NULL;
1189         struct fileEntry *fe;
1190         uint16_t ident;
1191         struct udf_inode_info *iinfo = UDF_I(inode);
1192         unsigned int indirections = 0;
1193
1194 reread:
1195         /*
1196          * Set defaults, but the inode is still incomplete!
1197          * Note: get_new_inode() sets the following on a new inode:
1198          *      i_sb = sb
1199          *      i_no = ino
1200          *      i_flags = sb->s_flags
1201          *      i_state = 0
1202          * clean_inode(): zero fills and sets
1203          *      i_count = 1
1204          *      i_nlink = 1
1205          *      i_op = NULL;
1206          */
1207         bh = udf_read_ptagged(inode->i_sb, &iinfo->i_location, 0, &ident);
1208         if (!bh) {
1209                 udf_err(inode->i_sb, "(ino %ld) failed !bh\n", inode->i_ino);
1210                 make_bad_inode(inode);
1211                 return;
1212         }
1213
1214         if (ident != TAG_IDENT_FE && ident != TAG_IDENT_EFE &&
1215             ident != TAG_IDENT_USE) {
1216                 udf_err(inode->i_sb, "(ino %ld) failed ident=%d\n",
1217                         inode->i_ino, ident);
1218                 brelse(bh);
1219                 make_bad_inode(inode);
1220                 return;
1221         }
1222
1223         fe = (struct fileEntry *)bh->b_data;
1224
1225         if (fe->icbTag.strategyType == cpu_to_le16(4096)) {
1226                 struct buffer_head *ibh;
1227
1228                 ibh = udf_read_ptagged(inode->i_sb, &iinfo->i_location, 1,
1229                                         &ident);
1230                 if (ident == TAG_IDENT_IE && ibh) {
1231                         struct kernel_lb_addr loc;
1232                         struct indirectEntry *ie;
1233
1234                         ie = (struct indirectEntry *)ibh->b_data;
1235                         loc = lelb_to_cpu(ie->indirectICB.extLocation);
1236
1237                         if (ie->indirectICB.extLength) {
1238                                 brelse(bh);
1239                                 brelse(ibh);
1240                                 memcpy(&iinfo->i_location, &loc,
1241                                        sizeof(struct kernel_lb_addr));
1242                                 if (++indirections > UDF_MAX_ICB_NESTING) {
1243                                         udf_err(inode->i_sb,
1244                                                 "too many ICBs in ICB hierarchy"
1245                                                 " (max %d supported)\n",
1246                                                 UDF_MAX_ICB_NESTING);
1247                                         make_bad_inode(inode);
1248                                         return;
1249                                 }
1250                                 goto reread;
1251                         }
1252                 }
1253                 brelse(ibh);
1254         } else if (fe->icbTag.strategyType != cpu_to_le16(4)) {
1255                 udf_err(inode->i_sb, "unsupported strategy type: %d\n",
1256                         le16_to_cpu(fe->icbTag.strategyType));
1257                 brelse(bh);
1258                 make_bad_inode(inode);
1259                 return;
1260         }
1261         udf_fill_inode(inode, bh);
1262
1263         brelse(bh);
1264 }
1265
1266 static void udf_fill_inode(struct inode *inode, struct buffer_head *bh)
1267 {
1268         struct fileEntry *fe;
1269         struct extendedFileEntry *efe;
1270         int offset;
1271         struct udf_sb_info *sbi = UDF_SB(inode->i_sb);
1272         struct udf_inode_info *iinfo = UDF_I(inode);
1273         unsigned int link_count;
1274
1275         fe = (struct fileEntry *)bh->b_data;
1276         efe = (struct extendedFileEntry *)bh->b_data;
1277
1278         if (fe->icbTag.strategyType == cpu_to_le16(4))
1279                 iinfo->i_strat4096 = 0;
1280         else /* if (fe->icbTag.strategyType == cpu_to_le16(4096)) */
1281                 iinfo->i_strat4096 = 1;
1282
1283         iinfo->i_alloc_type = le16_to_cpu(fe->icbTag.flags) &
1284                                                         ICBTAG_FLAG_AD_MASK;
1285         iinfo->i_unique = 0;
1286         iinfo->i_lenEAttr = 0;
1287         iinfo->i_lenExtents = 0;
1288         iinfo->i_lenAlloc = 0;
1289         iinfo->i_next_alloc_block = 0;
1290         iinfo->i_next_alloc_goal = 0;
1291         if (fe->descTag.tagIdent == cpu_to_le16(TAG_IDENT_EFE)) {
1292                 iinfo->i_efe = 1;
1293                 iinfo->i_use = 0;
1294                 if (udf_alloc_i_data(inode, inode->i_sb->s_blocksize -
1295                                         sizeof(struct extendedFileEntry))) {
1296                         make_bad_inode(inode);
1297                         return;
1298                 }
1299                 memcpy(iinfo->i_ext.i_data,
1300                        bh->b_data + sizeof(struct extendedFileEntry),
1301                        inode->i_sb->s_blocksize -
1302                                         sizeof(struct extendedFileEntry));
1303         } else if (fe->descTag.tagIdent == cpu_to_le16(TAG_IDENT_FE)) {
1304                 iinfo->i_efe = 0;
1305                 iinfo->i_use = 0;
1306                 if (udf_alloc_i_data(inode, inode->i_sb->s_blocksize -
1307                                                 sizeof(struct fileEntry))) {
1308                         make_bad_inode(inode);
1309                         return;
1310                 }
1311                 memcpy(iinfo->i_ext.i_data,
1312                        bh->b_data + sizeof(struct fileEntry),
1313                        inode->i_sb->s_blocksize - sizeof(struct fileEntry));
1314         } else if (fe->descTag.tagIdent == cpu_to_le16(TAG_IDENT_USE)) {
1315                 iinfo->i_efe = 0;
1316                 iinfo->i_use = 1;
1317                 iinfo->i_lenAlloc = le32_to_cpu(
1318                                 ((struct unallocSpaceEntry *)bh->b_data)->
1319                                  lengthAllocDescs);
1320                 if (udf_alloc_i_data(inode, inode->i_sb->s_blocksize -
1321                                         sizeof(struct unallocSpaceEntry))) {
1322                         make_bad_inode(inode);
1323                         return;
1324                 }
1325                 memcpy(iinfo->i_ext.i_data,
1326                        bh->b_data + sizeof(struct unallocSpaceEntry),
1327                        inode->i_sb->s_blocksize -
1328                                         sizeof(struct unallocSpaceEntry));
1329                 return;
1330         }
1331
1332         read_lock(&sbi->s_cred_lock);
1333         inode->i_uid = le32_to_cpu(fe->uid);
1334         if (inode->i_uid == -1 ||
1335             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_UID_IGNORE) ||
1336             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_UID_SET))
1337                 inode->i_uid = UDF_SB(inode->i_sb)->s_uid;
1338
1339         inode->i_gid = le32_to_cpu(fe->gid);
1340         if (inode->i_gid == -1 ||
1341             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_GID_IGNORE) ||
1342             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_GID_SET))
1343                 inode->i_gid = UDF_SB(inode->i_sb)->s_gid;
1344
1345         if (fe->icbTag.fileType != ICBTAG_FILE_TYPE_DIRECTORY &&
1346                         sbi->s_fmode != UDF_INVALID_MODE)
1347                 inode->i_mode = sbi->s_fmode;
1348         else if (fe->icbTag.fileType == ICBTAG_FILE_TYPE_DIRECTORY &&
1349                         sbi->s_dmode != UDF_INVALID_MODE)
1350                 inode->i_mode = sbi->s_dmode;
1351         else
1352                 inode->i_mode = udf_convert_permissions(fe);
1353         inode->i_mode &= ~sbi->s_umask;
1354         read_unlock(&sbi->s_cred_lock);
1355
1356         link_count = le16_to_cpu(fe->fileLinkCount);
1357         if (!link_count)
1358                 link_count = 1;
1359         set_nlink(inode, link_count);
1360
1361         inode->i_size = le64_to_cpu(fe->informationLength);
1362         iinfo->i_lenExtents = inode->i_size;
1363
1364         if (iinfo->i_efe == 0) {
1365                 inode->i_blocks = le64_to_cpu(fe->logicalBlocksRecorded) <<
1366                         (inode->i_sb->s_blocksize_bits - 9);
1367
1368                 if (!udf_disk_stamp_to_time(&inode->i_atime, fe->accessTime))
1369                         inode->i_atime = sbi->s_record_time;
1370
1371                 if (!udf_disk_stamp_to_time(&inode->i_mtime,
1372                                             fe->modificationTime))
1373                         inode->i_mtime = sbi->s_record_time;
1374
1375                 if (!udf_disk_stamp_to_time(&inode->i_ctime, fe->attrTime))
1376                         inode->i_ctime = sbi->s_record_time;
1377
1378                 iinfo->i_unique = le64_to_cpu(fe->uniqueID);
1379                 iinfo->i_lenEAttr = le32_to_cpu(fe->lengthExtendedAttr);
1380                 iinfo->i_lenAlloc = le32_to_cpu(fe->lengthAllocDescs);
1381                 offset = sizeof(struct fileEntry) + iinfo->i_lenEAttr;
1382         } else {
1383                 inode->i_blocks = le64_to_cpu(efe->logicalBlocksRecorded) <<
1384                     (inode->i_sb->s_blocksize_bits - 9);
1385
1386                 if (!udf_disk_stamp_to_time(&inode->i_atime, efe->accessTime))
1387                         inode->i_atime = sbi->s_record_time;
1388
1389                 if (!udf_disk_stamp_to_time(&inode->i_mtime,
1390                                             efe->modificationTime))
1391                         inode->i_mtime = sbi->s_record_time;
1392
1393                 if (!udf_disk_stamp_to_time(&iinfo->i_crtime, efe->createTime))
1394                         iinfo->i_crtime = sbi->s_record_time;
1395
1396                 if (!udf_disk_stamp_to_time(&inode->i_ctime, efe->attrTime))
1397                         inode->i_ctime = sbi->s_record_time;
1398
1399                 iinfo->i_unique = le64_to_cpu(efe->uniqueID);
1400                 iinfo->i_lenEAttr = le32_to_cpu(efe->lengthExtendedAttr);
1401                 iinfo->i_lenAlloc = le32_to_cpu(efe->lengthAllocDescs);
1402                 offset = sizeof(struct extendedFileEntry) +
1403                                                         iinfo->i_lenEAttr;
1404         }
1405
1406         switch (fe->icbTag.fileType) {
1407         case ICBTAG_FILE_TYPE_DIRECTORY:
1408                 inode->i_op = &udf_dir_inode_operations;
1409                 inode->i_fop = &udf_dir_operations;
1410                 inode->i_mode |= S_IFDIR;
1411                 inc_nlink(inode);
1412                 break;
1413         case ICBTAG_FILE_TYPE_REALTIME:
1414         case ICBTAG_FILE_TYPE_REGULAR:
1415         case ICBTAG_FILE_TYPE_UNDEF:
1416         case ICBTAG_FILE_TYPE_VAT20:
1417                 if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_IN_ICB)
1418                         inode->i_data.a_ops = &udf_adinicb_aops;
1419                 else
1420                         inode->i_data.a_ops = &udf_aops;
1421                 inode->i_op = &udf_file_inode_operations;
1422                 inode->i_fop = &udf_file_operations;
1423                 inode->i_mode |= S_IFREG;
1424                 break;
1425         case ICBTAG_FILE_TYPE_BLOCK:
1426                 inode->i_mode |= S_IFBLK;
1427                 break;
1428         case ICBTAG_FILE_TYPE_CHAR:
1429                 inode->i_mode |= S_IFCHR;
1430                 break;
1431         case ICBTAG_FILE_TYPE_FIFO:
1432                 init_special_inode(inode, inode->i_mode | S_IFIFO, 0);
1433                 break;
1434         case ICBTAG_FILE_TYPE_SOCKET:
1435                 init_special_inode(inode, inode->i_mode | S_IFSOCK, 0);
1436                 break;
1437         case ICBTAG_FILE_TYPE_SYMLINK:
1438                 inode->i_data.a_ops = &udf_symlink_aops;
1439                 inode->i_op = &udf_symlink_inode_operations;
1440                 inode->i_mode = S_IFLNK | S_IRWXUGO;
1441                 break;
1442         case ICBTAG_FILE_TYPE_MAIN:
1443                 udf_debug("METADATA FILE-----\n");
1444                 break;
1445         case ICBTAG_FILE_TYPE_MIRROR:
1446                 udf_debug("METADATA MIRROR FILE-----\n");
1447                 break;
1448         case ICBTAG_FILE_TYPE_BITMAP:
1449                 udf_debug("METADATA BITMAP FILE-----\n");
1450                 break;
1451         default:
1452                 udf_err(inode->i_sb, "(ino %ld) failed unknown file type=%d\n",
1453                         inode->i_ino, fe->icbTag.fileType);
1454                 make_bad_inode(inode);
1455                 return;
1456         }
1457         if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode)) {
1458                 struct deviceSpec *dsea =
1459                         (struct deviceSpec *)udf_get_extendedattr(inode, 12, 1);
1460                 if (dsea) {
1461                         init_special_inode(inode, inode->i_mode,
1462                                 MKDEV(le32_to_cpu(dsea->majorDeviceIdent),
1463                                       le32_to_cpu(dsea->minorDeviceIdent)));
1464                         /* Developer ID ??? */
1465                 } else
1466                         make_bad_inode(inode);
1467         }
1468 }
1469
1470 static int udf_alloc_i_data(struct inode *inode, size_t size)
1471 {
1472         struct udf_inode_info *iinfo = UDF_I(inode);
1473         iinfo->i_ext.i_data = kmalloc(size, GFP_KERNEL);
1474
1475         if (!iinfo->i_ext.i_data) {
1476                 udf_err(inode->i_sb, "(ino %ld) no free memory\n",
1477                         inode->i_ino);
1478                 return -ENOMEM;
1479         }
1480
1481         return 0;
1482 }
1483
1484 static mode_t udf_convert_permissions(struct fileEntry *fe)
1485 {
1486         mode_t mode;
1487         uint32_t permissions;
1488         uint32_t flags;
1489
1490         permissions = le32_to_cpu(fe->permissions);
1491         flags = le16_to_cpu(fe->icbTag.flags);
1492
1493         mode =  ((permissions) & S_IRWXO) |
1494                 ((permissions >> 2) & S_IRWXG) |
1495                 ((permissions >> 4) & S_IRWXU) |
1496                 ((flags & ICBTAG_FLAG_SETUID) ? S_ISUID : 0) |
1497                 ((flags & ICBTAG_FLAG_SETGID) ? S_ISGID : 0) |
1498                 ((flags & ICBTAG_FLAG_STICKY) ? S_ISVTX : 0);
1499
1500         return mode;
1501 }
1502
1503 int udf_write_inode(struct inode *inode, struct writeback_control *wbc)
1504 {
1505         return udf_update_inode(inode, wbc->sync_mode == WB_SYNC_ALL);
1506 }
1507
1508 static int udf_sync_inode(struct inode *inode)
1509 {
1510         return udf_update_inode(inode, 1);
1511 }
1512
1513 static int udf_update_inode(struct inode *inode, int do_sync)
1514 {
1515         struct buffer_head *bh = NULL;
1516         struct fileEntry *fe;
1517         struct extendedFileEntry *efe;
1518         uint32_t udfperms;
1519         uint16_t icbflags;
1520         uint16_t crclen;
1521         int err = 0;
1522         struct udf_sb_info *sbi = UDF_SB(inode->i_sb);
1523         unsigned char blocksize_bits = inode->i_sb->s_blocksize_bits;
1524         struct udf_inode_info *iinfo = UDF_I(inode);
1525
1526         bh = udf_tgetblk(inode->i_sb,
1527                         udf_get_lb_pblock(inode->i_sb, &iinfo->i_location, 0));
1528         if (!bh) {
1529                 udf_debug("getblk failure\n");
1530                 return -ENOMEM;
1531         }
1532
1533         lock_buffer(bh);
1534         memset(bh->b_data, 0, inode->i_sb->s_blocksize);
1535         fe = (struct fileEntry *)bh->b_data;
1536         efe = (struct extendedFileEntry *)bh->b_data;
1537
1538         if (iinfo->i_use) {
1539                 struct unallocSpaceEntry *use =
1540                         (struct unallocSpaceEntry *)bh->b_data;
1541
1542                 use->lengthAllocDescs = cpu_to_le32(iinfo->i_lenAlloc);
1543                 memcpy(bh->b_data + sizeof(struct unallocSpaceEntry),
1544                        iinfo->i_ext.i_data, inode->i_sb->s_blocksize -
1545                                         sizeof(struct unallocSpaceEntry));
1546                 use->descTag.tagIdent = cpu_to_le16(TAG_IDENT_USE);
1547                 use->descTag.tagLocation =
1548                                 cpu_to_le32(iinfo->i_location.logicalBlockNum);
1549                 crclen = sizeof(struct unallocSpaceEntry) +
1550                                 iinfo->i_lenAlloc - sizeof(struct tag);
1551                 use->descTag.descCRCLength = cpu_to_le16(crclen);
1552                 use->descTag.descCRC = cpu_to_le16(crc_itu_t(0, (char *)use +
1553                                                            sizeof(struct tag),
1554                                                            crclen));
1555                 use->descTag.tagChecksum = udf_tag_checksum(&use->descTag);
1556
1557                 goto out;
1558         }
1559
1560         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_UID_FORGET))
1561                 fe->uid = cpu_to_le32(-1);
1562         else
1563                 fe->uid = cpu_to_le32(inode->i_uid);
1564
1565         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_GID_FORGET))
1566                 fe->gid = cpu_to_le32(-1);
1567         else
1568                 fe->gid = cpu_to_le32(inode->i_gid);
1569
1570         udfperms = ((inode->i_mode & S_IRWXO)) |
1571                    ((inode->i_mode & S_IRWXG) << 2) |
1572                    ((inode->i_mode & S_IRWXU) << 4);
1573
1574         udfperms |= (le32_to_cpu(fe->permissions) &
1575                     (FE_PERM_O_DELETE | FE_PERM_O_CHATTR |
1576                      FE_PERM_G_DELETE | FE_PERM_G_CHATTR |
1577                      FE_PERM_U_DELETE | FE_PERM_U_CHATTR));
1578         fe->permissions = cpu_to_le32(udfperms);
1579
1580         if (S_ISDIR(inode->i_mode))
1581                 fe->fileLinkCount = cpu_to_le16(inode->i_nlink - 1);
1582         else
1583                 fe->fileLinkCount = cpu_to_le16(inode->i_nlink);
1584
1585         fe->informationLength = cpu_to_le64(inode->i_size);
1586
1587         if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode)) {
1588                 struct regid *eid;
1589                 struct deviceSpec *dsea =
1590                         (struct deviceSpec *)udf_get_extendedattr(inode, 12, 1);
1591                 if (!dsea) {
1592                         dsea = (struct deviceSpec *)
1593                                 udf_add_extendedattr(inode,
1594                                                      sizeof(struct deviceSpec) +
1595                                                      sizeof(struct regid), 12, 0x3);
1596                         dsea->attrType = cpu_to_le32(12);
1597                         dsea->attrSubtype = 1;
1598                         dsea->attrLength = cpu_to_le32(
1599                                                 sizeof(struct deviceSpec) +
1600                                                 sizeof(struct regid));
1601                         dsea->impUseLength = cpu_to_le32(sizeof(struct regid));
1602                 }
1603                 eid = (struct regid *)dsea->impUse;
1604                 memset(eid, 0, sizeof(struct regid));
1605                 strcpy(eid->ident, UDF_ID_DEVELOPER);
1606                 eid->identSuffix[0] = UDF_OS_CLASS_UNIX;
1607                 eid->identSuffix[1] = UDF_OS_ID_LINUX;
1608                 dsea->majorDeviceIdent = cpu_to_le32(imajor(inode));
1609                 dsea->minorDeviceIdent = cpu_to_le32(iminor(inode));
1610         }
1611
1612         if (iinfo->i_efe == 0) {
1613                 memcpy(bh->b_data + sizeof(struct fileEntry),
1614                        iinfo->i_ext.i_data,
1615                        inode->i_sb->s_blocksize - sizeof(struct fileEntry));
1616                 fe->logicalBlocksRecorded = cpu_to_le64(
1617                         (inode->i_blocks + (1 << (blocksize_bits - 9)) - 1) >>
1618                         (blocksize_bits - 9));
1619
1620                 udf_time_to_disk_stamp(&fe->accessTime, inode->i_atime);
1621                 udf_time_to_disk_stamp(&fe->modificationTime, inode->i_mtime);
1622                 udf_time_to_disk_stamp(&fe->attrTime, inode->i_ctime);
1623                 memset(&(fe->impIdent), 0, sizeof(struct regid));
1624                 strcpy(fe->impIdent.ident, UDF_ID_DEVELOPER);
1625                 fe->impIdent.identSuffix[0] = UDF_OS_CLASS_UNIX;
1626                 fe->impIdent.identSuffix[1] = UDF_OS_ID_LINUX;
1627                 fe->uniqueID = cpu_to_le64(iinfo->i_unique);
1628                 fe->lengthExtendedAttr = cpu_to_le32(iinfo->i_lenEAttr);
1629                 fe->lengthAllocDescs = cpu_to_le32(iinfo->i_lenAlloc);
1630                 fe->descTag.tagIdent = cpu_to_le16(TAG_IDENT_FE);
1631                 crclen = sizeof(struct fileEntry);
1632         } else {
1633                 memcpy(bh->b_data + sizeof(struct extendedFileEntry),
1634                        iinfo->i_ext.i_data,
1635                        inode->i_sb->s_blocksize -
1636                                         sizeof(struct extendedFileEntry));
1637                 efe->objectSize = cpu_to_le64(inode->i_size);
1638                 efe->logicalBlocksRecorded = cpu_to_le64(
1639                         (inode->i_blocks + (1 << (blocksize_bits - 9)) - 1) >>
1640                         (blocksize_bits - 9));
1641
1642                 if (iinfo->i_crtime.tv_sec > inode->i_atime.tv_sec ||
1643                     (iinfo->i_crtime.tv_sec == inode->i_atime.tv_sec &&
1644                      iinfo->i_crtime.tv_nsec > inode->i_atime.tv_nsec))
1645                         iinfo->i_crtime = inode->i_atime;
1646
1647                 if (iinfo->i_crtime.tv_sec > inode->i_mtime.tv_sec ||
1648                     (iinfo->i_crtime.tv_sec == inode->i_mtime.tv_sec &&
1649                      iinfo->i_crtime.tv_nsec > inode->i_mtime.tv_nsec))
1650                         iinfo->i_crtime = inode->i_mtime;
1651
1652                 if (iinfo->i_crtime.tv_sec > inode->i_ctime.tv_sec ||
1653                     (iinfo->i_crtime.tv_sec == inode->i_ctime.tv_sec &&
1654                      iinfo->i_crtime.tv_nsec > inode->i_ctime.tv_nsec))
1655                         iinfo->i_crtime = inode->i_ctime;
1656
1657                 udf_time_to_disk_stamp(&efe->accessTime, inode->i_atime);
1658                 udf_time_to_disk_stamp(&efe->modificationTime, inode->i_mtime);
1659                 udf_time_to_disk_stamp(&efe->createTime, iinfo->i_crtime);
1660                 udf_time_to_disk_stamp(&efe->attrTime, inode->i_ctime);
1661
1662                 memset(&(efe->impIdent), 0, sizeof(struct regid));
1663                 strcpy(efe->impIdent.ident, UDF_ID_DEVELOPER);
1664                 efe->impIdent.identSuffix[0] = UDF_OS_CLASS_UNIX;
1665                 efe->impIdent.identSuffix[1] = UDF_OS_ID_LINUX;
1666                 efe->uniqueID = cpu_to_le64(iinfo->i_unique);
1667                 efe->lengthExtendedAttr = cpu_to_le32(iinfo->i_lenEAttr);
1668                 efe->lengthAllocDescs = cpu_to_le32(iinfo->i_lenAlloc);
1669                 efe->descTag.tagIdent = cpu_to_le16(TAG_IDENT_EFE);
1670                 crclen = sizeof(struct extendedFileEntry);
1671         }
1672         if (iinfo->i_strat4096) {
1673                 fe->icbTag.strategyType = cpu_to_le16(4096);
1674                 fe->icbTag.strategyParameter = cpu_to_le16(1);
1675                 fe->icbTag.numEntries = cpu_to_le16(2);
1676         } else {
1677                 fe->icbTag.strategyType = cpu_to_le16(4);
1678                 fe->icbTag.numEntries = cpu_to_le16(1);
1679         }
1680
1681         if (S_ISDIR(inode->i_mode))
1682                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_DIRECTORY;
1683         else if (S_ISREG(inode->i_mode))
1684                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_REGULAR;
1685         else if (S_ISLNK(inode->i_mode))
1686                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_SYMLINK;
1687         else if (S_ISBLK(inode->i_mode))
1688                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_BLOCK;
1689         else if (S_ISCHR(inode->i_mode))
1690                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_CHAR;
1691         else if (S_ISFIFO(inode->i_mode))
1692                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_FIFO;
1693         else if (S_ISSOCK(inode->i_mode))
1694                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_SOCKET;
1695
1696         icbflags =      iinfo->i_alloc_type |
1697                         ((inode->i_mode & S_ISUID) ? ICBTAG_FLAG_SETUID : 0) |
1698                         ((inode->i_mode & S_ISGID) ? ICBTAG_FLAG_SETGID : 0) |
1699                         ((inode->i_mode & S_ISVTX) ? ICBTAG_FLAG_STICKY : 0) |
1700                         (le16_to_cpu(fe->icbTag.flags) &
1701                                 ~(ICBTAG_FLAG_AD_MASK | ICBTAG_FLAG_SETUID |
1702                                 ICBTAG_FLAG_SETGID | ICBTAG_FLAG_STICKY));
1703
1704         fe->icbTag.flags = cpu_to_le16(icbflags);
1705         if (sbi->s_udfrev >= 0x0200)
1706                 fe->descTag.descVersion = cpu_to_le16(3);
1707         else
1708                 fe->descTag.descVersion = cpu_to_le16(2);
1709         fe->descTag.tagSerialNum = cpu_to_le16(sbi->s_serial_number);
1710         fe->descTag.tagLocation = cpu_to_le32(
1711                                         iinfo->i_location.logicalBlockNum);
1712         crclen += iinfo->i_lenEAttr + iinfo->i_lenAlloc - sizeof(struct tag);
1713         fe->descTag.descCRCLength = cpu_to_le16(crclen);
1714         fe->descTag.descCRC = cpu_to_le16(crc_itu_t(0, (char *)fe + sizeof(struct tag),
1715                                                   crclen));
1716         fe->descTag.tagChecksum = udf_tag_checksum(&fe->descTag);
1717
1718 out:
1719         set_buffer_uptodate(bh);
1720         unlock_buffer(bh);
1721
1722         /* write the data blocks */
1723         mark_buffer_dirty(bh);
1724         if (do_sync) {
1725                 sync_dirty_buffer(bh);
1726                 if (buffer_write_io_error(bh)) {
1727                         udf_warn(inode->i_sb, "IO error syncing udf inode [%08lx]\n",
1728                                  inode->i_ino);
1729                         err = -EIO;
1730                 }
1731         }
1732         brelse(bh);
1733
1734         return err;
1735 }
1736
1737 struct inode *udf_iget(struct super_block *sb, struct kernel_lb_addr *ino)
1738 {
1739         unsigned long block = udf_get_lb_pblock(sb, ino, 0);
1740         struct inode *inode = iget_locked(sb, block);
1741
1742         if (!inode)
1743                 return NULL;
1744
1745         if (inode->i_state & I_NEW) {
1746                 memcpy(&UDF_I(inode)->i_location, ino, sizeof(struct kernel_lb_addr));
1747                 __udf_read_inode(inode);
1748                 unlock_new_inode(inode);
1749         }
1750
1751         if (is_bad_inode(inode))
1752                 goto out_iput;
1753
1754         if (ino->logicalBlockNum >= UDF_SB(sb)->
1755                         s_partmaps[ino->partitionReferenceNum].s_partition_len) {
1756                 udf_debug("block=%d, partition=%d out of range\n",
1757                           ino->logicalBlockNum, ino->partitionReferenceNum);
1758                 make_bad_inode(inode);
1759                 goto out_iput;
1760         }
1761
1762         return inode;
1763
1764  out_iput:
1765         iput(inode);
1766         return NULL;
1767 }
1768
1769 int udf_add_aext(struct inode *inode, struct extent_position *epos,
1770                  struct kernel_lb_addr *eloc, uint32_t elen, int inc)
1771 {
1772         int adsize;
1773         struct short_ad *sad = NULL;
1774         struct long_ad *lad = NULL;
1775         struct allocExtDesc *aed;
1776         uint8_t *ptr;
1777         struct udf_inode_info *iinfo = UDF_I(inode);
1778
1779         if (!epos->bh)
1780                 ptr = iinfo->i_ext.i_data + epos->offset -
1781                         udf_file_entry_alloc_offset(inode) +
1782                         iinfo->i_lenEAttr;
1783         else
1784                 ptr = epos->bh->b_data + epos->offset;
1785
1786         if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_SHORT)
1787                 adsize = sizeof(struct short_ad);
1788         else if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_LONG)
1789                 adsize = sizeof(struct long_ad);
1790         else
1791                 return -EIO;
1792
1793         if (epos->offset + (2 * adsize) > inode->i_sb->s_blocksize) {
1794                 unsigned char *sptr, *dptr;
1795                 struct buffer_head *nbh;
1796                 int err, loffset;
1797                 struct kernel_lb_addr obloc = epos->block;
1798
1799                 epos->block.logicalBlockNum = udf_new_block(inode->i_sb, NULL,
1800                                                 obloc.partitionReferenceNum,
1801                                                 obloc.logicalBlockNum, &err);
1802                 if (!epos->block.logicalBlockNum)
1803                         return -ENOSPC;
1804                 nbh = udf_tgetblk(inode->i_sb, udf_get_lb_pblock(inode->i_sb,
1805                                                                  &epos->block,
1806                                                                  0));
1807                 if (!nbh)
1808                         return -EIO;
1809                 lock_buffer(nbh);
1810                 memset(nbh->b_data, 0x00, inode->i_sb->s_blocksize);
1811                 set_buffer_uptodate(nbh);
1812                 unlock_buffer(nbh);
1813                 mark_buffer_dirty_inode(nbh, inode);
1814
1815                 aed = (struct allocExtDesc *)(nbh->b_data);
1816                 if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT))
1817                         aed->previousAllocExtLocation =
1818                                         cpu_to_le32(obloc.logicalBlockNum);
1819                 if (epos->offset + adsize > inode->i_sb->s_blocksize) {
1820                         loffset = epos->offset;
1821                         aed->lengthAllocDescs = cpu_to_le32(adsize);
1822                         sptr = ptr - adsize;
1823                         dptr = nbh->b_data + sizeof(struct allocExtDesc);
1824                         memcpy(dptr, sptr, adsize);
1825                         epos->offset = sizeof(struct allocExtDesc) + adsize;
1826                 } else {
1827                         loffset = epos->offset + adsize;
1828                         aed->lengthAllocDescs = cpu_to_le32(0);
1829                         sptr = ptr;
1830                         epos->offset = sizeof(struct allocExtDesc);
1831
1832                         if (epos->bh) {
1833                                 aed = (struct allocExtDesc *)epos->bh->b_data;
1834                                 le32_add_cpu(&aed->lengthAllocDescs, adsize);
1835                         } else {
1836                                 iinfo->i_lenAlloc += adsize;
1837                                 mark_inode_dirty(inode);
1838                         }
1839                 }
1840                 if (UDF_SB(inode->i_sb)->s_udfrev >= 0x0200)
1841                         udf_new_tag(nbh->b_data, TAG_IDENT_AED, 3, 1,
1842                                     epos->block.logicalBlockNum, sizeof(struct tag));
1843                 else
1844                         udf_new_tag(nbh->b_data, TAG_IDENT_AED, 2, 1,
1845                                     epos->block.logicalBlockNum, sizeof(struct tag));
1846                 switch (iinfo->i_alloc_type) {
1847                 case ICBTAG_FLAG_AD_SHORT:
1848                         sad = (struct short_ad *)sptr;
1849                         sad->extLength = cpu_to_le32(EXT_NEXT_EXTENT_ALLOCDECS |
1850                                                      inode->i_sb->s_blocksize);
1851                         sad->extPosition =
1852                                 cpu_to_le32(epos->block.logicalBlockNum);
1853                         break;
1854                 case ICBTAG_FLAG_AD_LONG:
1855                         lad = (struct long_ad *)sptr;
1856                         lad->extLength = cpu_to_le32(EXT_NEXT_EXTENT_ALLOCDECS |
1857                                                      inode->i_sb->s_blocksize);
1858                         lad->extLocation = cpu_to_lelb(epos->block);
1859                         memset(lad->impUse, 0x00, sizeof(lad->impUse));
1860                         break;
1861                 }
1862                 if (epos->bh) {
1863                         if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
1864                             UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
1865                                 udf_update_tag(epos->bh->b_data, loffset);
1866                         else
1867                                 udf_update_tag(epos->bh->b_data,
1868                                                 sizeof(struct allocExtDesc));
1869                         mark_buffer_dirty_inode(epos->bh, inode);
1870                         brelse(epos->bh);
1871                 } else {
1872                         mark_inode_dirty(inode);
1873                 }
1874                 epos->bh = nbh;
1875         }
1876
1877         udf_write_aext(inode, epos, eloc, elen, inc);
1878
1879         if (!epos->bh) {
1880                 iinfo->i_lenAlloc += adsize;
1881                 mark_inode_dirty(inode);
1882         } else {
1883                 aed = (struct allocExtDesc *)epos->bh->b_data;
1884                 le32_add_cpu(&aed->lengthAllocDescs, adsize);
1885                 if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
1886                                 UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
1887                         udf_update_tag(epos->bh->b_data,
1888                                         epos->offset + (inc ? 0 : adsize));
1889                 else
1890                         udf_update_tag(epos->bh->b_data,
1891                                         sizeof(struct allocExtDesc));
1892                 mark_buffer_dirty_inode(epos->bh, inode);
1893         }
1894
1895         return 0;
1896 }
1897
1898 void udf_write_aext(struct inode *inode, struct extent_position *epos,
1899                     struct kernel_lb_addr *eloc, uint32_t elen, int inc)
1900 {
1901         int adsize;
1902         uint8_t *ptr;
1903         struct short_ad *sad;
1904         struct long_ad *lad;
1905         struct udf_inode_info *iinfo = UDF_I(inode);
1906
1907         if (!epos->bh)
1908                 ptr = iinfo->i_ext.i_data + epos->offset -
1909                         udf_file_entry_alloc_offset(inode) +
1910                         iinfo->i_lenEAttr;
1911         else
1912                 ptr = epos->bh->b_data + epos->offset;
1913
1914         switch (iinfo->i_alloc_type) {
1915         case ICBTAG_FLAG_AD_SHORT:
1916                 sad = (struct short_ad *)ptr;
1917                 sad->extLength = cpu_to_le32(elen);
1918                 sad->extPosition = cpu_to_le32(eloc->logicalBlockNum);
1919                 adsize = sizeof(struct short_ad);
1920                 break;
1921         case ICBTAG_FLAG_AD_LONG:
1922                 lad = (struct long_ad *)ptr;
1923                 lad->extLength = cpu_to_le32(elen);
1924                 lad->extLocation = cpu_to_lelb(*eloc);
1925                 memset(lad->impUse, 0x00, sizeof(lad->impUse));
1926                 adsize = sizeof(struct long_ad);
1927                 break;
1928         default:
1929                 return;
1930         }
1931
1932         if (epos->bh) {
1933                 if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
1934                     UDF_SB(inode->i_sb)->s_udfrev >= 0x0201) {
1935                         struct allocExtDesc *aed =
1936                                 (struct allocExtDesc *)epos->bh->b_data;
1937                         udf_update_tag(epos->bh->b_data,
1938                                        le32_to_cpu(aed->lengthAllocDescs) +
1939                                        sizeof(struct allocExtDesc));
1940                 }
1941                 mark_buffer_dirty_inode(epos->bh, inode);
1942         } else {
1943                 mark_inode_dirty(inode);
1944         }
1945
1946         if (inc)
1947                 epos->offset += adsize;
1948 }
1949
1950 int8_t udf_next_aext(struct inode *inode, struct extent_position *epos,
1951                      struct kernel_lb_addr *eloc, uint32_t *elen, int inc)
1952 {
1953         int8_t etype;
1954
1955         while ((etype = udf_current_aext(inode, epos, eloc, elen, inc)) ==
1956                (EXT_NEXT_EXTENT_ALLOCDECS >> 30)) {
1957                 int block;
1958                 epos->block = *eloc;
1959                 epos->offset = sizeof(struct allocExtDesc);
1960                 brelse(epos->bh);
1961                 block = udf_get_lb_pblock(inode->i_sb, &epos->block, 0);
1962                 epos->bh = udf_tread(inode->i_sb, block);
1963                 if (!epos->bh) {
1964                         udf_debug("reading block %d failed!\n", block);
1965                         return -1;
1966                 }
1967         }
1968
1969         return etype;
1970 }
1971
1972 int8_t udf_current_aext(struct inode *inode, struct extent_position *epos,
1973                         struct kernel_lb_addr *eloc, uint32_t *elen, int inc)
1974 {
1975         int alen;
1976         int8_t etype;
1977         uint8_t *ptr;
1978         struct short_ad *sad;
1979         struct long_ad *lad;
1980         struct udf_inode_info *iinfo = UDF_I(inode);
1981
1982         if (!epos->bh) {
1983                 if (!epos->offset)
1984                         epos->offset = udf_file_entry_alloc_offset(inode);
1985                 ptr = iinfo->i_ext.i_data + epos->offset -
1986                         udf_file_entry_alloc_offset(inode) +
1987                         iinfo->i_lenEAttr;
1988                 alen = udf_file_entry_alloc_offset(inode) +
1989                                                         iinfo->i_lenAlloc;
1990         } else {
1991                 if (!epos->offset)
1992                         epos->offset = sizeof(struct allocExtDesc);
1993                 ptr = epos->bh->b_data + epos->offset;
1994                 alen = sizeof(struct allocExtDesc) +
1995                         le32_to_cpu(((struct allocExtDesc *)epos->bh->b_data)->
1996                                                         lengthAllocDescs);
1997         }
1998
1999         switch (iinfo->i_alloc_type) {
2000         case ICBTAG_FLAG_AD_SHORT:
2001                 sad = udf_get_fileshortad(ptr, alen, &epos->offset, inc);
2002                 if (!sad)
2003                         return -1;
2004                 etype = le32_to_cpu(sad->extLength) >> 30;
2005                 eloc->logicalBlockNum = le32_to_cpu(sad->extPosition);
2006                 eloc->partitionReferenceNum =
2007                                 iinfo->i_location.partitionReferenceNum;
2008                 *elen = le32_to_cpu(sad->extLength) & UDF_EXTENT_LENGTH_MASK;
2009                 break;
2010         case ICBTAG_FLAG_AD_LONG:
2011                 lad = udf_get_filelongad(ptr, alen, &epos->offset, inc);
2012                 if (!lad)
2013                         return -1;
2014                 etype = le32_to_cpu(lad->extLength) >> 30;
2015                 *eloc = lelb_to_cpu(lad->extLocation);
2016                 *elen = le32_to_cpu(lad->extLength) & UDF_EXTENT_LENGTH_MASK;
2017                 break;
2018         default:
2019                 udf_debug("alloc_type = %d unsupported\n", iinfo->i_alloc_type);
2020                 return -1;
2021         }
2022
2023         return etype;
2024 }
2025
2026 static int8_t udf_insert_aext(struct inode *inode, struct extent_position epos,
2027                               struct kernel_lb_addr neloc, uint32_t nelen)
2028 {
2029         struct kernel_lb_addr oeloc;
2030         uint32_t oelen;
2031         int8_t etype;
2032
2033         if (epos.bh)
2034                 get_bh(epos.bh);
2035
2036         while ((etype = udf_next_aext(inode, &epos, &oeloc, &oelen, 0)) != -1) {
2037                 udf_write_aext(inode, &epos, &neloc, nelen, 1);
2038                 neloc = oeloc;
2039                 nelen = (etype << 30) | oelen;
2040         }
2041         udf_add_aext(inode, &epos, &neloc, nelen, 1);
2042         brelse(epos.bh);
2043
2044         return (nelen >> 30);
2045 }
2046
2047 int8_t udf_delete_aext(struct inode *inode, struct extent_position epos,
2048                        struct kernel_lb_addr eloc, uint32_t elen)
2049 {
2050         struct extent_position oepos;
2051         int adsize;
2052         int8_t etype;
2053         struct allocExtDesc *aed;
2054         struct udf_inode_info *iinfo;
2055
2056         if (epos.bh) {
2057                 get_bh(epos.bh);
2058                 get_bh(epos.bh);
2059         }
2060
2061         iinfo = UDF_I(inode);
2062         if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_SHORT)
2063                 adsize = sizeof(struct short_ad);
2064         else if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_LONG)
2065                 adsize = sizeof(struct long_ad);
2066         else
2067                 adsize = 0;
2068
2069         oepos = epos;
2070         if (udf_next_aext(inode, &epos, &eloc, &elen, 1) == -1)
2071                 return -1;
2072
2073         while ((etype = udf_next_aext(inode, &epos, &eloc, &elen, 1)) != -1) {
2074                 udf_write_aext(inode, &oepos, &eloc, (etype << 30) | elen, 1);
2075                 if (oepos.bh != epos.bh) {
2076                         oepos.block = epos.block;
2077                         brelse(oepos.bh);
2078                         get_bh(epos.bh);
2079                         oepos.bh = epos.bh;
2080                         oepos.offset = epos.offset - adsize;
2081                 }
2082         }
2083         memset(&eloc, 0x00, sizeof(struct kernel_lb_addr));
2084         elen = 0;
2085
2086         if (epos.bh != oepos.bh) {
2087                 udf_free_blocks(inode->i_sb, inode, &epos.block, 0, 1);
2088                 udf_write_aext(inode, &oepos, &eloc, elen, 1);
2089                 udf_write_aext(inode, &oepos, &eloc, elen, 1);
2090                 if (!oepos.bh) {
2091                         iinfo->i_lenAlloc -= (adsize * 2);
2092                         mark_inode_dirty(inode);
2093                 } else {
2094                         aed = (struct allocExtDesc *)oepos.bh->b_data;
2095                         le32_add_cpu(&aed->lengthAllocDescs, -(2 * adsize));
2096                         if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
2097                             UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
2098                                 udf_update_tag(oepos.bh->b_data,
2099                                                 oepos.offset - (2 * adsize));
2100                         else
2101                                 udf_update_tag(oepos.bh->b_data,
2102                                                 sizeof(struct allocExtDesc));
2103                         mark_buffer_dirty_inode(oepos.bh, inode);
2104                 }
2105         } else {
2106                 udf_write_aext(inode, &oepos, &eloc, elen, 1);
2107                 if (!oepos.bh) {
2108                         iinfo->i_lenAlloc -= adsize;
2109                         mark_inode_dirty(inode);
2110                 } else {
2111                         aed = (struct allocExtDesc *)oepos.bh->b_data;
2112                         le32_add_cpu(&aed->lengthAllocDescs, -adsize);
2113                         if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
2114                             UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
2115                                 udf_update_tag(oepos.bh->b_data,
2116                                                 epos.offset - adsize);
2117                         else
2118                                 udf_update_tag(oepos.bh->b_data,
2119                                                 sizeof(struct allocExtDesc));
2120                         mark_buffer_dirty_inode(oepos.bh, inode);
2121                 }
2122         }
2123
2124         brelse(epos.bh);
2125         brelse(oepos.bh);
2126
2127         return (elen >> 30);
2128 }
2129
2130 int8_t inode_bmap(struct inode *inode, sector_t block,
2131                   struct extent_position *pos, struct kernel_lb_addr *eloc,
2132                   uint32_t *elen, sector_t *offset)
2133 {
2134         unsigned char blocksize_bits = inode->i_sb->s_blocksize_bits;
2135         loff_t lbcount = 0, bcount =
2136             (loff_t) block << blocksize_bits;
2137         int8_t etype;
2138         struct udf_inode_info *iinfo;
2139
2140         iinfo = UDF_I(inode);
2141         pos->offset = 0;
2142         pos->block = iinfo->i_location;
2143         pos->bh = NULL;
2144         *elen = 0;
2145
2146         do {
2147                 etype = udf_next_aext(inode, pos, eloc, elen, 1);
2148                 if (etype == -1) {
2149                         *offset = (bcount - lbcount) >> blocksize_bits;
2150                         iinfo->i_lenExtents = lbcount;
2151                         return -1;
2152                 }
2153                 lbcount += *elen;
2154         } while (lbcount <= bcount);
2155
2156         *offset = (bcount + *elen - lbcount) >> blocksize_bits;
2157
2158         return etype;
2159 }
2160
2161 long udf_block_map(struct inode *inode, sector_t block)
2162 {
2163         struct kernel_lb_addr eloc;
2164         uint32_t elen;
2165         sector_t offset;
2166         struct extent_position epos = {};
2167         int ret;
2168
2169         down_read(&UDF_I(inode)->i_data_sem);
2170
2171         if (inode_bmap(inode, block, &epos, &eloc, &elen, &offset) ==
2172                                                 (EXT_RECORDED_ALLOCATED >> 30))
2173                 ret = udf_get_lb_pblock(inode->i_sb, &eloc, offset);
2174         else
2175                 ret = 0;
2176
2177         up_read(&UDF_I(inode)->i_data_sem);
2178         brelse(epos.bh);
2179
2180         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_VARCONV))
2181                 return udf_fixed_to_variable(ret);
2182         else
2183                 return ret;
2184 }