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