fs/udf/super.c

   1 /*
   2  * super.c
   3  *
   4  * PURPOSE
   5  *  Super block routines for the OSTA-UDF(tm) filesystem.
   6  *
   7  * DESCRIPTION
   8  *  OSTA-UDF(tm) = Optical Storage Technology Association
   9  *  Universal Disk Format.
  10  *
  11  *  This code is based on version 2.00 of the UDF specification,
  12  *  and revision 3 of the ECMA 167 standard [equivalent to ISO 13346].
  13  *    http://www.osta.org/
  14  *    http://www.ecma.ch/
  15  *    http://www.iso.org/
  16  *
  17  * COPYRIGHT
  18  *  This file is distributed under the terms of the GNU General Public
  19  *  License (GPL). Copies of the GPL can be obtained from:
  20  *    ftp://prep.ai.mit.edu/pub/gnu/GPL
  21  *  Each contributing author retains all rights to their own work.
  22  *
  23  *  (C) 1998 Dave Boynton
  24  *  (C) 1998-2004 Ben Fennema
  25  *  (C) 2000 Stelias Computing Inc
  26  *
  27  * HISTORY
  28  *
  29  *  09/24/98 dgb  changed to allow compiling outside of kernel, and
  30  *                added some debugging.
  31  *  10/01/98 dgb  updated to allow (some) possibility of compiling w/2.0.34
  32  *  10/16/98      attempting some multi-session support
  33  *  10/17/98      added freespace count for "df"
  34  *  11/11/98 gr   added novrs option
  35  *  11/26/98 dgb  added fileset,anchor mount options
  36  *  12/06/98 blf  really hosed things royally. vat/sparing support. sequenced
  37  *                vol descs. rewrote option handling based on isofs
  38  *  12/20/98      find the free space bitmap (if it exists)
  39  */
  40
  41 #include "udfdecl.h"
  42
  43 #include <linux/blkdev.h>
  44 #include <linux/slab.h>
  45 #include <linux/kernel.h>
  46 #include <linux/module.h>
  47 #include <linux/parser.h>
  48 #include <linux/stat.h>
  49 #include <linux/cdrom.h>
  50 #include <linux/nls.h>
  51 #include <linux/smp_lock.h>
  52 #include <linux/buffer_head.h>
  53 #include <linux/vfs.h>
  54 #include <linux/vmalloc.h>
  55 #include <linux/errno.h>
  56 #include <linux/mount.h>
  57 #include <linux/seq_file.h>
  58 #include <linux/bitmap.h>
  59 #include <linux/crc-itu-t.h>
  60 #include <asm/byteorder.h>
  61
  62 #include "udf_sb.h"
  63 #include "udf_i.h"
  64
  65 #include <linux/init.h>
  66 #include <asm/uaccess.h>
  67
  68 #define VDS_POS_PRIMARY_VOL_DESC        0
  69 #define VDS_POS_UNALLOC_SPACE_DESC      1
  70 #define VDS_POS_LOGICAL_VOL_DESC        2
  71 #define VDS_POS_PARTITION_DESC          3
  72 #define VDS_POS_IMP_USE_VOL_DESC        4
  73 #define VDS_POS_VOL_DESC_PTR            5
  74 #define VDS_POS_TERMINATING_DESC        6
  75 #define VDS_POS_LENGTH                  7
  76
  77 #define UDF_DEFAULT_BLOCKSIZE 2048
  78
  79 static char error_buf[1024];
  80
  81 /* These are the "meat" - everything else is stuffing */
  82 static int udf_fill_super(struct super_block *, void *, int);
  83 static void udf_put_super(struct super_block *);
  84 static void udf_write_super(struct super_block *);
  85 static int udf_remount_fs(struct super_block *, int *, char *);
  86 static void udf_load_logicalvolint(struct super_block *, struct kernel_extent_ad);
  87 static int udf_find_fileset(struct super_block *, struct kernel_lb_addr *,
  88                             struct kernel_lb_addr *);
  89 static void udf_load_fileset(struct super_block *, struct buffer_head *,
  90                              struct kernel_lb_addr *);
  91 static void udf_open_lvid(struct super_block *);
  92 static void udf_close_lvid(struct super_block *);
  93 static unsigned int udf_count_free(struct super_block *);
  94 static int udf_statfs(struct dentry *, struct kstatfs *);
  95 static int udf_show_options(struct seq_file *, struct vfsmount *);
  96 static void udf_error(struct super_block *sb, const char *function,
  97                       const char *fmt, ...);
  98
  99 struct logicalVolIntegrityDescImpUse *udf_sb_lvidiu(struct udf_sb_info *sbi)
 100 {
 101         struct logicalVolIntegrityDesc *lvid =
 102                 (struct logicalVolIntegrityDesc *)sbi->s_lvid_bh->b_data;
 103         __u32 number_of_partitions = le32_to_cpu(lvid->numOfPartitions);
 104         __u32 offset = number_of_partitions * 2 *
 105                                 sizeof(uint32_t)/sizeof(uint8_t);
 106         return (struct logicalVolIntegrityDescImpUse *)&(lvid->impUse[offset]);
 107 }
 108
 109 /* UDF filesystem type */
 110 static int udf_get_sb(struct file_system_type *fs_type,
 111                       int flags, const char *dev_name, void *data,
 112                       struct vfsmount *mnt)
 113 {
 114         return get_sb_bdev(fs_type, flags, dev_name, data, udf_fill_super, mnt);
 115 }
 116
 117 static struct file_system_type udf_fstype = {
 118         .owner          = THIS_MODULE,
 119         .name           = "udf",
 120         .get_sb         = udf_get_sb,
 121         .kill_sb        = kill_block_super,
 122         .fs_flags       = FS_REQUIRES_DEV,
 123 };
 124
 125 static struct kmem_cache *udf_inode_cachep;
 126
 127 static struct inode *udf_alloc_inode(struct super_block *sb)
 128 {
 129         struct udf_inode_info *ei;
 130         ei = kmem_cache_alloc(udf_inode_cachep, GFP_KERNEL);
 131         if (!ei)
 132                 return NULL;
 133
 134         ei->i_unique = 0;
 135         ei->i_lenExtents = 0;
 136         ei->i_next_alloc_block = 0;
 137         ei->i_next_alloc_goal = 0;
 138         ei->i_strat4096 = 0;
 139
 140         return &ei->vfs_inode;
 141 }
 142
 143 static void udf_destroy_inode(struct inode *inode)
 144 {
 145         kmem_cache_free(udf_inode_cachep, UDF_I(inode));
 146 }
 147
 148 static void init_once(void *foo)
 149 {
 150         struct udf_inode_info *ei = (struct udf_inode_info *)foo;
 151
 152         ei->i_ext.i_data = NULL;
 153         inode_init_once(&ei->vfs_inode);
 154 }
 155
 156 static int init_inodecache(void)
 157 {
 158         udf_inode_cachep = kmem_cache_create("udf_inode_cache",
 159                                              sizeof(struct udf_inode_info),
 160                                              0, (SLAB_RECLAIM_ACCOUNT |
 161                                                  SLAB_MEM_SPREAD),
 162                                              init_once);
 163         if (!udf_inode_cachep)
 164                 return -ENOMEM;
 165         return 0;
 166 }
 167
 168 static void destroy_inodecache(void)
 169 {
 170         kmem_cache_destroy(udf_inode_cachep);
 171 }
 172
 173 /* Superblock operations */
 174 static const struct super_operations udf_sb_ops = {
 175         .alloc_inode    = udf_alloc_inode,
 176         .destroy_inode  = udf_destroy_inode,
 177         .write_inode    = udf_write_inode,
 178         .delete_inode   = udf_delete_inode,
 179         .clear_inode    = udf_clear_inode,
 180         .put_super      = udf_put_super,
 181         .write_super    = udf_write_super,
 182         .statfs         = udf_statfs,
 183         .remount_fs     = udf_remount_fs,
 184         .show_options   = udf_show_options,
 185 };
 186
 187 struct udf_options {
 188         unsigned char novrs;
 189         unsigned int blocksize;
 190         unsigned int session;
 191         unsigned int lastblock;
 192         unsigned int anchor;
 193         unsigned int volume;
 194         unsigned short partition;
 195         unsigned int fileset;
 196         unsigned int rootdir;
 197         unsigned int flags;
 198         mode_t umask;
 199         gid_t gid;
 200         uid_t uid;
 201         mode_t fmode;
 202         mode_t dmode;
 203         struct nls_table *nls_map;
 204 };
 205
 206 static int __init init_udf_fs(void)
 207 {
 208         int err;
 209
 210         err = init_inodecache();
 211         if (err)
 212                 goto out1;
 213         err = register_filesystem(&udf_fstype);
 214         if (err)
 215                 goto out;
 216
 217         return 0;
 218
 219 out:
 220         destroy_inodecache();
 221
 222 out1:
 223         return err;
 224 }
 225
 226 static void __exit exit_udf_fs(void)
 227 {
 228         unregister_filesystem(&udf_fstype);
 229         destroy_inodecache();
 230 }
 231
 232 module_init(init_udf_fs)
 233 module_exit(exit_udf_fs)
 234
 235 static int udf_sb_alloc_partition_maps(struct super_block *sb, u32 count)
 236 {
 237         struct udf_sb_info *sbi = UDF_SB(sb);
 238
 239         sbi->s_partmaps = kcalloc(count, sizeof(struct udf_part_map),
 240                                   GFP_KERNEL);
 241         if (!sbi->s_partmaps) {
 242                 udf_error(sb, __func__,
 243                           "Unable to allocate space for %d partition maps",
 244                           count);
 245                 sbi->s_partitions = 0;
 246                 return -ENOMEM;
 247         }
 248
 249         sbi->s_partitions = count;
 250         return 0;
 251 }
 252
 253 static int udf_show_options(struct seq_file *seq, struct vfsmount *mnt)
 254 {
 255         struct super_block *sb = mnt->mnt_sb;
 256         struct udf_sb_info *sbi = UDF_SB(sb);
 257
 258         if (!UDF_QUERY_FLAG(sb, UDF_FLAG_STRICT))
 259                 seq_puts(seq, ",nostrict");
 260         if (UDF_QUERY_FLAG(sb, UDF_FLAG_BLOCKSIZE_SET))
 261                 seq_printf(seq, ",bs=%lu", sb->s_blocksize);
 262         if (UDF_QUERY_FLAG(sb, UDF_FLAG_UNHIDE))
 263                 seq_puts(seq, ",unhide");
 264         if (UDF_QUERY_FLAG(sb, UDF_FLAG_UNDELETE))
 265                 seq_puts(seq, ",undelete");
 266         if (!UDF_QUERY_FLAG(sb, UDF_FLAG_USE_AD_IN_ICB))
 267                 seq_puts(seq, ",noadinicb");
 268         if (UDF_QUERY_FLAG(sb, UDF_FLAG_USE_SHORT_AD))
 269                 seq_puts(seq, ",shortad");
 270         if (UDF_QUERY_FLAG(sb, UDF_FLAG_UID_FORGET))
 271                 seq_puts(seq, ",uid=forget");
 272         if (UDF_QUERY_FLAG(sb, UDF_FLAG_UID_IGNORE))
 273                 seq_puts(seq, ",uid=ignore");
 274         if (UDF_QUERY_FLAG(sb, UDF_FLAG_GID_FORGET))
 275                 seq_puts(seq, ",gid=forget");
 276         if (UDF_QUERY_FLAG(sb, UDF_FLAG_GID_IGNORE))
 277                 seq_puts(seq, ",gid=ignore");
 278         if (UDF_QUERY_FLAG(sb, UDF_FLAG_UID_SET))
 279                 seq_printf(seq, ",uid=%u", sbi->s_uid);
 280         if (UDF_QUERY_FLAG(sb, UDF_FLAG_GID_SET))
 281                 seq_printf(seq, ",gid=%u", sbi->s_gid);
 282         if (sbi->s_umask != 0)
 283                 seq_printf(seq, ",umask=%o", sbi->s_umask);
 284         if (sbi->s_fmode != UDF_INVALID_MODE)
 285                 seq_printf(seq, ",mode=%o", sbi->s_fmode);
 286         if (sbi->s_dmode != UDF_INVALID_MODE)
 287                 seq_printf(seq, ",dmode=%o", sbi->s_dmode);
 288         if (UDF_QUERY_FLAG(sb, UDF_FLAG_SESSION_SET))
 289                 seq_printf(seq, ",session=%u", sbi->s_session);
 290         if (UDF_QUERY_FLAG(sb, UDF_FLAG_LASTBLOCK_SET))
 291                 seq_printf(seq, ",lastblock=%u", sbi->s_last_block);
 292         /*
 293          * s_anchor[2] could be zeroed out in case there is no anchor
 294          * in the specified block, but then the "anchor=N" option
 295          * originally given by the user wasn't effective, so it's OK
 296          * if we don't show it.
 297          */
 298         if (sbi->s_anchor[2] != 0)
 299                 seq_printf(seq, ",anchor=%u", sbi->s_anchor[2]);
 300         /*
 301          * volume, partition, fileset and rootdir seem to be ignored
 302          * currently
 303          */
 304         if (UDF_QUERY_FLAG(sb, UDF_FLAG_UTF8))
 305                 seq_puts(seq, ",utf8");
 306         if (UDF_QUERY_FLAG(sb, UDF_FLAG_NLS_MAP) && sbi->s_nls_map)
 307                 seq_printf(seq, ",iocharset=%s", sbi->s_nls_map->charset);
 308
 309         return 0;
 310 }
 311
 312 /*
 313  * udf_parse_options
 314  *
 315  * PURPOSE
 316  *      Parse mount options.
 317  *
 318  * DESCRIPTION
 319  *      The following mount options are supported:
 320  *
 321  *      gid=            Set the default group.
 322  *      umask=          Set the default umask.
 323  *      mode=           Set the default file permissions.
 324  *      dmode=          Set the default directory permissions.
 325  *      uid=            Set the default user.
 326  *      bs=             Set the block size.
 327  *      unhide          Show otherwise hidden files.
 328  *      undelete        Show deleted files in lists.
 329  *      adinicb         Embed data in the inode (default)
 330  *      noadinicb       Don't embed data in the inode
 331  *      shortad         Use short ad's
 332  *      longad          Use long ad's (default)
 333  *      nostrict        Unset strict conformance
 334  *      iocharset=      Set the NLS character set
 335  *
 336  *      The remaining are for debugging and disaster recovery:
 337  *
 338  *      novrs           Skip volume sequence recognition
 339  *
 340  *      The following expect a offset from 0.
 341  *
 342  *      session=        Set the CDROM session (default= last session)
 343  *      anchor=         Override standard anchor location. (default= 256)
 344  *      volume=         Override the VolumeDesc location. (unused)
 345  *      partition=      Override the PartitionDesc location. (unused)
 346  *      lastblock=      Set the last block of the filesystem/
 347  *
 348  *      The following expect a offset from the partition root.
 349  *
 350  *      fileset=        Override the fileset block location. (unused)
 351  *      rootdir=        Override the root directory location. (unused)
 352  *              WARNING: overriding the rootdir to a non-directory may
 353  *              yield highly unpredictable results.
 354  *
 355  * PRE-CONDITIONS
 356  *      options         Pointer to mount options string.
 357  *      uopts           Pointer to mount options variable.
 358  *
 359  * POST-CONDITIONS
 360  *      <return>        1       Mount options parsed okay.
 361  *      <return>        0       Error parsing mount options.
 362  *
 363  * HISTORY
 364  *      July 1, 1997 - Andrew E. Mileski
 365  *      Written, tested, and released.
 366  */
 367
 368 enum {
 369         Opt_novrs, Opt_nostrict, Opt_bs, Opt_unhide, Opt_undelete,
 370         Opt_noadinicb, Opt_adinicb, Opt_shortad, Opt_longad,
 371         Opt_gid, Opt_uid, Opt_umask, Opt_session, Opt_lastblock,
 372         Opt_anchor, Opt_volume, Opt_partition, Opt_fileset,
 373         Opt_rootdir, Opt_utf8, Opt_iocharset,
 374         Opt_err, Opt_uforget, Opt_uignore, Opt_gforget, Opt_gignore,
 375         Opt_fmode, Opt_dmode
 376 };
 377
 378 static const match_table_t tokens = {
 379         {Opt_novrs,     "novrs"},
 380         {Opt_nostrict,  "nostrict"},
 381         {Opt_bs,        "bs=%u"},
 382         {Opt_unhide,    "unhide"},
 383         {Opt_undelete,  "undelete"},
 384         {Opt_noadinicb, "noadinicb"},
 385         {Opt_adinicb,   "adinicb"},
 386         {Opt_shortad,   "shortad"},
 387         {Opt_longad,    "longad"},
 388         {Opt_uforget,   "uid=forget"},
 389         {Opt_uignore,   "uid=ignore"},
 390         {Opt_gforget,   "gid=forget"},
 391         {Opt_gignore,   "gid=ignore"},
 392         {Opt_gid,       "gid=%u"},
 393         {Opt_uid,       "uid=%u"},
 394         {Opt_umask,     "umask=%o"},
 395         {Opt_session,   "session=%u"},
 396         {Opt_lastblock, "lastblock=%u"},
 397         {Opt_anchor,    "anchor=%u"},
 398         {Opt_volume,    "volume=%u"},
 399         {Opt_partition, "partition=%u"},
 400         {Opt_fileset,   "fileset=%u"},
 401         {Opt_rootdir,   "rootdir=%u"},
 402         {Opt_utf8,      "utf8"},
 403         {Opt_iocharset, "iocharset=%s"},
 404         {Opt_fmode,     "mode=%o"},
 405         {Opt_dmode,     "dmode=%o"},
 406         {Opt_err,       NULL}
 407 };
 408
 409 static int udf_parse_options(char *options, struct udf_options *uopt,
 410                              bool remount)
 411 {
 412         char *p;
 413         int option;
 414
 415         uopt->novrs = 0;
 416         uopt->partition = 0xFFFF;
 417         uopt->session = 0xFFFFFFFF;
 418         uopt->lastblock = 0;
 419         uopt->anchor = 0;
 420         uopt->volume = 0xFFFFFFFF;
 421         uopt->rootdir = 0xFFFFFFFF;
 422         uopt->fileset = 0xFFFFFFFF;
 423         uopt->nls_map = NULL;
 424
 425         if (!options)
 426                 return 1;
 427
 428         while ((p = strsep(&options, ",")) != NULL) {
 429                 substring_t args[MAX_OPT_ARGS];
 430                 int token;
 431                 if (!*p)
 432                         continue;
 433
 434                 token = match_token(p, tokens, args);
 435                 switch (token) {
 436                 case Opt_novrs:
 437                         uopt->novrs = 1;
 438                         break;
 439                 case Opt_bs:
 440                         if (match_int(&args[0], &option))
 441                                 return 0;
 442                         uopt->blocksize = option;
 443                         uopt->flags |= (1 << UDF_FLAG_BLOCKSIZE_SET);
 444                         break;
 445                 case Opt_unhide:
 446                         uopt->flags |= (1 << UDF_FLAG_UNHIDE);
 447                         break;
 448                 case Opt_undelete:
 449                         uopt->flags |= (1 << UDF_FLAG_UNDELETE);
 450                         break;
 451                 case Opt_noadinicb:
 452                         uopt->flags &= ~(1 << UDF_FLAG_USE_AD_IN_ICB);
 453                         break;
 454                 case Opt_adinicb:
 455                         uopt->flags |= (1 << UDF_FLAG_USE_AD_IN_ICB);
 456                         break;
 457                 case Opt_shortad:
 458                         uopt->flags |= (1 << UDF_FLAG_USE_SHORT_AD);
 459                         break;
 460                 case Opt_longad:
 461                         uopt->flags &= ~(1 << UDF_FLAG_USE_SHORT_AD);
 462                         break;
 463                 case Opt_gid:
 464                         if (match_int(args, &option))
 465                                 return 0;
 466                         uopt->gid = option;
 467                         uopt->flags |= (1 << UDF_FLAG_GID_SET);
 468                         break;
 469                 case Opt_uid:
 470                         if (match_int(args, &option))
 471                                 return 0;
 472                         uopt->uid = option;
 473                         uopt->flags |= (1 << UDF_FLAG_UID_SET);
 474                         break;
 475                 case Opt_umask:
 476                         if (match_octal(args, &option))
 477                                 return 0;
 478                         uopt->umask = option;
 479                         break;
 480                 case Opt_nostrict:
 481                         uopt->flags &= ~(1 << UDF_FLAG_STRICT);
 482                         break;
 483                 case Opt_session:
 484                         if (match_int(args, &option))
 485                                 return 0;
 486                         uopt->session = option;
 487                         if (!remount)
 488                                 uopt->flags |= (1 << UDF_FLAG_SESSION_SET);
 489                         break;
 490                 case Opt_lastblock:
 491                         if (match_int(args, &option))
 492                                 return 0;
 493                         uopt->lastblock = option;
 494                         if (!remount)
 495                                 uopt->flags |= (1 << UDF_FLAG_LASTBLOCK_SET);
 496                         break;
 497                 case Opt_anchor:
 498                         if (match_int(args, &option))
 499                                 return 0;
 500                         uopt->anchor = option;
 501                         break;
 502                 case Opt_volume:
 503                         if (match_int(args, &option))
 504                                 return 0;
 505                         uopt->volume = option;
 506                         break;
 507                 case Opt_partition:
 508                         if (match_int(args, &option))
 509                                 return 0;
 510                         uopt->partition = option;
 511                         break;
 512                 case Opt_fileset:
 513                         if (match_int(args, &option))
 514                                 return 0;
 515                         uopt->fileset = option;
 516                         break;
 517                 case Opt_rootdir:
 518                         if (match_int(args, &option))
 519                                 return 0;
 520                         uopt->rootdir = option;
 521                         break;
 522                 case Opt_utf8:
 523                         uopt->flags |= (1 << UDF_FLAG_UTF8);
 524                         break;
 525 #ifdef CONFIG_UDF_NLS
 526                 case Opt_iocharset:
 527                         uopt->nls_map = load_nls(args[0].from);
 528                         uopt->flags |= (1 << UDF_FLAG_NLS_MAP);
 529                         break;
 530 #endif
 531                 case Opt_uignore:
 532                         uopt->flags |= (1 << UDF_FLAG_UID_IGNORE);
 533                         break;
 534                 case Opt_uforget:
 535                         uopt->flags |= (1 << UDF_FLAG_UID_FORGET);
 536                         break;
 537                 case Opt_gignore:
 538                         uopt->flags |= (1 << UDF_FLAG_GID_IGNORE);
 539                         break;
 540                 case Opt_gforget:
 541                         uopt->flags |= (1 << UDF_FLAG_GID_FORGET);
 542                         break;
 543                 case Opt_fmode:
 544                         if (match_octal(args, &option))
 545                                 return 0;
 546                         uopt->fmode = option & 0777;
 547                         break;
 548                 case Opt_dmode:
 549                         if (match_octal(args, &option))
 550                                 return 0;
 551                         uopt->dmode = option & 0777;
 552                         break;
 553                 default:
 554                         printk(KERN_ERR "udf: bad mount option \"%s\" "
 555                                "or missing value\n", p);
 556                         return 0;
 557                 }
 558         }
 559         return 1;
 560 }
 561
 562 static void udf_write_super(struct super_block *sb)
 563 {
 564         lock_kernel();
 565
 566         if (!(sb->s_flags & MS_RDONLY))
 567                 udf_open_lvid(sb);
 568         sb->s_dirt = 0;
 569
 570         unlock_kernel();
 571 }
 572
 573 static int udf_remount_fs(struct super_block *sb, int *flags, char *options)
 574 {
 575         struct udf_options uopt;
 576         struct udf_sb_info *sbi = UDF_SB(sb);
 577
 578         uopt.flags = sbi->s_flags;
 579         uopt.uid   = sbi->s_uid;
 580         uopt.gid   = sbi->s_gid;
 581         uopt.umask = sbi->s_umask;
 582         uopt.fmode = sbi->s_fmode;
 583         uopt.dmode = sbi->s_dmode;
 584
 585         if (!udf_parse_options(options, &uopt, true))
 586                 return -EINVAL;
 587
 588         sbi->s_flags = uopt.flags;
 589         sbi->s_uid   = uopt.uid;
 590         sbi->s_gid   = uopt.gid;
 591         sbi->s_umask = uopt.umask;
 592         sbi->s_fmode = uopt.fmode;
 593         sbi->s_dmode = uopt.dmode;
 594
 595         if (sbi->s_lvid_bh) {
 596                 int write_rev = le16_to_cpu(udf_sb_lvidiu(sbi)->minUDFWriteRev);
 597                 if (write_rev > UDF_MAX_WRITE_VERSION)
 598                         *flags |= MS_RDONLY;
 599         }
 600
 601         if ((*flags & MS_RDONLY) == (sb->s_flags & MS_RDONLY))
 602                 return 0;
 603         if (*flags & MS_RDONLY)
 604                 udf_close_lvid(sb);
 605         else
 606                 udf_open_lvid(sb);
 607
 608         return 0;
 609 }
 610
 611 static loff_t udf_vrs(struct super_block *sb, int silent)
 612 {
 613         struct volStructDesc *vsd = NULL;
 614         loff_t sector = 32768;
 615         int sectorsize;
 616         struct buffer_head *bh = NULL;
 617         int iso9660 = 0;
 618         int nsr02 = 0;
 619         int nsr03 = 0;
 620         struct udf_sb_info *sbi;
 621
 622         /* Block size must be a multiple of 512 */
 623         if (sb->s_blocksize & 511)
 624                 return 0;
 625         sbi = UDF_SB(sb);
 626
 627         if (sb->s_blocksize < sizeof(struct volStructDesc))
 628                 sectorsize = sizeof(struct volStructDesc);
 629         else
 630                 sectorsize = sb->s_blocksize;
 631
 632         sector += (sbi->s_session << sb->s_blocksize_bits);
 633
 634         udf_debug("Starting at sector %u (%ld byte sectors)\n",
 635                   (unsigned int)(sector >> sb->s_blocksize_bits),
 636                   sb->s_blocksize);
 637         /* Process the sequence (if applicable) */
 638         for (; !nsr02 && !nsr03; sector += sectorsize) {
 639                 /* Read a block */
 640                 bh = udf_tread(sb, sector >> sb->s_blocksize_bits);
 641                 if (!bh)
 642                         break;
 643
 644                 /* Look for ISO  descriptors */
 645                 vsd = (struct volStructDesc *)(bh->b_data +
 646                                               (sector & (sb->s_blocksize - 1)));
 647
 648                 if (vsd->stdIdent[0] == 0) {
 649                         brelse(bh);
 650                         break;
 651                 } else if (!strncmp(vsd->stdIdent, VSD_STD_ID_CD001,
 652                                     VSD_STD_ID_LEN)) {
 653                         iso9660 = sector;
 654                         switch (vsd->structType) {
 655                         case 0:
 656                                 udf_debug("ISO9660 Boot Record found\n");
 657                                 break;
 658                         case 1:
 659                                 udf_debug("ISO9660 Primary Volume Descriptor "
 660                                           "found\n");
 661                                 break;
 662                         case 2:
 663                                 udf_debug("ISO9660 Supplementary Volume "
 664                                           "Descriptor found\n");
 665                                 break;
 666                         case 3:
 667                                 udf_debug("ISO9660 Volume Partition Descriptor "
 668                                           "found\n");
 669                                 break;
 670                         case 255:
 671                                 udf_debug("ISO9660 Volume Descriptor Set "
 672                                           "Terminator found\n");
 673                                 break;
 674                         default:
 675                                 udf_debug("ISO9660 VRS (%u) found\n",
 676                                           vsd->structType);
 677                                 break;
 678                         }
 679                 } else if (!strncmp(vsd->stdIdent, VSD_STD_ID_BEA01,
 680                                     VSD_STD_ID_LEN))
 681                         ; /* nothing */
 682                 else if (!strncmp(vsd->stdIdent, VSD_STD_ID_TEA01,
 683                                     VSD_STD_ID_LEN)) {
 684                         brelse(bh);
 685                         break;
 686                 } else if (!strncmp(vsd->stdIdent, VSD_STD_ID_NSR02,
 687                                     VSD_STD_ID_LEN))
 688                         nsr02 = sector;
 689                 else if (!strncmp(vsd->stdIdent, VSD_STD_ID_NSR03,
 690                                     VSD_STD_ID_LEN))
 691                         nsr03 = sector;
 692                 brelse(bh);
 693         }
 694
 695         if (nsr03)
 696                 return nsr03;
 697         else if (nsr02)
 698                 return nsr02;
 699         else if (sector - (sbi->s_session << sb->s_blocksize_bits) == 32768)
 700                 return -1;
 701         else
 702                 return 0;
 703 }
 704
 705 /*
 706  * Check whether there is an anchor block in the given block
 707  */
 708 static int udf_check_anchor_block(struct super_block *sb, sector_t block)
 709 {
 710         struct buffer_head *bh;
 711         uint16_t ident;
 712
 713         if (UDF_QUERY_FLAG(sb, UDF_FLAG_VARCONV) &&
 714             udf_fixed_to_variable(block) >=
 715             sb->s_bdev->bd_inode->i_size >> sb->s_blocksize_bits)
 716                 return 0;
 717
 718         bh = udf_read_tagged(sb, block, block, &ident);
 719         if (!bh)
 720                 return 0;
 721         brelse(bh);
 722
 723         return ident == TAG_IDENT_AVDP;
 724 }
 725
 726 /* Search for an anchor volume descriptor pointer */
 727 static sector_t udf_scan_anchors(struct super_block *sb, sector_t lastblock)
 728 {
 729         sector_t last[6];
 730         int i;
 731         struct udf_sb_info *sbi = UDF_SB(sb);
 732         int last_count = 0;
 733
 734         last[last_count++] = lastblock;
 735         if (lastblock >= 1)
 736                 last[last_count++] = lastblock - 1;
 737         last[last_count++] = lastblock + 1;
 738         if (lastblock >= 2)
 739                 last[last_count++] = lastblock - 2;
 740         if (lastblock >= 150)
 741                 last[last_count++] = lastblock - 150;
 742         if (lastblock >= 152)
 743                 last[last_count++] = lastblock - 152;
 744
 745         /*  according to spec, anchor is in either:
 746          *     block 256
 747          *     lastblock-256
 748          *     lastblock
 749          *  however, if the disc isn't closed, it could be 512 */
 750
 751         for (i = 0; i < last_count; i++) {
 752                 if (last[i] >= sb->s_bdev->bd_inode->i_size >>
 753                                 sb->s_blocksize_bits)
 754                         continue;
 755
 756                 if (udf_check_anchor_block(sb, last[i])) {
 757                         sbi->s_anchor[0] = last[i];
 758                         sbi->s_anchor[1] = last[i] - 256;
 759                         return last[i];
 760                 }
 761
 762                 if (last[i] < 256)
 763                         continue;
 764
 765                 if (udf_check_anchor_block(sb, last[i] - 256)) {
 766                         sbi->s_anchor[1] = last[i] - 256;
 767                         return last[i];
 768                 }
 769         }
 770
 771         if (udf_check_anchor_block(sb, sbi->s_session + 256)) {
 772                 sbi->s_anchor[0] = sbi->s_session + 256;
 773                 return last[0];
 774         }
 775         if (udf_check_anchor_block(sb, sbi->s_session + 512)) {
 776                 sbi->s_anchor[0] = sbi->s_session + 512;
 777                 return last[0];
 778         }
 779         return 0;
 780 }
 781
 782 /*
 783  * Find an anchor volume descriptor. The function expects sbi->s_lastblock to
 784  * be the last block on the media.
 785  *
 786  * Return 1 if not found, 0 if ok
 787  *
 788  */
 789 static int udf_find_anchor(struct super_block *sb)
 790 {
 791         sector_t lastblock;
 792         struct buffer_head *bh = NULL;
 793         uint16_t ident;
 794         int i;
 795         int anchor_found = 0;
 796         struct udf_sb_info *sbi = UDF_SB(sb);
 797
 798         lastblock = udf_scan_anchors(sb, sbi->s_last_block);
 799         if (lastblock)
 800                 goto check_anchor;
 801
 802         /* No anchor found? Try VARCONV conversion of block numbers */
 803         UDF_SET_FLAG(sb, UDF_FLAG_VARCONV);
 804         /* Firstly, we try to not convert number of the last block */
 805         lastblock = udf_scan_anchors(sb,
 806                                 udf_variable_to_fixed(sbi->s_last_block));
 807         if (lastblock)
 808                 goto check_anchor;
 809
 810         /* Secondly, we try with converted number of the last block */
 811         lastblock = udf_scan_anchors(sb, sbi->s_last_block);
 812         if (!lastblock) {
 813                 /* VARCONV didn't help. Clear it. */
 814                 UDF_CLEAR_FLAG(sb, UDF_FLAG_VARCONV);
 815         }
 816
 817 check_anchor:
 818         /*
 819          * Check located anchors and the anchor block supplied via
 820          * mount options
 821          */
 822         for (i = 0; i < ARRAY_SIZE(sbi->s_anchor); i++) {
 823                 if (!sbi->s_anchor[i])
 824                         continue;
 825                 bh = udf_read_tagged(sb, sbi->s_anchor[i],
 826                                         sbi->s_anchor[i], &ident);
 827                 if (!bh)
 828                         sbi->s_anchor[i] = 0;
 829                 else {
 830                         brelse(bh);
 831                         if (ident != TAG_IDENT_AVDP)
 832                                 sbi->s_anchor[i] = 0;
 833                         else
 834                                 anchor_found = 1;
 835                 }
 836         }
 837
 838         sbi->s_last_block = lastblock;
 839         return anchor_found;
 840 }
 841
 842 static int udf_find_fileset(struct super_block *sb,
 843                             struct kernel_lb_addr *fileset,
 844                             struct kernel_lb_addr *root)
 845 {
 846         struct buffer_head *bh = NULL;
 847         long lastblock;
 848         uint16_t ident;
 849         struct udf_sb_info *sbi;
 850
 851         if (fileset->logicalBlockNum != 0xFFFFFFFF ||
 852             fileset->partitionReferenceNum != 0xFFFF) {
 853                 bh = udf_read_ptagged(sb, fileset, 0, &ident);
 854
 855                 if (!bh) {
 856                         return 1;
 857                 } else if (ident != TAG_IDENT_FSD) {
 858                         brelse(bh);
 859                         return 1;
 860                 }
 861
 862         }
 863
 864         sbi = UDF_SB(sb);
 865         if (!bh) {
 866                 /* Search backwards through the partitions */
 867                 struct kernel_lb_addr newfileset;
 868
 869 /* --> cvg: FIXME - is it reasonable? */
 870                 return 1;
 871
 872                 for (newfileset.partitionReferenceNum = sbi->s_partitions - 1;
 873                      (newfileset.partitionReferenceNum != 0xFFFF &&
 874                       fileset->logicalBlockNum == 0xFFFFFFFF &&
 875                       fileset->partitionReferenceNum == 0xFFFF);
 876                      newfileset.partitionReferenceNum--) {
 877                         lastblock = sbi->s_partmaps
 878                                         [newfileset.partitionReferenceNum]
 879                                                 .s_partition_len;
 880                         newfileset.logicalBlockNum = 0;
 881
 882                         do {
 883                                 bh = udf_read_ptagged(sb, &newfileset, 0,
 884                                                       &ident);
 885                                 if (!bh) {
 886                                         newfileset.logicalBlockNum++;
 887                                         continue;
 888                                 }
 889
 890                                 switch (ident) {
 891                                 case TAG_IDENT_SBD:
 892                                 {
 893                                         struct spaceBitmapDesc *sp;
 894                                         sp = (struct spaceBitmapDesc *)
 895                                                                 bh->b_data;
 896                                         newfileset.logicalBlockNum += 1 +
 897                                                 ((le32_to_cpu(sp->numOfBytes) +
 898                                                   sizeof(struct spaceBitmapDesc)
 899                                                   - 1) >> sb->s_blocksize_bits);
 900                                         brelse(bh);
 901                                         break;
 902                                 }
 903                                 case TAG_IDENT_FSD:
 904                                         *fileset = newfileset;
 905                                         break;
 906                                 default:
 907                                         newfileset.logicalBlockNum++;
 908                                         brelse(bh);
 909                                         bh = NULL;
 910                                         break;
 911                                 }
 912                         } while (newfileset.logicalBlockNum < lastblock &&
 913                                  fileset->logicalBlockNum == 0xFFFFFFFF &&
 914                                  fileset->partitionReferenceNum == 0xFFFF);
 915                 }
 916         }
 917
 918         if ((fileset->logicalBlockNum != 0xFFFFFFFF ||
 919              fileset->partitionReferenceNum != 0xFFFF) && bh) {
 920                 udf_debug("Fileset at block=%d, partition=%d\n",
 921                           fileset->logicalBlockNum,
 922                           fileset->partitionReferenceNum);
 923
 924                 sbi->s_partition = fileset->partitionReferenceNum;
 925                 udf_load_fileset(sb, bh, root);
 926                 brelse(bh);
 927                 return 0;
 928         }
 929         return 1;
 930 }
 931
 932 static int udf_load_pvoldesc(struct super_block *sb, sector_t block)
 933 {
 934         struct primaryVolDesc *pvoldesc;
 935         struct ustr *instr, *outstr;
 936         struct buffer_head *bh;
 937         uint16_t ident;
 938         int ret = 1;
 939
 940         instr = kmalloc(sizeof(struct ustr), GFP_NOFS);
 941         if (!instr)
 942                 return 1;
 943
 944         outstr = kmalloc(sizeof(struct ustr), GFP_NOFS);
 945         if (!outstr)
 946                 goto out1;
 947
 948         bh = udf_read_tagged(sb, block, block, &ident);
 949         if (!bh)
 950                 goto out2;
 951
 952         BUG_ON(ident != TAG_IDENT_PVD);
 953
 954         pvoldesc = (struct primaryVolDesc *)bh->b_data;
 955
 956         if (udf_disk_stamp_to_time(&UDF_SB(sb)->s_record_time,
 957                               pvoldesc->recordingDateAndTime)) {
 958 #ifdef UDFFS_DEBUG
 959                 struct timestamp *ts = &pvoldesc->recordingDateAndTime;
 960                 udf_debug("recording time %04u/%02u/%02u"
 961                           " %02u:%02u (%x)\n",
 962                           le16_to_cpu(ts->year), ts->month, ts->day, ts->hour,
 963                           ts->minute, le16_to_cpu(ts->typeAndTimezone));
 964 #endif
 965         }
 966
 967         if (!udf_build_ustr(instr, pvoldesc->volIdent, 32))
 968                 if (udf_CS0toUTF8(outstr, instr)) {
 969                         strncpy(UDF_SB(sb)->s_volume_ident, outstr->u_name,
 970                                 outstr->u_len > 31 ? 31 : outstr->u_len);
 971                         udf_debug("volIdent[] = '%s'\n",
 972                                         UDF_SB(sb)->s_volume_ident);
 973                 }
 974
 975         if (!udf_build_ustr(instr, pvoldesc->volSetIdent, 128))
 976                 if (udf_CS0toUTF8(outstr, instr))
 977                         udf_debug("volSetIdent[] = '%s'\n", outstr->u_name);
 978
 979         brelse(bh);
 980         ret = 0;
 981 out2:
 982         kfree(outstr);
 983 out1:
 984         kfree(instr);
 985         return ret;
 986 }
 987
 988 static int udf_load_metadata_files(struct super_block *sb, int partition)
 989 {
 990         struct udf_sb_info *sbi = UDF_SB(sb);
 991         struct udf_part_map *map;
 992         struct udf_meta_data *mdata;
 993         struct kernel_lb_addr addr;
 994         int fe_error = 0;
 995
 996         map = &sbi->s_partmaps[partition];
 997         mdata = &map->s_type_specific.s_metadata;
 998
 999         /* metadata address */
1000         addr.logicalBlockNum =  mdata->s_meta_file_loc;
1001         addr.partitionReferenceNum = map->s_partition_num;
1002
1003         udf_debug("Metadata file location: block = %d part = %d\n",
1004                           addr.logicalBlockNum, addr.partitionReferenceNum);
1005
1006         mdata->s_metadata_fe = udf_iget(sb, &addr);
1007
1008         if (mdata->s_metadata_fe == NULL) {
1009                 udf_warning(sb, __func__, "metadata inode efe not found, "
1010                                 "will try mirror inode.");
1011                 fe_error = 1;
1012         } else if (UDF_I(mdata->s_metadata_fe)->i_alloc_type !=
1013                  ICBTAG_FLAG_AD_SHORT) {
1014                 udf_warning(sb, __func__, "metadata inode efe does not have "
1015                         "short allocation descriptors!");
1016                 fe_error = 1;
1017                 iput(mdata->s_metadata_fe);
1018                 mdata->s_metadata_fe = NULL;
1019         }
1020
1021         /* mirror file entry */
1022         addr.logicalBlockNum = mdata->s_mirror_file_loc;
1023         addr.partitionReferenceNum = map->s_partition_num;
1024
1025         udf_debug("Mirror metadata file location: block = %d part = %d\n",
1026                           addr.logicalBlockNum, addr.partitionReferenceNum);
1027
1028         mdata->s_mirror_fe = udf_iget(sb, &addr);
1029
1030         if (mdata->s_mirror_fe == NULL) {
1031                 if (fe_error) {
1032                         udf_error(sb, __func__, "mirror inode efe not found "
1033                         "and metadata inode is missing too, exiting...");
1034                         goto error_exit;
1035                 } else
1036                         udf_warning(sb, __func__, "mirror inode efe not found,"
1037                                         " but metadata inode is OK");
1038         } else if (UDF_I(mdata->s_mirror_fe)->i_alloc_type !=
1039                  ICBTAG_FLAG_AD_SHORT) {
1040                 udf_warning(sb, __func__, "mirror inode efe does not have "
1041                         "short allocation descriptors!");
1042                 iput(mdata->s_mirror_fe);
1043                 mdata->s_mirror_fe = NULL;
1044                 if (fe_error)
1045                         goto error_exit;
1046         }
1047
1048         /*
1049          * bitmap file entry
1050          * Note:
1051          * Load only if bitmap file location differs from 0xFFFFFFFF (DCN-5102)
1052         */
1053         if (mdata->s_bitmap_file_loc != 0xFFFFFFFF) {
1054                 addr.logicalBlockNum = mdata->s_bitmap_file_loc;
1055                 addr.partitionReferenceNum = map->s_partition_num;
1056
1057                 udf_debug("Bitmap file location: block = %d part = %d\n",
1058                         addr.logicalBlockNum, addr.partitionReferenceNum);
1059
1060                 mdata->s_bitmap_fe = udf_iget(sb, &addr);
1061
1062                 if (mdata->s_bitmap_fe == NULL) {
1063                         if (sb->s_flags & MS_RDONLY)
1064                                 udf_warning(sb, __func__, "bitmap inode efe "
1065                                         "not found but it's ok since the disc"
1066                                         " is mounted read-only");
1067                         else {
1068                                 udf_error(sb, __func__, "bitmap inode efe not "
1069                                         "found and attempted read-write mount");
1070                                 goto error_exit;
1071                         }
1072                 }
1073         }
1074
1075         udf_debug("udf_load_metadata_files Ok\n");
1076
1077         return 0;
1078
1079 error_exit:
1080         return 1;
1081 }
1082
1083 static void udf_load_fileset(struct super_block *sb, struct buffer_head *bh,
1084                              struct kernel_lb_addr *root)
1085 {
1086         struct fileSetDesc *fset;
1087
1088         fset = (struct fileSetDesc *)bh->b_data;
1089
1090         *root = lelb_to_cpu(fset->rootDirectoryICB.extLocation);
1091
1092         UDF_SB(sb)->s_serial_number = le16_to_cpu(fset->descTag.tagSerialNum);
1093
1094         udf_debug("Rootdir at block=%d, partition=%d\n",
1095                   root->logicalBlockNum, root->partitionReferenceNum);
1096 }
1097
1098 int udf_compute_nr_groups(struct super_block *sb, u32 partition)
1099 {
1100         struct udf_part_map *map = &UDF_SB(sb)->s_partmaps[partition];
1101         return DIV_ROUND_UP(map->s_partition_len +
1102                             (sizeof(struct spaceBitmapDesc) << 3),
1103                             sb->s_blocksize * 8);
1104 }
1105
1106 static struct udf_bitmap *udf_sb_alloc_bitmap(struct super_block *sb, u32 index)
1107 {
1108         struct udf_bitmap *bitmap;
1109         int nr_groups;
1110         int size;
1111
1112         nr_groups = udf_compute_nr_groups(sb, index);
1113         size = sizeof(struct udf_bitmap) +
1114                 (sizeof(struct buffer_head *) * nr_groups);
1115
1116         if (size <= PAGE_SIZE)
1117                 bitmap = kmalloc(size, GFP_KERNEL);
1118         else
1119                 bitmap = vmalloc(size); /* TODO: get rid of vmalloc */
1120
1121         if (bitmap == NULL) {
1122                 udf_error(sb, __func__,
1123                           "Unable to allocate space for bitmap "
1124                           "and %d buffer_head pointers", nr_groups);
1125                 return NULL;
1126         }
1127
1128         memset(bitmap, 0x00, size);
1129         bitmap->s_block_bitmap = (struct buffer_head **)(bitmap + 1);
1130         bitmap->s_nr_groups = nr_groups;
1131         return bitmap;
1132 }
1133
1134 static int udf_fill_partdesc_info(struct super_block *sb,
1135                 struct partitionDesc *p, int p_index)
1136 {
1137         struct udf_part_map *map;
1138         struct udf_sb_info *sbi = UDF_SB(sb);
1139         struct partitionHeaderDesc *phd;
1140
1141         map = &sbi->s_partmaps[p_index];
1142
1143         map->s_partition_len = le32_to_cpu(p->partitionLength); /* blocks */
1144         map->s_partition_root = le32_to_cpu(p->partitionStartingLocation);
1145
1146         if (p->accessType == cpu_to_le32(PD_ACCESS_TYPE_READ_ONLY))
1147                 map->s_partition_flags |= UDF_PART_FLAG_READ_ONLY;
1148         if (p->accessType == cpu_to_le32(PD_ACCESS_TYPE_WRITE_ONCE))
1149                 map->s_partition_flags |= UDF_PART_FLAG_WRITE_ONCE;
1150         if (p->accessType == cpu_to_le32(PD_ACCESS_TYPE_REWRITABLE))
1151                 map->s_partition_flags |= UDF_PART_FLAG_REWRITABLE;
1152         if (p->accessType == cpu_to_le32(PD_ACCESS_TYPE_OVERWRITABLE))
1153                 map->s_partition_flags |= UDF_PART_FLAG_OVERWRITABLE;
1154
1155         udf_debug("Partition (%d type %x) starts at physical %d, "
1156                   "block length %d\n", p_index,
1157                   map->s_partition_type, map->s_partition_root,
1158                   map->s_partition_len);
1159
1160         if (strcmp(p->partitionContents.ident, PD_PARTITION_CONTENTS_NSR02) &&
1161             strcmp(p->partitionContents.ident, PD_PARTITION_CONTENTS_NSR03))
1162                 return 0;
1163
1164         phd = (struct partitionHeaderDesc *)p->partitionContentsUse;
1165         if (phd->unallocSpaceTable.extLength) {
1166                 struct kernel_lb_addr loc = {
1167                         .logicalBlockNum = le32_to_cpu(
1168                                 phd->unallocSpaceTable.extPosition),
1169                         .partitionReferenceNum = p_index,
1170                 };
1171
1172                 map->s_uspace.s_table = udf_iget(sb, &loc);
1173                 if (!map->s_uspace.s_table) {
1174                         udf_debug("cannot load unallocSpaceTable (part %d)\n",
1175                                         p_index);
1176                         return 1;
1177                 }
1178                 map->s_partition_flags |= UDF_PART_FLAG_UNALLOC_TABLE;
1179                 udf_debug("unallocSpaceTable (part %d) @ %ld\n",
1180                                 p_index, map->s_uspace.s_table->i_ino);
1181         }
1182
1183         if (phd->unallocSpaceBitmap.extLength) {
1184                 struct udf_bitmap *bitmap = udf_sb_alloc_bitmap(sb, p_index);
1185                 if (!bitmap)
1186                         return 1;
1187                 map->s_uspace.s_bitmap = bitmap;
1188                 bitmap->s_extLength = le32_to_cpu(
1189                                 phd->unallocSpaceBitmap.extLength);
1190                 bitmap->s_extPosition = le32_to_cpu(
1191                                 phd->unallocSpaceBitmap.extPosition);
1192                 map->s_partition_flags |= UDF_PART_FLAG_UNALLOC_BITMAP;
1193                 udf_debug("unallocSpaceBitmap (part %d) @ %d\n", p_index,
1194                                                 bitmap->s_extPosition);
1195         }
1196
1197         if (phd->partitionIntegrityTable.extLength)
1198                 udf_debug("partitionIntegrityTable (part %d)\n", p_index);
1199
1200         if (phd->freedSpaceTable.extLength) {
1201                 struct kernel_lb_addr loc = {
1202                         .logicalBlockNum = le32_to_cpu(
1203                                 phd->freedSpaceTable.extPosition),
1204                         .partitionReferenceNum = p_index,
1205                 };
1206
1207                 map->s_fspace.s_table = udf_iget(sb, &loc);
1208                 if (!map->s_fspace.s_table) {
1209                         udf_debug("cannot load freedSpaceTable (part %d)\n",
1210                                 p_index);
1211                         return 1;
1212                 }
1213
1214                 map->s_partition_flags |= UDF_PART_FLAG_FREED_TABLE;
1215                 udf_debug("freedSpaceTable (part %d) @ %ld\n",
1216                                 p_index, map->s_fspace.s_table->i_ino);
1217         }
1218
1219         if (phd->freedSpaceBitmap.extLength) {
1220                 struct udf_bitmap *bitmap = udf_sb_alloc_bitmap(sb, p_index);
1221                 if (!bitmap)
1222                         return 1;
1223                 map->s_fspace.s_bitmap = bitmap;
1224                 bitmap->s_extLength = le32_to_cpu(
1225                                 phd->freedSpaceBitmap.extLength);
1226                 bitmap->s_extPosition = le32_to_cpu(
1227                                 phd->freedSpaceBitmap.extPosition);
1228                 map->s_partition_flags |= UDF_PART_FLAG_FREED_BITMAP;
1229                 udf_debug("freedSpaceBitmap (part %d) @ %d\n", p_index,
1230                                         bitmap->s_extPosition);
1231         }
1232         return 0;
1233 }
1234
1235 static int udf_load_vat(struct super_block *sb, int p_index, int type1_index)
1236 {
1237         struct udf_sb_info *sbi = UDF_SB(sb);
1238         struct udf_part_map *map = &sbi->s_partmaps[p_index];
1239         struct kernel_lb_addr ino;
1240         struct buffer_head *bh = NULL;
1241         struct udf_inode_info *vati;
1242         uint32_t pos;
1243         struct virtualAllocationTable20 *vat20;
1244
1245         /* VAT file entry is in the last recorded block */
1246         ino.partitionReferenceNum = type1_index;
1247         ino.logicalBlockNum = sbi->s_last_block - map->s_partition_root;
1248         sbi->s_vat_inode = udf_iget(sb, &ino);
1249         if (!sbi->s_vat_inode)
1250                 return 1;
1251
1252         if (map->s_partition_type == UDF_VIRTUAL_MAP15) {
1253                 map->s_type_specific.s_virtual.s_start_offset = 0;
1254                 map->s_type_specific.s_virtual.s_num_entries =
1255                         (sbi->s_vat_inode->i_size - 36) >> 2;
1256         } else if (map->s_partition_type == UDF_VIRTUAL_MAP20) {
1257                 vati = UDF_I(sbi->s_vat_inode);
1258                 if (vati->i_alloc_type != ICBTAG_FLAG_AD_IN_ICB) {
1259                         pos = udf_block_map(sbi->s_vat_inode, 0);
1260                         bh = sb_bread(sb, pos);
1261                         if (!bh)
1262                                 return 1;
1263                         vat20 = (struct virtualAllocationTable20 *)bh->b_data;
1264                 } else {
1265                         vat20 = (struct virtualAllocationTable20 *)
1266                                                         vati->i_ext.i_data;
1267                 }
1268
1269                 map->s_type_specific.s_virtual.s_start_offset =
1270                         le16_to_cpu(vat20->lengthHeader);
1271                 map->s_type_specific.s_virtual.s_num_entries =
1272                         (sbi->s_vat_inode->i_size -
1273                                 map->s_type_specific.s_virtual.
1274                                         s_start_offset) >> 2;
1275                 brelse(bh);
1276         }
1277         return 0;
1278 }
1279
1280 static int udf_load_partdesc(struct super_block *sb, sector_t block)
1281 {
1282         struct buffer_head *bh;
1283         struct partitionDesc *p;
1284         struct udf_part_map *map;
1285         struct udf_sb_info *sbi = UDF_SB(sb);
1286         int i, type1_idx;
1287         uint16_t partitionNumber;
1288         uint16_t ident;
1289         int ret = 0;
1290
1291         bh = udf_read_tagged(sb, block, block, &ident);
1292         if (!bh)
1293                 return 1;
1294         if (ident != TAG_IDENT_PD)
1295                 goto out_bh;
1296
1297         p = (struct partitionDesc *)bh->b_data;
1298         partitionNumber = le16_to_cpu(p->partitionNumber);
1299
1300         /* First scan for TYPE1, SPARABLE and METADATA partitions */
1301         for (i = 0; i < sbi->s_partitions; i++) {
1302                 map = &sbi->s_partmaps[i];
1303                 udf_debug("Searching map: (%d == %d)\n",
1304                           map->s_partition_num, partitionNumber);
1305                 if (map->s_partition_num == partitionNumber &&
1306                     (map->s_partition_type == UDF_TYPE1_MAP15 ||
1307                      map->s_partition_type == UDF_SPARABLE_MAP15))
1308                         break;
1309         }
1310
1311         if (i >= sbi->s_partitions) {
1312                 udf_debug("Partition (%d) not found in partition map\n",
1313                           partitionNumber);
1314                 goto out_bh;
1315         }
1316
1317         ret = udf_fill_partdesc_info(sb, p, i);
1318
1319         /*
1320          * Now rescan for VIRTUAL or METADATA partitions when SPARABLE and
1321          * PHYSICAL partitions are already set up
1322          */
1323         type1_idx = i;
1324         for (i = 0; i < sbi->s_partitions; i++) {
1325                 map = &sbi->s_partmaps[i];
1326
1327                 if (map->s_partition_num == partitionNumber &&
1328                     (map->s_partition_type == UDF_VIRTUAL_MAP15 ||
1329                      map->s_partition_type == UDF_VIRTUAL_MAP20 ||
1330                      map->s_partition_type == UDF_METADATA_MAP25))
1331                         break;
1332         }
1333
1334         if (i >= sbi->s_partitions)
1335                 goto out_bh;
1336
1337         ret = udf_fill_partdesc_info(sb, p, i);
1338         if (ret)
1339                 goto out_bh;
1340
1341         if (map->s_partition_type == UDF_METADATA_MAP25) {
1342                 ret = udf_load_metadata_files(sb, i);
1343                 if (ret) {
1344                         printk(KERN_ERR "UDF-fs: error loading MetaData "
1345                         "partition map %d\n", i);
1346                         goto out_bh;
1347                 }
1348         } else {
1349                 ret = udf_load_vat(sb, i, type1_idx);
1350                 if (ret)
1351                         goto out_bh;
1352                 /*
1353                  * Mark filesystem read-only if we have a partition with
1354                  * virtual map since we don't handle writing to it (we
1355                  * overwrite blocks instead of relocating them).
1356                  */
1357                 sb->s_flags |= MS_RDONLY;
1358                 printk(KERN_NOTICE "UDF-fs: Filesystem marked read-only "
1359                         "because writing to pseudooverwrite partition is "
1360                         "not implemented.\n");
1361         }
1362 out_bh:
1363         /* In case loading failed, we handle cleanup in udf_fill_super */
1364         brelse(bh);
1365         return ret;
1366 }
1367
1368 static int udf_load_logicalvol(struct super_block *sb, sector_t block,
1369                                struct kernel_lb_addr *fileset)
1370 {
1371         struct logicalVolDesc *lvd;
1372         int i, j, offset;
1373         uint8_t type;
1374         struct udf_sb_info *sbi = UDF_SB(sb);
1375         struct genericPartitionMap *gpm;
1376         uint16_t ident;
1377         struct buffer_head *bh;
1378         int ret = 0;
1379
1380         bh = udf_read_tagged(sb, block, block, &ident);
1381         if (!bh)
1382                 return 1;
1383         BUG_ON(ident != TAG_IDENT_LVD);
1384         lvd = (struct logicalVolDesc *)bh->b_data;
1385
1386         i = udf_sb_alloc_partition_maps(sb, le32_to_cpu(lvd->numPartitionMaps));
1387         if (i != 0) {
1388                 ret = i;
1389                 goto out_bh;
1390         }
1391
1392         for (i = 0, offset = 0;
1393              i < sbi->s_partitions && offset < le32_to_cpu(lvd->mapTableLength);
1394              i++, offset += gpm->partitionMapLength) {
1395                 struct udf_part_map *map = &sbi->s_partmaps[i];
1396                 gpm = (struct genericPartitionMap *)
1397                                 &(lvd->partitionMaps[offset]);
1398                 type = gpm->partitionMapType;
1399                 if (type == 1) {
1400                         struct genericPartitionMap1 *gpm1 =
1401                                 (struct genericPartitionMap1 *)gpm;
1402                         map->s_partition_type = UDF_TYPE1_MAP15;
1403                         map->s_volumeseqnum = le16_to_cpu(gpm1->volSeqNum);
1404                         map->s_partition_num = le16_to_cpu(gpm1->partitionNum);
1405                         map->s_partition_func = NULL;
1406                 } else if (type == 2) {
1407                         struct udfPartitionMap2 *upm2 =
1408                                                 (struct udfPartitionMap2 *)gpm;
1409                         if (!strncmp(upm2->partIdent.ident, UDF_ID_VIRTUAL,
1410                                                 strlen(UDF_ID_VIRTUAL))) {
1411                                 u16 suf =
1412                                         le16_to_cpu(((__le16 *)upm2->partIdent.
1413                                                         identSuffix)[0]);
1414                                 if (suf < 0x0200) {
1415                                         map->s_partition_type =
1416                                                         UDF_VIRTUAL_MAP15;
1417                                         map->s_partition_func =
1418                                                         udf_get_pblock_virt15;
1419                                 } else {
1420                                         map->s_partition_type =
1421                                                         UDF_VIRTUAL_MAP20;
1422                                         map->s_partition_func =
1423                                                         udf_get_pblock_virt20;
1424                                 }
1425                         } else if (!strncmp(upm2->partIdent.ident,
1426                                                 UDF_ID_SPARABLE,
1427                                                 strlen(UDF_ID_SPARABLE))) {
1428                                 uint32_t loc;
1429                                 struct sparingTable *st;
1430                                 struct sparablePartitionMap *spm =
1431                                         (struct sparablePartitionMap *)gpm;
1432
1433                                 map->s_partition_type = UDF_SPARABLE_MAP15;
1434                                 map->s_type_specific.s_sparing.s_packet_len =
1435                                                 le16_to_cpu(spm->packetLength);
1436                                 for (j = 0; j < spm->numSparingTables; j++) {
1437                                         struct buffer_head *bh2;
1438
1439                                         loc = le32_to_cpu(
1440                                                 spm->locSparingTable[j]);
1441                                         bh2 = udf_read_tagged(sb, loc, loc,
1442                                                              &ident);
1443                                         map->s_type_specific.s_sparing.
1444                                                         s_spar_map[j] = bh2;
1445
1446                                         if (bh2 == NULL)
1447                                                 continue;
1448
1449                                         st = (struct sparingTable *)bh2->b_data;
1450                                         if (ident != 0 || strncmp(
1451                                                 st->sparingIdent.ident,
1452                                                 UDF_ID_SPARING,
1453                                                 strlen(UDF_ID_SPARING))) {
1454                                                 brelse(bh2);
1455                                                 map->s_type_specific.s_sparing.
1456                                                         s_spar_map[j] = NULL;
1457                                         }
1458                                 }
1459                                 map->s_partition_func = udf_get_pblock_spar15;
1460                         } else if (!strncmp(upm2->partIdent.ident,
1461                                                 UDF_ID_METADATA,
1462                                                 strlen(UDF_ID_METADATA))) {
1463                                 struct udf_meta_data *mdata =
1464                                         &map->s_type_specific.s_metadata;
1465                                 struct metadataPartitionMap *mdm =
1466                                                 (struct metadataPartitionMap *)
1467                                                 &(lvd->partitionMaps[offset]);
1468                                 udf_debug("Parsing Logical vol part %d "
1469                                         "type %d  id=%s\n", i, type,
1470                                         UDF_ID_METADATA);
1471
1472                                 map->s_partition_type = UDF_METADATA_MAP25;
1473                                 map->s_partition_func = udf_get_pblock_meta25;
1474
1475                                 mdata->s_meta_file_loc   =
1476                                         le32_to_cpu(mdm->metadataFileLoc);
1477                                 mdata->s_mirror_file_loc =
1478                                         le32_to_cpu(mdm->metadataMirrorFileLoc);
1479                                 mdata->s_bitmap_file_loc =
1480                                         le32_to_cpu(mdm->metadataBitmapFileLoc);
1481                                 mdata->s_alloc_unit_size =
1482                                         le32_to_cpu(mdm->allocUnitSize);
1483                                 mdata->s_align_unit_size =
1484                                         le16_to_cpu(mdm->alignUnitSize);
1485                                 mdata->s_dup_md_flag     =
1486                                         mdm->flags & 0x01;
1487
1488                                 udf_debug("Metadata Ident suffix=0x%x\n",
1489                                         (le16_to_cpu(
1490                                          ((__le16 *)
1491                                               mdm->partIdent.identSuffix)[0])));
1492                                 udf_debug("Metadata part num=%d\n",
1493                                         le16_to_cpu(mdm->partitionNum));
1494                                 udf_debug("Metadata part alloc unit size=%d\n",
1495                                         le32_to_cpu(mdm->allocUnitSize));
1496                                 udf_debug("Metadata file loc=%d\n",
1497                                         le32_to_cpu(mdm->metadataFileLoc));
1498                                 udf_debug("Mirror file loc=%d\n",
1499                                        le32_to_cpu(mdm->metadataMirrorFileLoc));
1500                                 udf_debug("Bitmap file loc=%d\n",
1501                                        le32_to_cpu(mdm->metadataBitmapFileLoc));
1502                                 udf_debug("Duplicate Flag: %d %d\n",
1503                                         mdata->s_dup_md_flag, mdm->flags);
1504                         } else {
1505                                 udf_debug("Unknown ident: %s\n",
1506                                           upm2->partIdent.ident);
1507                                 continue;
1508                         }
1509                         map->s_volumeseqnum = le16_to_cpu(upm2->volSeqNum);
1510                         map->s_partition_num = le16_to_cpu(upm2->partitionNum);
1511                 }
1512                 udf_debug("Partition (%d:%d) type %d on volume %d\n",
1513                           i, map->s_partition_num, type,
1514                           map->s_volumeseqnum);
1515         }
1516
1517         if (fileset) {
1518                 struct long_ad *la = (struct long_ad *)&(lvd->logicalVolContentsUse[0]);
1519
1520                 *fileset = lelb_to_cpu(la->extLocation);
1521                 udf_debug("FileSet found in LogicalVolDesc at block=%d, "
1522                           "partition=%d\n", fileset->logicalBlockNum,
1523                           fileset->partitionReferenceNum);
1524         }
1525         if (lvd->integritySeqExt.extLength)
1526                 udf_load_logicalvolint(sb, leea_to_cpu(lvd->integritySeqExt));
1527
1528 out_bh:
1529         brelse(bh);
1530         return ret;
1531 }
1532
1533 /*
1534  * udf_load_logicalvolint
1535  *
1536  */
1537 static void udf_load_logicalvolint(struct super_block *sb, struct kernel_extent_ad loc)
1538 {
1539         struct buffer_head *bh = NULL;
1540         uint16_t ident;
1541         struct udf_sb_info *sbi = UDF_SB(sb);
1542         struct logicalVolIntegrityDesc *lvid;
1543
1544         while (loc.extLength > 0 &&
1545                (bh = udf_read_tagged(sb, loc.extLocation,
1546                                      loc.extLocation, &ident)) &&
1547                ident == TAG_IDENT_LVID) {
1548                 sbi->s_lvid_bh = bh;
1549                 lvid = (struct logicalVolIntegrityDesc *)bh->b_data;
1550
1551                 if (lvid->nextIntegrityExt.extLength)
1552                         udf_load_logicalvolint(sb,
1553                                 leea_to_cpu(lvid->nextIntegrityExt));
1554
1555                 if (sbi->s_lvid_bh != bh)
1556                         brelse(bh);
1557                 loc.extLength -= sb->s_blocksize;
1558                 loc.extLocation++;
1559         }
1560         if (sbi->s_lvid_bh != bh)
1561                 brelse(bh);
1562 }
1563
1564 /*
1565  * udf_process_sequence
1566  *
1567  * PURPOSE
1568  *      Process a main/reserve volume descriptor sequence.
1569  *
1570  * PRE-CONDITIONS
1571  *      sb                      Pointer to _locked_ superblock.
1572  *      block                   First block of first extent of the sequence.
1573  *      lastblock               Lastblock of first extent of the sequence.
1574  *
1575  * HISTORY
1576  *      July 1, 1997 - Andrew E. Mileski
1577  *      Written, tested, and released.
1578  */
1579 static noinline int udf_process_sequence(struct super_block *sb, long block,
1580                                 long lastblock, struct kernel_lb_addr *fileset)
1581 {
1582         struct buffer_head *bh = NULL;
1583         struct udf_vds_record vds[VDS_POS_LENGTH];
1584         struct udf_vds_record *curr;
1585         struct generic_desc *gd;
1586         struct volDescPtr *vdp;
1587         int done = 0;
1588         uint32_t vdsn;
1589         uint16_t ident;
1590         long next_s = 0, next_e = 0;
1591
1592         memset(vds, 0, sizeof(struct udf_vds_record) * VDS_POS_LENGTH);
1593
1594         /*
1595          * Read the main descriptor sequence and find which descriptors
1596          * are in it.
1597          */
1598         for (; (!done && block <= lastblock); block++) {
1599
1600                 bh = udf_read_tagged(sb, block, block, &ident);
1601                 if (!bh) {
1602                         printk(KERN_ERR "udf: Block %Lu of volume descriptor "
1603                                "sequence is corrupted or we could not read "
1604                                "it.\n", (unsigned long long)block);
1605                         return 1;
1606                 }
1607
1608                 /* Process each descriptor (ISO 13346 3/8.3-8.4) */
1609                 gd = (struct generic_desc *)bh->b_data;
1610                 vdsn = le32_to_cpu(gd->volDescSeqNum);
1611                 switch (ident) {
1612                 case TAG_IDENT_PVD: /* ISO 13346 3/10.1 */
1613                         curr = &vds[VDS_POS_PRIMARY_VOL_DESC];
1614                         if (vdsn >= curr->volDescSeqNum) {
1615                                 curr->volDescSeqNum = vdsn;
1616                                 curr->block = block;
1617                         }
1618                         break;
1619                 case TAG_IDENT_VDP: /* ISO 13346 3/10.3 */
1620                         curr = &vds[VDS_POS_VOL_DESC_PTR];
1621                         if (vdsn >= curr->volDescSeqNum) {
1622                                 curr->volDescSeqNum = vdsn;
1623                                 curr->block = block;
1624
1625                                 vdp = (struct volDescPtr *)bh->b_data;
1626                                 next_s = le32_to_cpu(
1627                                         vdp->nextVolDescSeqExt.extLocation);
1628                                 next_e = le32_to_cpu(
1629                                         vdp->nextVolDescSeqExt.extLength);
1630                                 next_e = next_e >> sb->s_blocksize_bits;
1631                                 next_e += next_s;
1632                         }
1633                         break;
1634                 case TAG_IDENT_IUVD: /* ISO 13346 3/10.4 */
1635                         curr = &vds[VDS_POS_IMP_USE_VOL_DESC];
1636                         if (vdsn >= curr->volDescSeqNum) {
1637                                 curr->volDescSeqNum = vdsn;
1638                                 curr->block = block;
1639                         }
1640                         break;
1641                 case TAG_IDENT_PD: /* ISO 13346 3/10.5 */
1642                         curr = &vds[VDS_POS_PARTITION_DESC];
1643                         if (!curr->block)
1644                                 curr->block = block;
1645                         break;
1646                 case TAG_IDENT_LVD: /* ISO 13346 3/10.6 */
1647                         curr = &vds[VDS_POS_LOGICAL_VOL_DESC];
1648                         if (vdsn >= curr->volDescSeqNum) {
1649                                 curr->volDescSeqNum = vdsn;
1650                                 curr->block = block;
1651                         }
1652                         break;
1653                 case TAG_IDENT_USD: /* ISO 13346 3/10.8 */
1654                         curr = &vds[VDS_POS_UNALLOC_SPACE_DESC];
1655                         if (vdsn >= curr->volDescSeqNum) {
1656                                 curr->volDescSeqNum = vdsn;
1657                                 curr->block = block;
1658                         }
1659                         break;
1660                 case TAG_IDENT_TD: /* ISO 13346 3/10.9 */
1661                         vds[VDS_POS_TERMINATING_DESC].block = block;
1662                         if (next_e) {
1663                                 block = next_s;
1664                                 lastblock = next_e;
1665                                 next_s = next_e = 0;
1666                         } else
1667                                 done = 1;
1668                         break;
1669                 }
1670                 brelse(bh);
1671         }
1672         /*
1673          * Now read interesting descriptors again and process them
1674          * in a suitable order
1675          */
1676         if (!vds[VDS_POS_PRIMARY_VOL_DESC].block) {
1677                 printk(KERN_ERR "udf: Primary Volume Descriptor not found!\n");
1678                 return 1;
1679         }
1680         if (udf_load_pvoldesc(sb, vds[VDS_POS_PRIMARY_VOL_DESC].block))
1681                 return 1;
1682
1683         if (vds[VDS_POS_LOGICAL_VOL_DESC].block && udf_load_logicalvol(sb,
1684             vds[VDS_POS_LOGICAL_VOL_DESC].block, fileset))
1685                 return 1;
1686
1687         if (vds[VDS_POS_PARTITION_DESC].block) {
1688                 /*
1689                  * We rescan the whole descriptor sequence to find
1690                  * partition descriptor blocks and process them.
1691                  */
1692                 for (block = vds[VDS_POS_PARTITION_DESC].block;
1693                      block < vds[VDS_POS_TERMINATING_DESC].block;
1694                      block++)
1695                         if (udf_load_partdesc(sb, block))
1696                                 return 1;
1697         }
1698
1699         return 0;
1700 }
1701
1702 /*
1703  * udf_check_valid()
1704  */
1705 static int udf_check_valid(struct super_block *sb, int novrs, int silent)
1706 {
1707         loff_t block;
1708         struct udf_sb_info *sbi = UDF_SB(sb);
1709
1710         if (novrs) {
1711                 udf_debug("Validity check skipped because of novrs option\n");
1712                 return 0;
1713         }
1714         /* Check that it is NSR02 compliant */
1715         /* Process any "CD-ROM Volume Descriptor Set" (ECMA 167 2/8.3.1) */
1716         block = udf_vrs(sb, silent);
1717         if (block == -1)
1718                 udf_debug("Failed to read byte 32768. Assuming open "
1719                           "disc. Skipping validity check\n");
1720         if (block && !sbi->s_last_block)
1721                 sbi->s_last_block = udf_get_last_block(sb);
1722         return !!block;
1723 }
1724
1725 static int udf_check_volume(struct super_block *sb,
1726                             struct udf_options *uopt, int silent)
1727 {
1728         struct udf_sb_info *sbi = UDF_SB(sb);
1729
1730         if (!sb_set_blocksize(sb, uopt->blocksize)) {
1731                 if (!silent)
1732                         printk(KERN_WARNING "UDF-fs: Bad block size\n");
1733                 return 0;
1734         }
1735         sbi->s_last_block = uopt->lastblock;
1736         if (!udf_check_valid(sb, uopt->novrs, silent)) {
1737                 if (!silent)
1738                         printk(KERN_WARNING "UDF-fs: No VRS found\n");
1739                 return 0;
1740         }
1741         sbi->s_anchor[0] = sbi->s_anchor[1] = 0;
1742         sbi->s_anchor[2] = uopt->anchor;
1743         if (!udf_find_anchor(sb)) {
1744                 if (!silent)
1745                         printk(KERN_WARNING "UDF-fs: No anchor found\n");
1746                 return 0;
1747         }
1748         return 1;
1749 }
1750
1751 static int udf_load_sequence(struct super_block *sb, struct kernel_lb_addr *fileset)
1752 {
1753         struct anchorVolDescPtr *anchor;
1754         uint16_t ident;
1755         struct buffer_head *bh;
1756         long main_s, main_e, reserve_s, reserve_e;
1757         int i;
1758         struct udf_sb_info *sbi;
1759
1760         if (!sb)
1761                 return 1;
1762         sbi = UDF_SB(sb);
1763
1764         for (i = 0; i < ARRAY_SIZE(sbi->s_anchor); i++) {
1765                 if (!sbi->s_anchor[i])
1766                         continue;
1767
1768                 bh = udf_read_tagged(sb, sbi->s_anchor[i], sbi->s_anchor[i],
1769                                      &ident);
1770                 if (!bh)
1771                         continue;
1772
1773                 anchor = (struct anchorVolDescPtr *)bh->b_data;
1774
1775                 /* Locate the main sequence */
1776                 main_s = le32_to_cpu(anchor->mainVolDescSeqExt.extLocation);
1777                 main_e = le32_to_cpu(anchor->mainVolDescSeqExt.extLength);
1778                 main_e = main_e >> sb->s_blocksize_bits;
1779                 main_e += main_s;
1780
1781                 /* Locate the reserve sequence */
1782                 reserve_s = le32_to_cpu(
1783                                 anchor->reserveVolDescSeqExt.extLocation);
1784                 reserve_e = le32_to_cpu(
1785                                 anchor->reserveVolDescSeqExt.extLength);
1786                 reserve_e = reserve_e >> sb->s_blocksize_bits;
1787                 reserve_e += reserve_s;
1788
1789                 brelse(bh);
1790
1791                 /* Process the main & reserve sequences */
1792                 /* responsible for finding the PartitionDesc(s) */
1793                 if (!(udf_process_sequence(sb, main_s, main_e,
1794                                            fileset) &&
1795                       udf_process_sequence(sb, reserve_s, reserve_e,
1796                                            fileset)))
1797                         break;
1798         }
1799
1800         if (i == ARRAY_SIZE(sbi->s_anchor)) {
1801                 udf_debug("No Anchor block found\n");
1802                 return 1;
1803         }
1804         udf_debug("Using anchor in block %d\n", sbi->s_anchor[i]);
1805
1806         return 0;
1807 }
1808
1809 static void udf_open_lvid(struct super_block *sb)
1810 {
1811         struct udf_sb_info *sbi = UDF_SB(sb);
1812         struct buffer_head *bh = sbi->s_lvid_bh;
1813         struct logicalVolIntegrityDesc *lvid;
1814         struct logicalVolIntegrityDescImpUse *lvidiu;
1815         if (!bh)
1816                 return;
1817
1818         lvid = (struct logicalVolIntegrityDesc *)bh->b_data;
1819         lvidiu = udf_sb_lvidiu(sbi);
1820
1821         lvidiu->impIdent.identSuffix[0] = UDF_OS_CLASS_UNIX;
1822         lvidiu->impIdent.identSuffix[1] = UDF_OS_ID_LINUX;
1823         udf_time_to_disk_stamp(&lvid->recordingDateAndTime,
1824                                 CURRENT_TIME);
1825         lvid->integrityType = LVID_INTEGRITY_TYPE_OPEN;
1826
1827         lvid->descTag.descCRC = cpu_to_le16(
1828                 crc_itu_t(0, (char *)lvid + sizeof(struct tag),
1829                         le16_to_cpu(lvid->descTag.descCRCLength)));
1830
1831         lvid->descTag.tagChecksum = udf_tag_checksum(&lvid->descTag);
1832         mark_buffer_dirty(bh);
1833 }
1834
1835 static void udf_close_lvid(struct super_block *sb)
1836 {
1837         struct udf_sb_info *sbi = UDF_SB(sb);
1838         struct buffer_head *bh = sbi->s_lvid_bh;
1839         struct logicalVolIntegrityDesc *lvid;
1840         struct logicalVolIntegrityDescImpUse *lvidiu;
1841
1842         if (!bh)
1843                 return;
1844
1845         lvid = (struct logicalVolIntegrityDesc *)bh->b_data;
1846
1847         if (lvid->integrityType != LVID_INTEGRITY_TYPE_OPEN)
1848                 return;
1849
1850         lvidiu = udf_sb_lvidiu(sbi);
1851         lvidiu->impIdent.identSuffix[0] = UDF_OS_CLASS_UNIX;
1852         lvidiu->impIdent.identSuffix[1] = UDF_OS_ID_LINUX;
1853         udf_time_to_disk_stamp(&lvid->recordingDateAndTime, CURRENT_TIME);
1854         if (UDF_MAX_WRITE_VERSION > le16_to_cpu(lvidiu->maxUDFWriteRev))
1855                 lvidiu->maxUDFWriteRev = cpu_to_le16(UDF_MAX_WRITE_VERSION);
1856         if (sbi->s_udfrev > le16_to_cpu(lvidiu->minUDFReadRev))
1857                 lvidiu->minUDFReadRev = cpu_to_le16(sbi->s_udfrev);
1858         if (sbi->s_udfrev > le16_to_cpu(lvidiu->minUDFWriteRev))
1859                 lvidiu->minUDFWriteRev = cpu_to_le16(sbi->s_udfrev);
1860         lvid->integrityType = cpu_to_le32(LVID_INTEGRITY_TYPE_CLOSE);
1861
1862         lvid->descTag.descCRC = cpu_to_le16(
1863                         crc_itu_t(0, (char *)lvid + sizeof(struct tag),
1864                                 le16_to_cpu(lvid->descTag.descCRCLength)));
1865
1866         lvid->descTag.tagChecksum = udf_tag_checksum(&lvid->descTag);
1867         mark_buffer_dirty(bh);
1868 }
1869
1870 static void udf_sb_free_bitmap(struct udf_bitmap *bitmap)
1871 {
1872         int i;
1873         int nr_groups = bitmap->s_nr_groups;
1874         int size = sizeof(struct udf_bitmap) + (sizeof(struct buffer_head *) *
1875                                                 nr_groups);
1876
1877         for (i = 0; i < nr_groups; i++)
1878                 if (bitmap->s_block_bitmap[i])
1879                         brelse(bitmap->s_block_bitmap[i]);
1880
1881         if (size <= PAGE_SIZE)
1882                 kfree(bitmap);
1883         else
1884                 vfree(bitmap);
1885 }
1886
1887 static void udf_free_partition(struct udf_part_map *map)
1888 {
1889         int i;
1890         struct udf_meta_data *mdata;
1891
1892         if (map->s_partition_flags & UDF_PART_FLAG_UNALLOC_TABLE)
1893                 iput(map->s_uspace.s_table);
1894         if (map->s_partition_flags & UDF_PART_FLAG_FREED_TABLE)
1895                 iput(map->s_fspace.s_table);
1896         if (map->s_partition_flags & UDF_PART_FLAG_UNALLOC_BITMAP)
1897                 udf_sb_free_bitmap(map->s_uspace.s_bitmap);
1898         if (map->s_partition_flags & UDF_PART_FLAG_FREED_BITMAP)
1899                 udf_sb_free_bitmap(map->s_fspace.s_bitmap);
1900         if (map->s_partition_type == UDF_SPARABLE_MAP15)
1901                 for (i = 0; i < 4; i++)
1902                         brelse(map->s_type_specific.s_sparing.s_spar_map[i]);
1903         else if (map->s_partition_type == UDF_METADATA_MAP25) {
1904                 mdata = &map->s_type_specific.s_metadata;
1905                 iput(mdata->s_metadata_fe);
1906                 mdata->s_metadata_fe = NULL;
1907
1908                 iput(mdata->s_mirror_fe);
1909                 mdata->s_mirror_fe = NULL;
1910
1911                 iput(mdata->s_bitmap_fe);
1912                 mdata->s_bitmap_fe = NULL;
1913         }
1914 }
1915
1916 static int udf_fill_super(struct super_block *sb, void *options, int silent)
1917 {
1918         int i;
1919         int found_anchor;
1920         struct inode *inode = NULL;
1921         struct udf_options uopt;
1922         struct kernel_lb_addr rootdir, fileset;
1923         struct udf_sb_info *sbi;
1924
1925         uopt.flags = (1 << UDF_FLAG_USE_AD_IN_ICB) | (1 << UDF_FLAG_STRICT);
1926         uopt.uid = -1;
1927         uopt.gid = -1;
1928         uopt.umask = 0;
1929         uopt.fmode = UDF_INVALID_MODE;
1930         uopt.dmode = UDF_INVALID_MODE;
1931
1932         sbi = kzalloc(sizeof(struct udf_sb_info), GFP_KERNEL);
1933         if (!sbi)
1934                 return -ENOMEM;
1935
1936         sb->s_fs_info = sbi;
1937
1938         mutex_init(&sbi->s_alloc_mutex);
1939
1940         if (!udf_parse_options((char *)options, &uopt, false))
1941                 goto error_out;
1942
1943         if (uopt.flags & (1 << UDF_FLAG_UTF8) &&
1944             uopt.flags & (1 << UDF_FLAG_NLS_MAP)) {
1945                 udf_error(sb, "udf_read_super",
1946                           "utf8 cannot be combined with iocharset\n");
1947                 goto error_out;
1948         }
1949 #ifdef CONFIG_UDF_NLS
1950         if ((uopt.flags & (1 << UDF_FLAG_NLS_MAP)) && !uopt.nls_map) {
1951                 uopt.nls_map = load_nls_default();
1952                 if (!uopt.nls_map)
1953                         uopt.flags &= ~(1 << UDF_FLAG_NLS_MAP);
1954                 else
1955                         udf_debug("Using default NLS map\n");
1956         }
1957 #endif
1958         if (!(uopt.flags & (1 << UDF_FLAG_NLS_MAP)))
1959                 uopt.flags |= (1 << UDF_FLAG_UTF8);
1960
1961         fileset.logicalBlockNum = 0xFFFFFFFF;
1962         fileset.partitionReferenceNum = 0xFFFF;
1963
1964         sbi->s_flags = uopt.flags;
1965         sbi->s_uid = uopt.uid;
1966         sbi->s_gid = uopt.gid;
1967         sbi->s_umask = uopt.umask;
1968         sbi->s_fmode = uopt.fmode;
1969         sbi->s_dmode = uopt.dmode;
1970         sbi->s_nls_map = uopt.nls_map;
1971
1972         if (uopt.session == 0xFFFFFFFF)
1973                 sbi->s_session = udf_get_last_session(sb);
1974         else
1975                 sbi->s_session = uopt.session;
1976
1977         udf_debug("Multi-session=%d\n", sbi->s_session);
1978
1979         if (uopt.flags & (1 << UDF_FLAG_BLOCKSIZE_SET)) {
1980                 found_anchor = udf_check_volume(sb, &uopt, silent);
1981         } else {
1982                 uopt.blocksize = bdev_hardsect_size(sb->s_bdev);
1983                 found_anchor = udf_check_volume(sb, &uopt, silent);
1984                 if (!found_anchor && uopt.blocksize != UDF_DEFAULT_BLOCKSIZE) {
1985                         if (!silent)
1986                                 printk(KERN_NOTICE
1987                                        "UDF-fs: Rescanning with blocksize "
1988                                        "%d\n", UDF_DEFAULT_BLOCKSIZE);
1989                         uopt.blocksize = UDF_DEFAULT_BLOCKSIZE;
1990                         found_anchor = udf_check_volume(sb, &uopt, silent);
1991                 }
1992         }
1993         if (!found_anchor)
1994                 goto error_out;
1995
1996         /* Fill in the rest of the superblock */
1997         sb->s_op = &udf_sb_ops;
1998         sb->s_export_op = &udf_export_ops;
1999         sb->dq_op = NULL;
2000         sb->s_dirt = 0;
2001         sb->s_magic = UDF_SUPER_MAGIC;
2002         sb->s_time_gran = 1000;
2003
2004         if (udf_load_sequence(sb, &fileset)) {
2005                 printk(KERN_WARNING "UDF-fs: No partition found (1)\n");
2006                 goto error_out;
2007         }
2008
2009         udf_debug("Lastblock=%d\n", sbi->s_last_block);
2010
2011         if (sbi->s_lvid_bh) {
2012                 struct logicalVolIntegrityDescImpUse *lvidiu =
2013                                                         udf_sb_lvidiu(sbi);
2014                 uint16_t minUDFReadRev = le16_to_cpu(lvidiu->minUDFReadRev);
2015                 uint16_t minUDFWriteRev = le16_to_cpu(lvidiu->minUDFWriteRev);
2016                 /* uint16_t maxUDFWriteRev =
2017                                 le16_to_cpu(lvidiu->maxUDFWriteRev); */
2018
2019                 if (minUDFReadRev > UDF_MAX_READ_VERSION) {
2020                         printk(KERN_ERR "UDF-fs: minUDFReadRev=%x "
2021                                         "(max is %x)\n",
2022                                le16_to_cpu(lvidiu->minUDFReadRev),
2023                                UDF_MAX_READ_VERSION);
2024                         goto error_out;
2025                 } else if (minUDFWriteRev > UDF_MAX_WRITE_VERSION)
2026                         sb->s_flags |= MS_RDONLY;
2027
2028                 sbi->s_udfrev = minUDFWriteRev;
2029
2030                 if (minUDFReadRev >= UDF_VERS_USE_EXTENDED_FE)
2031                         UDF_SET_FLAG(sb, UDF_FLAG_USE_EXTENDED_FE);
2032                 if (minUDFReadRev >= UDF_VERS_USE_STREAMS)
2033                         UDF_SET_FLAG(sb, UDF_FLAG_USE_STREAMS);
2034         }
2035
2036         if (!sbi->s_partitions) {
2037                 printk(KERN_WARNING "UDF-fs: No partition found (2)\n");
2038                 goto error_out;
2039         }
2040
2041         if (sbi->s_partmaps[sbi->s_partition].s_partition_flags &
2042                         UDF_PART_FLAG_READ_ONLY) {
2043                 printk(KERN_NOTICE "UDF-fs: Partition marked readonly; "
2044                                    "forcing readonly mount\n");
2045                 sb->s_flags |= MS_RDONLY;
2046         }
2047
2048         if (udf_find_fileset(sb, &fileset, &rootdir)) {
2049                 printk(KERN_WARNING "UDF-fs: No fileset found\n");
2050                 goto error_out;
2051         }
2052
2053         if (!silent) {
2054                 struct timestamp ts;
2055                 udf_time_to_disk_stamp(&ts, sbi->s_record_time);
2056                 udf_info("UDF: Mounting volume '%s', "
2057                          "timestamp %04u/%02u/%02u %02u:%02u (%x)\n",
2058                          sbi->s_volume_ident, le16_to_cpu(ts.year), ts.month, ts.day,
2059                          ts.hour, ts.minute, le16_to_cpu(ts.typeAndTimezone));
2060         }
2061         if (!(sb->s_flags & MS_RDONLY))
2062                 udf_open_lvid(sb);
2063
2064         /* Assign the root inode */
2065         /* assign inodes by physical block number */
2066         /* perhaps it's not extensible enough, but for now ... */
2067         inode = udf_iget(sb, &rootdir);
2068         if (!inode) {
2069                 printk(KERN_ERR "UDF-fs: Error in udf_iget, block=%d, "
2070                                 "partition=%d\n",
2071                        rootdir.logicalBlockNum, rootdir.partitionReferenceNum);
2072                 goto error_out;
2073         }
2074
2075         /* Allocate a dentry for the root inode */
2076         sb->s_root = d_alloc_root(inode);
2077         if (!sb->s_root) {
2078                 printk(KERN_ERR "UDF-fs: Couldn't allocate root dentry\n");
2079                 iput(inode);
2080                 goto error_out;
2081         }
2082         sb->s_maxbytes = MAX_LFS_FILESIZE;
2083         return 0;
2084
2085 error_out:
2086         if (sbi->s_vat_inode)
2087                 iput(sbi->s_vat_inode);
2088         if (sbi->s_partitions)
2089                 for (i = 0; i < sbi->s_partitions; i++)
2090                         udf_free_partition(&sbi->s_partmaps[i]);
2091 #ifdef CONFIG_UDF_NLS
2092         if (UDF_QUERY_FLAG(sb, UDF_FLAG_NLS_MAP))
2093                 unload_nls(sbi->s_nls_map);
2094 #endif
2095         if (!(sb->s_flags & MS_RDONLY))
2096                 udf_close_lvid(sb);
2097         brelse(sbi->s_lvid_bh);
2098
2099         kfree(sbi->s_partmaps);
2100         kfree(sbi);
2101         sb->s_fs_info = NULL;
2102
2103         return -EINVAL;
2104 }
2105
2106 static void udf_error(struct super_block *sb, const char *function,
2107                       const char *fmt, ...)
2108 {
2109         va_list args;
2110
2111         if (!(sb->s_flags & MS_RDONLY)) {
2112                 /* mark sb error */
2113                 sb->s_dirt = 1;
2114         }
2115         va_start(args, fmt);
2116         vsnprintf(error_buf, sizeof(error_buf), fmt, args);
2117         va_end(args);
2118         printk(KERN_CRIT "UDF-fs error (device %s): %s: %s\n",
2119                 sb->s_id, function, error_buf);
2120 }
2121
2122 void udf_warning(struct super_block *sb, const char *function,
2123                  const char *fmt, ...)
2124 {
2125         va_list args;
2126
2127         va_start(args, fmt);
2128         vsnprintf(error_buf, sizeof(error_buf), fmt, args);
2129         va_end(args);
2130         printk(KERN_WARNING "UDF-fs warning (device %s): %s: %s\n",
2131                sb->s_id, function, error_buf);
2132 }
2133
2134 static void udf_put_super(struct super_block *sb)
2135 {
2136         int i;
2137         struct udf_sb_info *sbi;
2138
2139         sbi = UDF_SB(sb);
2140         if (sbi->s_vat_inode)
2141                 iput(sbi->s_vat_inode);
2142         if (sbi->s_partitions)
2143                 for (i = 0; i < sbi->s_partitions; i++)
2144                         udf_free_partition(&sbi->s_partmaps[i]);
2145 #ifdef CONFIG_UDF_NLS
2146         if (UDF_QUERY_FLAG(sb, UDF_FLAG_NLS_MAP))
2147                 unload_nls(sbi->s_nls_map);
2148 #endif
2149         if (!(sb->s_flags & MS_RDONLY))
2150                 udf_close_lvid(sb);
2151         brelse(sbi->s_lvid_bh);
2152         kfree(sbi->s_partmaps);
2153         kfree(sb->s_fs_info);
2154         sb->s_fs_info = NULL;
2155 }
2156
2157 static int udf_statfs(struct dentry *dentry, struct kstatfs *buf)
2158 {
2159         struct super_block *sb = dentry->d_sb;
2160         struct udf_sb_info *sbi = UDF_SB(sb);
2161         struct logicalVolIntegrityDescImpUse *lvidiu;
2162         u64 id = huge_encode_dev(sb->s_bdev->bd_dev);
2163
2164         if (sbi->s_lvid_bh != NULL)
2165                 lvidiu = udf_sb_lvidiu(sbi);
2166         else
2167                 lvidiu = NULL;
2168
2169         buf->f_type = UDF_SUPER_MAGIC;
2170         buf->f_bsize = sb->s_blocksize;
2171         buf->f_blocks = sbi->s_partmaps[sbi->s_partition].s_partition_len;
2172         buf->f_bfree = udf_count_free(sb);
2173         buf->f_bavail = buf->f_bfree;
2174         buf->f_files = (lvidiu != NULL ? (le32_to_cpu(lvidiu->numFiles) +
2175                                           le32_to_cpu(lvidiu->numDirs)) : 0)
2176                         + buf->f_bfree;
2177         buf->f_ffree = buf->f_bfree;
2178         buf->f_namelen = UDF_NAME_LEN - 2;
2179         buf->f_fsid.val[0] = (u32)id;
2180         buf->f_fsid.val[1] = (u32)(id >> 32);
2181
2182         return 0;
2183 }
2184
2185 static unsigned int udf_count_free_bitmap(struct super_block *sb,
2186                                           struct udf_bitmap *bitmap)
2187 {
2188         struct buffer_head *bh = NULL;
2189         unsigned int accum = 0;
2190         int index;
2191         int block = 0, newblock;
2192         struct kernel_lb_addr loc;
2193         uint32_t bytes;
2194         uint8_t *ptr;
2195         uint16_t ident;
2196         struct spaceBitmapDesc *bm;
2197
2198         lock_kernel();
2199
2200         loc.logicalBlockNum = bitmap->s_extPosition;
2201         loc.partitionReferenceNum = UDF_SB(sb)->s_partition;
2202         bh = udf_read_ptagged(sb, &loc, 0, &ident);
2203
2204         if (!bh) {
2205                 printk(KERN_ERR "udf: udf_count_free failed\n");
2206                 goto out;
2207         } else if (ident != TAG_IDENT_SBD) {
2208                 brelse(bh);
2209                 printk(KERN_ERR "udf: udf_count_free failed\n");
2210                 goto out;
2211         }
2212
2213         bm = (struct spaceBitmapDesc *)bh->b_data;
2214         bytes = le32_to_cpu(bm->numOfBytes);
2215         index = sizeof(struct spaceBitmapDesc); /* offset in first block only */
2216         ptr = (uint8_t *)bh->b_data;
2217
2218         while (bytes > 0) {
2219                 u32 cur_bytes = min_t(u32, bytes, sb->s_blocksize - index);
2220                 accum += bitmap_weight((const unsigned long *)(ptr + index),
2221                                         cur_bytes * 8);
2222                 bytes -= cur_bytes;
2223                 if (bytes) {
2224                         brelse(bh);
2225                         newblock = udf_get_lb_pblock(sb, &loc, ++block);
2226                         bh = udf_tread(sb, newblock);
2227                         if (!bh) {
2228                                 udf_debug("read failed\n");
2229                                 goto out;
2230                         }
2231                         index = 0;
2232                         ptr = (uint8_t *)bh->b_data;
2233                 }
2234         }
2235         brelse(bh);
2236
2237 out:
2238         unlock_kernel();
2239
2240         return accum;
2241 }
2242
2243 static unsigned int udf_count_free_table(struct super_block *sb,
2244                                          struct inode *table)
2245 {
2246         unsigned int accum = 0;
2247         uint32_t elen;
2248         struct kernel_lb_addr eloc;
2249         int8_t etype;
2250         struct extent_position epos;
2251
2252         lock_kernel();
2253
2254         epos.block = UDF_I(table)->i_location;
2255         epos.offset = sizeof(struct unallocSpaceEntry);
2256         epos.bh = NULL;
2257
2258         while ((etype = udf_next_aext(table, &epos, &eloc, &elen, 1)) != -1)
2259                 accum += (elen >> table->i_sb->s_blocksize_bits);
2260
2261         brelse(epos.bh);
2262
2263         unlock_kernel();
2264
2265         return accum;
2266 }
2267
2268 static unsigned int udf_count_free(struct super_block *sb)
2269 {
2270         unsigned int accum = 0;
2271         struct udf_sb_info *sbi;
2272         struct udf_part_map *map;
2273
2274         sbi = UDF_SB(sb);
2275         if (sbi->s_lvid_bh) {
2276                 struct logicalVolIntegrityDesc *lvid =
2277                         (struct logicalVolIntegrityDesc *)
2278                         sbi->s_lvid_bh->b_data;
2279                 if (le32_to_cpu(lvid->numOfPartitions) > sbi->s_partition) {
2280                         accum = le32_to_cpu(
2281                                         lvid->freeSpaceTable[sbi->s_partition]);
2282                         if (accum == 0xFFFFFFFF)
2283                                 accum = 0;
2284                 }
2285         }
2286
2287         if (accum)
2288                 return accum;
2289
2290         map = &sbi->s_partmaps[sbi->s_partition];
2291         if (map->s_partition_flags & UDF_PART_FLAG_UNALLOC_BITMAP) {
2292                 accum += udf_count_free_bitmap(sb,
2293                                                map->s_uspace.s_bitmap);
2294         }
2295         if (map->s_partition_flags & UDF_PART_FLAG_FREED_BITMAP) {
2296                 accum += udf_count_free_bitmap(sb,
2297                                                map->s_fspace.s_bitmap);
2298         }
2299         if (accum)
2300                 return accum;
2301
2302         if (map->s_partition_flags & UDF_PART_FLAG_UNALLOC_TABLE) {
2303                 accum += udf_count_free_table(sb,
2304                                               map->s_uspace.s_table);
2305         }
2306         if (map->s_partition_flags & UDF_PART_FLAG_FREED_TABLE) {
2307                 accum += udf_count_free_table(sb,
2308                                               map->s_fspace.s_table);
2309         }
2310
2311         return accum;
2312 }