fs/isofs/inode.c

   1 /*
   2  *  linux/fs/isofs/inode.c
   3  *
   4  *  (C) 1991  Linus Torvalds - minix filesystem
   5  *      1992, 1993, 1994  Eric Youngdale Modified for ISO 9660 filesystem.
   6  *      1994  Eberhard Mönkeberg - multi session handling.
   7  *      1995  Mark Dobie - allow mounting of some weird VideoCDs and PhotoCDs.
   8  *      1997  Gordon Chaffee - Joliet CDs
   9  *      1998  Eric Lammerts - ISO 9660 Level 3
  10  *      2004  Paul Serice - Inode Support pushed out from 4GB to 128GB
  11  *      2004  Paul Serice - NFS Export Operations
  12  */
  13
  14 #include <linux/init.h>
  15 #include <linux/module.h>
  16
  17 #include <linux/slab.h>
  18 #include <linux/cred.h>
  19 #include <linux/nls.h>
  20 #include <linux/ctype.h>
  21 #include <linux/statfs.h>
  22 #include <linux/cdrom.h>
  23 #include <linux/parser.h>
  24 #include <linux/mpage.h>
  25 #include <linux/user_namespace.h>
  26 #include <linux/seq_file.h>
  27 #include <linux/blkdev.h>
  28
  29 #include "isofs.h"
  30 #include "zisofs.h"
  31
  32 #define BEQUIET
  33
  34 static int isofs_hashi(const struct dentry *parent, struct qstr *qstr);
  35 static int isofs_dentry_cmpi(const struct dentry *dentry,
  36                 unsigned int len, const char *str, const struct qstr *name);
  37
  38 #ifdef CONFIG_JOLIET
  39 static int isofs_hashi_ms(const struct dentry *parent, struct qstr *qstr);
  40 static int isofs_hash_ms(const struct dentry *parent, struct qstr *qstr);
  41 static int isofs_dentry_cmpi_ms(const struct dentry *dentry,
  42                 unsigned int len, const char *str, const struct qstr *name);
  43 static int isofs_dentry_cmp_ms(const struct dentry *dentry,
  44                 unsigned int len, const char *str, const struct qstr *name);
  45 #endif
  46
  47 static void isofs_put_super(struct super_block *sb)
  48 {
  49         struct isofs_sb_info *sbi = ISOFS_SB(sb);
  50
  51 #ifdef CONFIG_JOLIET
  52         unload_nls(sbi->s_nls_iocharset);
  53 #endif
  54
  55         kfree(sbi);
  56         sb->s_fs_info = NULL;
  57         return;
  58 }
  59
  60 static int isofs_read_inode(struct inode *, int relocated);
  61 static int isofs_statfs (struct dentry *, struct kstatfs *);
  62 static int isofs_show_options(struct seq_file *, struct dentry *);
  63
  64 static struct kmem_cache *isofs_inode_cachep;
  65
  66 static struct inode *isofs_alloc_inode(struct super_block *sb)
  67 {
  68         struct iso_inode_info *ei;
  69         ei = kmem_cache_alloc(isofs_inode_cachep, GFP_KERNEL);
  70         if (!ei)
  71                 return NULL;
  72         return &ei->vfs_inode;
  73 }
  74
  75 static void isofs_i_callback(struct rcu_head *head)
  76 {
  77         struct inode *inode = container_of(head, struct inode, i_rcu);
  78         kmem_cache_free(isofs_inode_cachep, ISOFS_I(inode));
  79 }
  80
  81 static void isofs_destroy_inode(struct inode *inode)
  82 {
  83         call_rcu(&inode->i_rcu, isofs_i_callback);
  84 }
  85
  86 static void init_once(void *foo)
  87 {
  88         struct iso_inode_info *ei = foo;
  89
  90         inode_init_once(&ei->vfs_inode);
  91 }
  92
  93 static int __init init_inodecache(void)
  94 {
  95         isofs_inode_cachep = kmem_cache_create("isofs_inode_cache",
  96                                         sizeof(struct iso_inode_info),
  97                                         0, (SLAB_RECLAIM_ACCOUNT|
  98                                         SLAB_MEM_SPREAD|SLAB_ACCOUNT),
  99                                         init_once);
 100         if (!isofs_inode_cachep)
 101                 return -ENOMEM;
 102         return 0;
 103 }
 104
 105 static void destroy_inodecache(void)
 106 {
 107         /*
 108          * Make sure all delayed rcu free inodes are flushed before we
 109          * destroy cache.
 110          */
 111         rcu_barrier();
 112         kmem_cache_destroy(isofs_inode_cachep);
 113 }
 114
 115 static int isofs_remount(struct super_block *sb, int *flags, char *data)
 116 {
 117         sync_filesystem(sb);
 118         if (!(*flags & SB_RDONLY))
 119                 return -EROFS;
 120         return 0;
 121 }
 122
 123 static const struct super_operations isofs_sops = {
 124         .alloc_inode    = isofs_alloc_inode,
 125         .destroy_inode  = isofs_destroy_inode,
 126         .put_super      = isofs_put_super,
 127         .statfs         = isofs_statfs,
 128         .remount_fs     = isofs_remount,
 129         .show_options   = isofs_show_options,
 130 };
 131
 132
 133 static const struct dentry_operations isofs_dentry_ops[] = {
 134         {
 135                 .d_hash         = isofs_hashi,
 136                 .d_compare      = isofs_dentry_cmpi,
 137         },
 138 #ifdef CONFIG_JOLIET
 139         {
 140                 .d_hash         = isofs_hash_ms,
 141                 .d_compare      = isofs_dentry_cmp_ms,
 142         },
 143         {
 144                 .d_hash         = isofs_hashi_ms,
 145                 .d_compare      = isofs_dentry_cmpi_ms,
 146         },
 147 #endif
 148 };
 149
 150 struct iso9660_options{
 151         unsigned int rock:1;
 152         unsigned int joliet:1;
 153         unsigned int cruft:1;
 154         unsigned int hide:1;
 155         unsigned int showassoc:1;
 156         unsigned int nocompress:1;
 157         unsigned int overriderockperm:1;
 158         unsigned int uid_set:1;
 159         unsigned int gid_set:1;
 160         unsigned char map;
 161         unsigned char check;
 162         unsigned int blocksize;
 163         umode_t fmode;
 164         umode_t dmode;
 165         kgid_t gid;
 166         kuid_t uid;
 167         char *iocharset;
 168         /* LVE */
 169         s32 session;
 170         s32 sbsector;
 171 };
 172
 173 /*
 174  * Compute the hash for the isofs name corresponding to the dentry.
 175  */
 176 static int
 177 isofs_hashi_common(const struct dentry *dentry, struct qstr *qstr, int ms)
 178 {
 179         const char *name;
 180         int len;
 181         char c;
 182         unsigned long hash;
 183
 184         len = qstr->len;
 185         name = qstr->name;
 186         if (ms) {
 187                 while (len && name[len-1] == '.')
 188                         len--;
 189         }
 190
 191         hash = init_name_hash(dentry);
 192         while (len--) {
 193                 c = tolower(*name++);
 194                 hash = partial_name_hash(c, hash);
 195         }
 196         qstr->hash = end_name_hash(hash);
 197
 198         return 0;
 199 }
 200
 201 /*
 202  * Compare of two isofs names.
 203  */
 204 static int isofs_dentry_cmp_common(
 205                 unsigned int len, const char *str,
 206                 const struct qstr *name, int ms, int ci)
 207 {
 208         int alen, blen;
 209
 210         /* A filename cannot end in '.' or we treat it like it has none */
 211         alen = name->len;
 212         blen = len;
 213         if (ms) {
 214                 while (alen && name->name[alen-1] == '.')
 215                         alen--;
 216                 while (blen && str[blen-1] == '.')
 217                         blen--;
 218         }
 219         if (alen == blen) {
 220                 if (ci) {
 221                         if (strncasecmp(name->name, str, alen) == 0)
 222                                 return 0;
 223                 } else {
 224                         if (strncmp(name->name, str, alen) == 0)
 225                                 return 0;
 226                 }
 227         }
 228         return 1;
 229 }
 230
 231 static int
 232 isofs_hashi(const struct dentry *dentry, struct qstr *qstr)
 233 {
 234         return isofs_hashi_common(dentry, qstr, 0);
 235 }
 236
 237 static int
 238 isofs_dentry_cmpi(const struct dentry *dentry,
 239                 unsigned int len, const char *str, const struct qstr *name)
 240 {
 241         return isofs_dentry_cmp_common(len, str, name, 0, 1);
 242 }
 243
 244 #ifdef CONFIG_JOLIET
 245 /*
 246  * Compute the hash for the isofs name corresponding to the dentry.
 247  */
 248 static int
 249 isofs_hash_common(const struct dentry *dentry, struct qstr *qstr, int ms)
 250 {
 251         const char *name;
 252         int len;
 253
 254         len = qstr->len;
 255         name = qstr->name;
 256         if (ms) {
 257                 while (len && name[len-1] == '.')
 258                         len--;
 259         }
 260
 261         qstr->hash = full_name_hash(dentry, name, len);
 262
 263         return 0;
 264 }
 265
 266 static int
 267 isofs_hash_ms(const struct dentry *dentry, struct qstr *qstr)
 268 {
 269         return isofs_hash_common(dentry, qstr, 1);
 270 }
 271
 272 static int
 273 isofs_hashi_ms(const struct dentry *dentry, struct qstr *qstr)
 274 {
 275         return isofs_hashi_common(dentry, qstr, 1);
 276 }
 277
 278 static int
 279 isofs_dentry_cmp_ms(const struct dentry *dentry,
 280                 unsigned int len, const char *str, const struct qstr *name)
 281 {
 282         return isofs_dentry_cmp_common(len, str, name, 1, 0);
 283 }
 284
 285 static int
 286 isofs_dentry_cmpi_ms(const struct dentry *dentry,
 287                 unsigned int len, const char *str, const struct qstr *name)
 288 {
 289         return isofs_dentry_cmp_common(len, str, name, 1, 1);
 290 }
 291 #endif
 292
 293 enum {
 294         Opt_block, Opt_check_r, Opt_check_s, Opt_cruft, Opt_gid, Opt_ignore,
 295         Opt_iocharset, Opt_map_a, Opt_map_n, Opt_map_o, Opt_mode, Opt_nojoliet,
 296         Opt_norock, Opt_sb, Opt_session, Opt_uid, Opt_unhide, Opt_utf8, Opt_err,
 297         Opt_nocompress, Opt_hide, Opt_showassoc, Opt_dmode, Opt_overriderockperm,
 298 };
 299
 300 static const match_table_t tokens = {
 301         {Opt_norock, "norock"},
 302         {Opt_nojoliet, "nojoliet"},
 303         {Opt_unhide, "unhide"},
 304         {Opt_hide, "hide"},
 305         {Opt_showassoc, "showassoc"},
 306         {Opt_cruft, "cruft"},
 307         {Opt_utf8, "utf8"},
 308         {Opt_iocharset, "iocharset=%s"},
 309         {Opt_map_a, "map=acorn"},
 310         {Opt_map_a, "map=a"},
 311         {Opt_map_n, "map=normal"},
 312         {Opt_map_n, "map=n"},
 313         {Opt_map_o, "map=off"},
 314         {Opt_map_o, "map=o"},
 315         {Opt_session, "session=%u"},
 316         {Opt_sb, "sbsector=%u"},
 317         {Opt_check_r, "check=relaxed"},
 318         {Opt_check_r, "check=r"},
 319         {Opt_check_s, "check=strict"},
 320         {Opt_check_s, "check=s"},
 321         {Opt_uid, "uid=%u"},
 322         {Opt_gid, "gid=%u"},
 323         {Opt_mode, "mode=%u"},
 324         {Opt_dmode, "dmode=%u"},
 325         {Opt_overriderockperm, "overriderockperm"},
 326         {Opt_block, "block=%u"},
 327         {Opt_ignore, "conv=binary"},
 328         {Opt_ignore, "conv=b"},
 329         {Opt_ignore, "conv=text"},
 330         {Opt_ignore, "conv=t"},
 331         {Opt_ignore, "conv=mtext"},
 332         {Opt_ignore, "conv=m"},
 333         {Opt_ignore, "conv=auto"},
 334         {Opt_ignore, "conv=a"},
 335         {Opt_nocompress, "nocompress"},
 336         {Opt_err, NULL}
 337 };
 338
 339 static int parse_options(char *options, struct iso9660_options *popt)
 340 {
 341         char *p;
 342         int option;
 343
 344         popt->map = 'n';
 345         popt->rock = 1;
 346         popt->joliet = 1;
 347         popt->cruft = 0;
 348         popt->hide = 0;
 349         popt->showassoc = 0;
 350         popt->check = 'u';              /* unset */
 351         popt->nocompress = 0;
 352         popt->blocksize = 1024;
 353         popt->fmode = popt->dmode = ISOFS_INVALID_MODE;
 354         popt->uid_set = 0;
 355         popt->gid_set = 0;
 356         popt->gid = GLOBAL_ROOT_GID;
 357         popt->uid = GLOBAL_ROOT_UID;
 358         popt->iocharset = NULL;
 359         popt->overriderockperm = 0;
 360         popt->session=-1;
 361         popt->sbsector=-1;
 362         if (!options)
 363                 return 1;
 364
 365         while ((p = strsep(&options, ",")) != NULL) {
 366                 int token;
 367                 substring_t args[MAX_OPT_ARGS];
 368                 unsigned n;
 369
 370                 if (!*p)
 371                         continue;
 372
 373                 token = match_token(p, tokens, args);
 374                 switch (token) {
 375                 case Opt_norock:
 376                         popt->rock = 0;
 377                         break;
 378                 case Opt_nojoliet:
 379                         popt->joliet = 0;
 380                         break;
 381                 case Opt_hide:
 382                         popt->hide = 1;
 383                         break;
 384                 case Opt_unhide:
 385                 case Opt_showassoc:
 386                         popt->showassoc = 1;
 387                         break;
 388                 case Opt_cruft:
 389                         popt->cruft = 1;
 390                         break;
 391 #ifdef CONFIG_JOLIET
 392                 case Opt_utf8:
 393                         kfree(popt->iocharset);
 394                         popt->iocharset = kstrdup("utf8", GFP_KERNEL);
 395                         if (!popt->iocharset)
 396                                 return 0;
 397                         break;
 398                 case Opt_iocharset:
 399                         kfree(popt->iocharset);
 400                         popt->iocharset = match_strdup(&args[0]);
 401                         if (!popt->iocharset)
 402                                 return 0;
 403                         break;
 404 #endif
 405                 case Opt_map_a:
 406                         popt->map = 'a';
 407                         break;
 408                 case Opt_map_o:
 409                         popt->map = 'o';
 410                         break;
 411                 case Opt_map_n:
 412                         popt->map = 'n';
 413                         break;
 414                 case Opt_session:
 415                         if (match_int(&args[0], &option))
 416                                 return 0;
 417                         n = option;
 418                         /*
 419                          * Track numbers are supposed to be in range 1-99, the
 420                          * mount option starts indexing at 0.
 421                          */
 422                         if (n >= 99)
 423                                 return 0;
 424                         popt->session = n + 1;
 425                         break;
 426                 case Opt_sb:
 427                         if (match_int(&args[0], &option))
 428                                 return 0;
 429                         popt->sbsector = option;
 430                         break;
 431                 case Opt_check_r:
 432                         popt->check = 'r';
 433                         break;
 434                 case Opt_check_s:
 435                         popt->check = 's';
 436                         break;
 437                 case Opt_ignore:
 438                         break;
 439                 case Opt_uid:
 440                         if (match_int(&args[0], &option))
 441                                 return 0;
 442                         popt->uid = make_kuid(current_user_ns(), option);
 443                         if (!uid_valid(popt->uid))
 444                                 return 0;
 445                         popt->uid_set = 1;
 446                         break;
 447                 case Opt_gid:
 448                         if (match_int(&args[0], &option))
 449                                 return 0;
 450                         popt->gid = make_kgid(current_user_ns(), option);
 451                         if (!gid_valid(popt->gid))
 452                                 return 0;
 453                         popt->gid_set = 1;
 454                         break;
 455                 case Opt_mode:
 456                         if (match_int(&args[0], &option))
 457                                 return 0;
 458                         popt->fmode = option;
 459                         break;
 460                 case Opt_dmode:
 461                         if (match_int(&args[0], &option))
 462                                 return 0;
 463                         popt->dmode = option;
 464                         break;
 465                 case Opt_overriderockperm:
 466                         popt->overriderockperm = 1;
 467                         break;
 468                 case Opt_block:
 469                         if (match_int(&args[0], &option))
 470                                 return 0;
 471                         n = option;
 472                         if (n != 512 && n != 1024 && n != 2048)
 473                                 return 0;
 474                         popt->blocksize = n;
 475                         break;
 476                 case Opt_nocompress:
 477                         popt->nocompress = 1;
 478                         break;
 479                 default:
 480                         return 0;
 481                 }
 482         }
 483         return 1;
 484 }
 485
 486 /*
 487  * Display the mount options in /proc/mounts.
 488  */
 489 static int isofs_show_options(struct seq_file *m, struct dentry *root)
 490 {
 491         struct isofs_sb_info *sbi = ISOFS_SB(root->d_sb);
 492
 493         if (!sbi->s_rock)               seq_puts(m, ",norock");
 494         else if (!sbi->s_joliet_level)  seq_puts(m, ",nojoliet");
 495         if (sbi->s_cruft)               seq_puts(m, ",cruft");
 496         if (sbi->s_hide)                seq_puts(m, ",hide");
 497         if (sbi->s_nocompress)          seq_puts(m, ",nocompress");
 498         if (sbi->s_overriderockperm)    seq_puts(m, ",overriderockperm");
 499         if (sbi->s_showassoc)           seq_puts(m, ",showassoc");
 500
 501         if (sbi->s_check)               seq_printf(m, ",check=%c", sbi->s_check);
 502         if (sbi->s_mapping)             seq_printf(m, ",map=%c", sbi->s_mapping);
 503         if (sbi->s_session != 255)      seq_printf(m, ",session=%u", sbi->s_session - 1);
 504         if (sbi->s_sbsector != -1)      seq_printf(m, ",sbsector=%u", sbi->s_sbsector);
 505
 506         if (root->d_sb->s_blocksize != 1024)
 507                 seq_printf(m, ",blocksize=%lu", root->d_sb->s_blocksize);
 508
 509         if (sbi->s_uid_set)
 510                 seq_printf(m, ",uid=%u",
 511                            from_kuid_munged(&init_user_ns, sbi->s_uid));
 512         if (sbi->s_gid_set)
 513                 seq_printf(m, ",gid=%u",
 514                            from_kgid_munged(&init_user_ns, sbi->s_gid));
 515
 516         if (sbi->s_dmode != ISOFS_INVALID_MODE)
 517                 seq_printf(m, ",dmode=%o", sbi->s_dmode);
 518         if (sbi->s_fmode != ISOFS_INVALID_MODE)
 519                 seq_printf(m, ",fmode=%o", sbi->s_fmode);
 520
 521 #ifdef CONFIG_JOLIET
 522         if (sbi->s_nls_iocharset)
 523                 seq_printf(m, ",iocharset=%s", sbi->s_nls_iocharset->charset);
 524         else
 525                 seq_puts(m, ",iocharset=utf8");
 526 #endif
 527         return 0;
 528 }
 529
 530 /*
 531  * look if the driver can tell the multi session redirection value
 532  *
 533  * don't change this if you don't know what you do, please!
 534  * Multisession is legal only with XA disks.
 535  * A non-XA disk with more than one volume descriptor may do it right, but
 536  * usually is written in a nowhere standardized "multi-partition" manner.
 537  * Multisession uses absolute addressing (solely the first frame of the whole
 538  * track is #0), multi-partition uses relative addressing (each first frame of
 539  * each track is #0), and a track is not a session.
 540  *
 541  * A broken CDwriter software or drive firmware does not set new standards,
 542  * at least not if conflicting with the existing ones.
 543  *
 544  * emoenke@gwdg.de
 545  */
 546 #define WE_OBEY_THE_WRITTEN_STANDARDS 1
 547
 548 static unsigned int isofs_get_last_session(struct super_block *sb, s32 session)
 549 {
 550         struct cdrom_multisession ms_info;
 551         unsigned int vol_desc_start;
 552         struct block_device *bdev = sb->s_bdev;
 553         int i;
 554
 555         vol_desc_start=0;
 556         ms_info.addr_format=CDROM_LBA;
 557         if (session > 0) {
 558                 struct cdrom_tocentry Te;
 559                 Te.cdte_track=session;
 560                 Te.cdte_format=CDROM_LBA;
 561                 i = ioctl_by_bdev(bdev, CDROMREADTOCENTRY, (unsigned long) &Te);
 562                 if (!i) {
 563                         printk(KERN_DEBUG "ISOFS: Session %d start %d type %d\n",
 564                                 session, Te.cdte_addr.lba,
 565                                 Te.cdte_ctrl&CDROM_DATA_TRACK);
 566                         if ((Te.cdte_ctrl&CDROM_DATA_TRACK) == 4)
 567                                 return Te.cdte_addr.lba;
 568                 }
 569
 570                 printk(KERN_ERR "ISOFS: Invalid session number or type of track\n");
 571         }
 572         i = ioctl_by_bdev(bdev, CDROMMULTISESSION, (unsigned long) &ms_info);
 573         if (session > 0)
 574                 printk(KERN_ERR "ISOFS: Invalid session number\n");
 575 #if 0
 576         printk(KERN_DEBUG "isofs.inode: CDROMMULTISESSION: rc=%d\n",i);
 577         if (i==0) {
 578                 printk(KERN_DEBUG "isofs.inode: XA disk: %s\n",ms_info.xa_flag?"yes":"no");
 579                 printk(KERN_DEBUG "isofs.inode: vol_desc_start = %d\n", ms_info.addr.lba);
 580         }
 581 #endif
 582         if (i==0)
 583 #if WE_OBEY_THE_WRITTEN_STANDARDS
 584                 if (ms_info.xa_flag) /* necessary for a valid ms_info.addr */
 585 #endif
 586                         vol_desc_start=ms_info.addr.lba;
 587         return vol_desc_start;
 588 }
 589
 590 /*
 591  * Check if root directory is empty (has less than 3 files).
 592  *
 593  * Used to detect broken CDs where ISO root directory is empty but Joliet root
 594  * directory is OK. If such CD has Rock Ridge extensions, they will be disabled
 595  * (and Joliet used instead) or else no files would be visible.
 596  */
 597 static bool rootdir_empty(struct super_block *sb, unsigned long block)
 598 {
 599         int offset = 0, files = 0, de_len;
 600         struct iso_directory_record *de;
 601         struct buffer_head *bh;
 602
 603         bh = sb_bread(sb, block);
 604         if (!bh)
 605                 return true;
 606         while (files < 3) {
 607                 de = (struct iso_directory_record *) (bh->b_data + offset);
 608                 de_len = *(unsigned char *) de;
 609                 if (de_len == 0)
 610                         break;
 611                 files++;
 612                 offset += de_len;
 613         }
 614         brelse(bh);
 615         return files < 3;
 616 }
 617
 618 /*
 619  * Initialize the superblock and read the root inode.
 620  *
 621  * Note: a check_disk_change() has been done immediately prior
 622  * to this call, so we don't need to check again.
 623  */
 624 static int isofs_fill_super(struct super_block *s, void *data, int silent)
 625 {
 626         struct buffer_head *bh = NULL, *pri_bh = NULL;
 627         struct hs_primary_descriptor *h_pri = NULL;
 628         struct iso_primary_descriptor *pri = NULL;
 629         struct iso_supplementary_descriptor *sec = NULL;
 630         struct iso_directory_record *rootp;
 631         struct inode *inode;
 632         struct iso9660_options opt;
 633         struct isofs_sb_info *sbi;
 634         unsigned long first_data_zone;
 635         int joliet_level = 0;
 636         int iso_blknum, block;
 637         int orig_zonesize;
 638         int table, error = -EINVAL;
 639         unsigned int vol_desc_start;
 640
 641         sbi = kzalloc(sizeof(*sbi), GFP_KERNEL);
 642         if (!sbi)
 643                 return -ENOMEM;
 644         s->s_fs_info = sbi;
 645
 646         if (!parse_options((char *)data, &opt))
 647                 goto out_freesbi;
 648
 649         /*
 650          * First of all, get the hardware blocksize for this device.
 651          * If we don't know what it is, or the hardware blocksize is
 652          * larger than the blocksize the user specified, then use
 653          * that value.
 654          */
 655         /*
 656          * What if bugger tells us to go beyond page size?
 657          */
 658         if (bdev_logical_block_size(s->s_bdev) > 2048) {
 659                 printk(KERN_WARNING
 660                        "ISOFS: unsupported/invalid hardware sector size %d\n",
 661                         bdev_logical_block_size(s->s_bdev));
 662                 goto out_freesbi;
 663         }
 664         opt.blocksize = sb_min_blocksize(s, opt.blocksize);
 665
 666         sbi->s_high_sierra = 0; /* default is iso9660 */
 667         sbi->s_session = opt.session;
 668         sbi->s_sbsector = opt.sbsector;
 669
 670         vol_desc_start = (opt.sbsector != -1) ?
 671                 opt.sbsector : isofs_get_last_session(s,opt.session);
 672
 673         for (iso_blknum = vol_desc_start+16;
 674                 iso_blknum < vol_desc_start+100; iso_blknum++) {
 675                 struct hs_volume_descriptor *hdp;
 676                 struct iso_volume_descriptor  *vdp;
 677
 678                 block = iso_blknum << (ISOFS_BLOCK_BITS - s->s_blocksize_bits);
 679                 if (!(bh = sb_bread(s, block)))
 680                         goto out_no_read;
 681
 682                 vdp = (struct iso_volume_descriptor *)bh->b_data;
 683                 hdp = (struct hs_volume_descriptor *)bh->b_data;
 684
 685                 /*
 686                  * Due to the overlapping physical location of the descriptors,
 687                  * ISO CDs can match hdp->id==HS_STANDARD_ID as well. To ensure
 688                  * proper identification in this case, we first check for ISO.
 689                  */
 690                 if (strncmp (vdp->id, ISO_STANDARD_ID, sizeof vdp->id) == 0) {
 691                         if (isonum_711(vdp->type) == ISO_VD_END)
 692                                 break;
 693                         if (isonum_711(vdp->type) == ISO_VD_PRIMARY) {
 694                                 if (!pri) {
 695                                         pri = (struct iso_primary_descriptor *)vdp;
 696                                         /* Save the buffer in case we need it ... */
 697                                         pri_bh = bh;
 698                                         bh = NULL;
 699                                 }
 700                         }
 701 #ifdef CONFIG_JOLIET
 702                         else if (isonum_711(vdp->type) == ISO_VD_SUPPLEMENTARY) {
 703                                 sec = (struct iso_supplementary_descriptor *)vdp;
 704                                 if (sec->escape[0] == 0x25 && sec->escape[1] == 0x2f) {
 705                                         if (opt.joliet) {
 706                                                 if (sec->escape[2] == 0x40)
 707                                                         joliet_level = 1;
 708                                                 else if (sec->escape[2] == 0x43)
 709                                                         joliet_level = 2;
 710                                                 else if (sec->escape[2] == 0x45)
 711                                                         joliet_level = 3;
 712
 713                                                 printk(KERN_DEBUG "ISO 9660 Extensions: "
 714                                                         "Microsoft Joliet Level %d\n",
 715                                                         joliet_level);
 716                                         }
 717                                         goto root_found;
 718                                 } else {
 719                                 /* Unknown supplementary volume descriptor */
 720                                 sec = NULL;
 721                                 }
 722                         }
 723 #endif
 724                 } else {
 725                         if (strncmp (hdp->id, HS_STANDARD_ID, sizeof hdp->id) == 0) {
 726                                 if (isonum_711(hdp->type) != ISO_VD_PRIMARY)
 727                                         goto out_freebh;
 728
 729                                 sbi->s_high_sierra = 1;
 730                                 opt.rock = 0;
 731                                 h_pri = (struct hs_primary_descriptor *)vdp;
 732                                 goto root_found;
 733                         }
 734                 }
 735
 736                 /* Just skip any volume descriptors we don't recognize */
 737
 738                 brelse(bh);
 739                 bh = NULL;
 740         }
 741         /*
 742          * If we fall through, either no volume descriptor was found,
 743          * or else we passed a primary descriptor looking for others.
 744          */
 745         if (!pri)
 746                 goto out_unknown_format;
 747         brelse(bh);
 748         bh = pri_bh;
 749         pri_bh = NULL;
 750
 751 root_found:
 752         /* We don't support read-write mounts */
 753         if (!sb_rdonly(s)) {
 754                 error = -EACCES;
 755                 goto out_freebh;
 756         }
 757
 758         if (joliet_level && (!pri || !opt.rock)) {
 759                 /* This is the case of Joliet with the norock mount flag.
 760                  * A disc with both Joliet and Rock Ridge is handled later
 761                  */
 762                 pri = (struct iso_primary_descriptor *) sec;
 763         }
 764
 765         if(sbi->s_high_sierra){
 766                 rootp = (struct iso_directory_record *) h_pri->root_directory_record;
 767                 sbi->s_nzones = isonum_733(h_pri->volume_space_size);
 768                 sbi->s_log_zone_size = isonum_723(h_pri->logical_block_size);
 769                 sbi->s_max_size = isonum_733(h_pri->volume_space_size);
 770         } else {
 771                 if (!pri)
 772                         goto out_freebh;
 773                 rootp = (struct iso_directory_record *) pri->root_directory_record;
 774                 sbi->s_nzones = isonum_733(pri->volume_space_size);
 775                 sbi->s_log_zone_size = isonum_723(pri->logical_block_size);
 776                 sbi->s_max_size = isonum_733(pri->volume_space_size);
 777         }
 778
 779         sbi->s_ninodes = 0; /* No way to figure this out easily */
 780
 781         orig_zonesize = sbi->s_log_zone_size;
 782         /*
 783          * If the zone size is smaller than the hardware sector size,
 784          * this is a fatal error.  This would occur if the disc drive
 785          * had sectors that were 2048 bytes, but the filesystem had
 786          * blocks that were 512 bytes (which should only very rarely
 787          * happen.)
 788          */
 789         if (orig_zonesize < opt.blocksize)
 790                 goto out_bad_size;
 791
 792         /* RDE: convert log zone size to bit shift */
 793         switch (sbi->s_log_zone_size) {
 794         case  512: sbi->s_log_zone_size =  9; break;
 795         case 1024: sbi->s_log_zone_size = 10; break;
 796         case 2048: sbi->s_log_zone_size = 11; break;
 797
 798         default:
 799                 goto out_bad_zone_size;
 800         }
 801
 802         s->s_magic = ISOFS_SUPER_MAGIC;
 803
 804         /*
 805          * With multi-extent files, file size is only limited by the maximum
 806          * size of a file system, which is 8 TB.
 807          */
 808         s->s_maxbytes = 0x80000000000LL;
 809
 810         /* Set this for reference. Its not currently used except on write
 811            which we don't have .. */
 812
 813         first_data_zone = isonum_733(rootp->extent) +
 814                           isonum_711(rootp->ext_attr_length);
 815         sbi->s_firstdatazone = first_data_zone;
 816 #ifndef BEQUIET
 817         printk(KERN_DEBUG "ISOFS: Max size:%ld   Log zone size:%ld\n",
 818                 sbi->s_max_size, 1UL << sbi->s_log_zone_size);
 819         printk(KERN_DEBUG "ISOFS: First datazone:%ld\n", sbi->s_firstdatazone);
 820         if(sbi->s_high_sierra)
 821                 printk(KERN_DEBUG "ISOFS: Disc in High Sierra format.\n");
 822 #endif
 823
 824         /*
 825          * If the Joliet level is set, we _may_ decide to use the
 826          * secondary descriptor, but can't be sure until after we
 827          * read the root inode. But before reading the root inode
 828          * we may need to change the device blocksize, and would
 829          * rather release the old buffer first. So, we cache the
 830          * first_data_zone value from the secondary descriptor.
 831          */
 832         if (joliet_level) {
 833                 pri = (struct iso_primary_descriptor *) sec;
 834                 rootp = (struct iso_directory_record *)
 835                         pri->root_directory_record;
 836                 first_data_zone = isonum_733(rootp->extent) +
 837                                 isonum_711(rootp->ext_attr_length);
 838         }
 839
 840         /*
 841          * We're all done using the volume descriptor, and may need
 842          * to change the device blocksize, so release the buffer now.
 843          */
 844         brelse(pri_bh);
 845         brelse(bh);
 846
 847         /*
 848          * Force the blocksize to 512 for 512 byte sectors.  The file
 849          * read primitives really get it wrong in a bad way if we don't
 850          * do this.
 851          *
 852          * Note - we should never be setting the blocksize to something
 853          * less than the hardware sector size for the device.  If we
 854          * do, we would end up having to read larger buffers and split
 855          * out portions to satisfy requests.
 856          *
 857          * Note2- the idea here is that we want to deal with the optimal
 858          * zonesize in the filesystem.  If we have it set to something less,
 859          * then we have horrible problems with trying to piece together
 860          * bits of adjacent blocks in order to properly read directory
 861          * entries.  By forcing the blocksize in this way, we ensure
 862          * that we will never be required to do this.
 863          */
 864         sb_set_blocksize(s, orig_zonesize);
 865
 866         sbi->s_nls_iocharset = NULL;
 867
 868 #ifdef CONFIG_JOLIET
 869         if (joliet_level) {
 870                 char *p = opt.iocharset ? opt.iocharset : CONFIG_NLS_DEFAULT;
 871                 if (strcmp(p, "utf8") != 0) {
 872                         sbi->s_nls_iocharset = opt.iocharset ?
 873                                 load_nls(opt.iocharset) : load_nls_default();
 874                         if (!sbi->s_nls_iocharset)
 875                                 goto out_freesbi;
 876                 }
 877         }
 878 #endif
 879         s->s_op = &isofs_sops;
 880         s->s_export_op = &isofs_export_ops;
 881         sbi->s_mapping = opt.map;
 882         sbi->s_rock = (opt.rock ? 2 : 0);
 883         sbi->s_rock_offset = -1; /* initial offset, will guess until SP is found*/
 884         sbi->s_cruft = opt.cruft;
 885         sbi->s_hide = opt.hide;
 886         sbi->s_showassoc = opt.showassoc;
 887         sbi->s_uid = opt.uid;
 888         sbi->s_gid = opt.gid;
 889         sbi->s_uid_set = opt.uid_set;
 890         sbi->s_gid_set = opt.gid_set;
 891         sbi->s_nocompress = opt.nocompress;
 892         sbi->s_overriderockperm = opt.overriderockperm;
 893         /*
 894          * It would be incredibly stupid to allow people to mark every file
 895          * on the disk as suid, so we merely allow them to set the default
 896          * permissions.
 897          */
 898         if (opt.fmode != ISOFS_INVALID_MODE)
 899                 sbi->s_fmode = opt.fmode & 0777;
 900         else
 901                 sbi->s_fmode = ISOFS_INVALID_MODE;
 902         if (opt.dmode != ISOFS_INVALID_MODE)
 903                 sbi->s_dmode = opt.dmode & 0777;
 904         else
 905                 sbi->s_dmode = ISOFS_INVALID_MODE;
 906
 907         /*
 908          * Read the root inode, which _may_ result in changing
 909          * the s_rock flag. Once we have the final s_rock value,
 910          * we then decide whether to use the Joliet descriptor.
 911          */
 912         inode = isofs_iget(s, sbi->s_firstdatazone, 0);
 913
 914         /*
 915          * Fix for broken CDs with a corrupt root inode but a correct Joliet
 916          * root directory.
 917          */
 918         if (IS_ERR(inode)) {
 919                 if (joliet_level && sbi->s_firstdatazone != first_data_zone) {
 920                         printk(KERN_NOTICE
 921                                "ISOFS: root inode is unusable. "
 922                                "Disabling Rock Ridge and switching to Joliet.");
 923                         sbi->s_rock = 0;
 924                         inode = NULL;
 925                 } else {
 926                         goto out_no_root;
 927                 }
 928         }
 929
 930         /*
 931          * Fix for broken CDs with Rock Ridge and empty ISO root directory but
 932          * correct Joliet root directory.
 933          */
 934         if (sbi->s_rock == 1 && joliet_level &&
 935                                 rootdir_empty(s, sbi->s_firstdatazone)) {
 936                 printk(KERN_NOTICE
 937                         "ISOFS: primary root directory is empty. "
 938                         "Disabling Rock Ridge and switching to Joliet.");
 939                 sbi->s_rock = 0;
 940         }
 941
 942         /*
 943          * If this disk has both Rock Ridge and Joliet on it, then we
 944          * want to use Rock Ridge by default.  This can be overridden
 945          * by using the norock mount option.  There is still one other
 946          * possibility that is not taken into account: a Rock Ridge
 947          * CD with Unicode names.  Until someone sees such a beast, it
 948          * will not be supported.
 949          */
 950         if (sbi->s_rock == 1) {
 951                 joliet_level = 0;
 952         } else if (joliet_level) {
 953                 sbi->s_rock = 0;
 954                 if (sbi->s_firstdatazone != first_data_zone) {
 955                         sbi->s_firstdatazone = first_data_zone;
 956                         printk(KERN_DEBUG
 957                                 "ISOFS: changing to secondary root\n");
 958                         iput(inode);
 959                         inode = isofs_iget(s, sbi->s_firstdatazone, 0);
 960                         if (IS_ERR(inode))
 961                                 goto out_no_root;
 962                 }
 963         }
 964
 965         if (opt.check == 'u') {
 966                 /* Only Joliet is case insensitive by default */
 967                 if (joliet_level)
 968                         opt.check = 'r';
 969                 else
 970                         opt.check = 's';
 971         }
 972         sbi->s_joliet_level = joliet_level;
 973
 974         /* Make sure the root inode is a directory */
 975         if (!S_ISDIR(inode->i_mode)) {
 976                 printk(KERN_WARNING
 977                         "isofs_fill_super: root inode is not a directory. "
 978                         "Corrupted media?\n");
 979                 goto out_iput;
 980         }
 981
 982         table = 0;
 983         if (joliet_level)
 984                 table += 2;
 985         if (opt.check == 'r')
 986                 table++;
 987         sbi->s_check = opt.check;
 988
 989         if (table)
 990                 s->s_d_op = &isofs_dentry_ops[table - 1];
 991
 992         /* get the root dentry */
 993         s->s_root = d_make_root(inode);
 994         if (!(s->s_root)) {
 995                 error = -ENOMEM;
 996                 goto out_no_inode;
 997         }
 998
 999         kfree(opt.iocharset);
1000
1001         return 0;
1002
1003         /*
1004          * Display error messages and free resources.
1005          */
1006 out_iput:
1007         iput(inode);
1008         goto out_no_inode;
1009 out_no_root:
1010         error = PTR_ERR(inode);
1011         if (error != -ENOMEM)
1012                 printk(KERN_WARNING "%s: get root inode failed\n", __func__);
1013 out_no_inode:
1014 #ifdef CONFIG_JOLIET
1015         unload_nls(sbi->s_nls_iocharset);
1016 #endif
1017         goto out_freesbi;
1018 out_no_read:
1019         printk(KERN_WARNING "%s: bread failed, dev=%s, iso_blknum=%d, block=%d\n",
1020                 __func__, s->s_id, iso_blknum, block);
1021         goto out_freebh;
1022 out_bad_zone_size:
1023         printk(KERN_WARNING "ISOFS: Bad logical zone size %ld\n",
1024                 sbi->s_log_zone_size);
1025         goto out_freebh;
1026 out_bad_size:
1027         printk(KERN_WARNING "ISOFS: Logical zone size(%d) < hardware blocksize(%u)\n",
1028                 orig_zonesize, opt.blocksize);
1029         goto out_freebh;
1030 out_unknown_format:
1031         if (!silent)
1032                 printk(KERN_WARNING "ISOFS: Unable to identify CD-ROM format.\n");
1033
1034 out_freebh:
1035         brelse(bh);
1036         brelse(pri_bh);
1037 out_freesbi:
1038         kfree(opt.iocharset);
1039         kfree(sbi);
1040         s->s_fs_info = NULL;
1041         return error;
1042 }
1043
1044 static int isofs_statfs (struct dentry *dentry, struct kstatfs *buf)
1045 {
1046         struct super_block *sb = dentry->d_sb;
1047         u64 id = huge_encode_dev(sb->s_bdev->bd_dev);
1048
1049         buf->f_type = ISOFS_SUPER_MAGIC;
1050         buf->f_bsize = sb->s_blocksize;
1051         buf->f_blocks = (ISOFS_SB(sb)->s_nzones
1052                 << (ISOFS_SB(sb)->s_log_zone_size - sb->s_blocksize_bits));
1053         buf->f_bfree = 0;
1054         buf->f_bavail = 0;
1055         buf->f_files = ISOFS_SB(sb)->s_ninodes;
1056         buf->f_ffree = 0;
1057         buf->f_fsid.val[0] = (u32)id;
1058         buf->f_fsid.val[1] = (u32)(id >> 32);
1059         buf->f_namelen = NAME_MAX;
1060         return 0;
1061 }
1062
1063 /*
1064  * Get a set of blocks; filling in buffer_heads if already allocated
1065  * or getblk() if they are not.  Returns the number of blocks inserted
1066  * (-ve == error.)
1067  */
1068 int isofs_get_blocks(struct inode *inode, sector_t iblock,
1069                      struct buffer_head **bh, unsigned long nblocks)
1070 {
1071         unsigned long b_off = iblock;
1072         unsigned offset, sect_size;
1073         unsigned int firstext;
1074         unsigned long nextblk, nextoff;
1075         int section, rv, error;
1076         struct iso_inode_info *ei = ISOFS_I(inode);
1077
1078         error = -EIO;
1079         rv = 0;
1080         if (iblock != b_off) {
1081                 printk(KERN_DEBUG "%s: block number too large\n", __func__);
1082                 goto abort;
1083         }
1084
1085
1086         offset = 0;
1087         firstext = ei->i_first_extent;
1088         sect_size = ei->i_section_size >> ISOFS_BUFFER_BITS(inode);
1089         nextblk = ei->i_next_section_block;
1090         nextoff = ei->i_next_section_offset;
1091         section = 0;
1092
1093         while (nblocks) {
1094                 /* If we are *way* beyond the end of the file, print a message.
1095                  * Access beyond the end of the file up to the next page boundary
1096                  * is normal, however because of the way the page cache works.
1097                  * In this case, we just return 0 so that we can properly fill
1098                  * the page with useless information without generating any
1099                  * I/O errors.
1100                  */
1101                 if (b_off > ((inode->i_size + PAGE_SIZE - 1) >> ISOFS_BUFFER_BITS(inode))) {
1102                         printk(KERN_DEBUG "%s: block >= EOF (%lu, %llu)\n",
1103                                 __func__, b_off,
1104                                 (unsigned long long)inode->i_size);
1105                         goto abort;
1106                 }
1107
1108                 /* On the last section, nextblk == 0, section size is likely to
1109                  * exceed sect_size by a partial block, and access beyond the
1110                  * end of the file will reach beyond the section size, too.
1111                  */
1112                 while (nextblk && (b_off >= (offset + sect_size))) {
1113                         struct inode *ninode;
1114
1115                         offset += sect_size;
1116                         ninode = isofs_iget(inode->i_sb, nextblk, nextoff);
1117                         if (IS_ERR(ninode)) {
1118                                 error = PTR_ERR(ninode);
1119                                 goto abort;
1120                         }
1121                         firstext  = ISOFS_I(ninode)->i_first_extent;
1122                         sect_size = ISOFS_I(ninode)->i_section_size >> ISOFS_BUFFER_BITS(ninode);
1123                         nextblk   = ISOFS_I(ninode)->i_next_section_block;
1124                         nextoff   = ISOFS_I(ninode)->i_next_section_offset;
1125                         iput(ninode);
1126
1127                         if (++section > 100) {
1128                                 printk(KERN_DEBUG "%s: More than 100 file sections ?!?"
1129                                         " aborting...\n", __func__);
1130                                 printk(KERN_DEBUG "%s: block=%lu firstext=%u sect_size=%u "
1131                                         "nextblk=%lu nextoff=%lu\n", __func__,
1132                                         b_off, firstext, (unsigned) sect_size,
1133                                         nextblk, nextoff);
1134                                 goto abort;
1135                         }
1136                 }
1137
1138                 if (*bh) {
1139                         map_bh(*bh, inode->i_sb, firstext + b_off - offset);
1140                 } else {
1141                         *bh = sb_getblk(inode->i_sb, firstext+b_off-offset);
1142                         if (!*bh)
1143                                 goto abort;
1144                 }
1145                 bh++;   /* Next buffer head */
1146                 b_off++;        /* Next buffer offset */
1147                 nblocks--;
1148                 rv++;
1149         }
1150
1151         error = 0;
1152 abort:
1153         return rv != 0 ? rv : error;
1154 }
1155
1156 /*
1157  * Used by the standard interfaces.
1158  */
1159 static int isofs_get_block(struct inode *inode, sector_t iblock,
1160                     struct buffer_head *bh_result, int create)
1161 {
1162         int ret;
1163
1164         if (create) {
1165                 printk(KERN_DEBUG "%s: Kernel tries to allocate a block\n", __func__);
1166                 return -EROFS;
1167         }
1168
1169         ret = isofs_get_blocks(inode, iblock, &bh_result, 1);
1170         return ret < 0 ? ret : 0;
1171 }
1172
1173 static int isofs_bmap(struct inode *inode, sector_t block)
1174 {
1175         struct buffer_head dummy;
1176         int error;
1177
1178         dummy.b_state = 0;
1179         dummy.b_blocknr = -1000;
1180         error = isofs_get_block(inode, block, &dummy, 0);
1181         if (!error)
1182                 return dummy.b_blocknr;
1183         return 0;
1184 }
1185
1186 struct buffer_head *isofs_bread(struct inode *inode, sector_t block)
1187 {
1188         sector_t blknr = isofs_bmap(inode, block);
1189         if (!blknr)
1190                 return NULL;
1191         return sb_bread(inode->i_sb, blknr);
1192 }
1193
1194 static int isofs_readpage(struct file *file, struct page *page)
1195 {
1196         return mpage_readpage(page, isofs_get_block);
1197 }
1198
1199 static int isofs_readpages(struct file *file, struct address_space *mapping,
1200                         struct list_head *pages, unsigned nr_pages)
1201 {
1202         return mpage_readpages(mapping, pages, nr_pages, isofs_get_block);
1203 }
1204
1205 static sector_t _isofs_bmap(struct address_space *mapping, sector_t block)
1206 {
1207         return generic_block_bmap(mapping,block,isofs_get_block);
1208 }
1209
1210 static const struct address_space_operations isofs_aops = {
1211         .readpage = isofs_readpage,
1212         .readpages = isofs_readpages,
1213         .bmap = _isofs_bmap
1214 };
1215
1216 static int isofs_read_level3_size(struct inode *inode)
1217 {
1218         unsigned long bufsize = ISOFS_BUFFER_SIZE(inode);
1219         int high_sierra = ISOFS_SB(inode->i_sb)->s_high_sierra;
1220         struct buffer_head *bh = NULL;
1221         unsigned long block, offset, block_saved, offset_saved;
1222         int i = 0;
1223         int more_entries = 0;
1224         struct iso_directory_record *tmpde = NULL;
1225         struct iso_inode_info *ei = ISOFS_I(inode);
1226
1227         inode->i_size = 0;
1228
1229         /* The first 16 blocks are reserved as the System Area.  Thus,
1230          * no inodes can appear in block 0.  We use this to flag that
1231          * this is the last section. */
1232         ei->i_next_section_block = 0;
1233         ei->i_next_section_offset = 0;
1234
1235         block = ei->i_iget5_block;
1236         offset = ei->i_iget5_offset;
1237
1238         do {
1239                 struct iso_directory_record *de;
1240                 unsigned int de_len;
1241
1242                 if (!bh) {
1243                         bh = sb_bread(inode->i_sb, block);
1244                         if (!bh)
1245                                 goto out_noread;
1246                 }
1247                 de = (struct iso_directory_record *) (bh->b_data + offset);
1248                 de_len = *(unsigned char *) de;
1249
1250                 if (de_len == 0) {
1251                         brelse(bh);
1252                         bh = NULL;
1253                         ++block;
1254                         offset = 0;
1255                         continue;
1256                 }
1257
1258                 block_saved = block;
1259                 offset_saved = offset;
1260                 offset += de_len;
1261
1262                 /* Make sure we have a full directory entry */
1263                 if (offset >= bufsize) {
1264                         int slop = bufsize - offset + de_len;
1265                         if (!tmpde) {
1266                                 tmpde = kmalloc(256, GFP_KERNEL);
1267                                 if (!tmpde)
1268                                         goto out_nomem;
1269                         }
1270                         memcpy(tmpde, de, slop);
1271                         offset &= bufsize - 1;
1272                         block++;
1273                         brelse(bh);
1274                         bh = NULL;
1275                         if (offset) {
1276                                 bh = sb_bread(inode->i_sb, block);
1277                                 if (!bh)
1278                                         goto out_noread;
1279                                 memcpy((void *)tmpde+slop, bh->b_data, offset);
1280                         }
1281                         de = tmpde;
1282                 }
1283
1284                 inode->i_size += isonum_733(de->size);
1285                 if (i == 1) {
1286                         ei->i_next_section_block = block_saved;
1287                         ei->i_next_section_offset = offset_saved;
1288                 }
1289
1290                 more_entries = de->flags[-high_sierra] & 0x80;
1291
1292                 i++;
1293                 if (i > 100)
1294                         goto out_toomany;
1295         } while (more_entries);
1296 out:
1297         kfree(tmpde);
1298         if (bh)
1299                 brelse(bh);
1300         return 0;
1301
1302 out_nomem:
1303         if (bh)
1304                 brelse(bh);
1305         return -ENOMEM;
1306
1307 out_noread:
1308         printk(KERN_INFO "ISOFS: unable to read i-node block %lu\n", block);
1309         kfree(tmpde);
1310         return -EIO;
1311
1312 out_toomany:
1313         printk(KERN_INFO "%s: More than 100 file sections ?!?, aborting...\n"
1314                 "isofs_read_level3_size: inode=%lu\n",
1315                 __func__, inode->i_ino);
1316         goto out;
1317 }
1318
1319 static int isofs_read_inode(struct inode *inode, int relocated)
1320 {
1321         struct super_block *sb = inode->i_sb;
1322         struct isofs_sb_info *sbi = ISOFS_SB(sb);
1323         unsigned long bufsize = ISOFS_BUFFER_SIZE(inode);
1324         unsigned long block;
1325         int high_sierra = sbi->s_high_sierra;
1326         struct buffer_head *bh;
1327         struct iso_directory_record *de;
1328         struct iso_directory_record *tmpde = NULL;
1329         unsigned int de_len;
1330         unsigned long offset;
1331         struct iso_inode_info *ei = ISOFS_I(inode);
1332         int ret = -EIO;
1333
1334         block = ei->i_iget5_block;
1335         bh = sb_bread(inode->i_sb, block);
1336         if (!bh)
1337                 goto out_badread;
1338
1339         offset = ei->i_iget5_offset;
1340
1341         de = (struct iso_directory_record *) (bh->b_data + offset);
1342         de_len = *(unsigned char *) de;
1343         if (de_len < sizeof(struct iso_directory_record))
1344                 goto fail;
1345
1346         if (offset + de_len > bufsize) {
1347                 int frag1 = bufsize - offset;
1348
1349                 tmpde = kmalloc(de_len, GFP_KERNEL);
1350                 if (!tmpde) {
1351                         ret = -ENOMEM;
1352                         goto fail;
1353                 }
1354                 memcpy(tmpde, bh->b_data + offset, frag1);
1355                 brelse(bh);
1356                 bh = sb_bread(inode->i_sb, ++block);
1357                 if (!bh)
1358                         goto out_badread;
1359                 memcpy((char *)tmpde+frag1, bh->b_data, de_len - frag1);
1360                 de = tmpde;
1361         }
1362
1363         inode->i_ino = isofs_get_ino(ei->i_iget5_block,
1364                                         ei->i_iget5_offset,
1365                                         ISOFS_BUFFER_BITS(inode));
1366
1367         /* Assume it is a normal-format file unless told otherwise */
1368         ei->i_file_format = isofs_file_normal;
1369
1370         if (de->flags[-high_sierra] & 2) {
1371                 if (sbi->s_dmode != ISOFS_INVALID_MODE)
1372                         inode->i_mode = S_IFDIR | sbi->s_dmode;
1373                 else
1374                         inode->i_mode = S_IFDIR | S_IRUGO | S_IXUGO;
1375                 set_nlink(inode, 1);    /*
1376                                          * Set to 1.  We know there are 2, but
1377                                          * the find utility tries to optimize
1378                                          * if it is 2, and it screws up.  It is
1379                                          * easier to give 1 which tells find to
1380                                          * do it the hard way.
1381                                          */
1382         } else {
1383                 if (sbi->s_fmode != ISOFS_INVALID_MODE) {
1384                         inode->i_mode = S_IFREG | sbi->s_fmode;
1385                 } else {
1386                         /*
1387                          * Set default permissions: r-x for all.  The disc
1388                          * could be shared with DOS machines so virtually
1389                          * anything could be a valid executable.
1390                          */
1391                         inode->i_mode = S_IFREG | S_IRUGO | S_IXUGO;
1392                 }
1393                 set_nlink(inode, 1);
1394         }
1395         inode->i_uid = sbi->s_uid;
1396         inode->i_gid = sbi->s_gid;
1397         inode->i_blocks = 0;
1398
1399         ei->i_format_parm[0] = 0;
1400         ei->i_format_parm[1] = 0;
1401         ei->i_format_parm[2] = 0;
1402
1403         ei->i_section_size = isonum_733(de->size);
1404         if (de->flags[-high_sierra] & 0x80) {
1405                 ret = isofs_read_level3_size(inode);
1406                 if (ret < 0)
1407                         goto fail;
1408                 ret = -EIO;
1409         } else {
1410                 ei->i_next_section_block = 0;
1411                 ei->i_next_section_offset = 0;
1412                 inode->i_size = isonum_733(de->size);
1413         }
1414
1415         /*
1416          * Some dipshit decided to store some other bit of information
1417          * in the high byte of the file length.  Truncate size in case
1418          * this CDROM was mounted with the cruft option.
1419          */
1420
1421         if (sbi->s_cruft)
1422                 inode->i_size &= 0x00ffffff;
1423
1424         if (de->interleave[0]) {
1425                 printk(KERN_DEBUG "ISOFS: Interleaved files not (yet) supported.\n");
1426                 inode->i_size = 0;
1427         }
1428
1429         /* I have no idea what file_unit_size is used for, so
1430            we will flag it for now */
1431         if (de->file_unit_size[0] != 0) {
1432                 printk(KERN_DEBUG "ISOFS: File unit size != 0 for ISO file (%ld).\n",
1433                         inode->i_ino);
1434         }
1435
1436         /* I have no idea what other flag bits are used for, so
1437            we will flag it for now */
1438 #ifdef DEBUG
1439         if((de->flags[-high_sierra] & ~2)!= 0){
1440                 printk(KERN_DEBUG "ISOFS: Unusual flag settings for ISO file "
1441                                 "(%ld %x).\n",
1442                         inode->i_ino, de->flags[-high_sierra]);
1443         }
1444 #endif
1445
1446         inode->i_mtime.tv_sec =
1447         inode->i_atime.tv_sec =
1448         inode->i_ctime.tv_sec = iso_date(de->date, high_sierra);
1449         inode->i_mtime.tv_nsec =
1450         inode->i_atime.tv_nsec =
1451         inode->i_ctime.tv_nsec = 0;
1452
1453         ei->i_first_extent = (isonum_733(de->extent) +
1454                         isonum_711(de->ext_attr_length));
1455
1456         /* Set the number of blocks for stat() - should be done before RR */
1457         inode->i_blocks = (inode->i_size + 511) >> 9;
1458
1459         /*
1460          * Now test for possible Rock Ridge extensions which will override
1461          * some of these numbers in the inode structure.
1462          */
1463
1464         if (!high_sierra) {
1465                 parse_rock_ridge_inode(de, inode, relocated);
1466                 /* if we want uid/gid set, override the rock ridge setting */
1467                 if (sbi->s_uid_set)
1468                         inode->i_uid = sbi->s_uid;
1469                 if (sbi->s_gid_set)
1470                         inode->i_gid = sbi->s_gid;
1471         }
1472         /* Now set final access rights if overriding rock ridge setting */
1473         if (S_ISDIR(inode->i_mode) && sbi->s_overriderockperm &&
1474             sbi->s_dmode != ISOFS_INVALID_MODE)
1475                 inode->i_mode = S_IFDIR | sbi->s_dmode;
1476         if (S_ISREG(inode->i_mode) && sbi->s_overriderockperm &&
1477             sbi->s_fmode != ISOFS_INVALID_MODE)
1478                 inode->i_mode = S_IFREG | sbi->s_fmode;
1479
1480         /* Install the inode operations vector */
1481         if (S_ISREG(inode->i_mode)) {
1482                 inode->i_fop = &generic_ro_fops;
1483                 switch (ei->i_file_format) {
1484 #ifdef CONFIG_ZISOFS
1485                 case isofs_file_compressed:
1486                         inode->i_data.a_ops = &zisofs_aops;
1487                         break;
1488 #endif
1489                 default:
1490                         inode->i_data.a_ops = &isofs_aops;
1491                         break;
1492                 }
1493         } else if (S_ISDIR(inode->i_mode)) {
1494                 inode->i_op = &isofs_dir_inode_operations;
1495                 inode->i_fop = &isofs_dir_operations;
1496         } else if (S_ISLNK(inode->i_mode)) {
1497                 inode->i_op = &page_symlink_inode_operations;
1498                 inode_nohighmem(inode);
1499                 inode->i_data.a_ops = &isofs_symlink_aops;
1500         } else
1501                 /* XXX - parse_rock_ridge_inode() had already set i_rdev. */
1502                 init_special_inode(inode, inode->i_mode, inode->i_rdev);
1503
1504         ret = 0;
1505 out:
1506         kfree(tmpde);
1507         if (bh)
1508                 brelse(bh);
1509         return ret;
1510
1511 out_badread:
1512         printk(KERN_WARNING "ISOFS: unable to read i-node block\n");
1513 fail:
1514         goto out;
1515 }
1516
1517 struct isofs_iget5_callback_data {
1518         unsigned long block;
1519         unsigned long offset;
1520 };
1521
1522 static int isofs_iget5_test(struct inode *ino, void *data)
1523 {
1524         struct iso_inode_info *i = ISOFS_I(ino);
1525         struct isofs_iget5_callback_data *d =
1526                 (struct isofs_iget5_callback_data*)data;
1527         return (i->i_iget5_block == d->block)
1528                 && (i->i_iget5_offset == d->offset);
1529 }
1530
1531 static int isofs_iget5_set(struct inode *ino, void *data)
1532 {
1533         struct iso_inode_info *i = ISOFS_I(ino);
1534         struct isofs_iget5_callback_data *d =
1535                 (struct isofs_iget5_callback_data*)data;
1536         i->i_iget5_block = d->block;
1537         i->i_iget5_offset = d->offset;
1538         return 0;
1539 }
1540
1541 /* Store, in the inode's containing structure, the block and block
1542  * offset that point to the underlying meta-data for the inode.  The
1543  * code below is otherwise similar to the iget() code in
1544  * include/linux/fs.h */
1545 struct inode *__isofs_iget(struct super_block *sb,
1546                            unsigned long block,
1547                            unsigned long offset,
1548                            int relocated)
1549 {
1550         unsigned long hashval;
1551         struct inode *inode;
1552         struct isofs_iget5_callback_data data;
1553         long ret;
1554
1555         if (offset >= 1ul << sb->s_blocksize_bits)
1556                 return ERR_PTR(-EINVAL);
1557
1558         data.block = block;
1559         data.offset = offset;
1560
1561         hashval = (block << sb->s_blocksize_bits) | offset;
1562
1563         inode = iget5_locked(sb, hashval, &isofs_iget5_test,
1564                                 &isofs_iget5_set, &data);
1565
1566         if (!inode)
1567                 return ERR_PTR(-ENOMEM);
1568
1569         if (inode->i_state & I_NEW) {
1570                 ret = isofs_read_inode(inode, relocated);
1571                 if (ret < 0) {
1572                         iget_failed(inode);
1573                         inode = ERR_PTR(ret);
1574                 } else {
1575                         unlock_new_inode(inode);
1576                 }
1577         }
1578
1579         return inode;
1580 }
1581
1582 static struct dentry *isofs_mount(struct file_system_type *fs_type,
1583         int flags, const char *dev_name, void *data)
1584 {
1585         return mount_bdev(fs_type, flags, dev_name, data, isofs_fill_super);
1586 }
1587
1588 static struct file_system_type iso9660_fs_type = {
1589         .owner          = THIS_MODULE,
1590         .name           = "iso9660",
1591         .mount          = isofs_mount,
1592         .kill_sb        = kill_block_super,
1593         .fs_flags       = FS_REQUIRES_DEV,
1594 };
1595 MODULE_ALIAS_FS("iso9660");
1596 MODULE_ALIAS("iso9660");
1597
1598 static int __init init_iso9660_fs(void)
1599 {
1600         int err = init_inodecache();
1601         if (err)
1602                 goto out;
1603 #ifdef CONFIG_ZISOFS
1604         err = zisofs_init();
1605         if (err)
1606                 goto out1;
1607 #endif
1608         err = register_filesystem(&iso9660_fs_type);
1609         if (err)
1610                 goto out2;
1611         return 0;
1612 out2:
1613 #ifdef CONFIG_ZISOFS
1614         zisofs_cleanup();
1615 out1:
1616 #endif
1617         destroy_inodecache();
1618 out:
1619         return err;
1620 }
1621
1622 static void __exit exit_iso9660_fs(void)
1623 {
1624         unregister_filesystem(&iso9660_fs_type);
1625 #ifdef CONFIG_ZISOFS
1626         zisofs_cleanup();
1627 #endif
1628         destroy_inodecache();
1629 }
1630
1631 module_init(init_iso9660_fs)
1632 module_exit(exit_iso9660_fs)
1633 MODULE_LICENSE("GPL");