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 
isofs_put_super(struct super_block * sb)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 
isofs_alloc_inode(struct super_block * sb)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 
isofs_i_callback(struct rcu_head * head)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 
isofs_destroy_inode(struct inode * inode)81 static void isofs_destroy_inode(struct inode *inode)
82 {
83 	call_rcu(&inode->i_rcu, isofs_i_callback);
84 }
85 
init_once(void * foo)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 
init_inodecache(void)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 
destroy_inodecache(void)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 
isofs_remount(struct super_block * sb,int * flags,char * data)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
isofs_hashi_common(const struct dentry * dentry,struct qstr * qstr,int ms)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  */
isofs_dentry_cmp_common(unsigned int len,const char * str,const struct qstr * name,int ms,int ci)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
isofs_hashi(const struct dentry * dentry,struct qstr * qstr)232 isofs_hashi(const struct dentry *dentry, struct qstr *qstr)
233 {
234 	return isofs_hashi_common(dentry, qstr, 0);
235 }
236 
237 static int
isofs_dentry_cmpi(const struct dentry * dentry,unsigned int len,const char * str,const struct qstr * name)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
isofs_hash_common(const struct dentry * dentry,struct qstr * qstr,int ms)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
isofs_hash_ms(const struct dentry * dentry,struct qstr * qstr)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
isofs_hashi_ms(const struct dentry * dentry,struct qstr * qstr)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
isofs_dentry_cmp_ms(const struct dentry * dentry,unsigned int len,const char * str,const struct qstr * name)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
isofs_dentry_cmpi_ms(const struct dentry * dentry,unsigned int len,const char * str,const struct qstr * name)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 
parse_options(char * options,struct iso9660_options * popt)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  */
isofs_show_options(struct seq_file * m,struct dentry * root)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 
isofs_get_last_session(struct super_block * sb,s32 session)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  */
rootdir_empty(struct super_block * sb,unsigned long block)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  */
isofs_fill_super(struct super_block * s,void * data,int silent)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 	if (IS_ERR(inode))
914 		goto out_no_root;
915 
916 	/*
917 	 * Fix for broken CDs with Rock Ridge and empty ISO root directory but
918 	 * correct Joliet root directory.
919 	 */
920 	if (sbi->s_rock == 1 && joliet_level &&
921 				rootdir_empty(s, sbi->s_firstdatazone)) {
922 		printk(KERN_NOTICE
923 			"ISOFS: primary root directory is empty. "
924 			"Disabling Rock Ridge and switching to Joliet.");
925 		sbi->s_rock = 0;
926 	}
927 
928 	/*
929 	 * If this disk has both Rock Ridge and Joliet on it, then we
930 	 * want to use Rock Ridge by default.  This can be overridden
931 	 * by using the norock mount option.  There is still one other
932 	 * possibility that is not taken into account: a Rock Ridge
933 	 * CD with Unicode names.  Until someone sees such a beast, it
934 	 * will not be supported.
935 	 */
936 	if (sbi->s_rock == 1) {
937 		joliet_level = 0;
938 	} else if (joliet_level) {
939 		sbi->s_rock = 0;
940 		if (sbi->s_firstdatazone != first_data_zone) {
941 			sbi->s_firstdatazone = first_data_zone;
942 			printk(KERN_DEBUG
943 				"ISOFS: changing to secondary root\n");
944 			iput(inode);
945 			inode = isofs_iget(s, sbi->s_firstdatazone, 0);
946 			if (IS_ERR(inode))
947 				goto out_no_root;
948 		}
949 	}
950 
951 	if (opt.check == 'u') {
952 		/* Only Joliet is case insensitive by default */
953 		if (joliet_level)
954 			opt.check = 'r';
955 		else
956 			opt.check = 's';
957 	}
958 	sbi->s_joliet_level = joliet_level;
959 
960 	/* Make sure the root inode is a directory */
961 	if (!S_ISDIR(inode->i_mode)) {
962 		printk(KERN_WARNING
963 			"isofs_fill_super: root inode is not a directory. "
964 			"Corrupted media?\n");
965 		goto out_iput;
966 	}
967 
968 	table = 0;
969 	if (joliet_level)
970 		table += 2;
971 	if (opt.check == 'r')
972 		table++;
973 	sbi->s_check = opt.check;
974 
975 	if (table)
976 		s->s_d_op = &isofs_dentry_ops[table - 1];
977 
978 	/* get the root dentry */
979 	s->s_root = d_make_root(inode);
980 	if (!(s->s_root)) {
981 		error = -ENOMEM;
982 		goto out_no_inode;
983 	}
984 
985 	kfree(opt.iocharset);
986 
987 	return 0;
988 
989 	/*
990 	 * Display error messages and free resources.
991 	 */
992 out_iput:
993 	iput(inode);
994 	goto out_no_inode;
995 out_no_root:
996 	error = PTR_ERR(inode);
997 	if (error != -ENOMEM)
998 		printk(KERN_WARNING "%s: get root inode failed\n", __func__);
999 out_no_inode:
1000 #ifdef CONFIG_JOLIET
1001 	unload_nls(sbi->s_nls_iocharset);
1002 #endif
1003 	goto out_freesbi;
1004 out_no_read:
1005 	printk(KERN_WARNING "%s: bread failed, dev=%s, iso_blknum=%d, block=%d\n",
1006 		__func__, s->s_id, iso_blknum, block);
1007 	goto out_freebh;
1008 out_bad_zone_size:
1009 	printk(KERN_WARNING "ISOFS: Bad logical zone size %ld\n",
1010 		sbi->s_log_zone_size);
1011 	goto out_freebh;
1012 out_bad_size:
1013 	printk(KERN_WARNING "ISOFS: Logical zone size(%d) < hardware blocksize(%u)\n",
1014 		orig_zonesize, opt.blocksize);
1015 	goto out_freebh;
1016 out_unknown_format:
1017 	if (!silent)
1018 		printk(KERN_WARNING "ISOFS: Unable to identify CD-ROM format.\n");
1019 
1020 out_freebh:
1021 	brelse(bh);
1022 	brelse(pri_bh);
1023 out_freesbi:
1024 	kfree(opt.iocharset);
1025 	kfree(sbi);
1026 	s->s_fs_info = NULL;
1027 	return error;
1028 }
1029 
isofs_statfs(struct dentry * dentry,struct kstatfs * buf)1030 static int isofs_statfs (struct dentry *dentry, struct kstatfs *buf)
1031 {
1032 	struct super_block *sb = dentry->d_sb;
1033 	u64 id = huge_encode_dev(sb->s_bdev->bd_dev);
1034 
1035 	buf->f_type = ISOFS_SUPER_MAGIC;
1036 	buf->f_bsize = sb->s_blocksize;
1037 	buf->f_blocks = (ISOFS_SB(sb)->s_nzones
1038 		<< (ISOFS_SB(sb)->s_log_zone_size - sb->s_blocksize_bits));
1039 	buf->f_bfree = 0;
1040 	buf->f_bavail = 0;
1041 	buf->f_files = ISOFS_SB(sb)->s_ninodes;
1042 	buf->f_ffree = 0;
1043 	buf->f_fsid.val[0] = (u32)id;
1044 	buf->f_fsid.val[1] = (u32)(id >> 32);
1045 	buf->f_namelen = NAME_MAX;
1046 	return 0;
1047 }
1048 
1049 /*
1050  * Get a set of blocks; filling in buffer_heads if already allocated
1051  * or getblk() if they are not.  Returns the number of blocks inserted
1052  * (-ve == error.)
1053  */
isofs_get_blocks(struct inode * inode,sector_t iblock,struct buffer_head ** bh,unsigned long nblocks)1054 int isofs_get_blocks(struct inode *inode, sector_t iblock,
1055 		     struct buffer_head **bh, unsigned long nblocks)
1056 {
1057 	unsigned long b_off = iblock;
1058 	unsigned offset, sect_size;
1059 	unsigned int firstext;
1060 	unsigned long nextblk, nextoff;
1061 	int section, rv, error;
1062 	struct iso_inode_info *ei = ISOFS_I(inode);
1063 
1064 	error = -EIO;
1065 	rv = 0;
1066 	if (iblock != b_off) {
1067 		printk(KERN_DEBUG "%s: block number too large\n", __func__);
1068 		goto abort;
1069 	}
1070 
1071 
1072 	offset = 0;
1073 	firstext = ei->i_first_extent;
1074 	sect_size = ei->i_section_size >> ISOFS_BUFFER_BITS(inode);
1075 	nextblk = ei->i_next_section_block;
1076 	nextoff = ei->i_next_section_offset;
1077 	section = 0;
1078 
1079 	while (nblocks) {
1080 		/* If we are *way* beyond the end of the file, print a message.
1081 		 * Access beyond the end of the file up to the next page boundary
1082 		 * is normal, however because of the way the page cache works.
1083 		 * In this case, we just return 0 so that we can properly fill
1084 		 * the page with useless information without generating any
1085 		 * I/O errors.
1086 		 */
1087 		if (b_off > ((inode->i_size + PAGE_SIZE - 1) >> ISOFS_BUFFER_BITS(inode))) {
1088 			printk(KERN_DEBUG "%s: block >= EOF (%lu, %llu)\n",
1089 				__func__, b_off,
1090 				(unsigned long long)inode->i_size);
1091 			goto abort;
1092 		}
1093 
1094 		/* On the last section, nextblk == 0, section size is likely to
1095 		 * exceed sect_size by a partial block, and access beyond the
1096 		 * end of the file will reach beyond the section size, too.
1097 		 */
1098 		while (nextblk && (b_off >= (offset + sect_size))) {
1099 			struct inode *ninode;
1100 
1101 			offset += sect_size;
1102 			ninode = isofs_iget(inode->i_sb, nextblk, nextoff);
1103 			if (IS_ERR(ninode)) {
1104 				error = PTR_ERR(ninode);
1105 				goto abort;
1106 			}
1107 			firstext  = ISOFS_I(ninode)->i_first_extent;
1108 			sect_size = ISOFS_I(ninode)->i_section_size >> ISOFS_BUFFER_BITS(ninode);
1109 			nextblk   = ISOFS_I(ninode)->i_next_section_block;
1110 			nextoff   = ISOFS_I(ninode)->i_next_section_offset;
1111 			iput(ninode);
1112 
1113 			if (++section > 100) {
1114 				printk(KERN_DEBUG "%s: More than 100 file sections ?!?"
1115 					" aborting...\n", __func__);
1116 				printk(KERN_DEBUG "%s: block=%lu firstext=%u sect_size=%u "
1117 					"nextblk=%lu nextoff=%lu\n", __func__,
1118 					b_off, firstext, (unsigned) sect_size,
1119 					nextblk, nextoff);
1120 				goto abort;
1121 			}
1122 		}
1123 
1124 		if (*bh) {
1125 			map_bh(*bh, inode->i_sb, firstext + b_off - offset);
1126 		} else {
1127 			*bh = sb_getblk(inode->i_sb, firstext+b_off-offset);
1128 			if (!*bh)
1129 				goto abort;
1130 		}
1131 		bh++;	/* Next buffer head */
1132 		b_off++;	/* Next buffer offset */
1133 		nblocks--;
1134 		rv++;
1135 	}
1136 
1137 	error = 0;
1138 abort:
1139 	return rv != 0 ? rv : error;
1140 }
1141 
1142 /*
1143  * Used by the standard interfaces.
1144  */
isofs_get_block(struct inode * inode,sector_t iblock,struct buffer_head * bh_result,int create)1145 static int isofs_get_block(struct inode *inode, sector_t iblock,
1146 		    struct buffer_head *bh_result, int create)
1147 {
1148 	int ret;
1149 
1150 	if (create) {
1151 		printk(KERN_DEBUG "%s: Kernel tries to allocate a block\n", __func__);
1152 		return -EROFS;
1153 	}
1154 
1155 	ret = isofs_get_blocks(inode, iblock, &bh_result, 1);
1156 	return ret < 0 ? ret : 0;
1157 }
1158 
isofs_bmap(struct inode * inode,sector_t block)1159 static int isofs_bmap(struct inode *inode, sector_t block)
1160 {
1161 	struct buffer_head dummy;
1162 	int error;
1163 
1164 	dummy.b_state = 0;
1165 	dummy.b_blocknr = -1000;
1166 	error = isofs_get_block(inode, block, &dummy, 0);
1167 	if (!error)
1168 		return dummy.b_blocknr;
1169 	return 0;
1170 }
1171 
isofs_bread(struct inode * inode,sector_t block)1172 struct buffer_head *isofs_bread(struct inode *inode, sector_t block)
1173 {
1174 	sector_t blknr = isofs_bmap(inode, block);
1175 	if (!blknr)
1176 		return NULL;
1177 	return sb_bread(inode->i_sb, blknr);
1178 }
1179 
isofs_readpage(struct file * file,struct page * page)1180 static int isofs_readpage(struct file *file, struct page *page)
1181 {
1182 	return mpage_readpage(page, isofs_get_block);
1183 }
1184 
isofs_readpages(struct file * file,struct address_space * mapping,struct list_head * pages,unsigned nr_pages)1185 static int isofs_readpages(struct file *file, struct address_space *mapping,
1186 			struct list_head *pages, unsigned nr_pages)
1187 {
1188 	return mpage_readpages(mapping, pages, nr_pages, isofs_get_block);
1189 }
1190 
_isofs_bmap(struct address_space * mapping,sector_t block)1191 static sector_t _isofs_bmap(struct address_space *mapping, sector_t block)
1192 {
1193 	return generic_block_bmap(mapping,block,isofs_get_block);
1194 }
1195 
1196 static const struct address_space_operations isofs_aops = {
1197 	.readpage = isofs_readpage,
1198 	.readpages = isofs_readpages,
1199 	.bmap = _isofs_bmap
1200 };
1201 
isofs_read_level3_size(struct inode * inode)1202 static int isofs_read_level3_size(struct inode *inode)
1203 {
1204 	unsigned long bufsize = ISOFS_BUFFER_SIZE(inode);
1205 	int high_sierra = ISOFS_SB(inode->i_sb)->s_high_sierra;
1206 	struct buffer_head *bh = NULL;
1207 	unsigned long block, offset, block_saved, offset_saved;
1208 	int i = 0;
1209 	int more_entries = 0;
1210 	struct iso_directory_record *tmpde = NULL;
1211 	struct iso_inode_info *ei = ISOFS_I(inode);
1212 
1213 	inode->i_size = 0;
1214 
1215 	/* The first 16 blocks are reserved as the System Area.  Thus,
1216 	 * no inodes can appear in block 0.  We use this to flag that
1217 	 * this is the last section. */
1218 	ei->i_next_section_block = 0;
1219 	ei->i_next_section_offset = 0;
1220 
1221 	block = ei->i_iget5_block;
1222 	offset = ei->i_iget5_offset;
1223 
1224 	do {
1225 		struct iso_directory_record *de;
1226 		unsigned int de_len;
1227 
1228 		if (!bh) {
1229 			bh = sb_bread(inode->i_sb, block);
1230 			if (!bh)
1231 				goto out_noread;
1232 		}
1233 		de = (struct iso_directory_record *) (bh->b_data + offset);
1234 		de_len = *(unsigned char *) de;
1235 
1236 		if (de_len == 0) {
1237 			brelse(bh);
1238 			bh = NULL;
1239 			++block;
1240 			offset = 0;
1241 			continue;
1242 		}
1243 
1244 		block_saved = block;
1245 		offset_saved = offset;
1246 		offset += de_len;
1247 
1248 		/* Make sure we have a full directory entry */
1249 		if (offset >= bufsize) {
1250 			int slop = bufsize - offset + de_len;
1251 			if (!tmpde) {
1252 				tmpde = kmalloc(256, GFP_KERNEL);
1253 				if (!tmpde)
1254 					goto out_nomem;
1255 			}
1256 			memcpy(tmpde, de, slop);
1257 			offset &= bufsize - 1;
1258 			block++;
1259 			brelse(bh);
1260 			bh = NULL;
1261 			if (offset) {
1262 				bh = sb_bread(inode->i_sb, block);
1263 				if (!bh)
1264 					goto out_noread;
1265 				memcpy((void *)tmpde+slop, bh->b_data, offset);
1266 			}
1267 			de = tmpde;
1268 		}
1269 
1270 		inode->i_size += isonum_733(de->size);
1271 		if (i == 1) {
1272 			ei->i_next_section_block = block_saved;
1273 			ei->i_next_section_offset = offset_saved;
1274 		}
1275 
1276 		more_entries = de->flags[-high_sierra] & 0x80;
1277 
1278 		i++;
1279 		if (i > 100)
1280 			goto out_toomany;
1281 	} while (more_entries);
1282 out:
1283 	kfree(tmpde);
1284 	if (bh)
1285 		brelse(bh);
1286 	return 0;
1287 
1288 out_nomem:
1289 	if (bh)
1290 		brelse(bh);
1291 	return -ENOMEM;
1292 
1293 out_noread:
1294 	printk(KERN_INFO "ISOFS: unable to read i-node block %lu\n", block);
1295 	kfree(tmpde);
1296 	return -EIO;
1297 
1298 out_toomany:
1299 	printk(KERN_INFO "%s: More than 100 file sections ?!?, aborting...\n"
1300 		"isofs_read_level3_size: inode=%lu\n",
1301 		__func__, inode->i_ino);
1302 	goto out;
1303 }
1304 
isofs_read_inode(struct inode * inode,int relocated)1305 static int isofs_read_inode(struct inode *inode, int relocated)
1306 {
1307 	struct super_block *sb = inode->i_sb;
1308 	struct isofs_sb_info *sbi = ISOFS_SB(sb);
1309 	unsigned long bufsize = ISOFS_BUFFER_SIZE(inode);
1310 	unsigned long block;
1311 	int high_sierra = sbi->s_high_sierra;
1312 	struct buffer_head *bh;
1313 	struct iso_directory_record *de;
1314 	struct iso_directory_record *tmpde = NULL;
1315 	unsigned int de_len;
1316 	unsigned long offset;
1317 	struct iso_inode_info *ei = ISOFS_I(inode);
1318 	int ret = -EIO;
1319 
1320 	block = ei->i_iget5_block;
1321 	bh = sb_bread(inode->i_sb, block);
1322 	if (!bh)
1323 		goto out_badread;
1324 
1325 	offset = ei->i_iget5_offset;
1326 
1327 	de = (struct iso_directory_record *) (bh->b_data + offset);
1328 	de_len = *(unsigned char *) de;
1329 	if (de_len < sizeof(struct iso_directory_record))
1330 		goto fail;
1331 
1332 	if (offset + de_len > bufsize) {
1333 		int frag1 = bufsize - offset;
1334 
1335 		tmpde = kmalloc(de_len, GFP_KERNEL);
1336 		if (!tmpde) {
1337 			ret = -ENOMEM;
1338 			goto fail;
1339 		}
1340 		memcpy(tmpde, bh->b_data + offset, frag1);
1341 		brelse(bh);
1342 		bh = sb_bread(inode->i_sb, ++block);
1343 		if (!bh)
1344 			goto out_badread;
1345 		memcpy((char *)tmpde+frag1, bh->b_data, de_len - frag1);
1346 		de = tmpde;
1347 	}
1348 
1349 	inode->i_ino = isofs_get_ino(ei->i_iget5_block,
1350 					ei->i_iget5_offset,
1351 					ISOFS_BUFFER_BITS(inode));
1352 
1353 	/* Assume it is a normal-format file unless told otherwise */
1354 	ei->i_file_format = isofs_file_normal;
1355 
1356 	if (de->flags[-high_sierra] & 2) {
1357 		if (sbi->s_dmode != ISOFS_INVALID_MODE)
1358 			inode->i_mode = S_IFDIR | sbi->s_dmode;
1359 		else
1360 			inode->i_mode = S_IFDIR | S_IRUGO | S_IXUGO;
1361 		set_nlink(inode, 1);	/*
1362 					 * Set to 1.  We know there are 2, but
1363 					 * the find utility tries to optimize
1364 					 * if it is 2, and it screws up.  It is
1365 					 * easier to give 1 which tells find to
1366 					 * do it the hard way.
1367 					 */
1368 	} else {
1369 		if (sbi->s_fmode != ISOFS_INVALID_MODE) {
1370 			inode->i_mode = S_IFREG | sbi->s_fmode;
1371 		} else {
1372 			/*
1373 			 * Set default permissions: r-x for all.  The disc
1374 			 * could be shared with DOS machines so virtually
1375 			 * anything could be a valid executable.
1376 			 */
1377 			inode->i_mode = S_IFREG | S_IRUGO | S_IXUGO;
1378 		}
1379 		set_nlink(inode, 1);
1380 	}
1381 	inode->i_uid = sbi->s_uid;
1382 	inode->i_gid = sbi->s_gid;
1383 	inode->i_blocks = 0;
1384 
1385 	ei->i_format_parm[0] = 0;
1386 	ei->i_format_parm[1] = 0;
1387 	ei->i_format_parm[2] = 0;
1388 
1389 	ei->i_section_size = isonum_733(de->size);
1390 	if (de->flags[-high_sierra] & 0x80) {
1391 		ret = isofs_read_level3_size(inode);
1392 		if (ret < 0)
1393 			goto fail;
1394 		ret = -EIO;
1395 	} else {
1396 		ei->i_next_section_block = 0;
1397 		ei->i_next_section_offset = 0;
1398 		inode->i_size = isonum_733(de->size);
1399 	}
1400 
1401 	/*
1402 	 * Some dipshit decided to store some other bit of information
1403 	 * in the high byte of the file length.  Truncate size in case
1404 	 * this CDROM was mounted with the cruft option.
1405 	 */
1406 
1407 	if (sbi->s_cruft)
1408 		inode->i_size &= 0x00ffffff;
1409 
1410 	if (de->interleave[0]) {
1411 		printk(KERN_DEBUG "ISOFS: Interleaved files not (yet) supported.\n");
1412 		inode->i_size = 0;
1413 	}
1414 
1415 	/* I have no idea what file_unit_size is used for, so
1416 	   we will flag it for now */
1417 	if (de->file_unit_size[0] != 0) {
1418 		printk(KERN_DEBUG "ISOFS: File unit size != 0 for ISO file (%ld).\n",
1419 			inode->i_ino);
1420 	}
1421 
1422 	/* I have no idea what other flag bits are used for, so
1423 	   we will flag it for now */
1424 #ifdef DEBUG
1425 	if((de->flags[-high_sierra] & ~2)!= 0){
1426 		printk(KERN_DEBUG "ISOFS: Unusual flag settings for ISO file "
1427 				"(%ld %x).\n",
1428 			inode->i_ino, de->flags[-high_sierra]);
1429 	}
1430 #endif
1431 
1432 	inode->i_mtime.tv_sec =
1433 	inode->i_atime.tv_sec =
1434 	inode->i_ctime.tv_sec = iso_date(de->date, high_sierra);
1435 	inode->i_mtime.tv_nsec =
1436 	inode->i_atime.tv_nsec =
1437 	inode->i_ctime.tv_nsec = 0;
1438 
1439 	ei->i_first_extent = (isonum_733(de->extent) +
1440 			isonum_711(de->ext_attr_length));
1441 
1442 	/* Set the number of blocks for stat() - should be done before RR */
1443 	inode->i_blocks = (inode->i_size + 511) >> 9;
1444 
1445 	/*
1446 	 * Now test for possible Rock Ridge extensions which will override
1447 	 * some of these numbers in the inode structure.
1448 	 */
1449 
1450 	if (!high_sierra) {
1451 		parse_rock_ridge_inode(de, inode, relocated);
1452 		/* if we want uid/gid set, override the rock ridge setting */
1453 		if (sbi->s_uid_set)
1454 			inode->i_uid = sbi->s_uid;
1455 		if (sbi->s_gid_set)
1456 			inode->i_gid = sbi->s_gid;
1457 	}
1458 	/* Now set final access rights if overriding rock ridge setting */
1459 	if (S_ISDIR(inode->i_mode) && sbi->s_overriderockperm &&
1460 	    sbi->s_dmode != ISOFS_INVALID_MODE)
1461 		inode->i_mode = S_IFDIR | sbi->s_dmode;
1462 	if (S_ISREG(inode->i_mode) && sbi->s_overriderockperm &&
1463 	    sbi->s_fmode != ISOFS_INVALID_MODE)
1464 		inode->i_mode = S_IFREG | sbi->s_fmode;
1465 
1466 	/* Install the inode operations vector */
1467 	if (S_ISREG(inode->i_mode)) {
1468 		inode->i_fop = &generic_ro_fops;
1469 		switch (ei->i_file_format) {
1470 #ifdef CONFIG_ZISOFS
1471 		case isofs_file_compressed:
1472 			inode->i_data.a_ops = &zisofs_aops;
1473 			break;
1474 #endif
1475 		default:
1476 			inode->i_data.a_ops = &isofs_aops;
1477 			break;
1478 		}
1479 	} else if (S_ISDIR(inode->i_mode)) {
1480 		inode->i_op = &isofs_dir_inode_operations;
1481 		inode->i_fop = &isofs_dir_operations;
1482 	} else if (S_ISLNK(inode->i_mode)) {
1483 		inode->i_op = &page_symlink_inode_operations;
1484 		inode_nohighmem(inode);
1485 		inode->i_data.a_ops = &isofs_symlink_aops;
1486 	} else
1487 		/* XXX - parse_rock_ridge_inode() had already set i_rdev. */
1488 		init_special_inode(inode, inode->i_mode, inode->i_rdev);
1489 
1490 	ret = 0;
1491 out:
1492 	kfree(tmpde);
1493 	if (bh)
1494 		brelse(bh);
1495 	return ret;
1496 
1497 out_badread:
1498 	printk(KERN_WARNING "ISOFS: unable to read i-node block\n");
1499 fail:
1500 	goto out;
1501 }
1502 
1503 struct isofs_iget5_callback_data {
1504 	unsigned long block;
1505 	unsigned long offset;
1506 };
1507 
isofs_iget5_test(struct inode * ino,void * data)1508 static int isofs_iget5_test(struct inode *ino, void *data)
1509 {
1510 	struct iso_inode_info *i = ISOFS_I(ino);
1511 	struct isofs_iget5_callback_data *d =
1512 		(struct isofs_iget5_callback_data*)data;
1513 	return (i->i_iget5_block == d->block)
1514 		&& (i->i_iget5_offset == d->offset);
1515 }
1516 
isofs_iget5_set(struct inode * ino,void * data)1517 static int isofs_iget5_set(struct inode *ino, void *data)
1518 {
1519 	struct iso_inode_info *i = ISOFS_I(ino);
1520 	struct isofs_iget5_callback_data *d =
1521 		(struct isofs_iget5_callback_data*)data;
1522 	i->i_iget5_block = d->block;
1523 	i->i_iget5_offset = d->offset;
1524 	return 0;
1525 }
1526 
1527 /* Store, in the inode's containing structure, the block and block
1528  * offset that point to the underlying meta-data for the inode.  The
1529  * code below is otherwise similar to the iget() code in
1530  * include/linux/fs.h */
__isofs_iget(struct super_block * sb,unsigned long block,unsigned long offset,int relocated)1531 struct inode *__isofs_iget(struct super_block *sb,
1532 			   unsigned long block,
1533 			   unsigned long offset,
1534 			   int relocated)
1535 {
1536 	unsigned long hashval;
1537 	struct inode *inode;
1538 	struct isofs_iget5_callback_data data;
1539 	long ret;
1540 
1541 	if (offset >= 1ul << sb->s_blocksize_bits)
1542 		return ERR_PTR(-EINVAL);
1543 
1544 	data.block = block;
1545 	data.offset = offset;
1546 
1547 	hashval = (block << sb->s_blocksize_bits) | offset;
1548 
1549 	inode = iget5_locked(sb, hashval, &isofs_iget5_test,
1550 				&isofs_iget5_set, &data);
1551 
1552 	if (!inode)
1553 		return ERR_PTR(-ENOMEM);
1554 
1555 	if (inode->i_state & I_NEW) {
1556 		ret = isofs_read_inode(inode, relocated);
1557 		if (ret < 0) {
1558 			iget_failed(inode);
1559 			inode = ERR_PTR(ret);
1560 		} else {
1561 			unlock_new_inode(inode);
1562 		}
1563 	}
1564 
1565 	return inode;
1566 }
1567 
isofs_mount(struct file_system_type * fs_type,int flags,const char * dev_name,void * data)1568 static struct dentry *isofs_mount(struct file_system_type *fs_type,
1569 	int flags, const char *dev_name, void *data)
1570 {
1571 	return mount_bdev(fs_type, flags, dev_name, data, isofs_fill_super);
1572 }
1573 
1574 static struct file_system_type iso9660_fs_type = {
1575 	.owner		= THIS_MODULE,
1576 	.name		= "iso9660",
1577 	.mount		= isofs_mount,
1578 	.kill_sb	= kill_block_super,
1579 	.fs_flags	= FS_REQUIRES_DEV,
1580 };
1581 MODULE_ALIAS_FS("iso9660");
1582 MODULE_ALIAS("iso9660");
1583 
init_iso9660_fs(void)1584 static int __init init_iso9660_fs(void)
1585 {
1586 	int err = init_inodecache();
1587 	if (err)
1588 		goto out;
1589 #ifdef CONFIG_ZISOFS
1590 	err = zisofs_init();
1591 	if (err)
1592 		goto out1;
1593 #endif
1594 	err = register_filesystem(&iso9660_fs_type);
1595 	if (err)
1596 		goto out2;
1597 	return 0;
1598 out2:
1599 #ifdef CONFIG_ZISOFS
1600 	zisofs_cleanup();
1601 out1:
1602 #endif
1603 	destroy_inodecache();
1604 out:
1605 	return err;
1606 }
1607 
exit_iso9660_fs(void)1608 static void __exit exit_iso9660_fs(void)
1609 {
1610         unregister_filesystem(&iso9660_fs_type);
1611 #ifdef CONFIG_ZISOFS
1612 	zisofs_cleanup();
1613 #endif
1614 	destroy_inodecache();
1615 }
1616 
1617 module_init(init_iso9660_fs)
1618 module_exit(exit_iso9660_fs)
1619 MODULE_LICENSE("GPL");
1620