e0814407652a6eec61d697f1f6097605c409b6e9
[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         int bs = inode->i_sb->s_blocksize;
1275
1276         fe = (struct fileEntry *)bh->b_data;
1277         efe = (struct extendedFileEntry *)bh->b_data;
1278
1279         if (fe->icbTag.strategyType == cpu_to_le16(4))
1280                 iinfo->i_strat4096 = 0;
1281         else /* if (fe->icbTag.strategyType == cpu_to_le16(4096)) */
1282                 iinfo->i_strat4096 = 1;
1283
1284         iinfo->i_alloc_type = le16_to_cpu(fe->icbTag.flags) &
1285                                                         ICBTAG_FLAG_AD_MASK;
1286         iinfo->i_unique = 0;
1287         iinfo->i_lenEAttr = 0;
1288         iinfo->i_lenExtents = 0;
1289         iinfo->i_lenAlloc = 0;
1290         iinfo->i_next_alloc_block = 0;
1291         iinfo->i_next_alloc_goal = 0;
1292         if (fe->descTag.tagIdent == cpu_to_le16(TAG_IDENT_EFE)) {
1293                 iinfo->i_efe = 1;
1294                 iinfo->i_use = 0;
1295                 if (udf_alloc_i_data(inode, bs -
1296                                         sizeof(struct extendedFileEntry))) {
1297                         make_bad_inode(inode);
1298                         return;
1299                 }
1300                 memcpy(iinfo->i_ext.i_data,
1301                        bh->b_data + sizeof(struct extendedFileEntry),
1302                        bs - 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, bs - sizeof(struct fileEntry))) {
1307                         make_bad_inode(inode);
1308                         return;
1309                 }
1310                 memcpy(iinfo->i_ext.i_data,
1311                        bh->b_data + sizeof(struct fileEntry),
1312                        bs - sizeof(struct fileEntry));
1313         } else if (fe->descTag.tagIdent == cpu_to_le16(TAG_IDENT_USE)) {
1314                 iinfo->i_efe = 0;
1315                 iinfo->i_use = 1;
1316                 iinfo->i_lenAlloc = le32_to_cpu(
1317                                 ((struct unallocSpaceEntry *)bh->b_data)->
1318                                  lengthAllocDescs);
1319                 if (udf_alloc_i_data(inode, bs -
1320                                         sizeof(struct unallocSpaceEntry))) {
1321                         make_bad_inode(inode);
1322                         return;
1323                 }
1324                 memcpy(iinfo->i_ext.i_data,
1325                        bh->b_data + sizeof(struct unallocSpaceEntry),
1326                        bs - sizeof(struct unallocSpaceEntry));
1327                 return;
1328         }
1329
1330         read_lock(&sbi->s_cred_lock);
1331         inode->i_uid = le32_to_cpu(fe->uid);
1332         if (inode->i_uid == -1 ||
1333             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_UID_IGNORE) ||
1334             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_UID_SET))
1335                 inode->i_uid = UDF_SB(inode->i_sb)->s_uid;
1336
1337         inode->i_gid = le32_to_cpu(fe->gid);
1338         if (inode->i_gid == -1 ||
1339             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_GID_IGNORE) ||
1340             UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_GID_SET))
1341                 inode->i_gid = UDF_SB(inode->i_sb)->s_gid;
1342
1343         if (fe->icbTag.fileType != ICBTAG_FILE_TYPE_DIRECTORY &&
1344                         sbi->s_fmode != UDF_INVALID_MODE)
1345                 inode->i_mode = sbi->s_fmode;
1346         else if (fe->icbTag.fileType == ICBTAG_FILE_TYPE_DIRECTORY &&
1347                         sbi->s_dmode != UDF_INVALID_MODE)
1348                 inode->i_mode = sbi->s_dmode;
1349         else
1350                 inode->i_mode = udf_convert_permissions(fe);
1351         inode->i_mode &= ~sbi->s_umask;
1352         read_unlock(&sbi->s_cred_lock);
1353
1354         link_count = le16_to_cpu(fe->fileLinkCount);
1355         if (!link_count)
1356                 link_count = 1;
1357         set_nlink(inode, link_count);
1358
1359         inode->i_size = le64_to_cpu(fe->informationLength);
1360         iinfo->i_lenExtents = inode->i_size;
1361
1362         if (iinfo->i_efe == 0) {
1363                 inode->i_blocks = le64_to_cpu(fe->logicalBlocksRecorded) <<
1364                         (inode->i_sb->s_blocksize_bits - 9);
1365
1366                 if (!udf_disk_stamp_to_time(&inode->i_atime, fe->accessTime))
1367                         inode->i_atime = sbi->s_record_time;
1368
1369                 if (!udf_disk_stamp_to_time(&inode->i_mtime,
1370                                             fe->modificationTime))
1371                         inode->i_mtime = sbi->s_record_time;
1372
1373                 if (!udf_disk_stamp_to_time(&inode->i_ctime, fe->attrTime))
1374                         inode->i_ctime = sbi->s_record_time;
1375
1376                 iinfo->i_unique = le64_to_cpu(fe->uniqueID);
1377                 iinfo->i_lenEAttr = le32_to_cpu(fe->lengthExtendedAttr);
1378                 iinfo->i_lenAlloc = le32_to_cpu(fe->lengthAllocDescs);
1379                 offset = sizeof(struct fileEntry) + iinfo->i_lenEAttr;
1380         } else {
1381                 inode->i_blocks = le64_to_cpu(efe->logicalBlocksRecorded) <<
1382                     (inode->i_sb->s_blocksize_bits - 9);
1383
1384                 if (!udf_disk_stamp_to_time(&inode->i_atime, efe->accessTime))
1385                         inode->i_atime = sbi->s_record_time;
1386
1387                 if (!udf_disk_stamp_to_time(&inode->i_mtime,
1388                                             efe->modificationTime))
1389                         inode->i_mtime = sbi->s_record_time;
1390
1391                 if (!udf_disk_stamp_to_time(&iinfo->i_crtime, efe->createTime))
1392                         iinfo->i_crtime = sbi->s_record_time;
1393
1394                 if (!udf_disk_stamp_to_time(&inode->i_ctime, efe->attrTime))
1395                         inode->i_ctime = sbi->s_record_time;
1396
1397                 iinfo->i_unique = le64_to_cpu(efe->uniqueID);
1398                 iinfo->i_lenEAttr = le32_to_cpu(efe->lengthExtendedAttr);
1399                 iinfo->i_lenAlloc = le32_to_cpu(efe->lengthAllocDescs);
1400                 offset = sizeof(struct extendedFileEntry) +
1401                                                         iinfo->i_lenEAttr;
1402         }
1403
1404         /*
1405          * Sanity check length of allocation descriptors and extended attrs to
1406          * avoid integer overflows
1407          */
1408         if (iinfo->i_lenEAttr > bs || iinfo->i_lenAlloc > bs) {
1409                 make_bad_inode(inode);
1410                 return;
1411         }
1412         /* Now do exact checks */
1413         if (udf_file_entry_alloc_offset(inode) + iinfo->i_lenAlloc > bs) {
1414                 make_bad_inode(inode);
1415                 return;
1416         }
1417         /* Sanity checks for files in ICB so that we don't get confused later */
1418         if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_IN_ICB) {
1419                 /*
1420                  * For file in ICB data is stored in allocation descriptor
1421                  * so sizes should match
1422                  */
1423                 if (iinfo->i_lenAlloc != inode->i_size) {
1424                         make_bad_inode(inode);
1425                         return;
1426                 }
1427                 /* File in ICB has to fit in there... */
1428                 if (inode->i_size > bs - udf_file_entry_alloc_offset(inode)) {
1429                         make_bad_inode(inode);
1430                         return;
1431                 }
1432         }
1433
1434         switch (fe->icbTag.fileType) {
1435         case ICBTAG_FILE_TYPE_DIRECTORY:
1436                 inode->i_op = &udf_dir_inode_operations;
1437                 inode->i_fop = &udf_dir_operations;
1438                 inode->i_mode |= S_IFDIR;
1439                 inc_nlink(inode);
1440                 break;
1441         case ICBTAG_FILE_TYPE_REALTIME:
1442         case ICBTAG_FILE_TYPE_REGULAR:
1443         case ICBTAG_FILE_TYPE_UNDEF:
1444         case ICBTAG_FILE_TYPE_VAT20:
1445                 if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_IN_ICB)
1446                         inode->i_data.a_ops = &udf_adinicb_aops;
1447                 else
1448                         inode->i_data.a_ops = &udf_aops;
1449                 inode->i_op = &udf_file_inode_operations;
1450                 inode->i_fop = &udf_file_operations;
1451                 inode->i_mode |= S_IFREG;
1452                 break;
1453         case ICBTAG_FILE_TYPE_BLOCK:
1454                 inode->i_mode |= S_IFBLK;
1455                 break;
1456         case ICBTAG_FILE_TYPE_CHAR:
1457                 inode->i_mode |= S_IFCHR;
1458                 break;
1459         case ICBTAG_FILE_TYPE_FIFO:
1460                 init_special_inode(inode, inode->i_mode | S_IFIFO, 0);
1461                 break;
1462         case ICBTAG_FILE_TYPE_SOCKET:
1463                 init_special_inode(inode, inode->i_mode | S_IFSOCK, 0);
1464                 break;
1465         case ICBTAG_FILE_TYPE_SYMLINK:
1466                 inode->i_data.a_ops = &udf_symlink_aops;
1467                 inode->i_op = &udf_symlink_inode_operations;
1468                 inode->i_mode = S_IFLNK | S_IRWXUGO;
1469                 break;
1470         case ICBTAG_FILE_TYPE_MAIN:
1471                 udf_debug("METADATA FILE-----\n");
1472                 break;
1473         case ICBTAG_FILE_TYPE_MIRROR:
1474                 udf_debug("METADATA MIRROR FILE-----\n");
1475                 break;
1476         case ICBTAG_FILE_TYPE_BITMAP:
1477                 udf_debug("METADATA BITMAP FILE-----\n");
1478                 break;
1479         default:
1480                 udf_err(inode->i_sb, "(ino %ld) failed unknown file type=%d\n",
1481                         inode->i_ino, fe->icbTag.fileType);
1482                 make_bad_inode(inode);
1483                 return;
1484         }
1485         if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode)) {
1486                 struct deviceSpec *dsea =
1487                         (struct deviceSpec *)udf_get_extendedattr(inode, 12, 1);
1488                 if (dsea) {
1489                         init_special_inode(inode, inode->i_mode,
1490                                 MKDEV(le32_to_cpu(dsea->majorDeviceIdent),
1491                                       le32_to_cpu(dsea->minorDeviceIdent)));
1492                         /* Developer ID ??? */
1493                 } else
1494                         make_bad_inode(inode);
1495         }
1496 }
1497
1498 static int udf_alloc_i_data(struct inode *inode, size_t size)
1499 {
1500         struct udf_inode_info *iinfo = UDF_I(inode);
1501         iinfo->i_ext.i_data = kmalloc(size, GFP_KERNEL);
1502
1503         if (!iinfo->i_ext.i_data) {
1504                 udf_err(inode->i_sb, "(ino %ld) no free memory\n",
1505                         inode->i_ino);
1506                 return -ENOMEM;
1507         }
1508
1509         return 0;
1510 }
1511
1512 static mode_t udf_convert_permissions(struct fileEntry *fe)
1513 {
1514         mode_t mode;
1515         uint32_t permissions;
1516         uint32_t flags;
1517
1518         permissions = le32_to_cpu(fe->permissions);
1519         flags = le16_to_cpu(fe->icbTag.flags);
1520
1521         mode =  ((permissions) & S_IRWXO) |
1522                 ((permissions >> 2) & S_IRWXG) |
1523                 ((permissions >> 4) & S_IRWXU) |
1524                 ((flags & ICBTAG_FLAG_SETUID) ? S_ISUID : 0) |
1525                 ((flags & ICBTAG_FLAG_SETGID) ? S_ISGID : 0) |
1526                 ((flags & ICBTAG_FLAG_STICKY) ? S_ISVTX : 0);
1527
1528         return mode;
1529 }
1530
1531 int udf_write_inode(struct inode *inode, struct writeback_control *wbc)
1532 {
1533         return udf_update_inode(inode, wbc->sync_mode == WB_SYNC_ALL);
1534 }
1535
1536 static int udf_sync_inode(struct inode *inode)
1537 {
1538         return udf_update_inode(inode, 1);
1539 }
1540
1541 static int udf_update_inode(struct inode *inode, int do_sync)
1542 {
1543         struct buffer_head *bh = NULL;
1544         struct fileEntry *fe;
1545         struct extendedFileEntry *efe;
1546         uint32_t udfperms;
1547         uint16_t icbflags;
1548         uint16_t crclen;
1549         int err = 0;
1550         struct udf_sb_info *sbi = UDF_SB(inode->i_sb);
1551         unsigned char blocksize_bits = inode->i_sb->s_blocksize_bits;
1552         struct udf_inode_info *iinfo = UDF_I(inode);
1553
1554         bh = udf_tgetblk(inode->i_sb,
1555                         udf_get_lb_pblock(inode->i_sb, &iinfo->i_location, 0));
1556         if (!bh) {
1557                 udf_debug("getblk failure\n");
1558                 return -ENOMEM;
1559         }
1560
1561         lock_buffer(bh);
1562         memset(bh->b_data, 0, inode->i_sb->s_blocksize);
1563         fe = (struct fileEntry *)bh->b_data;
1564         efe = (struct extendedFileEntry *)bh->b_data;
1565
1566         if (iinfo->i_use) {
1567                 struct unallocSpaceEntry *use =
1568                         (struct unallocSpaceEntry *)bh->b_data;
1569
1570                 use->lengthAllocDescs = cpu_to_le32(iinfo->i_lenAlloc);
1571                 memcpy(bh->b_data + sizeof(struct unallocSpaceEntry),
1572                        iinfo->i_ext.i_data, inode->i_sb->s_blocksize -
1573                                         sizeof(struct unallocSpaceEntry));
1574                 use->descTag.tagIdent = cpu_to_le16(TAG_IDENT_USE);
1575                 use->descTag.tagLocation =
1576                                 cpu_to_le32(iinfo->i_location.logicalBlockNum);
1577                 crclen = sizeof(struct unallocSpaceEntry) +
1578                                 iinfo->i_lenAlloc - sizeof(struct tag);
1579                 use->descTag.descCRCLength = cpu_to_le16(crclen);
1580                 use->descTag.descCRC = cpu_to_le16(crc_itu_t(0, (char *)use +
1581                                                            sizeof(struct tag),
1582                                                            crclen));
1583                 use->descTag.tagChecksum = udf_tag_checksum(&use->descTag);
1584
1585                 goto out;
1586         }
1587
1588         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_UID_FORGET))
1589                 fe->uid = cpu_to_le32(-1);
1590         else
1591                 fe->uid = cpu_to_le32(inode->i_uid);
1592
1593         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_GID_FORGET))
1594                 fe->gid = cpu_to_le32(-1);
1595         else
1596                 fe->gid = cpu_to_le32(inode->i_gid);
1597
1598         udfperms = ((inode->i_mode & S_IRWXO)) |
1599                    ((inode->i_mode & S_IRWXG) << 2) |
1600                    ((inode->i_mode & S_IRWXU) << 4);
1601
1602         udfperms |= (le32_to_cpu(fe->permissions) &
1603                     (FE_PERM_O_DELETE | FE_PERM_O_CHATTR |
1604                      FE_PERM_G_DELETE | FE_PERM_G_CHATTR |
1605                      FE_PERM_U_DELETE | FE_PERM_U_CHATTR));
1606         fe->permissions = cpu_to_le32(udfperms);
1607
1608         if (S_ISDIR(inode->i_mode))
1609                 fe->fileLinkCount = cpu_to_le16(inode->i_nlink - 1);
1610         else
1611                 fe->fileLinkCount = cpu_to_le16(inode->i_nlink);
1612
1613         fe->informationLength = cpu_to_le64(inode->i_size);
1614
1615         if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode)) {
1616                 struct regid *eid;
1617                 struct deviceSpec *dsea =
1618                         (struct deviceSpec *)udf_get_extendedattr(inode, 12, 1);
1619                 if (!dsea) {
1620                         dsea = (struct deviceSpec *)
1621                                 udf_add_extendedattr(inode,
1622                                                      sizeof(struct deviceSpec) +
1623                                                      sizeof(struct regid), 12, 0x3);
1624                         dsea->attrType = cpu_to_le32(12);
1625                         dsea->attrSubtype = 1;
1626                         dsea->attrLength = cpu_to_le32(
1627                                                 sizeof(struct deviceSpec) +
1628                                                 sizeof(struct regid));
1629                         dsea->impUseLength = cpu_to_le32(sizeof(struct regid));
1630                 }
1631                 eid = (struct regid *)dsea->impUse;
1632                 memset(eid, 0, sizeof(struct regid));
1633                 strcpy(eid->ident, UDF_ID_DEVELOPER);
1634                 eid->identSuffix[0] = UDF_OS_CLASS_UNIX;
1635                 eid->identSuffix[1] = UDF_OS_ID_LINUX;
1636                 dsea->majorDeviceIdent = cpu_to_le32(imajor(inode));
1637                 dsea->minorDeviceIdent = cpu_to_le32(iminor(inode));
1638         }
1639
1640         if (iinfo->i_efe == 0) {
1641                 memcpy(bh->b_data + sizeof(struct fileEntry),
1642                        iinfo->i_ext.i_data,
1643                        inode->i_sb->s_blocksize - sizeof(struct fileEntry));
1644                 fe->logicalBlocksRecorded = cpu_to_le64(
1645                         (inode->i_blocks + (1 << (blocksize_bits - 9)) - 1) >>
1646                         (blocksize_bits - 9));
1647
1648                 udf_time_to_disk_stamp(&fe->accessTime, inode->i_atime);
1649                 udf_time_to_disk_stamp(&fe->modificationTime, inode->i_mtime);
1650                 udf_time_to_disk_stamp(&fe->attrTime, inode->i_ctime);
1651                 memset(&(fe->impIdent), 0, sizeof(struct regid));
1652                 strcpy(fe->impIdent.ident, UDF_ID_DEVELOPER);
1653                 fe->impIdent.identSuffix[0] = UDF_OS_CLASS_UNIX;
1654                 fe->impIdent.identSuffix[1] = UDF_OS_ID_LINUX;
1655                 fe->uniqueID = cpu_to_le64(iinfo->i_unique);
1656                 fe->lengthExtendedAttr = cpu_to_le32(iinfo->i_lenEAttr);
1657                 fe->lengthAllocDescs = cpu_to_le32(iinfo->i_lenAlloc);
1658                 fe->descTag.tagIdent = cpu_to_le16(TAG_IDENT_FE);
1659                 crclen = sizeof(struct fileEntry);
1660         } else {
1661                 memcpy(bh->b_data + sizeof(struct extendedFileEntry),
1662                        iinfo->i_ext.i_data,
1663                        inode->i_sb->s_blocksize -
1664                                         sizeof(struct extendedFileEntry));
1665                 efe->objectSize = cpu_to_le64(inode->i_size);
1666                 efe->logicalBlocksRecorded = cpu_to_le64(
1667                         (inode->i_blocks + (1 << (blocksize_bits - 9)) - 1) >>
1668                         (blocksize_bits - 9));
1669
1670                 if (iinfo->i_crtime.tv_sec > inode->i_atime.tv_sec ||
1671                     (iinfo->i_crtime.tv_sec == inode->i_atime.tv_sec &&
1672                      iinfo->i_crtime.tv_nsec > inode->i_atime.tv_nsec))
1673                         iinfo->i_crtime = inode->i_atime;
1674
1675                 if (iinfo->i_crtime.tv_sec > inode->i_mtime.tv_sec ||
1676                     (iinfo->i_crtime.tv_sec == inode->i_mtime.tv_sec &&
1677                      iinfo->i_crtime.tv_nsec > inode->i_mtime.tv_nsec))
1678                         iinfo->i_crtime = inode->i_mtime;
1679
1680                 if (iinfo->i_crtime.tv_sec > inode->i_ctime.tv_sec ||
1681                     (iinfo->i_crtime.tv_sec == inode->i_ctime.tv_sec &&
1682                      iinfo->i_crtime.tv_nsec > inode->i_ctime.tv_nsec))
1683                         iinfo->i_crtime = inode->i_ctime;
1684
1685                 udf_time_to_disk_stamp(&efe->accessTime, inode->i_atime);
1686                 udf_time_to_disk_stamp(&efe->modificationTime, inode->i_mtime);
1687                 udf_time_to_disk_stamp(&efe->createTime, iinfo->i_crtime);
1688                 udf_time_to_disk_stamp(&efe->attrTime, inode->i_ctime);
1689
1690                 memset(&(efe->impIdent), 0, sizeof(struct regid));
1691                 strcpy(efe->impIdent.ident, UDF_ID_DEVELOPER);
1692                 efe->impIdent.identSuffix[0] = UDF_OS_CLASS_UNIX;
1693                 efe->impIdent.identSuffix[1] = UDF_OS_ID_LINUX;
1694                 efe->uniqueID = cpu_to_le64(iinfo->i_unique);
1695                 efe->lengthExtendedAttr = cpu_to_le32(iinfo->i_lenEAttr);
1696                 efe->lengthAllocDescs = cpu_to_le32(iinfo->i_lenAlloc);
1697                 efe->descTag.tagIdent = cpu_to_le16(TAG_IDENT_EFE);
1698                 crclen = sizeof(struct extendedFileEntry);
1699         }
1700         if (iinfo->i_strat4096) {
1701                 fe->icbTag.strategyType = cpu_to_le16(4096);
1702                 fe->icbTag.strategyParameter = cpu_to_le16(1);
1703                 fe->icbTag.numEntries = cpu_to_le16(2);
1704         } else {
1705                 fe->icbTag.strategyType = cpu_to_le16(4);
1706                 fe->icbTag.numEntries = cpu_to_le16(1);
1707         }
1708
1709         if (S_ISDIR(inode->i_mode))
1710                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_DIRECTORY;
1711         else if (S_ISREG(inode->i_mode))
1712                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_REGULAR;
1713         else if (S_ISLNK(inode->i_mode))
1714                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_SYMLINK;
1715         else if (S_ISBLK(inode->i_mode))
1716                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_BLOCK;
1717         else if (S_ISCHR(inode->i_mode))
1718                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_CHAR;
1719         else if (S_ISFIFO(inode->i_mode))
1720                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_FIFO;
1721         else if (S_ISSOCK(inode->i_mode))
1722                 fe->icbTag.fileType = ICBTAG_FILE_TYPE_SOCKET;
1723
1724         icbflags =      iinfo->i_alloc_type |
1725                         ((inode->i_mode & S_ISUID) ? ICBTAG_FLAG_SETUID : 0) |
1726                         ((inode->i_mode & S_ISGID) ? ICBTAG_FLAG_SETGID : 0) |
1727                         ((inode->i_mode & S_ISVTX) ? ICBTAG_FLAG_STICKY : 0) |
1728                         (le16_to_cpu(fe->icbTag.flags) &
1729                                 ~(ICBTAG_FLAG_AD_MASK | ICBTAG_FLAG_SETUID |
1730                                 ICBTAG_FLAG_SETGID | ICBTAG_FLAG_STICKY));
1731
1732         fe->icbTag.flags = cpu_to_le16(icbflags);
1733         if (sbi->s_udfrev >= 0x0200)
1734                 fe->descTag.descVersion = cpu_to_le16(3);
1735         else
1736                 fe->descTag.descVersion = cpu_to_le16(2);
1737         fe->descTag.tagSerialNum = cpu_to_le16(sbi->s_serial_number);
1738         fe->descTag.tagLocation = cpu_to_le32(
1739                                         iinfo->i_location.logicalBlockNum);
1740         crclen += iinfo->i_lenEAttr + iinfo->i_lenAlloc - sizeof(struct tag);
1741         fe->descTag.descCRCLength = cpu_to_le16(crclen);
1742         fe->descTag.descCRC = cpu_to_le16(crc_itu_t(0, (char *)fe + sizeof(struct tag),
1743                                                   crclen));
1744         fe->descTag.tagChecksum = udf_tag_checksum(&fe->descTag);
1745
1746 out:
1747         set_buffer_uptodate(bh);
1748         unlock_buffer(bh);
1749
1750         /* write the data blocks */
1751         mark_buffer_dirty(bh);
1752         if (do_sync) {
1753                 sync_dirty_buffer(bh);
1754                 if (buffer_write_io_error(bh)) {
1755                         udf_warn(inode->i_sb, "IO error syncing udf inode [%08lx]\n",
1756                                  inode->i_ino);
1757                         err = -EIO;
1758                 }
1759         }
1760         brelse(bh);
1761
1762         return err;
1763 }
1764
1765 struct inode *udf_iget(struct super_block *sb, struct kernel_lb_addr *ino)
1766 {
1767         unsigned long block = udf_get_lb_pblock(sb, ino, 0);
1768         struct inode *inode = iget_locked(sb, block);
1769
1770         if (!inode)
1771                 return NULL;
1772
1773         if (inode->i_state & I_NEW) {
1774                 memcpy(&UDF_I(inode)->i_location, ino, sizeof(struct kernel_lb_addr));
1775                 __udf_read_inode(inode);
1776                 unlock_new_inode(inode);
1777         }
1778
1779         if (is_bad_inode(inode))
1780                 goto out_iput;
1781
1782         if (ino->logicalBlockNum >= UDF_SB(sb)->
1783                         s_partmaps[ino->partitionReferenceNum].s_partition_len) {
1784                 udf_debug("block=%d, partition=%d out of range\n",
1785                           ino->logicalBlockNum, ino->partitionReferenceNum);
1786                 make_bad_inode(inode);
1787                 goto out_iput;
1788         }
1789
1790         return inode;
1791
1792  out_iput:
1793         iput(inode);
1794         return NULL;
1795 }
1796
1797 int udf_add_aext(struct inode *inode, struct extent_position *epos,
1798                  struct kernel_lb_addr *eloc, uint32_t elen, int inc)
1799 {
1800         int adsize;
1801         struct short_ad *sad = NULL;
1802         struct long_ad *lad = NULL;
1803         struct allocExtDesc *aed;
1804         uint8_t *ptr;
1805         struct udf_inode_info *iinfo = UDF_I(inode);
1806
1807         if (!epos->bh)
1808                 ptr = iinfo->i_ext.i_data + epos->offset -
1809                         udf_file_entry_alloc_offset(inode) +
1810                         iinfo->i_lenEAttr;
1811         else
1812                 ptr = epos->bh->b_data + epos->offset;
1813
1814         if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_SHORT)
1815                 adsize = sizeof(struct short_ad);
1816         else if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_LONG)
1817                 adsize = sizeof(struct long_ad);
1818         else
1819                 return -EIO;
1820
1821         if (epos->offset + (2 * adsize) > inode->i_sb->s_blocksize) {
1822                 unsigned char *sptr, *dptr;
1823                 struct buffer_head *nbh;
1824                 int err, loffset;
1825                 struct kernel_lb_addr obloc = epos->block;
1826
1827                 epos->block.logicalBlockNum = udf_new_block(inode->i_sb, NULL,
1828                                                 obloc.partitionReferenceNum,
1829                                                 obloc.logicalBlockNum, &err);
1830                 if (!epos->block.logicalBlockNum)
1831                         return -ENOSPC;
1832                 nbh = udf_tgetblk(inode->i_sb, udf_get_lb_pblock(inode->i_sb,
1833                                                                  &epos->block,
1834                                                                  0));
1835                 if (!nbh)
1836                         return -EIO;
1837                 lock_buffer(nbh);
1838                 memset(nbh->b_data, 0x00, inode->i_sb->s_blocksize);
1839                 set_buffer_uptodate(nbh);
1840                 unlock_buffer(nbh);
1841                 mark_buffer_dirty_inode(nbh, inode);
1842
1843                 aed = (struct allocExtDesc *)(nbh->b_data);
1844                 if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT))
1845                         aed->previousAllocExtLocation =
1846                                         cpu_to_le32(obloc.logicalBlockNum);
1847                 if (epos->offset + adsize > inode->i_sb->s_blocksize) {
1848                         loffset = epos->offset;
1849                         aed->lengthAllocDescs = cpu_to_le32(adsize);
1850                         sptr = ptr - adsize;
1851                         dptr = nbh->b_data + sizeof(struct allocExtDesc);
1852                         memcpy(dptr, sptr, adsize);
1853                         epos->offset = sizeof(struct allocExtDesc) + adsize;
1854                 } else {
1855                         loffset = epos->offset + adsize;
1856                         aed->lengthAllocDescs = cpu_to_le32(0);
1857                         sptr = ptr;
1858                         epos->offset = sizeof(struct allocExtDesc);
1859
1860                         if (epos->bh) {
1861                                 aed = (struct allocExtDesc *)epos->bh->b_data;
1862                                 le32_add_cpu(&aed->lengthAllocDescs, adsize);
1863                         } else {
1864                                 iinfo->i_lenAlloc += adsize;
1865                                 mark_inode_dirty(inode);
1866                         }
1867                 }
1868                 if (UDF_SB(inode->i_sb)->s_udfrev >= 0x0200)
1869                         udf_new_tag(nbh->b_data, TAG_IDENT_AED, 3, 1,
1870                                     epos->block.logicalBlockNum, sizeof(struct tag));
1871                 else
1872                         udf_new_tag(nbh->b_data, TAG_IDENT_AED, 2, 1,
1873                                     epos->block.logicalBlockNum, sizeof(struct tag));
1874                 switch (iinfo->i_alloc_type) {
1875                 case ICBTAG_FLAG_AD_SHORT:
1876                         sad = (struct short_ad *)sptr;
1877                         sad->extLength = cpu_to_le32(EXT_NEXT_EXTENT_ALLOCDECS |
1878                                                      inode->i_sb->s_blocksize);
1879                         sad->extPosition =
1880                                 cpu_to_le32(epos->block.logicalBlockNum);
1881                         break;
1882                 case ICBTAG_FLAG_AD_LONG:
1883                         lad = (struct long_ad *)sptr;
1884                         lad->extLength = cpu_to_le32(EXT_NEXT_EXTENT_ALLOCDECS |
1885                                                      inode->i_sb->s_blocksize);
1886                         lad->extLocation = cpu_to_lelb(epos->block);
1887                         memset(lad->impUse, 0x00, sizeof(lad->impUse));
1888                         break;
1889                 }
1890                 if (epos->bh) {
1891                         if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
1892                             UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
1893                                 udf_update_tag(epos->bh->b_data, loffset);
1894                         else
1895                                 udf_update_tag(epos->bh->b_data,
1896                                                 sizeof(struct allocExtDesc));
1897                         mark_buffer_dirty_inode(epos->bh, inode);
1898                         brelse(epos->bh);
1899                 } else {
1900                         mark_inode_dirty(inode);
1901                 }
1902                 epos->bh = nbh;
1903         }
1904
1905         udf_write_aext(inode, epos, eloc, elen, inc);
1906
1907         if (!epos->bh) {
1908                 iinfo->i_lenAlloc += adsize;
1909                 mark_inode_dirty(inode);
1910         } else {
1911                 aed = (struct allocExtDesc *)epos->bh->b_data;
1912                 le32_add_cpu(&aed->lengthAllocDescs, adsize);
1913                 if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
1914                                 UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
1915                         udf_update_tag(epos->bh->b_data,
1916                                         epos->offset + (inc ? 0 : adsize));
1917                 else
1918                         udf_update_tag(epos->bh->b_data,
1919                                         sizeof(struct allocExtDesc));
1920                 mark_buffer_dirty_inode(epos->bh, inode);
1921         }
1922
1923         return 0;
1924 }
1925
1926 void udf_write_aext(struct inode *inode, struct extent_position *epos,
1927                     struct kernel_lb_addr *eloc, uint32_t elen, int inc)
1928 {
1929         int adsize;
1930         uint8_t *ptr;
1931         struct short_ad *sad;
1932         struct long_ad *lad;
1933         struct udf_inode_info *iinfo = UDF_I(inode);
1934
1935         if (!epos->bh)
1936                 ptr = iinfo->i_ext.i_data + epos->offset -
1937                         udf_file_entry_alloc_offset(inode) +
1938                         iinfo->i_lenEAttr;
1939         else
1940                 ptr = epos->bh->b_data + epos->offset;
1941
1942         switch (iinfo->i_alloc_type) {
1943         case ICBTAG_FLAG_AD_SHORT:
1944                 sad = (struct short_ad *)ptr;
1945                 sad->extLength = cpu_to_le32(elen);
1946                 sad->extPosition = cpu_to_le32(eloc->logicalBlockNum);
1947                 adsize = sizeof(struct short_ad);
1948                 break;
1949         case ICBTAG_FLAG_AD_LONG:
1950                 lad = (struct long_ad *)ptr;
1951                 lad->extLength = cpu_to_le32(elen);
1952                 lad->extLocation = cpu_to_lelb(*eloc);
1953                 memset(lad->impUse, 0x00, sizeof(lad->impUse));
1954                 adsize = sizeof(struct long_ad);
1955                 break;
1956         default:
1957                 return;
1958         }
1959
1960         if (epos->bh) {
1961                 if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
1962                     UDF_SB(inode->i_sb)->s_udfrev >= 0x0201) {
1963                         struct allocExtDesc *aed =
1964                                 (struct allocExtDesc *)epos->bh->b_data;
1965                         udf_update_tag(epos->bh->b_data,
1966                                        le32_to_cpu(aed->lengthAllocDescs) +
1967                                        sizeof(struct allocExtDesc));
1968                 }
1969                 mark_buffer_dirty_inode(epos->bh, inode);
1970         } else {
1971                 mark_inode_dirty(inode);
1972         }
1973
1974         if (inc)
1975                 epos->offset += adsize;
1976 }
1977
1978 int8_t udf_next_aext(struct inode *inode, struct extent_position *epos,
1979                      struct kernel_lb_addr *eloc, uint32_t *elen, int inc)
1980 {
1981         int8_t etype;
1982
1983         while ((etype = udf_current_aext(inode, epos, eloc, elen, inc)) ==
1984                (EXT_NEXT_EXTENT_ALLOCDECS >> 30)) {
1985                 int block;
1986                 epos->block = *eloc;
1987                 epos->offset = sizeof(struct allocExtDesc);
1988                 brelse(epos->bh);
1989                 block = udf_get_lb_pblock(inode->i_sb, &epos->block, 0);
1990                 epos->bh = udf_tread(inode->i_sb, block);
1991                 if (!epos->bh) {
1992                         udf_debug("reading block %d failed!\n", block);
1993                         return -1;
1994                 }
1995         }
1996
1997         return etype;
1998 }
1999
2000 int8_t udf_current_aext(struct inode *inode, struct extent_position *epos,
2001                         struct kernel_lb_addr *eloc, uint32_t *elen, int inc)
2002 {
2003         int alen;
2004         int8_t etype;
2005         uint8_t *ptr;
2006         struct short_ad *sad;
2007         struct long_ad *lad;
2008         struct udf_inode_info *iinfo = UDF_I(inode);
2009
2010         if (!epos->bh) {
2011                 if (!epos->offset)
2012                         epos->offset = udf_file_entry_alloc_offset(inode);
2013                 ptr = iinfo->i_ext.i_data + epos->offset -
2014                         udf_file_entry_alloc_offset(inode) +
2015                         iinfo->i_lenEAttr;
2016                 alen = udf_file_entry_alloc_offset(inode) +
2017                                                         iinfo->i_lenAlloc;
2018         } else {
2019                 if (!epos->offset)
2020                         epos->offset = sizeof(struct allocExtDesc);
2021                 ptr = epos->bh->b_data + epos->offset;
2022                 alen = sizeof(struct allocExtDesc) +
2023                         le32_to_cpu(((struct allocExtDesc *)epos->bh->b_data)->
2024                                                         lengthAllocDescs);
2025         }
2026
2027         switch (iinfo->i_alloc_type) {
2028         case ICBTAG_FLAG_AD_SHORT:
2029                 sad = udf_get_fileshortad(ptr, alen, &epos->offset, inc);
2030                 if (!sad)
2031                         return -1;
2032                 etype = le32_to_cpu(sad->extLength) >> 30;
2033                 eloc->logicalBlockNum = le32_to_cpu(sad->extPosition);
2034                 eloc->partitionReferenceNum =
2035                                 iinfo->i_location.partitionReferenceNum;
2036                 *elen = le32_to_cpu(sad->extLength) & UDF_EXTENT_LENGTH_MASK;
2037                 break;
2038         case ICBTAG_FLAG_AD_LONG:
2039                 lad = udf_get_filelongad(ptr, alen, &epos->offset, inc);
2040                 if (!lad)
2041                         return -1;
2042                 etype = le32_to_cpu(lad->extLength) >> 30;
2043                 *eloc = lelb_to_cpu(lad->extLocation);
2044                 *elen = le32_to_cpu(lad->extLength) & UDF_EXTENT_LENGTH_MASK;
2045                 break;
2046         default:
2047                 udf_debug("alloc_type = %d unsupported\n", iinfo->i_alloc_type);
2048                 return -1;
2049         }
2050
2051         return etype;
2052 }
2053
2054 static int8_t udf_insert_aext(struct inode *inode, struct extent_position epos,
2055                               struct kernel_lb_addr neloc, uint32_t nelen)
2056 {
2057         struct kernel_lb_addr oeloc;
2058         uint32_t oelen;
2059         int8_t etype;
2060
2061         if (epos.bh)
2062                 get_bh(epos.bh);
2063
2064         while ((etype = udf_next_aext(inode, &epos, &oeloc, &oelen, 0)) != -1) {
2065                 udf_write_aext(inode, &epos, &neloc, nelen, 1);
2066                 neloc = oeloc;
2067                 nelen = (etype << 30) | oelen;
2068         }
2069         udf_add_aext(inode, &epos, &neloc, nelen, 1);
2070         brelse(epos.bh);
2071
2072         return (nelen >> 30);
2073 }
2074
2075 int8_t udf_delete_aext(struct inode *inode, struct extent_position epos,
2076                        struct kernel_lb_addr eloc, uint32_t elen)
2077 {
2078         struct extent_position oepos;
2079         int adsize;
2080         int8_t etype;
2081         struct allocExtDesc *aed;
2082         struct udf_inode_info *iinfo;
2083
2084         if (epos.bh) {
2085                 get_bh(epos.bh);
2086                 get_bh(epos.bh);
2087         }
2088
2089         iinfo = UDF_I(inode);
2090         if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_SHORT)
2091                 adsize = sizeof(struct short_ad);
2092         else if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_LONG)
2093                 adsize = sizeof(struct long_ad);
2094         else
2095                 adsize = 0;
2096
2097         oepos = epos;
2098         if (udf_next_aext(inode, &epos, &eloc, &elen, 1) == -1)
2099                 return -1;
2100
2101         while ((etype = udf_next_aext(inode, &epos, &eloc, &elen, 1)) != -1) {
2102                 udf_write_aext(inode, &oepos, &eloc, (etype << 30) | elen, 1);
2103                 if (oepos.bh != epos.bh) {
2104                         oepos.block = epos.block;
2105                         brelse(oepos.bh);
2106                         get_bh(epos.bh);
2107                         oepos.bh = epos.bh;
2108                         oepos.offset = epos.offset - adsize;
2109                 }
2110         }
2111         memset(&eloc, 0x00, sizeof(struct kernel_lb_addr));
2112         elen = 0;
2113
2114         if (epos.bh != oepos.bh) {
2115                 udf_free_blocks(inode->i_sb, inode, &epos.block, 0, 1);
2116                 udf_write_aext(inode, &oepos, &eloc, elen, 1);
2117                 udf_write_aext(inode, &oepos, &eloc, elen, 1);
2118                 if (!oepos.bh) {
2119                         iinfo->i_lenAlloc -= (adsize * 2);
2120                         mark_inode_dirty(inode);
2121                 } else {
2122                         aed = (struct allocExtDesc *)oepos.bh->b_data;
2123                         le32_add_cpu(&aed->lengthAllocDescs, -(2 * adsize));
2124                         if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
2125                             UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
2126                                 udf_update_tag(oepos.bh->b_data,
2127                                                 oepos.offset - (2 * adsize));
2128                         else
2129                                 udf_update_tag(oepos.bh->b_data,
2130                                                 sizeof(struct allocExtDesc));
2131                         mark_buffer_dirty_inode(oepos.bh, inode);
2132                 }
2133         } else {
2134                 udf_write_aext(inode, &oepos, &eloc, elen, 1);
2135                 if (!oepos.bh) {
2136                         iinfo->i_lenAlloc -= adsize;
2137                         mark_inode_dirty(inode);
2138                 } else {
2139                         aed = (struct allocExtDesc *)oepos.bh->b_data;
2140                         le32_add_cpu(&aed->lengthAllocDescs, -adsize);
2141                         if (!UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_STRICT) ||
2142                             UDF_SB(inode->i_sb)->s_udfrev >= 0x0201)
2143                                 udf_update_tag(oepos.bh->b_data,
2144                                                 epos.offset - adsize);
2145                         else
2146                                 udf_update_tag(oepos.bh->b_data,
2147                                                 sizeof(struct allocExtDesc));
2148                         mark_buffer_dirty_inode(oepos.bh, inode);
2149                 }
2150         }
2151
2152         brelse(epos.bh);
2153         brelse(oepos.bh);
2154
2155         return (elen >> 30);
2156 }
2157
2158 int8_t inode_bmap(struct inode *inode, sector_t block,
2159                   struct extent_position *pos, struct kernel_lb_addr *eloc,
2160                   uint32_t *elen, sector_t *offset)
2161 {
2162         unsigned char blocksize_bits = inode->i_sb->s_blocksize_bits;
2163         loff_t lbcount = 0, bcount =
2164             (loff_t) block << blocksize_bits;
2165         int8_t etype;
2166         struct udf_inode_info *iinfo;
2167
2168         iinfo = UDF_I(inode);
2169         pos->offset = 0;
2170         pos->block = iinfo->i_location;
2171         pos->bh = NULL;
2172         *elen = 0;
2173
2174         do {
2175                 etype = udf_next_aext(inode, pos, eloc, elen, 1);
2176                 if (etype == -1) {
2177                         *offset = (bcount - lbcount) >> blocksize_bits;
2178                         iinfo->i_lenExtents = lbcount;
2179                         return -1;
2180                 }
2181                 lbcount += *elen;
2182         } while (lbcount <= bcount);
2183
2184         *offset = (bcount + *elen - lbcount) >> blocksize_bits;
2185
2186         return etype;
2187 }
2188
2189 long udf_block_map(struct inode *inode, sector_t block)
2190 {
2191         struct kernel_lb_addr eloc;
2192         uint32_t elen;
2193         sector_t offset;
2194         struct extent_position epos = {};
2195         int ret;
2196
2197         down_read(&UDF_I(inode)->i_data_sem);
2198
2199         if (inode_bmap(inode, block, &epos, &eloc, &elen, &offset) ==
2200                                                 (EXT_RECORDED_ALLOCATED >> 30))
2201                 ret = udf_get_lb_pblock(inode->i_sb, &eloc, offset);
2202         else
2203                 ret = 0;
2204
2205         up_read(&UDF_I(inode)->i_data_sem);
2206         brelse(epos.bh);
2207
2208         if (UDF_QUERY_FLAG(inode->i_sb, UDF_FLAG_VARCONV))
2209                 return udf_fixed_to_variable(ret);
2210         else
2211                 return ret;
2212 }