1/*
2 *  linux/fs/hpfs/namei.c
3 *
4 *  Mikulas Patocka (mikulas@artax.karlin.mff.cuni.cz), 1998-1999
5 *
6 *  adding & removing files & directories
7 */
8#include <linux/sched.h>
9#include "hpfs_fn.h"
10
11static void hpfs_update_directory_times(struct inode *dir)
12{
13	time_t t = get_seconds();
14	if (t == dir->i_mtime.tv_sec &&
15	    t == dir->i_ctime.tv_sec)
16		return;
17	dir->i_mtime.tv_sec = dir->i_ctime.tv_sec = t;
18	dir->i_mtime.tv_nsec = dir->i_ctime.tv_nsec = 0;
19	hpfs_write_inode_nolock(dir);
20}
21
22static int hpfs_mkdir(struct inode *dir, struct dentry *dentry, umode_t mode)
23{
24	const unsigned char *name = dentry->d_name.name;
25	unsigned len = dentry->d_name.len;
26	struct quad_buffer_head qbh0;
27	struct buffer_head *bh;
28	struct hpfs_dirent *de;
29	struct fnode *fnode;
30	struct dnode *dnode;
31	struct inode *result;
32	fnode_secno fno;
33	dnode_secno dno;
34	int r;
35	struct hpfs_dirent dee;
36	int err;
37	if ((err = hpfs_chk_name(name, &len))) return err==-ENOENT ? -EINVAL : err;
38	hpfs_lock(dir->i_sb);
39	err = -ENOSPC;
40	fnode = hpfs_alloc_fnode(dir->i_sb, hpfs_i(dir)->i_dno, &fno, &bh);
41	if (!fnode)
42		goto bail;
43	dnode = hpfs_alloc_dnode(dir->i_sb, fno, &dno, &qbh0);
44	if (!dnode)
45		goto bail1;
46	memset(&dee, 0, sizeof dee);
47	dee.directory = 1;
48	if (!(mode & 0222)) dee.read_only = 1;
49	/*dee.archive = 0;*/
50	dee.hidden = name[0] == '.';
51	dee.fnode = cpu_to_le32(fno);
52	dee.creation_date = dee.write_date = dee.read_date = cpu_to_le32(gmt_to_local(dir->i_sb, get_seconds()));
53	result = new_inode(dir->i_sb);
54	if (!result)
55		goto bail2;
56	hpfs_init_inode(result);
57	result->i_ino = fno;
58	hpfs_i(result)->i_parent_dir = dir->i_ino;
59	hpfs_i(result)->i_dno = dno;
60	result->i_ctime.tv_sec = result->i_mtime.tv_sec = result->i_atime.tv_sec = local_to_gmt(dir->i_sb, le32_to_cpu(dee.creation_date));
61	result->i_ctime.tv_nsec = 0;
62	result->i_mtime.tv_nsec = 0;
63	result->i_atime.tv_nsec = 0;
64	hpfs_i(result)->i_ea_size = 0;
65	result->i_mode |= S_IFDIR;
66	result->i_op = &hpfs_dir_iops;
67	result->i_fop = &hpfs_dir_ops;
68	result->i_blocks = 4;
69	result->i_size = 2048;
70	set_nlink(result, 2);
71	if (dee.read_only)
72		result->i_mode &= ~0222;
73
74	r = hpfs_add_dirent(dir, name, len, &dee);
75	if (r == 1)
76		goto bail3;
77	if (r == -1) {
78		err = -EEXIST;
79		goto bail3;
80	}
81	fnode->len = len;
82	memcpy(fnode->name, name, len > 15 ? 15 : len);
83	fnode->up = cpu_to_le32(dir->i_ino);
84	fnode->flags |= FNODE_dir;
85	fnode->btree.n_free_nodes = 7;
86	fnode->btree.n_used_nodes = 1;
87	fnode->btree.first_free = cpu_to_le16(0x14);
88	fnode->u.external[0].disk_secno = cpu_to_le32(dno);
89	fnode->u.external[0].file_secno = cpu_to_le32(-1);
90	dnode->root_dnode = 1;
91	dnode->up = cpu_to_le32(fno);
92	de = hpfs_add_de(dir->i_sb, dnode, "\001\001", 2, 0);
93	de->creation_date = de->write_date = de->read_date = cpu_to_le32(gmt_to_local(dir->i_sb, get_seconds()));
94	if (!(mode & 0222)) de->read_only = 1;
95	de->first = de->directory = 1;
96	/*de->hidden = de->system = 0;*/
97	de->fnode = cpu_to_le32(fno);
98	mark_buffer_dirty(bh);
99	brelse(bh);
100	hpfs_mark_4buffers_dirty(&qbh0);
101	hpfs_brelse4(&qbh0);
102	inc_nlink(dir);
103	insert_inode_hash(result);
104
105	if (!uid_eq(result->i_uid, current_fsuid()) ||
106	    !gid_eq(result->i_gid, current_fsgid()) ||
107	    result->i_mode != (mode | S_IFDIR)) {
108		result->i_uid = current_fsuid();
109		result->i_gid = current_fsgid();
110		result->i_mode = mode | S_IFDIR;
111		hpfs_write_inode_nolock(result);
112	}
113	hpfs_update_directory_times(dir);
114	d_instantiate(dentry, result);
115	hpfs_unlock(dir->i_sb);
116	return 0;
117bail3:
118	iput(result);
119bail2:
120	hpfs_brelse4(&qbh0);
121	hpfs_free_dnode(dir->i_sb, dno);
122bail1:
123	brelse(bh);
124	hpfs_free_sectors(dir->i_sb, fno, 1);
125bail:
126	hpfs_unlock(dir->i_sb);
127	return err;
128}
129
130static int hpfs_create(struct inode *dir, struct dentry *dentry, umode_t mode, bool excl)
131{
132	const unsigned char *name = dentry->d_name.name;
133	unsigned len = dentry->d_name.len;
134	struct inode *result = NULL;
135	struct buffer_head *bh;
136	struct fnode *fnode;
137	fnode_secno fno;
138	int r;
139	struct hpfs_dirent dee;
140	int err;
141	if ((err = hpfs_chk_name(name, &len)))
142		return err==-ENOENT ? -EINVAL : err;
143	hpfs_lock(dir->i_sb);
144	err = -ENOSPC;
145	fnode = hpfs_alloc_fnode(dir->i_sb, hpfs_i(dir)->i_dno, &fno, &bh);
146	if (!fnode)
147		goto bail;
148	memset(&dee, 0, sizeof dee);
149	if (!(mode & 0222)) dee.read_only = 1;
150	dee.archive = 1;
151	dee.hidden = name[0] == '.';
152	dee.fnode = cpu_to_le32(fno);
153	dee.creation_date = dee.write_date = dee.read_date = cpu_to_le32(gmt_to_local(dir->i_sb, get_seconds()));
154
155	result = new_inode(dir->i_sb);
156	if (!result)
157		goto bail1;
158
159	hpfs_init_inode(result);
160	result->i_ino = fno;
161	result->i_mode |= S_IFREG;
162	result->i_mode &= ~0111;
163	result->i_op = &hpfs_file_iops;
164	result->i_fop = &hpfs_file_ops;
165	set_nlink(result, 1);
166	hpfs_i(result)->i_parent_dir = dir->i_ino;
167	result->i_ctime.tv_sec = result->i_mtime.tv_sec = result->i_atime.tv_sec = local_to_gmt(dir->i_sb, le32_to_cpu(dee.creation_date));
168	result->i_ctime.tv_nsec = 0;
169	result->i_mtime.tv_nsec = 0;
170	result->i_atime.tv_nsec = 0;
171	hpfs_i(result)->i_ea_size = 0;
172	if (dee.read_only)
173		result->i_mode &= ~0222;
174	result->i_blocks = 1;
175	result->i_size = 0;
176	result->i_data.a_ops = &hpfs_aops;
177	hpfs_i(result)->mmu_private = 0;
178
179	r = hpfs_add_dirent(dir, name, len, &dee);
180	if (r == 1)
181		goto bail2;
182	if (r == -1) {
183		err = -EEXIST;
184		goto bail2;
185	}
186	fnode->len = len;
187	memcpy(fnode->name, name, len > 15 ? 15 : len);
188	fnode->up = cpu_to_le32(dir->i_ino);
189	mark_buffer_dirty(bh);
190	brelse(bh);
191
192	insert_inode_hash(result);
193
194	if (!uid_eq(result->i_uid, current_fsuid()) ||
195	    !gid_eq(result->i_gid, current_fsgid()) ||
196	    result->i_mode != (mode | S_IFREG)) {
197		result->i_uid = current_fsuid();
198		result->i_gid = current_fsgid();
199		result->i_mode = mode | S_IFREG;
200		hpfs_write_inode_nolock(result);
201	}
202	hpfs_update_directory_times(dir);
203	d_instantiate(dentry, result);
204	hpfs_unlock(dir->i_sb);
205	return 0;
206
207bail2:
208	iput(result);
209bail1:
210	brelse(bh);
211	hpfs_free_sectors(dir->i_sb, fno, 1);
212bail:
213	hpfs_unlock(dir->i_sb);
214	return err;
215}
216
217static int hpfs_mknod(struct inode *dir, struct dentry *dentry, umode_t mode, dev_t rdev)
218{
219	const unsigned char *name = dentry->d_name.name;
220	unsigned len = dentry->d_name.len;
221	struct buffer_head *bh;
222	struct fnode *fnode;
223	fnode_secno fno;
224	int r;
225	struct hpfs_dirent dee;
226	struct inode *result = NULL;
227	int err;
228	if ((err = hpfs_chk_name(name, &len))) return err==-ENOENT ? -EINVAL : err;
229	if (hpfs_sb(dir->i_sb)->sb_eas < 2) return -EPERM;
230	if (!new_valid_dev(rdev))
231		return -EINVAL;
232	hpfs_lock(dir->i_sb);
233	err = -ENOSPC;
234	fnode = hpfs_alloc_fnode(dir->i_sb, hpfs_i(dir)->i_dno, &fno, &bh);
235	if (!fnode)
236		goto bail;
237	memset(&dee, 0, sizeof dee);
238	if (!(mode & 0222)) dee.read_only = 1;
239	dee.archive = 1;
240	dee.hidden = name[0] == '.';
241	dee.fnode = cpu_to_le32(fno);
242	dee.creation_date = dee.write_date = dee.read_date = cpu_to_le32(gmt_to_local(dir->i_sb, get_seconds()));
243
244	result = new_inode(dir->i_sb);
245	if (!result)
246		goto bail1;
247
248	hpfs_init_inode(result);
249	result->i_ino = fno;
250	hpfs_i(result)->i_parent_dir = dir->i_ino;
251	result->i_ctime.tv_sec = result->i_mtime.tv_sec = result->i_atime.tv_sec = local_to_gmt(dir->i_sb, le32_to_cpu(dee.creation_date));
252	result->i_ctime.tv_nsec = 0;
253	result->i_mtime.tv_nsec = 0;
254	result->i_atime.tv_nsec = 0;
255	hpfs_i(result)->i_ea_size = 0;
256	result->i_uid = current_fsuid();
257	result->i_gid = current_fsgid();
258	set_nlink(result, 1);
259	result->i_size = 0;
260	result->i_blocks = 1;
261	init_special_inode(result, mode, rdev);
262
263	r = hpfs_add_dirent(dir, name, len, &dee);
264	if (r == 1)
265		goto bail2;
266	if (r == -1) {
267		err = -EEXIST;
268		goto bail2;
269	}
270	fnode->len = len;
271	memcpy(fnode->name, name, len > 15 ? 15 : len);
272	fnode->up = cpu_to_le32(dir->i_ino);
273	mark_buffer_dirty(bh);
274
275	insert_inode_hash(result);
276
277	hpfs_write_inode_nolock(result);
278	hpfs_update_directory_times(dir);
279	d_instantiate(dentry, result);
280	brelse(bh);
281	hpfs_unlock(dir->i_sb);
282	return 0;
283bail2:
284	iput(result);
285bail1:
286	brelse(bh);
287	hpfs_free_sectors(dir->i_sb, fno, 1);
288bail:
289	hpfs_unlock(dir->i_sb);
290	return err;
291}
292
293static int hpfs_symlink(struct inode *dir, struct dentry *dentry, const char *symlink)
294{
295	const unsigned char *name = dentry->d_name.name;
296	unsigned len = dentry->d_name.len;
297	struct buffer_head *bh;
298	struct fnode *fnode;
299	fnode_secno fno;
300	int r;
301	struct hpfs_dirent dee;
302	struct inode *result;
303	int err;
304	if ((err = hpfs_chk_name(name, &len))) return err==-ENOENT ? -EINVAL : err;
305	hpfs_lock(dir->i_sb);
306	if (hpfs_sb(dir->i_sb)->sb_eas < 2) {
307		hpfs_unlock(dir->i_sb);
308		return -EPERM;
309	}
310	err = -ENOSPC;
311	fnode = hpfs_alloc_fnode(dir->i_sb, hpfs_i(dir)->i_dno, &fno, &bh);
312	if (!fnode)
313		goto bail;
314	memset(&dee, 0, sizeof dee);
315	dee.archive = 1;
316	dee.hidden = name[0] == '.';
317	dee.fnode = cpu_to_le32(fno);
318	dee.creation_date = dee.write_date = dee.read_date = cpu_to_le32(gmt_to_local(dir->i_sb, get_seconds()));
319
320	result = new_inode(dir->i_sb);
321	if (!result)
322		goto bail1;
323	result->i_ino = fno;
324	hpfs_init_inode(result);
325	hpfs_i(result)->i_parent_dir = dir->i_ino;
326	result->i_ctime.tv_sec = result->i_mtime.tv_sec = result->i_atime.tv_sec = local_to_gmt(dir->i_sb, le32_to_cpu(dee.creation_date));
327	result->i_ctime.tv_nsec = 0;
328	result->i_mtime.tv_nsec = 0;
329	result->i_atime.tv_nsec = 0;
330	hpfs_i(result)->i_ea_size = 0;
331	result->i_mode = S_IFLNK | 0777;
332	result->i_uid = current_fsuid();
333	result->i_gid = current_fsgid();
334	result->i_blocks = 1;
335	set_nlink(result, 1);
336	result->i_size = strlen(symlink);
337	result->i_op = &page_symlink_inode_operations;
338	result->i_data.a_ops = &hpfs_symlink_aops;
339
340	r = hpfs_add_dirent(dir, name, len, &dee);
341	if (r == 1)
342		goto bail2;
343	if (r == -1) {
344		err = -EEXIST;
345		goto bail2;
346	}
347	fnode->len = len;
348	memcpy(fnode->name, name, len > 15 ? 15 : len);
349	fnode->up = cpu_to_le32(dir->i_ino);
350	hpfs_set_ea(result, fnode, "SYMLINK", symlink, strlen(symlink));
351	mark_buffer_dirty(bh);
352	brelse(bh);
353
354	insert_inode_hash(result);
355
356	hpfs_write_inode_nolock(result);
357	hpfs_update_directory_times(dir);
358	d_instantiate(dentry, result);
359	hpfs_unlock(dir->i_sb);
360	return 0;
361bail2:
362	iput(result);
363bail1:
364	brelse(bh);
365	hpfs_free_sectors(dir->i_sb, fno, 1);
366bail:
367	hpfs_unlock(dir->i_sb);
368	return err;
369}
370
371static int hpfs_unlink(struct inode *dir, struct dentry *dentry)
372{
373	const unsigned char *name = dentry->d_name.name;
374	unsigned len = dentry->d_name.len;
375	struct quad_buffer_head qbh;
376	struct hpfs_dirent *de;
377	struct inode *inode = d_inode(dentry);
378	dnode_secno dno;
379	int r;
380	int err;
381
382	hpfs_lock(dir->i_sb);
383	hpfs_adjust_length(name, &len);
384
385	err = -ENOENT;
386	de = map_dirent(dir, hpfs_i(dir)->i_dno, name, len, &dno, &qbh);
387	if (!de)
388		goto out;
389
390	err = -EPERM;
391	if (de->first)
392		goto out1;
393
394	err = -EISDIR;
395	if (de->directory)
396		goto out1;
397
398	r = hpfs_remove_dirent(dir, dno, de, &qbh, 1);
399	switch (r) {
400	case 1:
401		hpfs_error(dir->i_sb, "there was error when removing dirent");
402		err = -EFSERROR;
403		break;
404	case 2:		/* no space for deleting */
405		err = -ENOSPC;
406		break;
407	default:
408		drop_nlink(inode);
409		err = 0;
410	}
411	goto out;
412
413out1:
414	hpfs_brelse4(&qbh);
415out:
416	if (!err)
417		hpfs_update_directory_times(dir);
418	hpfs_unlock(dir->i_sb);
419	return err;
420}
421
422static int hpfs_rmdir(struct inode *dir, struct dentry *dentry)
423{
424	const unsigned char *name = dentry->d_name.name;
425	unsigned len = dentry->d_name.len;
426	struct quad_buffer_head qbh;
427	struct hpfs_dirent *de;
428	struct inode *inode = d_inode(dentry);
429	dnode_secno dno;
430	int n_items = 0;
431	int err;
432	int r;
433
434	hpfs_adjust_length(name, &len);
435	hpfs_lock(dir->i_sb);
436	err = -ENOENT;
437	de = map_dirent(dir, hpfs_i(dir)->i_dno, name, len, &dno, &qbh);
438	if (!de)
439		goto out;
440
441	err = -EPERM;
442	if (de->first)
443		goto out1;
444
445	err = -ENOTDIR;
446	if (!de->directory)
447		goto out1;
448
449	hpfs_count_dnodes(dir->i_sb, hpfs_i(inode)->i_dno, NULL, NULL, &n_items);
450	err = -ENOTEMPTY;
451	if (n_items)
452		goto out1;
453
454	r = hpfs_remove_dirent(dir, dno, de, &qbh, 1);
455	switch (r) {
456	case 1:
457		hpfs_error(dir->i_sb, "there was error when removing dirent");
458		err = -EFSERROR;
459		break;
460	case 2:
461		err = -ENOSPC;
462		break;
463	default:
464		drop_nlink(dir);
465		clear_nlink(inode);
466		err = 0;
467	}
468	goto out;
469out1:
470	hpfs_brelse4(&qbh);
471out:
472	if (!err)
473		hpfs_update_directory_times(dir);
474	hpfs_unlock(dir->i_sb);
475	return err;
476}
477
478static int hpfs_symlink_readpage(struct file *file, struct page *page)
479{
480	char *link = kmap(page);
481	struct inode *i = page->mapping->host;
482	struct fnode *fnode;
483	struct buffer_head *bh;
484	int err;
485
486	err = -EIO;
487	hpfs_lock(i->i_sb);
488	if (!(fnode = hpfs_map_fnode(i->i_sb, i->i_ino, &bh)))
489		goto fail;
490	err = hpfs_read_ea(i->i_sb, fnode, "SYMLINK", link, PAGE_SIZE);
491	brelse(bh);
492	if (err)
493		goto fail;
494	hpfs_unlock(i->i_sb);
495	SetPageUptodate(page);
496	kunmap(page);
497	unlock_page(page);
498	return 0;
499
500fail:
501	hpfs_unlock(i->i_sb);
502	SetPageError(page);
503	kunmap(page);
504	unlock_page(page);
505	return err;
506}
507
508const struct address_space_operations hpfs_symlink_aops = {
509	.readpage	= hpfs_symlink_readpage
510};
511
512static int hpfs_rename(struct inode *old_dir, struct dentry *old_dentry,
513		struct inode *new_dir, struct dentry *new_dentry)
514{
515	const unsigned char *old_name = old_dentry->d_name.name;
516	unsigned old_len = old_dentry->d_name.len;
517	const unsigned char *new_name = new_dentry->d_name.name;
518	unsigned new_len = new_dentry->d_name.len;
519	struct inode *i = d_inode(old_dentry);
520	struct inode *new_inode = d_inode(new_dentry);
521	struct quad_buffer_head qbh, qbh1;
522	struct hpfs_dirent *dep, *nde;
523	struct hpfs_dirent de;
524	dnode_secno dno;
525	int r;
526	struct buffer_head *bh;
527	struct fnode *fnode;
528	int err;
529
530	if ((err = hpfs_chk_name(new_name, &new_len))) return err;
531	err = 0;
532	hpfs_adjust_length(old_name, &old_len);
533
534	hpfs_lock(i->i_sb);
535	/* order doesn't matter, due to VFS exclusion */
536
537	/* Erm? Moving over the empty non-busy directory is perfectly legal */
538	if (new_inode && S_ISDIR(new_inode->i_mode)) {
539		err = -EINVAL;
540		goto end1;
541	}
542
543	if (!(dep = map_dirent(old_dir, hpfs_i(old_dir)->i_dno, old_name, old_len, &dno, &qbh))) {
544		hpfs_error(i->i_sb, "lookup succeeded but map dirent failed");
545		err = -ENOENT;
546		goto end1;
547	}
548	copy_de(&de, dep);
549	de.hidden = new_name[0] == '.';
550
551	if (new_inode) {
552		int r;
553		if ((r = hpfs_remove_dirent(old_dir, dno, dep, &qbh, 1)) != 2) {
554			if ((nde = map_dirent(new_dir, hpfs_i(new_dir)->i_dno, new_name, new_len, NULL, &qbh1))) {
555				clear_nlink(new_inode);
556				copy_de(nde, &de);
557				memcpy(nde->name, new_name, new_len);
558				hpfs_mark_4buffers_dirty(&qbh1);
559				hpfs_brelse4(&qbh1);
560				goto end;
561			}
562			hpfs_error(new_dir->i_sb, "hpfs_rename: could not find dirent");
563			err = -EFSERROR;
564			goto end1;
565		}
566		err = r == 2 ? -ENOSPC : r == 1 ? -EFSERROR : 0;
567		goto end1;
568	}
569
570	if (new_dir == old_dir) hpfs_brelse4(&qbh);
571
572	if ((r = hpfs_add_dirent(new_dir, new_name, new_len, &de))) {
573		if (r == -1) hpfs_error(new_dir->i_sb, "hpfs_rename: dirent already exists!");
574		err = r == 1 ? -ENOSPC : -EFSERROR;
575		if (new_dir != old_dir) hpfs_brelse4(&qbh);
576		goto end1;
577	}
578
579	if (new_dir == old_dir)
580		if (!(dep = map_dirent(old_dir, hpfs_i(old_dir)->i_dno, old_name, old_len, &dno, &qbh))) {
581			hpfs_error(i->i_sb, "lookup succeeded but map dirent failed at #2");
582			err = -ENOENT;
583			goto end1;
584		}
585
586	if ((r = hpfs_remove_dirent(old_dir, dno, dep, &qbh, 0))) {
587		hpfs_error(i->i_sb, "hpfs_rename: could not remove dirent");
588		err = r == 2 ? -ENOSPC : -EFSERROR;
589		goto end1;
590	}
591
592end:
593	hpfs_i(i)->i_parent_dir = new_dir->i_ino;
594	if (S_ISDIR(i->i_mode)) {
595		inc_nlink(new_dir);
596		drop_nlink(old_dir);
597	}
598	if ((fnode = hpfs_map_fnode(i->i_sb, i->i_ino, &bh))) {
599		fnode->up = cpu_to_le32(new_dir->i_ino);
600		fnode->len = new_len;
601		memcpy(fnode->name, new_name, new_len>15?15:new_len);
602		if (new_len < 15) memset(&fnode->name[new_len], 0, 15 - new_len);
603		mark_buffer_dirty(bh);
604		brelse(bh);
605	}
606end1:
607	if (!err) {
608		hpfs_update_directory_times(old_dir);
609		hpfs_update_directory_times(new_dir);
610	}
611	hpfs_unlock(i->i_sb);
612	return err;
613}
614
615const struct inode_operations hpfs_dir_iops =
616{
617	.create		= hpfs_create,
618	.lookup		= hpfs_lookup,
619	.unlink		= hpfs_unlink,
620	.symlink	= hpfs_symlink,
621	.mkdir		= hpfs_mkdir,
622	.rmdir		= hpfs_rmdir,
623	.mknod		= hpfs_mknod,
624	.rename		= hpfs_rename,
625	.setattr	= hpfs_setattr,
626};
627