d8379d45964aa2f8dc8a82bc0e2c83c52386bcaa
[yaffs2.git] / yaffs_vfs_single.c
1 /*
2  * YAFFS: Yet Another Flash File System. A NAND-flash specific file system.
3  *
4  * Copyright (C) 2002-2011 Aleph One Ltd.
5  *   for Toby Churchill Ltd and Brightstar Engineering
6  *
7  * Created by Charles Manning <charles@aleph1.co.uk>
8  * Acknowledgements:
9  * Luc van OostenRyck for numerous patches.
10  * Nick Bane for numerous patches.
11  * Nick Bane for 2.5/2.6 integration.
12  * Andras Toth for mknod rdev issue.
13  * Michael Fischer for finding the problem with inode inconsistency.
14  * Some code bodily lifted from JFFS
15  *
16  * This program is free software; you can redistribute it and/or modify
17  * it under the terms of the GNU General Public License version 2 as
18  * published by the Free Software Foundation.
19  */
20
21 /*
22  *
23  * This is the file system front-end to YAFFS that hooks it up to
24  * the VFS.
25  *
26  * Special notes:
27  * >> 2.4: sb->u.generic_sbp points to the struct yaffs_dev associated with
28  *         this superblock
29  * >> 2.6: sb->s_fs_info  points to the struct yaffs_dev associated with this
30  *         superblock
31  * >> inode->u.generic_ip points to the associated struct yaffs_obj.
32  */
33
34 /*
35  * NB There are two variants of Linux VFS glue code. This variant supports
36  * a single version and should not include any multi-version code.
37  */
38 #include <linux/version.h>
39 #include <linux/kernel.h>
40 #include <linux/module.h>
41 #include <linux/slab.h>
42 #include <linux/init.h>
43 #include <linux/fs.h>
44 #include <linux/proc_fs.h>
45 #include <linux/pagemap.h>
46 #include <linux/mtd/mtd.h>
47 #include <linux/interrupt.h>
48 #include <linux/string.h>
49 #include <linux/ctype.h>
50 #include <linux/namei.h>
51 #include <linux/exportfs.h>
52 #include <linux/kthread.h>
53 #include <linux/delay.h>
54 #include <linux/freezer.h>
55 #include <asm/div64.h>
56 #include <linux/statfs.h>
57 #include <linux/uaccess.h>
58 #include <linux/mtd/mtd.h>
59
60 #include "yportenv.h"
61 #include "yaffs_trace.h"
62 #include "yaffs_guts.h"
63 #include "yaffs_attribs.h"
64 #include "yaffs_linux.h"
65 #include "yaffs_mtdif.h"
66 #include "yaffs_mtdif1.h"
67 #include "yaffs_mtdif2.h"
68
69 unsigned int yaffs_trace_mask = YAFFS_TRACE_BAD_BLOCKS | YAFFS_TRACE_ALWAYS;
70 unsigned int yaffs_wr_attempts = YAFFS_WR_ATTEMPTS;
71 unsigned int yaffs_auto_checkpoint = 1;
72 unsigned int yaffs_gc_control = 1;
73 unsigned int yaffs_bg_enable = 1;
74 unsigned int yaffs_auto_select = 1;
75
76 /* Module Parameters */
77 module_param(yaffs_trace_mask, uint, 0644);
78 module_param(yaffs_wr_attempts, uint, 0644);
79 module_param(yaffs_auto_checkpoint, uint, 0644);
80 module_param(yaffs_gc_control, uint, 0644);
81 module_param(yaffs_bg_enable, uint, 0644);
82 module_param(yaffs_auto_select, uint, 0644);
83
84 #define yaffs_devname(sb, buf)  bdevname(sb->s_bdev, buf)
85
86 static uint32_t YCALCBLOCKS(uint64_t partition_size, uint32_t block_size)
87 {
88         uint64_t result = partition_size;
89
90         do_div(result, block_size);
91         return (uint32_t) result;
92 }
93
94 #define yaffs_inode_to_obj_lv(iptr) ((iptr)->i_private)
95 #define yaffs_inode_to_obj(iptr)\
96         ((struct yaffs_obj *)(yaffs_inode_to_obj_lv(iptr)))
97 #define yaffs_dentry_to_obj(dptr) yaffs_inode_to_obj((dptr)->d_inode)
98 #define yaffs_super_to_dev(sb)  ((struct yaffs_dev *)sb->s_fs_info)
99
100 #define update_dir_time(dir) do {\
101                         (dir)->i_ctime = (dir)->i_mtime = CURRENT_TIME; \
102                 } while (0)
103
104
105 static unsigned yaffs_gc_control_callback(struct yaffs_dev *dev)
106 {
107         return yaffs_gc_control;
108 }
109
110 static void yaffs_gross_lock(struct yaffs_dev *dev)
111 {
112         yaffs_trace(YAFFS_TRACE_LOCK, "yaffs locking %p", current);
113         mutex_lock(&(yaffs_dev_to_lc(dev)->gross_lock));
114         yaffs_trace(YAFFS_TRACE_LOCK, "yaffs locked %p", current);
115 }
116
117 static void yaffs_gross_unlock(struct yaffs_dev *dev)
118 {
119         yaffs_trace(YAFFS_TRACE_LOCK, "yaffs unlocking %p", current);
120         mutex_unlock(&(yaffs_dev_to_lc(dev)->gross_lock));
121 }
122
123 static void yaffs_fill_inode_from_obj(struct inode *inode,
124                                       struct yaffs_obj *obj);
125
126 static struct inode *yaffs_iget(struct super_block *sb, unsigned long ino)
127 {
128         struct inode *inode;
129         struct yaffs_obj *obj;
130         struct yaffs_dev *dev = yaffs_super_to_dev(sb);
131
132         yaffs_trace(YAFFS_TRACE_OS, "yaffs_iget for %lu", ino);
133
134         inode = iget_locked(sb, ino);
135         if (!inode)
136                 return ERR_PTR(-ENOMEM);
137         if (!(inode->i_state & I_NEW))
138                 return inode;
139
140         /* NB This is called as a side effect of other functions, but
141          * we had to release the lock to prevent deadlocks, so
142          * need to lock again.
143          */
144
145         yaffs_gross_lock(dev);
146
147         obj = yaffs_find_by_number(dev, inode->i_ino);
148         yaffs_fill_inode_from_obj(inode, obj);
149
150         yaffs_gross_unlock(dev);
151
152         unlock_new_inode(inode);
153         return inode;
154 }
155
156 struct inode *yaffs_get_inode(struct super_block *sb, int mode, int dev,
157                               struct yaffs_obj *obj)
158 {
159         struct inode *inode;
160
161         if (!sb) {
162                 yaffs_trace(YAFFS_TRACE_OS,
163                         "yaffs_get_inode for NULL super_block!!");
164                 return NULL;
165
166         }
167
168         if (!obj) {
169                 yaffs_trace(YAFFS_TRACE_OS,
170                         "yaffs_get_inode for NULL object!!");
171                 return NULL;
172
173         }
174
175         yaffs_trace(YAFFS_TRACE_OS,
176                 "yaffs_get_inode for object %d",
177                 obj->obj_id);
178
179         inode = yaffs_iget(sb, obj->obj_id);
180         if (IS_ERR(inode))
181                 return NULL;
182
183         /* NB Side effect: iget calls back to yaffs_read_inode(). */
184         /* iget also increments the inode's i_count */
185         /* NB You can't be holding gross_lock or deadlock will happen! */
186
187         return inode;
188 }
189
190 static int yaffs_mknod(struct inode *dir, struct dentry *dentry, int mode,
191                        dev_t rdev)
192 {
193         struct inode *inode;
194         struct yaffs_obj *obj = NULL;
195         struct yaffs_dev *dev;
196         struct yaffs_obj *parent = yaffs_inode_to_obj(dir);
197         int error;
198         uid_t uid = current->cred->fsuid;
199         gid_t gid =
200             (dir->i_mode & S_ISGID) ? dir->i_gid : current->cred->fsgid;
201
202         if ((dir->i_mode & S_ISGID) && S_ISDIR(mode))
203                 mode |= S_ISGID;
204
205         if (!parent) {
206                 yaffs_trace(YAFFS_TRACE_OS,
207                         "yaffs_mknod: could not get parent object");
208                 return -EPERM;
209         }
210
211         yaffs_trace(YAFFS_TRACE_OS,
212                         "yaffs_mknod: parent object %d type %d",
213                         parent->obj_id, parent->variant_type);
214
215         yaffs_trace(YAFFS_TRACE_OS,
216                 "yaffs_mknod: making oject for %s, mode %x dev %x",
217                 dentry->d_name.name, mode, rdev);
218
219         dev = parent->my_dev;
220
221         yaffs_gross_lock(dev);
222
223         if (yaffs_get_n_free_chunks(dev) < 1) {
224                 error = -ENOSPC;
225                 goto err_out;
226         }
227
228         switch (mode & S_IFMT) {
229         default:
230                 /* Special (socket, fifo, device...) */
231                 yaffs_trace(YAFFS_TRACE_OS, "yaffs_mknod: making special");
232                 obj =
233                     yaffs_create_special(parent, dentry->d_name.name, mode, uid,
234                                          gid, old_encode_dev(rdev));
235                 break;
236         case S_IFREG:           /* file          */
237                 yaffs_trace(YAFFS_TRACE_OS, "yaffs_mknod: making file");
238                 obj = yaffs_create_file(parent, dentry->d_name.name, mode, uid,
239                                         gid);
240                 break;
241         case S_IFDIR:           /* directory */
242                 yaffs_trace(YAFFS_TRACE_OS, "yaffs_mknod: making directory");
243                 obj = yaffs_create_dir(parent, dentry->d_name.name, mode,
244                                        uid, gid);
245                 break;
246         case S_IFLNK:           /* symlink */
247                 yaffs_trace(YAFFS_TRACE_OS, "yaffs_mknod: making symlink");
248                 obj = NULL;     /* Do we ever get here? */
249                 break;
250         }
251
252         if (!obj) {
253                 error = -ENOMEM;
254                 goto err_out;
255         }
256
257         /* Can not call yaffs_get_inode() with gross lock held */
258         yaffs_gross_unlock(dev);
259
260
261         inode = yaffs_get_inode(dir->i_sb, mode, rdev, obj);
262         d_instantiate(dentry, inode);
263         update_dir_time(dir);
264         yaffs_trace(YAFFS_TRACE_OS,
265                 "yaffs_mknod created object %d count = %d",
266                 obj->obj_id, atomic_read(&inode->i_count));
267         yaffs_fill_inode_from_obj(dir, parent);
268         return 0;
269
270 err_out:
271         yaffs_gross_unlock(dev);
272         yaffs_trace(YAFFS_TRACE_OS, "yaffs_mknod error %d", error);
273         return error;
274
275 }
276
277 static int yaffs_mkdir(struct inode *dir, struct dentry *dentry, int mode)
278 {
279         return yaffs_mknod(dir, dentry, mode | S_IFDIR, 0);
280 }
281
282 static int yaffs_create(struct inode *dir, struct dentry *dentry, int mode,
283                         struct nameidata *n)
284 {
285         return yaffs_mknod(dir, dentry, mode | S_IFREG, 0);
286 }
287
288 static int yaffs_link(struct dentry *old_dentry, struct inode *dir,
289                       struct dentry *dentry)
290 {
291         struct inode *inode = old_dentry->d_inode;
292         struct yaffs_obj *obj = NULL;
293         struct yaffs_obj *link = NULL;
294         struct yaffs_dev *dev;
295
296         yaffs_trace(YAFFS_TRACE_OS, "yaffs_link");
297
298         obj = yaffs_inode_to_obj(inode);
299         dev = obj->my_dev;
300
301         yaffs_gross_lock(dev);
302
303         if (!S_ISDIR(inode->i_mode))    /* Don't link directories */
304                 link =
305                     yaffs_link_obj(yaffs_inode_to_obj(dir), dentry->d_name.name,
306                                    obj);
307
308         if (link) {
309                 set_nlink(old_dentry->d_inode, yaffs_get_obj_link_count(obj));
310                 d_instantiate(dentry, old_dentry->d_inode);
311                 atomic_inc(&old_dentry->d_inode->i_count);
312                 yaffs_trace(YAFFS_TRACE_OS,
313                         "yaffs_link link count %d i_count %d",
314                         old_dentry->d_inode->i_nlink,
315                         atomic_read(&old_dentry->d_inode->i_count));
316         }
317
318         yaffs_gross_unlock(dev);
319
320         if (link) {
321                 update_dir_time(dir);
322                 return 0;
323         }
324
325         return -EPERM;
326 }
327
328 static int yaffs_symlink(struct inode *dir, struct dentry *dentry,
329                          const char *symname)
330 {
331         struct yaffs_obj *obj;
332         struct yaffs_dev *dev;
333         struct inode *inode;
334         uid_t uid = current->cred->fsuid;
335         gid_t gid =
336             (dir->i_mode & S_ISGID) ? dir->i_gid : current->cred->fsgid;
337
338         yaffs_trace(YAFFS_TRACE_OS, "yaffs_symlink");
339
340         if (strnlen(dentry->d_name.name, YAFFS_MAX_NAME_LENGTH + 1) >
341                                 YAFFS_MAX_NAME_LENGTH)
342                 return -ENAMETOOLONG;
343
344         if (strnlen(symname, YAFFS_MAX_ALIAS_LENGTH + 1) >
345                                 YAFFS_MAX_ALIAS_LENGTH)
346                 return -ENAMETOOLONG;
347
348         dev = yaffs_inode_to_obj(dir)->my_dev;
349         yaffs_gross_lock(dev);
350         obj = yaffs_create_symlink(yaffs_inode_to_obj(dir), dentry->d_name.name,
351                                    S_IFLNK | S_IRWXUGO, uid, gid, symname);
352         yaffs_gross_unlock(dev);
353
354         if (!obj) {
355                 yaffs_trace(YAFFS_TRACE_OS, "symlink not created");
356                 return -ENOMEM;
357         }
358
359         inode = yaffs_get_inode(dir->i_sb, obj->yst_mode, 0, obj);
360         d_instantiate(dentry, inode);
361         update_dir_time(dir);
362         yaffs_trace(YAFFS_TRACE_OS, "symlink created OK");
363
364         return 0;
365 }
366
367 static struct dentry *yaffs_lookup(struct inode *dir, struct dentry *dentry,
368                                    struct nameidata *n)
369 {
370         struct yaffs_obj *obj;
371         struct inode *inode = NULL;
372         struct yaffs_dev *dev = yaffs_inode_to_obj(dir)->my_dev;
373
374         if (current != yaffs_dev_to_lc(dev)->readdir_process)
375                 yaffs_gross_lock(dev);
376
377         yaffs_trace(YAFFS_TRACE_OS,
378                 "yaffs_lookup for %d:%s",
379                 yaffs_inode_to_obj(dir)->obj_id, dentry->d_name.name);
380
381         obj = yaffs_find_by_name(yaffs_inode_to_obj(dir), dentry->d_name.name);
382
383         obj = yaffs_get_equivalent_obj(obj);    /* in case it was a hardlink */
384
385         /* Can't hold gross lock when calling yaffs_get_inode() */
386         if (current != yaffs_dev_to_lc(dev)->readdir_process)
387                 yaffs_gross_unlock(dev);
388
389         if (obj) {
390                 yaffs_trace(YAFFS_TRACE_OS,
391                         "yaffs_lookup found %d", obj->obj_id);
392
393                 inode = yaffs_get_inode(dir->i_sb, obj->yst_mode, 0, obj);
394
395                 if (inode) {
396                         yaffs_trace(YAFFS_TRACE_OS, "yaffs_loookup dentry");
397                         d_add(dentry, inode);
398                         /* return dentry; */
399                         return NULL;
400                 }
401
402         } else {
403                 yaffs_trace(YAFFS_TRACE_OS, "yaffs_lookup not found");
404
405         }
406
407         d_add(dentry, inode);
408
409         return NULL;
410 }
411
412 static int yaffs_unlink(struct inode *dir, struct dentry *dentry)
413 {
414         int ret_val;
415         struct yaffs_dev *dev;
416         struct yaffs_obj *obj;
417
418         yaffs_trace(YAFFS_TRACE_OS,
419                 "yaffs_unlink %d:%s",
420                 (int)(dir->i_ino), dentry->d_name.name);
421         obj = yaffs_inode_to_obj(dir);
422         dev = obj->my_dev;
423
424         yaffs_gross_lock(dev);
425
426         ret_val = yaffs_unlinker(obj, dentry->d_name.name);
427
428         if (ret_val == YAFFS_OK) {
429                 inode_dec_link_count(dentry->d_inode);
430                 dir->i_version++;
431                 yaffs_gross_unlock(dev);
432                 update_dir_time(dir);
433                 return 0;
434         }
435         yaffs_gross_unlock(dev);
436         return -ENOTEMPTY;
437 }
438
439 static int yaffs_sync_object(struct file *file, loff_t start, loff_t end, int datasync)
440 {
441
442         struct yaffs_obj *obj;
443         struct yaffs_dev *dev;
444         struct dentry *dentry = file->f_path.dentry;
445
446         obj = yaffs_dentry_to_obj(dentry);
447
448         dev = obj->my_dev;
449
450         yaffs_trace(YAFFS_TRACE_OS | YAFFS_TRACE_SYNC, "yaffs_sync_object");
451         yaffs_gross_lock(dev);
452         yaffs_flush_file(obj, 1, datasync);
453         yaffs_gross_unlock(dev);
454         return 0;
455 }
456 /*
457  * The VFS layer already does all the dentry stuff for rename.
458  *
459  * NB: POSIX says you can rename an object over an old object of the same name
460  */
461 static int yaffs_rename(struct inode *old_dir, struct dentry *old_dentry,
462                         struct inode *new_dir, struct dentry *new_dentry)
463 {
464         struct yaffs_dev *dev;
465         int ret_val = YAFFS_FAIL;
466         struct yaffs_obj *target;
467
468         yaffs_trace(YAFFS_TRACE_OS, "yaffs_rename");
469         dev = yaffs_inode_to_obj(old_dir)->my_dev;
470
471         yaffs_gross_lock(dev);
472
473         /* Check if the target is an existing directory that is not empty. */
474         target = yaffs_find_by_name(yaffs_inode_to_obj(new_dir),
475                                     new_dentry->d_name.name);
476
477         if (target && target->variant_type == YAFFS_OBJECT_TYPE_DIRECTORY &&
478             !list_empty(&target->variant.dir_variant.children)) {
479
480                 yaffs_trace(YAFFS_TRACE_OS, "target is non-empty dir");
481
482                 ret_val = YAFFS_FAIL;
483         } else {
484                 /* Now does unlinking internally using shadowing mechanism */
485                 yaffs_trace(YAFFS_TRACE_OS, "calling yaffs_rename_obj");
486
487                 ret_val = yaffs_rename_obj(yaffs_inode_to_obj(old_dir),
488                                            old_dentry->d_name.name,
489                                            yaffs_inode_to_obj(new_dir),
490                                            new_dentry->d_name.name);
491         }
492         yaffs_gross_unlock(dev);
493
494         if (ret_val == YAFFS_OK) {
495                 if (target)
496                         inode_dec_link_count(new_dentry->d_inode);
497
498                 update_dir_time(old_dir);
499                 if (old_dir != new_dir)
500                         update_dir_time(new_dir);
501                 return 0;
502         } else {
503                 return -ENOTEMPTY;
504         }
505 }
506
507 static int yaffs_setattr(struct dentry *dentry, struct iattr *attr)
508 {
509         struct inode *inode = dentry->d_inode;
510         int error = 0;
511         struct yaffs_dev *dev;
512         int result;
513
514         yaffs_trace(YAFFS_TRACE_OS,
515                 "yaffs_setattr of object %d",
516                 yaffs_inode_to_obj(inode)->obj_id);
517
518         /* Fail if a requested resize >= 2GB */
519         if (attr->ia_valid & ATTR_SIZE && (attr->ia_size >> 31))
520                 error = -EINVAL;
521
522         if (!error)
523                 error = inode_change_ok(inode, attr);
524
525         if (!error) {
526                 setattr_copy(inode, attr);
527                 yaffs_trace(YAFFS_TRACE_OS, "inode_setattr called");
528                 if (attr->ia_valid & ATTR_SIZE) {
529                         truncate_setsize(inode, attr->ia_size);
530                         inode->i_blocks = (inode->i_size + 511) >> 9;
531                 }
532                 dev = yaffs_inode_to_obj(inode)->my_dev;
533                 if (attr->ia_valid & ATTR_SIZE) {
534                         yaffs_trace(YAFFS_TRACE_OS, "resize to %d(%x)",
535                                            (int)(attr->ia_size),
536                                            (int)(attr->ia_size));
537                 }
538
539                 yaffs_gross_lock(dev);
540                 result = yaffs_set_attribs(yaffs_inode_to_obj(inode), attr);
541                 if (result != YAFFS_OK)
542                         error = -EPERM;
543                 yaffs_gross_unlock(dev);
544         }
545
546         yaffs_trace(YAFFS_TRACE_OS, "yaffs_setattr done returning %d", error);
547
548         return error;
549 }
550
551 static int yaffs_setxattr(struct dentry *dentry, const char *name,
552                    const void *value, size_t size, int flags)
553 {
554         struct inode *inode = dentry->d_inode;
555         int error;
556         struct yaffs_dev *dev;
557         struct yaffs_obj *obj = yaffs_inode_to_obj(inode);
558
559         yaffs_trace(YAFFS_TRACE_OS, "yaffs_setxattr of object %d", obj->obj_id);
560
561         dev = obj->my_dev;
562         yaffs_gross_lock(dev);
563         error = yaffs_set_xattrib(obj, name, value, size, flags);
564         yaffs_gross_unlock(dev);
565
566         yaffs_trace(YAFFS_TRACE_OS, "yaffs_setxattr done returning %d", error);
567
568         return error;
569 }
570
571 static ssize_t yaffs_getxattr(struct dentry *dentry, const char *name,
572                                 void *buff, size_t size)
573 {
574         struct inode *inode = dentry->d_inode;
575         int error;
576         struct yaffs_dev *dev;
577         struct yaffs_obj *obj = yaffs_inode_to_obj(inode);
578
579         yaffs_trace(YAFFS_TRACE_OS,
580                 "yaffs_getxattr \"%s\" from object %d",
581                 name, obj->obj_id);
582
583         dev = obj->my_dev;
584         yaffs_gross_lock(dev);
585         error = yaffs_get_xattrib(obj, name, buff, size);
586         yaffs_gross_unlock(dev);
587
588         yaffs_trace(YAFFS_TRACE_OS, "yaffs_getxattr done returning %d", error);
589
590         return error;
591 }
592
593 static int yaffs_removexattr(struct dentry *dentry, const char *name)
594 {
595         struct inode *inode = dentry->d_inode;
596         int error;
597         struct yaffs_dev *dev;
598         struct yaffs_obj *obj = yaffs_inode_to_obj(inode);
599
600         yaffs_trace(YAFFS_TRACE_OS,
601                 "yaffs_removexattr of object %d", obj->obj_id);
602
603         dev = obj->my_dev;
604         yaffs_gross_lock(dev);
605         error = yaffs_remove_xattrib(obj, name);
606         yaffs_gross_unlock(dev);
607
608         yaffs_trace(YAFFS_TRACE_OS,
609                 "yaffs_removexattr done returning %d", error);
610
611         return error;
612 }
613
614 static ssize_t yaffs_listxattr(struct dentry *dentry, char *buff, size_t size)
615 {
616         struct inode *inode = dentry->d_inode;
617         int error;
618         struct yaffs_dev *dev;
619         struct yaffs_obj *obj = yaffs_inode_to_obj(inode);
620
621         yaffs_trace(YAFFS_TRACE_OS,
622                 "yaffs_listxattr of object %d", obj->obj_id);
623
624         dev = obj->my_dev;
625         yaffs_gross_lock(dev);
626         error = yaffs_list_xattrib(obj, buff, size);
627         yaffs_gross_unlock(dev);
628
629         yaffs_trace(YAFFS_TRACE_OS,
630                 "yaffs_listxattr done returning %d", error);
631
632         return error;
633 }
634
635 static const struct inode_operations yaffs_dir_inode_operations = {
636         .create = yaffs_create,
637         .lookup = yaffs_lookup,
638         .link = yaffs_link,
639         .unlink = yaffs_unlink,
640         .symlink = yaffs_symlink,
641         .mkdir = yaffs_mkdir,
642         .rmdir = yaffs_unlink,
643         .mknod = yaffs_mknod,
644         .rename = yaffs_rename,
645         .setattr = yaffs_setattr,
646         .setxattr = yaffs_setxattr,
647         .getxattr = yaffs_getxattr,
648         .listxattr = yaffs_listxattr,
649         .removexattr = yaffs_removexattr,
650 };
651 /*-----------------------------------------------------------------*/
652 /* Directory search context allows us to unlock access to yaffs during
653  * filldir without causing problems with the directory being modified.
654  * This is similar to the tried and tested mechanism used in yaffs direct.
655  *
656  * A search context iterates along a doubly linked list of siblings in the
657  * directory. If the iterating object is deleted then this would corrupt
658  * the list iteration, likely causing a crash. The search context avoids
659  * this by using the remove_obj_fn to move the search context to the
660  * next object before the object is deleted.
661  *
662  * Many readdirs (and thus seach conexts) may be alive simulateously so
663  * each struct yaffs_dev has a list of these.
664  *
665  * A seach context lives for the duration of a readdir.
666  *
667  * All these functions must be called while yaffs is locked.
668  */
669
670 struct yaffs_search_context {
671         struct yaffs_dev *dev;
672         struct yaffs_obj *dir_obj;
673         struct yaffs_obj *next_return;
674         struct list_head others;
675 };
676
677 /*
678  * yaffs_new_search() creates a new search context, initialises it and
679  * adds it to the device's search context list.
680  *
681  * Called at start of readdir.
682  */
683 static struct yaffs_search_context *yaffs_new_search(struct yaffs_obj *dir)
684 {
685         struct yaffs_dev *dev = dir->my_dev;
686         struct yaffs_search_context *sc =
687             kmalloc(sizeof(struct yaffs_search_context), GFP_NOFS);
688
689         if (!sc)
690                 return NULL;
691
692         sc->dir_obj = dir;
693         sc->dev = dev;
694         if (list_empty(&sc->dir_obj->variant.dir_variant.children))
695                 sc->next_return = NULL;
696         else
697                 sc->next_return =
698                     list_entry(dir->variant.dir_variant.children.next,
699                                struct yaffs_obj, siblings);
700         INIT_LIST_HEAD(&sc->others);
701         list_add(&sc->others, &(yaffs_dev_to_lc(dev)->search_contexts));
702
703         return sc;
704 }
705
706 /*
707  * yaffs_search_end() disposes of a search context and cleans up.
708  */
709 static void yaffs_search_end(struct yaffs_search_context *sc)
710 {
711         if (sc) {
712                 list_del(&sc->others);
713                 kfree(sc);
714         }
715 }
716
717 /*
718  * yaffs_search_advance() moves a search context to the next object.
719  * Called when the search iterates or when an object removal causes
720  * the search context to be moved to the next object.
721  */
722 static void yaffs_search_advance(struct yaffs_search_context *sc)
723 {
724         if (!sc)
725                 return;
726
727         if (sc->next_return == NULL ||
728             list_empty(&sc->dir_obj->variant.dir_variant.children))
729                 sc->next_return = NULL;
730         else {
731                 struct list_head *next = sc->next_return->siblings.next;
732
733                 if (next == &sc->dir_obj->variant.dir_variant.children)
734                         sc->next_return = NULL; /* end of list */
735                 else
736                         sc->next_return =
737                             list_entry(next, struct yaffs_obj, siblings);
738         }
739 }
740
741 /*
742  * yaffs_remove_obj_callback() is called when an object is unlinked.
743  * We check open search contexts and advance any which are currently
744  * on the object being iterated.
745  */
746 static void yaffs_remove_obj_callback(struct yaffs_obj *obj)
747 {
748
749         struct list_head *i;
750         struct yaffs_search_context *sc;
751         struct list_head *search_contexts =
752             &(yaffs_dev_to_lc(obj->my_dev)->search_contexts);
753
754         /* Iterate through the directory search contexts.
755          * If any are currently on the object being removed, then advance
756          * the search context to the next object to prevent a hanging pointer.
757          */
758         list_for_each(i, search_contexts) {
759                 sc = list_entry(i, struct yaffs_search_context, others);
760                 if (sc->next_return == obj)
761                         yaffs_search_advance(sc);
762         }
763
764 }
765
766 static int yaffs_readdir(struct file *f, void *dirent, filldir_t filldir)
767 {
768         struct yaffs_obj *obj;
769         struct yaffs_dev *dev;
770         struct yaffs_search_context *sc;
771         struct inode *inode = f->f_dentry->d_inode;
772         unsigned long offset, curoffs;
773         struct yaffs_obj *l;
774         int ret_val = 0;
775         char name[YAFFS_MAX_NAME_LENGTH + 1];
776
777         obj = yaffs_dentry_to_obj(f->f_dentry);
778         dev = obj->my_dev;
779
780         yaffs_gross_lock(dev);
781
782         yaffs_dev_to_lc(dev)->readdir_process = current;
783
784         offset = f->f_pos;
785
786         sc = yaffs_new_search(obj);
787         if (!sc) {
788                 ret_val = -ENOMEM;
789                 goto out;
790         }
791
792         yaffs_trace(YAFFS_TRACE_OS,
793                 "yaffs_readdir: starting at %d", (int)offset);
794
795         if (offset == 0) {
796                 yaffs_trace(YAFFS_TRACE_OS,
797                         "yaffs_readdir: entry . ino %d",
798                         (int)inode->i_ino);
799                 yaffs_gross_unlock(dev);
800                 if (filldir(dirent, ".", 1, offset, inode->i_ino, DT_DIR) < 0) {
801                         yaffs_gross_lock(dev);
802                         goto out;
803                 }
804                 yaffs_gross_lock(dev);
805                 offset++;
806                 f->f_pos++;
807         }
808         if (offset == 1) {
809                 yaffs_trace(YAFFS_TRACE_OS,
810                         "yaffs_readdir: entry .. ino %d",
811                         (int)f->f_dentry->d_parent->d_inode->i_ino);
812                 yaffs_gross_unlock(dev);
813                 if (filldir(dirent, "..", 2, offset,
814                             f->f_dentry->d_parent->d_inode->i_ino,
815                             DT_DIR) < 0) {
816                         yaffs_gross_lock(dev);
817                         goto out;
818                 }
819                 yaffs_gross_lock(dev);
820                 offset++;
821                 f->f_pos++;
822         }
823
824         curoffs = 1;
825
826         /* If the directory has changed since the open or last call to
827            readdir, rewind to after the 2 canned entries. */
828         if (f->f_version != inode->i_version) {
829                 offset = 2;
830                 f->f_pos = offset;
831                 f->f_version = inode->i_version;
832         }
833
834         while (sc->next_return) {
835                 curoffs++;
836                 l = sc->next_return;
837                 if (curoffs >= offset) {
838                         int this_inode = yaffs_get_obj_inode(l);
839                         int this_type = yaffs_get_obj_type(l);
840
841                         yaffs_get_obj_name(l, name, YAFFS_MAX_NAME_LENGTH + 1);
842                         yaffs_trace(YAFFS_TRACE_OS,
843                                 "yaffs_readdir: %s inode %d",
844                                 name, yaffs_get_obj_inode(l));
845
846                         yaffs_gross_unlock(dev);
847
848                         if (filldir(dirent,
849                                     name,
850                                     strlen(name),
851                                     offset, this_inode, this_type) < 0) {
852                                 yaffs_gross_lock(dev);
853                                 goto out;
854                         }
855
856                         yaffs_gross_lock(dev);
857
858                         offset++;
859                         f->f_pos++;
860                 }
861                 yaffs_search_advance(sc);
862         }
863
864 out:
865         yaffs_search_end(sc);
866         yaffs_dev_to_lc(dev)->readdir_process = NULL;
867         yaffs_gross_unlock(dev);
868
869         return ret_val;
870 }
871
872 static const struct file_operations yaffs_dir_operations = {
873         .read = generic_read_dir,
874         .readdir = yaffs_readdir,
875         .fsync = yaffs_sync_object,
876         .llseek = generic_file_llseek,
877 };
878
879
880
881 static int yaffs_file_flush(struct file *file, fl_owner_t id)
882 {
883         struct yaffs_obj *obj = yaffs_dentry_to_obj(file->f_dentry);
884         struct yaffs_dev *dev = obj->my_dev;
885
886         yaffs_trace(YAFFS_TRACE_OS,
887                 "yaffs_file_flush object %d (%s)",
888                 obj->obj_id, obj->dirty ? "dirty" : "clean");
889
890         yaffs_gross_lock(dev);
891
892         yaffs_flush_file(obj, 1, 0);
893
894         yaffs_gross_unlock(dev);
895
896         return 0;
897 }
898
899 static const struct file_operations yaffs_file_operations = {
900         .read = do_sync_read,
901         .write = do_sync_write,
902         .aio_read = generic_file_aio_read,
903         .aio_write = generic_file_aio_write,
904         .mmap = generic_file_mmap,
905         .flush = yaffs_file_flush,
906         .fsync = yaffs_sync_object,
907         .splice_read = generic_file_splice_read,
908         .splice_write = generic_file_splice_write,
909         .llseek = generic_file_llseek,
910 };
911
912
913 /* ExportFS support */
914 static struct inode *yaffs2_nfs_get_inode(struct super_block *sb, uint64_t ino,
915                                           uint32_t generation)
916 {
917         return yaffs_iget(sb, ino);
918 }
919
920 static struct dentry *yaffs2_fh_to_dentry(struct super_block *sb,
921                                           struct fid *fid, int fh_len,
922                                           int fh_type)
923 {
924         return generic_fh_to_dentry(sb, fid, fh_len, fh_type,
925                                     yaffs2_nfs_get_inode);
926 }
927
928 static struct dentry *yaffs2_fh_to_parent(struct super_block *sb,
929                                           struct fid *fid, int fh_len,
930                                           int fh_type)
931 {
932         return generic_fh_to_parent(sb, fid, fh_len, fh_type,
933                                     yaffs2_nfs_get_inode);
934 }
935
936 struct dentry *yaffs2_get_parent(struct dentry *dentry)
937 {
938
939         struct super_block *sb = dentry->d_inode->i_sb;
940         struct dentry *parent = ERR_PTR(-ENOENT);
941         struct inode *inode;
942         unsigned long parent_ino;
943         struct yaffs_obj *d_obj;
944         struct yaffs_obj *parent_obj;
945
946         d_obj = yaffs_inode_to_obj(dentry->d_inode);
947
948         if (d_obj) {
949                 parent_obj = d_obj->parent;
950                 if (parent_obj) {
951                         parent_ino = yaffs_get_obj_inode(parent_obj);
952                         inode = yaffs_iget(sb, parent_ino);
953
954                         if (IS_ERR(inode)) {
955                                 parent = ERR_CAST(inode);
956                         } else {
957                                 parent = d_obtain_alias(inode);
958                                 if (!IS_ERR(parent)) {
959                                         parent = ERR_PTR(-ENOMEM);
960                                         iput(inode);
961                                 }
962                         }
963                 }
964         }
965         return parent;
966 }
967
968 /* Just declare a zero structure as a NULL value implies
969  * using the default functions of exportfs.
970  */
971
972 static struct export_operations yaffs_export_ops = {
973         .fh_to_dentry = yaffs2_fh_to_dentry,
974         .fh_to_parent = yaffs2_fh_to_parent,
975         .get_parent = yaffs2_get_parent,
976 };
977
978
979 /*-----------------------------------------------------------------*/
980
981 static int yaffs_readlink(struct dentry *dentry, char __user * buffer,
982                           int buflen)
983 {
984         unsigned char *alias;
985         int ret;
986         struct yaffs_dev *dev = yaffs_dentry_to_obj(dentry)->my_dev;
987
988         yaffs_gross_lock(dev);
989
990         alias = yaffs_get_symlink_alias(yaffs_dentry_to_obj(dentry));
991
992         yaffs_gross_unlock(dev);
993
994         if (!alias)
995                 return -ENOMEM;
996
997         ret = vfs_readlink(dentry, buffer, buflen, alias);
998         kfree(alias);
999         return ret;
1000 }
1001
1002 static void *yaffs_follow_link(struct dentry *dentry, struct nameidata *nd)
1003 {
1004         unsigned char *alias;
1005         void *ret;
1006         struct yaffs_dev *dev = yaffs_dentry_to_obj(dentry)->my_dev;
1007
1008         yaffs_gross_lock(dev);
1009
1010         alias = yaffs_get_symlink_alias(yaffs_dentry_to_obj(dentry));
1011         yaffs_gross_unlock(dev);
1012
1013         if (!alias) {
1014                 ret = ERR_PTR(-ENOMEM);
1015                 goto out;
1016         }
1017
1018         nd_set_link(nd, alias);
1019         ret = (void *)alias;
1020 out:
1021         return ret;
1022 }
1023
1024 void yaffs_put_link(struct dentry *dentry, struct nameidata *nd, void *alias)
1025 {
1026         kfree(alias);
1027 }
1028
1029
1030 static void yaffs_unstitch_obj(struct inode *inode, struct yaffs_obj *obj)
1031 {
1032         /* Clear the association between the inode and
1033          * the struct yaffs_obj.
1034          */
1035         obj->my_inode = NULL;
1036         yaffs_inode_to_obj_lv(inode) = NULL;
1037
1038         /* If the object freeing was deferred, then the real
1039          * free happens now.
1040          * This should fix the inode inconsistency problem.
1041          */
1042         yaffs_handle_defered_free(obj);
1043 }
1044
1045 /* yaffs_evict_inode combines into one operation what was previously done in
1046  * yaffs_clear_inode() and yaffs_delete_inode()
1047  *
1048  */
1049 static void yaffs_evict_inode(struct inode *inode)
1050 {
1051         struct yaffs_obj *obj;
1052         struct yaffs_dev *dev;
1053         int deleteme = 0;
1054
1055         obj = yaffs_inode_to_obj(inode);
1056
1057         yaffs_trace(YAFFS_TRACE_OS,
1058                 "yaffs_evict_inode: ino %d, count %d %s",
1059                 (int)inode->i_ino,
1060                 atomic_read(&inode->i_count),
1061                 obj ? "object exists" : "null object");
1062
1063         if (!inode->i_nlink && !is_bad_inode(inode))
1064                 deleteme = 1;
1065         truncate_inode_pages(&inode->i_data, 0);
1066         end_writeback(inode);
1067
1068         if (deleteme && obj) {
1069                 dev = obj->my_dev;
1070                 yaffs_gross_lock(dev);
1071                 yaffs_del_obj(obj);
1072                 yaffs_gross_unlock(dev);
1073         }
1074         if (obj) {
1075                 dev = obj->my_dev;
1076                 yaffs_gross_lock(dev);
1077                 yaffs_unstitch_obj(inode, obj);
1078                 yaffs_gross_unlock(dev);
1079         }
1080
1081 }
1082
1083 static void yaffs_touch_super(struct yaffs_dev *dev)
1084 {
1085         struct super_block *sb = yaffs_dev_to_lc(dev)->super;
1086
1087         yaffs_trace(YAFFS_TRACE_OS, "yaffs_touch_super() sb = %p", sb);
1088         if (sb)
1089                 sb->s_dirt = 1;
1090 }
1091
1092 static int yaffs_readpage_nolock(struct file *f, struct page *pg)
1093 {
1094         /* Lifted from jffs2 */
1095
1096         struct yaffs_obj *obj;
1097         unsigned char *pg_buf;
1098         int ret;
1099         struct yaffs_dev *dev;
1100
1101         yaffs_trace(YAFFS_TRACE_OS,
1102                 "yaffs_readpage_nolock at %08x, size %08x",
1103                 (unsigned)(pg->index << PAGE_CACHE_SHIFT),
1104                 (unsigned)PAGE_CACHE_SIZE);
1105
1106         obj = yaffs_dentry_to_obj(f->f_dentry);
1107
1108         dev = obj->my_dev;
1109
1110         BUG_ON(!PageLocked(pg));
1111
1112         pg_buf = kmap(pg);
1113         /* FIXME: Can kmap fail? */
1114
1115         yaffs_gross_lock(dev);
1116
1117         ret = yaffs_file_rd(obj, pg_buf,
1118                             pg->index << PAGE_CACHE_SHIFT, PAGE_CACHE_SIZE);
1119
1120         yaffs_gross_unlock(dev);
1121
1122         if (ret >= 0)
1123                 ret = 0;
1124
1125         if (ret) {
1126                 ClearPageUptodate(pg);
1127                 SetPageError(pg);
1128         } else {
1129                 SetPageUptodate(pg);
1130                 ClearPageError(pg);
1131         }
1132
1133         flush_dcache_page(pg);
1134         kunmap(pg);
1135
1136         yaffs_trace(YAFFS_TRACE_OS, "yaffs_readpage_nolock done");
1137         return ret;
1138 }
1139
1140 static int yaffs_readpage_unlock(struct file *f, struct page *pg)
1141 {
1142         int ret = yaffs_readpage_nolock(f, pg);
1143
1144         unlock_page(pg);
1145         return ret;
1146 }
1147
1148 static int yaffs_readpage(struct file *f, struct page *pg)
1149 {
1150         int ret;
1151
1152         yaffs_trace(YAFFS_TRACE_OS, "yaffs_readpage");
1153         ret = yaffs_readpage_unlock(f, pg);
1154         yaffs_trace(YAFFS_TRACE_OS, "yaffs_readpage done");
1155         return ret;
1156 }
1157
1158 /* writepage inspired by/stolen from smbfs */
1159
1160 static int yaffs_writepage(struct page *page, struct writeback_control *wbc)
1161 {
1162         struct yaffs_dev *dev;
1163         struct address_space *mapping = page->mapping;
1164         struct inode *inode;
1165         unsigned long end_index;
1166         char *buffer;
1167         struct yaffs_obj *obj;
1168         int n_written = 0;
1169         unsigned n_bytes;
1170         loff_t i_size;
1171
1172         if (!mapping)
1173                 BUG();
1174         inode = mapping->host;
1175         if (!inode)
1176                 BUG();
1177         i_size = i_size_read(inode);
1178
1179         end_index = i_size >> PAGE_CACHE_SHIFT;
1180
1181         if (page->index < end_index)
1182                 n_bytes = PAGE_CACHE_SIZE;
1183         else {
1184                 n_bytes = i_size & (PAGE_CACHE_SIZE - 1);
1185
1186                 if (page->index > end_index || !n_bytes) {
1187                         yaffs_trace(YAFFS_TRACE_OS,
1188                                 "yaffs_writepage at %08x, inode size = %08x!!!",
1189                                 (unsigned)(page->index << PAGE_CACHE_SHIFT),
1190                                 (unsigned)inode->i_size);
1191                         yaffs_trace(YAFFS_TRACE_OS,
1192                           "                -> don't care!!");
1193
1194                         zero_user_segment(page, 0, PAGE_CACHE_SIZE);
1195                         set_page_writeback(page);
1196                         unlock_page(page);
1197                         end_page_writeback(page);
1198                         return 0;
1199                 }
1200         }
1201
1202         if (n_bytes != PAGE_CACHE_SIZE)
1203                 zero_user_segment(page, n_bytes, PAGE_CACHE_SIZE);
1204
1205         get_page(page);
1206
1207         buffer = kmap(page);
1208
1209         obj = yaffs_inode_to_obj(inode);
1210         dev = obj->my_dev;
1211         yaffs_gross_lock(dev);
1212
1213         yaffs_trace(YAFFS_TRACE_OS,
1214                 "yaffs_writepage at %08x, size %08x",
1215                 (unsigned)(page->index << PAGE_CACHE_SHIFT), n_bytes);
1216         yaffs_trace(YAFFS_TRACE_OS,
1217                 "writepag0: obj = %05x, ino = %05x",
1218                 (int)obj->variant.file_variant.file_size, (int)inode->i_size);
1219
1220         n_written = yaffs_wr_file(obj, buffer,
1221                                   page->index << PAGE_CACHE_SHIFT, n_bytes, 0);
1222
1223         yaffs_touch_super(dev);
1224
1225         yaffs_trace(YAFFS_TRACE_OS,
1226                 "writepag1: obj = %05x, ino = %05x",
1227                 (int)obj->variant.file_variant.file_size, (int)inode->i_size);
1228
1229         yaffs_gross_unlock(dev);
1230
1231         kunmap(page);
1232         set_page_writeback(page);
1233         unlock_page(page);
1234         end_page_writeback(page);
1235         put_page(page);
1236
1237         return (n_written == n_bytes) ? 0 : -ENOSPC;
1238 }
1239
1240 /* Space holding and freeing is done to ensure we have space available for
1241  * write_begin/end.
1242  * For now we just assume few parallel writes and check against a small
1243  * number.
1244  * Todo: need to do this with a counter to handle parallel reads better
1245  */
1246
1247 static ssize_t yaffs_hold_space(struct file *f)
1248 {
1249         struct yaffs_obj *obj;
1250         struct yaffs_dev *dev;
1251         int n_free_chunks;
1252
1253         obj = yaffs_dentry_to_obj(f->f_dentry);
1254
1255         dev = obj->my_dev;
1256
1257         yaffs_gross_lock(dev);
1258
1259         n_free_chunks = yaffs_get_n_free_chunks(dev);
1260
1261         yaffs_gross_unlock(dev);
1262
1263         return (n_free_chunks > 20) ? 1 : 0;
1264 }
1265
1266 static void yaffs_release_space(struct file *f)
1267 {
1268         struct yaffs_obj *obj;
1269         struct yaffs_dev *dev;
1270
1271         obj = yaffs_dentry_to_obj(f->f_dentry);
1272
1273         dev = obj->my_dev;
1274
1275         yaffs_gross_lock(dev);
1276
1277         yaffs_gross_unlock(dev);
1278 }
1279
1280 static int yaffs_write_begin(struct file *filp, struct address_space *mapping,
1281                              loff_t pos, unsigned len, unsigned flags,
1282                              struct page **pagep, void **fsdata)
1283 {
1284         struct page *pg = NULL;
1285         pgoff_t index = pos >> PAGE_CACHE_SHIFT;
1286         int ret = 0;
1287         int space_held = 0;
1288
1289         /* Get a page */
1290         pg = grab_cache_page_write_begin(mapping, index, flags);
1291
1292         *pagep = pg;
1293         if (!pg) {
1294                 ret = -ENOMEM;
1295                 goto out;
1296         }
1297         yaffs_trace(YAFFS_TRACE_OS,
1298                 "start yaffs_write_begin index %d(%x) uptodate %d",
1299                 (int)index, (int)index, PageUptodate(pg) ? 1 : 0);
1300
1301         /* Get fs space */
1302         space_held = yaffs_hold_space(filp);
1303
1304         if (!space_held) {
1305                 ret = -ENOSPC;
1306                 goto out;
1307         }
1308
1309         /* Update page if required */
1310
1311         if (!PageUptodate(pg))
1312                 ret = yaffs_readpage_nolock(filp, pg);
1313
1314         if (ret)
1315                 goto out;
1316
1317         /* Happy path return */
1318         yaffs_trace(YAFFS_TRACE_OS, "end yaffs_write_begin - ok");
1319
1320         return 0;
1321
1322 out:
1323         yaffs_trace(YAFFS_TRACE_OS,
1324                 "end yaffs_write_begin fail returning %d", ret);
1325         if (space_held)
1326                 yaffs_release_space(filp);
1327         if (pg) {
1328                 unlock_page(pg);
1329                 page_cache_release(pg);
1330         }
1331         return ret;
1332 }
1333
1334 static ssize_t yaffs_file_write(struct file *f, const char *buf, size_t n,
1335                                 loff_t *pos)
1336 {
1337         struct yaffs_obj *obj;
1338         int n_written, ipos;
1339         struct inode *inode;
1340         struct yaffs_dev *dev;
1341
1342         obj = yaffs_dentry_to_obj(f->f_dentry);
1343
1344         if (!obj) {
1345                 /* This should not happen */
1346                 yaffs_trace(YAFFS_TRACE_OS,
1347                         "yaffs_file_write: hey obj is null!");
1348                 return -EINVAL;
1349         }
1350
1351         dev = obj->my_dev;
1352
1353         yaffs_gross_lock(dev);
1354
1355         inode = f->f_dentry->d_inode;
1356
1357         if (!S_ISBLK(inode->i_mode) && f->f_flags & O_APPEND)
1358                 ipos = inode->i_size;
1359         else
1360                 ipos = *pos;
1361
1362         yaffs_trace(YAFFS_TRACE_OS,
1363                 "yaffs_file_write about to write writing %u(%x) bytes to object %d at %d(%x)",
1364                 (unsigned)n, (unsigned)n, obj->obj_id, ipos, ipos);
1365
1366         n_written = yaffs_wr_file(obj, buf, ipos, n, 0);
1367
1368         yaffs_touch_super(dev);
1369
1370         yaffs_trace(YAFFS_TRACE_OS,
1371                 "yaffs_file_write: %d(%x) bytes written",
1372                 (unsigned)n, (unsigned)n);
1373
1374         if (n_written > 0) {
1375                 ipos += n_written;
1376                 *pos = ipos;
1377                 if (ipos > inode->i_size) {
1378                         inode->i_size = ipos;
1379                         inode->i_blocks = (ipos + 511) >> 9;
1380
1381                         yaffs_trace(YAFFS_TRACE_OS,
1382                                 "yaffs_file_write size updated to %d bytes, %d blocks",
1383                                 ipos, (int)(inode->i_blocks));
1384                 }
1385         }
1386         yaffs_gross_unlock(dev);
1387         return (n_written == 0) && (n > 0) ? -ENOSPC : n_written;
1388 }
1389
1390 static int yaffs_write_end(struct file *filp, struct address_space *mapping,
1391                            loff_t pos, unsigned len, unsigned copied,
1392                            struct page *pg, void *fsdadata)
1393 {
1394         int ret = 0;
1395         void *addr, *kva;
1396         uint32_t offset_into_page = pos & (PAGE_CACHE_SIZE - 1);
1397
1398         kva = kmap(pg);
1399         addr = kva + offset_into_page;
1400
1401         yaffs_trace(YAFFS_TRACE_OS,
1402                 "yaffs_write_end addr %p pos %x n_bytes %d",
1403                 addr, (unsigned)pos, copied);
1404
1405         ret = yaffs_file_write(filp, addr, copied, &pos);
1406
1407         if (ret != copied) {
1408                 yaffs_trace(YAFFS_TRACE_OS,
1409                         "yaffs_write_end not same size ret %d  copied %d",
1410                         ret, copied);
1411                 SetPageError(pg);
1412         }
1413
1414         kunmap(pg);
1415
1416         yaffs_release_space(filp);
1417         unlock_page(pg);
1418         page_cache_release(pg);
1419         return ret;
1420 }
1421
1422 static int yaffs_statfs(struct dentry *dentry, struct kstatfs *buf)
1423 {
1424         struct yaffs_dev *dev = yaffs_dentry_to_obj(dentry)->my_dev;
1425         struct super_block *sb = dentry->d_sb;
1426
1427         yaffs_trace(YAFFS_TRACE_OS, "yaffs_statfs");
1428
1429         yaffs_gross_lock(dev);
1430
1431         buf->f_type = YAFFS_MAGIC;
1432         buf->f_bsize = sb->s_blocksize;
1433         buf->f_namelen = 255;
1434
1435         if (dev->data_bytes_per_chunk & (dev->data_bytes_per_chunk - 1)) {
1436                 /* Do this if chunk size is not a power of 2 */
1437
1438                 uint64_t bytes_in_dev;
1439                 uint64_t bytes_free;
1440
1441                 bytes_in_dev =
1442                     ((uint64_t)
1443                      ((dev->param.end_block - dev->param.start_block + 1))) *
1444                      ((uint64_t) (dev->param.chunks_per_block *
1445                                            dev->data_bytes_per_chunk));
1446
1447                 do_div(bytes_in_dev, sb->s_blocksize);
1448                         /* bytes_in_dev becomes the number of blocks */
1449                 buf->f_blocks = bytes_in_dev;
1450
1451                 bytes_free = ((uint64_t) (yaffs_get_n_free_chunks(dev))) *
1452                     ((uint64_t) (dev->data_bytes_per_chunk));
1453
1454                 do_div(bytes_free, sb->s_blocksize);
1455
1456                 buf->f_bfree = bytes_free;
1457
1458         } else if (sb->s_blocksize > dev->data_bytes_per_chunk) {
1459
1460                 buf->f_blocks =
1461                     (dev->param.end_block - dev->param.start_block + 1) *
1462                     dev->param.chunks_per_block /
1463                     (sb->s_blocksize / dev->data_bytes_per_chunk);
1464                 buf->f_bfree =
1465                     yaffs_get_n_free_chunks(dev) /
1466                     (sb->s_blocksize / dev->data_bytes_per_chunk);
1467         } else {
1468                 buf->f_blocks =
1469                     (dev->param.end_block - dev->param.start_block + 1) *
1470                     dev->param.chunks_per_block *
1471                     (dev->data_bytes_per_chunk / sb->s_blocksize);
1472
1473                 buf->f_bfree =
1474                     yaffs_get_n_free_chunks(dev) *
1475                     (dev->data_bytes_per_chunk / sb->s_blocksize);
1476         }
1477
1478         buf->f_files = 0;
1479         buf->f_ffree = 0;
1480         buf->f_bavail = buf->f_bfree;
1481
1482         yaffs_gross_unlock(dev);
1483         return 0;
1484 }
1485
1486 static void yaffs_flush_inodes(struct super_block *sb)
1487 {
1488         struct inode *iptr;
1489         struct yaffs_obj *obj;
1490
1491         list_for_each_entry(iptr, &sb->s_inodes, i_sb_list) {
1492                 obj = yaffs_inode_to_obj(iptr);
1493                 if (obj) {
1494                         yaffs_trace(YAFFS_TRACE_OS,
1495                                 "flushing obj %d", obj->obj_id);
1496                         yaffs_flush_file(obj, 1, 0);
1497                 }
1498         }
1499 }
1500
1501 static void yaffs_flush_super(struct super_block *sb, int do_checkpoint)
1502 {
1503         struct yaffs_dev *dev = yaffs_super_to_dev(sb);
1504
1505         if (!dev)
1506                 return;
1507
1508         yaffs_flush_inodes(sb);
1509         yaffs_update_dirty_dirs(dev);
1510         yaffs_flush_whole_cache(dev);
1511         if (do_checkpoint)
1512                 yaffs_checkpoint_save(dev);
1513 }
1514
1515 static unsigned yaffs_bg_gc_urgency(struct yaffs_dev *dev)
1516 {
1517         unsigned erased_chunks =
1518             dev->n_erased_blocks * dev->param.chunks_per_block;
1519         struct yaffs_linux_context *context = yaffs_dev_to_lc(dev);
1520         unsigned scattered = 0; /* Free chunks not in an erased block */
1521
1522         if (erased_chunks < dev->n_free_chunks)
1523                 scattered = (dev->n_free_chunks - erased_chunks);
1524
1525         if (!context->bg_running)
1526                 return 0;
1527         else if (scattered < (dev->param.chunks_per_block * 2))
1528                 return 0;
1529         else if (erased_chunks > dev->n_free_chunks / 2)
1530                 return 0;
1531         else if (erased_chunks > dev->n_free_chunks / 4)
1532                 return 1;
1533         else
1534                 return 2;
1535 }
1536
1537 static int yaffs_do_sync_fs(struct super_block *sb, int request_checkpoint)
1538 {
1539
1540         struct yaffs_dev *dev = yaffs_super_to_dev(sb);
1541         unsigned int oneshot_checkpoint = (yaffs_auto_checkpoint & 4);
1542         unsigned gc_urgent = yaffs_bg_gc_urgency(dev);
1543         int do_checkpoint;
1544
1545         yaffs_trace(YAFFS_TRACE_OS | YAFFS_TRACE_SYNC | YAFFS_TRACE_BACKGROUND,
1546                 "yaffs_do_sync_fs: gc-urgency %d %s %s%s",
1547                 gc_urgent,
1548                 sb->s_dirt ? "dirty" : "clean",
1549                 request_checkpoint ? "checkpoint requested" : "no checkpoint",
1550                 oneshot_checkpoint ? " one-shot" : "");
1551
1552         yaffs_gross_lock(dev);
1553         do_checkpoint = ((request_checkpoint && !gc_urgent) ||
1554                          oneshot_checkpoint) && !dev->is_checkpointed;
1555
1556         if (sb->s_dirt || do_checkpoint) {
1557                 yaffs_flush_super(sb, !dev->is_checkpointed && do_checkpoint);
1558                 sb->s_dirt = 0;
1559                 if (oneshot_checkpoint)
1560                         yaffs_auto_checkpoint &= ~4;
1561         }
1562         yaffs_gross_unlock(dev);
1563
1564         return 0;
1565 }
1566
1567 /*
1568  * yaffs background thread functions .
1569  * yaffs_bg_thread_fn() the thread function
1570  * yaffs_bg_start() launches the background thread.
1571  * yaffs_bg_stop() cleans up the background thread.
1572  *
1573  * NB:
1574  * The thread should only run after the yaffs is initialised
1575  * The thread should be stopped before yaffs is unmounted.
1576  * The thread should not do any writing while the fs is in read only.
1577  */
1578
1579 void yaffs_background_waker(unsigned long data)
1580 {
1581         wake_up_process((struct task_struct *)data);
1582 }
1583
1584 static int yaffs_bg_thread_fn(void *data)
1585 {
1586         struct yaffs_dev *dev = (struct yaffs_dev *)data;
1587         struct yaffs_linux_context *context = yaffs_dev_to_lc(dev);
1588         unsigned long now = jiffies;
1589         unsigned long next_dir_update = now;
1590         unsigned long next_gc = now;
1591         unsigned long expires;
1592         unsigned int urgency;
1593         int gc_result;
1594         struct timer_list timer;
1595
1596         yaffs_trace(YAFFS_TRACE_BACKGROUND,
1597                 "yaffs_background starting for dev %p", (void *)dev);
1598
1599         set_freezable();
1600         while (context->bg_running) {
1601                 yaffs_trace(YAFFS_TRACE_BACKGROUND, "yaffs_background");
1602
1603                 if (kthread_should_stop())
1604                         break;
1605
1606                 if (try_to_freeze())
1607                         continue;
1608
1609                 yaffs_gross_lock(dev);
1610
1611                 now = jiffies;
1612
1613                 if (time_after(now, next_dir_update) && yaffs_bg_enable) {
1614                         yaffs_update_dirty_dirs(dev);
1615                         next_dir_update = now + HZ;
1616                 }
1617
1618                 if (time_after(now, next_gc) && yaffs_bg_enable) {
1619                         if (!dev->is_checkpointed) {
1620                                 urgency = yaffs_bg_gc_urgency(dev);
1621                                 gc_result = yaffs_bg_gc(dev, urgency);
1622                                 if (urgency > 1)
1623                                         next_gc = now + HZ / 20 + 1;
1624                                 else if (urgency > 0)
1625                                         next_gc = now + HZ / 10 + 1;
1626                                 else
1627                                         next_gc = now + HZ * 2;
1628                         } else  {
1629                                 /*
1630                                  * gc not running so set to next_dir_update
1631                                  * to cut down on wake ups
1632                                  */
1633                                 next_gc = next_dir_update;
1634                         }
1635                 }
1636                 yaffs_gross_unlock(dev);
1637                 expires = next_dir_update;
1638                 if (time_before(next_gc, expires))
1639                         expires = next_gc;
1640                 if (time_before(expires, now))
1641                         expires = now + HZ;
1642
1643                 init_timer_on_stack(&timer);
1644                 timer.expires = expires + 1;
1645                 timer.data = (unsigned long)current;
1646                 timer.function = yaffs_background_waker;
1647
1648                 set_current_state(TASK_INTERRUPTIBLE);
1649                 add_timer(&timer);
1650                 schedule();
1651                 del_timer_sync(&timer);
1652         }
1653
1654         return 0;
1655 }
1656
1657 static int yaffs_bg_start(struct yaffs_dev *dev)
1658 {
1659         int retval = 0;
1660         struct yaffs_linux_context *context = yaffs_dev_to_lc(dev);
1661
1662         if (dev->read_only)
1663                 return -1;
1664
1665         context->bg_running = 1;
1666
1667         context->bg_thread = kthread_run(yaffs_bg_thread_fn,
1668                                          (void *)dev, "yaffs-bg-%d",
1669                                          context->mount_id);
1670
1671         if (IS_ERR(context->bg_thread)) {
1672                 retval = PTR_ERR(context->bg_thread);
1673                 context->bg_thread = NULL;
1674                 context->bg_running = 0;
1675         }
1676         return retval;
1677 }
1678
1679 static void yaffs_bg_stop(struct yaffs_dev *dev)
1680 {
1681         struct yaffs_linux_context *ctxt = yaffs_dev_to_lc(dev);
1682
1683         ctxt->bg_running = 0;
1684
1685         if (ctxt->bg_thread) {
1686                 kthread_stop(ctxt->bg_thread);
1687                 ctxt->bg_thread = NULL;
1688         }
1689 }
1690
1691 static void yaffs_write_super(struct super_block *sb)
1692 {
1693         unsigned request_checkpoint = (yaffs_auto_checkpoint >= 2);
1694
1695         yaffs_trace(YAFFS_TRACE_OS | YAFFS_TRACE_SYNC | YAFFS_TRACE_BACKGROUND,
1696                 "yaffs_write_super%s",
1697                 request_checkpoint ? " checkpt" : "");
1698
1699         yaffs_do_sync_fs(sb, request_checkpoint);
1700
1701 }
1702
1703 static int yaffs_sync_fs(struct super_block *sb, int wait)
1704 {
1705         unsigned request_checkpoint = (yaffs_auto_checkpoint >= 1);
1706
1707         yaffs_trace(YAFFS_TRACE_OS | YAFFS_TRACE_SYNC,
1708                 "yaffs_sync_fs%s", request_checkpoint ? " checkpt" : "");
1709
1710         yaffs_do_sync_fs(sb, request_checkpoint);
1711
1712         return 0;
1713 }
1714
1715 static LIST_HEAD(yaffs_context_list);
1716 struct mutex yaffs_context_lock;
1717
1718 struct yaffs_options {
1719         int inband_tags;
1720         int skip_checkpoint_read;
1721         int skip_checkpoint_write;
1722         int no_cache;
1723         int tags_ecc_on;
1724         int tags_ecc_overridden;
1725         int lazy_loading_enabled;
1726         int lazy_loading_overridden;
1727         int empty_lost_and_found;
1728         int empty_lost_and_found_overridden;
1729 };
1730
1731 #define MAX_OPT_LEN 30
1732 static int yaffs_parse_options(struct yaffs_options *options,
1733                                 const char *options_str)
1734 {
1735         char cur_opt[MAX_OPT_LEN + 1];
1736         int p;
1737         int error = 0;
1738
1739         /* Parse through the options which is a comma seperated list */
1740
1741         while (options_str && *options_str && !error) {
1742                 memset(cur_opt, 0, MAX_OPT_LEN + 1);
1743                 p = 0;
1744
1745                 while (*options_str == ',')
1746                         options_str++;
1747
1748                 while (*options_str && *options_str != ',') {
1749                         if (p < MAX_OPT_LEN) {
1750                                 cur_opt[p] = *options_str;
1751                                 p++;
1752                         }
1753                         options_str++;
1754                 }
1755
1756                 if (!strcmp(cur_opt, "inband-tags")) {
1757                         options->inband_tags = 1;
1758                 } else if (!strcmp(cur_opt, "tags-ecc-off")) {
1759                         options->tags_ecc_on = 0;
1760                         options->tags_ecc_overridden = 1;
1761                 } else if (!strcmp(cur_opt, "tags-ecc-on")) {
1762                         options->tags_ecc_on = 1;
1763                         options->tags_ecc_overridden = 1;
1764                 } else if (!strcmp(cur_opt, "lazy-loading-off")) {
1765                         options->lazy_loading_enabled = 0;
1766                         options->lazy_loading_overridden = 1;
1767                 } else if (!strcmp(cur_opt, "lazy-loading-on")) {
1768                         options->lazy_loading_enabled = 1;
1769                         options->lazy_loading_overridden = 1;
1770                 } else if (!strcmp(cur_opt, "empty-lost-and-found-off")) {
1771                         options->empty_lost_and_found = 0;
1772                         options->empty_lost_and_found_overridden = 1;
1773                 } else if (!strcmp(cur_opt, "empty-lost-and-found-on")) {
1774                         options->empty_lost_and_found = 1;
1775                         options->empty_lost_and_found_overridden = 1;
1776                 } else if (!strcmp(cur_opt, "no-cache")) {
1777                         options->no_cache = 1;
1778                 } else if (!strcmp(cur_opt, "no-checkpoint-read")) {
1779                         options->skip_checkpoint_read = 1;
1780                 } else if (!strcmp(cur_opt, "no-checkpoint-write")) {
1781                         options->skip_checkpoint_write = 1;
1782                 } else if (!strcmp(cur_opt, "no-checkpoint")) {
1783                         options->skip_checkpoint_read = 1;
1784                         options->skip_checkpoint_write = 1;
1785                 } else {
1786                         printk(KERN_INFO "yaffs: Bad mount option \"%s\"\n",
1787                                cur_opt);
1788                         error = 1;
1789                 }
1790         }
1791         return error;
1792 }
1793
1794 static const struct address_space_operations yaffs_file_address_operations = {
1795         .readpage = yaffs_readpage,
1796         .writepage = yaffs_writepage,
1797         .write_begin = yaffs_write_begin,
1798         .write_end = yaffs_write_end,
1799 };
1800
1801
1802
1803 static const struct inode_operations yaffs_file_inode_operations = {
1804         .setattr = yaffs_setattr,
1805         .setxattr = yaffs_setxattr,
1806         .getxattr = yaffs_getxattr,
1807         .listxattr = yaffs_listxattr,
1808         .removexattr = yaffs_removexattr,
1809 };
1810
1811 static const struct inode_operations yaffs_symlink_inode_operations = {
1812         .readlink = yaffs_readlink,
1813         .follow_link = yaffs_follow_link,
1814         .put_link = yaffs_put_link,
1815         .setattr = yaffs_setattr,
1816         .setxattr = yaffs_setxattr,
1817         .getxattr = yaffs_getxattr,
1818         .listxattr = yaffs_listxattr,
1819         .removexattr = yaffs_removexattr,
1820 };
1821
1822 static void yaffs_fill_inode_from_obj(struct inode *inode,
1823                                       struct yaffs_obj *obj)
1824 {
1825         u32 mode;
1826
1827         if (!inode || !obj)  {
1828                 yaffs_trace(YAFFS_TRACE_OS,
1829                         "yaffs_fill_inode invalid parameters");
1830                 return;
1831         }
1832
1833         /* Check mode against the variant type
1834          * and attempt to repair if broken. */
1835         mode = obj->yst_mode;
1836
1837         switch (obj->variant_type) {
1838         case YAFFS_OBJECT_TYPE_FILE:
1839                 if (!S_ISREG(mode)) {
1840                         obj->yst_mode &= ~S_IFMT;
1841                         obj->yst_mode |= S_IFREG;
1842                 }
1843                 break;
1844         case YAFFS_OBJECT_TYPE_SYMLINK:
1845                 if (!S_ISLNK(mode)) {
1846                         obj->yst_mode &= ~S_IFMT;
1847                         obj->yst_mode |= S_IFLNK;
1848                 }
1849                 break;
1850         case YAFFS_OBJECT_TYPE_DIRECTORY:
1851                 if (!S_ISDIR(mode)) {
1852                         obj->yst_mode &= ~S_IFMT;
1853                         obj->yst_mode |= S_IFDIR;
1854                 }
1855                 break;
1856         case YAFFS_OBJECT_TYPE_UNKNOWN:
1857         case YAFFS_OBJECT_TYPE_HARDLINK:
1858         case YAFFS_OBJECT_TYPE_SPECIAL:
1859         default:
1860                 /* TODO? */
1861                 break;
1862         }
1863
1864         inode->i_flags |= S_NOATIME;
1865         inode->i_ino = obj->obj_id;
1866         inode->i_mode = obj->yst_mode;
1867         inode->i_uid = obj->yst_uid;
1868         inode->i_gid = obj->yst_gid;
1869
1870         inode->i_rdev = old_decode_dev(obj->yst_rdev);
1871
1872         inode->i_atime.tv_sec = (time_t) (obj->yst_atime);
1873         inode->i_atime.tv_nsec = 0;
1874         inode->i_mtime.tv_sec = (time_t) obj->yst_mtime;
1875         inode->i_mtime.tv_nsec = 0;
1876         inode->i_ctime.tv_sec = (time_t) obj->yst_ctime;
1877         inode->i_ctime.tv_nsec = 0;
1878         inode->i_size = yaffs_get_obj_length(obj);
1879         inode->i_blocks = (inode->i_size + 511) >> 9;
1880         set_nlink(inode, yaffs_get_obj_link_count(obj));
1881         yaffs_trace(YAFFS_TRACE_OS,
1882                 "yaffs_fill_inode mode %x uid %d gid %d size %d count %d",
1883                 inode->i_mode, inode->i_uid, inode->i_gid,
1884                 (int)inode->i_size, atomic_read(&inode->i_count));
1885
1886         switch (obj->yst_mode & S_IFMT) {
1887         default:        /* fifo, device or socket */
1888                 init_special_inode(inode, obj->yst_mode,
1889                                    old_decode_dev(obj->yst_rdev));
1890                 break;
1891         case S_IFREG:   /* file */
1892                 inode->i_op = &yaffs_file_inode_operations;
1893                 inode->i_fop = &yaffs_file_operations;
1894                 inode->i_mapping->a_ops = &yaffs_file_address_operations;
1895                 break;
1896         case S_IFDIR:   /* directory */
1897                 inode->i_op = &yaffs_dir_inode_operations;
1898                 inode->i_fop = &yaffs_dir_operations;
1899                 break;
1900         case S_IFLNK:   /* symlink */
1901                 inode->i_op = &yaffs_symlink_inode_operations;
1902                 break;
1903         }
1904
1905         yaffs_inode_to_obj_lv(inode) = obj;
1906         obj->my_inode = inode;
1907 }
1908
1909 static void yaffs_put_super(struct super_block *sb)
1910 {
1911         struct yaffs_dev *dev = yaffs_super_to_dev(sb);
1912
1913         yaffs_trace(YAFFS_TRACE_OS, "yaffs_put_super");
1914
1915         yaffs_trace(YAFFS_TRACE_OS | YAFFS_TRACE_BACKGROUND,
1916                 "Shutting down yaffs background thread");
1917         yaffs_bg_stop(dev);
1918         yaffs_trace(YAFFS_TRACE_OS | YAFFS_TRACE_BACKGROUND,
1919                 "yaffs background thread shut down");
1920
1921         yaffs_gross_lock(dev);
1922
1923         yaffs_flush_super(sb, 1);
1924
1925         if (yaffs_dev_to_lc(dev)->put_super_fn)
1926                 yaffs_dev_to_lc(dev)->put_super_fn(sb);
1927
1928         yaffs_deinitialise(dev);
1929
1930         yaffs_gross_unlock(dev);
1931         mutex_lock(&yaffs_context_lock);
1932         list_del_init(&(yaffs_dev_to_lc(dev)->context_list));
1933         mutex_unlock(&yaffs_context_lock);
1934
1935         if (yaffs_dev_to_lc(dev)->spare_buffer) {
1936                 kfree(yaffs_dev_to_lc(dev)->spare_buffer);
1937                 yaffs_dev_to_lc(dev)->spare_buffer = NULL;
1938         }
1939
1940         kfree(dev);
1941 }
1942
1943 static void yaffs_mtd_put_super(struct super_block *sb)
1944 {
1945         struct mtd_info *mtd = yaffs_dev_to_mtd(yaffs_super_to_dev(sb));
1946
1947         if (mtd->sync)
1948                 mtd->sync(mtd);
1949
1950         put_mtd_device(mtd);
1951 }
1952
1953 static const struct super_operations yaffs_super_ops = {
1954         .statfs = yaffs_statfs,
1955         .put_super = yaffs_put_super,
1956         .evict_inode = yaffs_evict_inode,
1957         .sync_fs = yaffs_sync_fs,
1958         .write_super = yaffs_write_super,
1959 };
1960
1961 static struct super_block *yaffs_internal_read_super(int yaffs_version,
1962                                                      struct super_block *sb,
1963                                                      void *data, int silent)
1964 {
1965         int n_blocks;
1966         struct inode *inode = NULL;
1967         struct dentry *root;
1968         struct yaffs_dev *dev = 0;
1969         char devname_buf[BDEVNAME_SIZE + 1];
1970         struct mtd_info *mtd;
1971         int err;
1972         char *data_str = (char *)data;
1973         struct yaffs_linux_context *context = NULL;
1974         struct yaffs_param *param;
1975         int read_only = 0;
1976         struct yaffs_options options;
1977         unsigned mount_id;
1978         int found;
1979         struct yaffs_linux_context *context_iterator;
1980         struct list_head *l;
1981
1982         if (!sb) {
1983                 printk(KERN_INFO "yaffs: sb is NULL\n");
1984                 return NULL;
1985         }
1986
1987         sb->s_magic = YAFFS_MAGIC;
1988         sb->s_op = &yaffs_super_ops;
1989         sb->s_flags |= MS_NOATIME;
1990
1991         read_only = ((sb->s_flags & MS_RDONLY) != 0);
1992
1993         sb->s_export_op = &yaffs_export_ops;
1994
1995         if (!sb->s_dev)
1996                 printk(KERN_INFO "yaffs: sb->s_dev is NULL\n");
1997         else if (!yaffs_devname(sb, devname_buf))
1998                 printk(KERN_INFO "yaffs: devname is NULL\n");
1999         else
2000                 printk(KERN_INFO "yaffs: dev is %d name is \"%s\" %s\n",
2001                        sb->s_dev,
2002                        yaffs_devname(sb, devname_buf), read_only ? "ro" : "rw");
2003
2004         if (!data_str)
2005                 data_str = "";
2006
2007         printk(KERN_INFO "yaffs: passed flags \"%s\"\n", data_str);
2008
2009         memset(&options, 0, sizeof(options));
2010
2011         if (yaffs_parse_options(&options, data_str))
2012                 /* Option parsing failed */
2013                 return NULL;
2014
2015         sb->s_blocksize = PAGE_CACHE_SIZE;
2016         sb->s_blocksize_bits = PAGE_CACHE_SHIFT;
2017
2018         yaffs_trace(YAFFS_TRACE_OS,
2019                 "yaffs_read_super: Using yaffs%d", yaffs_version);
2020         yaffs_trace(YAFFS_TRACE_OS,
2021                 "yaffs_read_super: block size %d", (int)(sb->s_blocksize));
2022
2023         yaffs_trace(YAFFS_TRACE_ALWAYS,
2024                 "Attempting MTD mount of %u.%u,\"%s\"",
2025                 MAJOR(sb->s_dev), MINOR(sb->s_dev),
2026                 yaffs_devname(sb, devname_buf));
2027
2028         /* Check it's an mtd device..... */
2029         if (MAJOR(sb->s_dev) != MTD_BLOCK_MAJOR)
2030                 return NULL;    /* This isn't an mtd device */
2031
2032         /* Get the device */
2033         mtd = get_mtd_device(NULL, MINOR(sb->s_dev));
2034         if (!mtd) {
2035                 yaffs_trace(YAFFS_TRACE_ALWAYS,
2036                         "MTD device #%u doesn't appear to exist",
2037                         MINOR(sb->s_dev));
2038                 return NULL;
2039         }
2040         /* Check it's NAND */
2041         if (mtd->type != MTD_NANDFLASH) {
2042                 yaffs_trace(YAFFS_TRACE_ALWAYS,
2043                         "MTD device is not NAND it's type %d",
2044                         mtd->type);
2045                 return NULL;
2046         }
2047
2048         yaffs_trace(YAFFS_TRACE_OS, " erase %p", mtd->erase);
2049         yaffs_trace(YAFFS_TRACE_OS, " read %p", mtd->read);
2050         yaffs_trace(YAFFS_TRACE_OS, " write %p", mtd->write);
2051         yaffs_trace(YAFFS_TRACE_OS, " readoob %p", mtd->read_oob);
2052         yaffs_trace(YAFFS_TRACE_OS, " writeoob %p", mtd->write_oob);
2053         yaffs_trace(YAFFS_TRACE_OS, " block_isbad %p", mtd->block_isbad);
2054         yaffs_trace(YAFFS_TRACE_OS, " block_markbad %p", mtd->block_markbad);
2055         yaffs_trace(YAFFS_TRACE_OS, " writesize %d", mtd->writesize);
2056         yaffs_trace(YAFFS_TRACE_OS, " oobsize %d", mtd->oobsize);
2057         yaffs_trace(YAFFS_TRACE_OS, " erasesize %d", mtd->erasesize);
2058         yaffs_trace(YAFFS_TRACE_OS, " size %lld", mtd->size);
2059
2060         if (yaffs_auto_select && yaffs_version == 1 && mtd->writesize >= 2048) {
2061                 yaffs_trace(YAFFS_TRACE_ALWAYS, "auto selecting yaffs2");
2062                 yaffs_version = 2;
2063         }
2064
2065         if (yaffs_auto_select && yaffs_version == 2 && !options.inband_tags &&
2066                 mtd->writesize == 512) {
2067                 yaffs_trace(YAFFS_TRACE_ALWAYS, "auto selecting yaffs1");
2068                 yaffs_version = 1;
2069         }
2070
2071         if (yaffs_version == 2) {
2072                 /* Check for version 2 style functions */
2073                 if (!mtd->erase ||
2074                     !mtd->block_isbad ||
2075                     !mtd->block_markbad ||
2076                     !mtd->read ||
2077                     !mtd->write || !mtd->read_oob || !mtd->write_oob) {
2078                         yaffs_trace(YAFFS_TRACE_ALWAYS,
2079                                 "MTD device does not support required functions");
2080                         return NULL;
2081                 }
2082
2083                 if ((mtd->writesize < YAFFS_MIN_YAFFS2_CHUNK_SIZE ||
2084                      mtd->oobsize < YAFFS_MIN_YAFFS2_SPARE_SIZE) &&
2085                     !options.inband_tags) {
2086                         yaffs_trace(YAFFS_TRACE_ALWAYS,
2087                                 "MTD device does not have the right page sizes");
2088                         return NULL;
2089                 }
2090         } else {
2091                 /* Check for V1 style functions */
2092                 if (!mtd->erase ||
2093                     !mtd->read ||
2094                     !mtd->write || !mtd->read_oob || !mtd->write_oob) {
2095                         yaffs_trace(YAFFS_TRACE_ALWAYS,
2096                                 "MTD device does not support required functions");
2097                         return NULL;
2098                 }
2099
2100                 if (mtd->writesize < YAFFS_BYTES_PER_CHUNK ||
2101                     mtd->oobsize != YAFFS_BYTES_PER_SPARE) {
2102                         yaffs_trace(YAFFS_TRACE_ALWAYS,
2103                                 "MTD device does not support have the right page sizes");
2104                         return NULL;
2105                 }
2106         }
2107
2108         /* OK, so if we got here, we have an MTD that's NAND and looks
2109          * like it has the right capabilities
2110          * Set the struct yaffs_dev up for mtd
2111          */
2112
2113         if (!read_only && !(mtd->flags & MTD_WRITEABLE)) {
2114                 read_only = 1;
2115                 printk(KERN_INFO
2116                        "yaffs: mtd is read only, setting superblock read only");
2117                 sb->s_flags |= MS_RDONLY;
2118         }
2119
2120         dev = kmalloc(sizeof(struct yaffs_dev), GFP_KERNEL);
2121         context = kmalloc(sizeof(struct yaffs_linux_context), GFP_KERNEL);
2122
2123         if (!dev || !context) {
2124                 kfree(dev);
2125                 kfree(context);
2126                 dev = NULL;
2127                 context = NULL;
2128         }
2129
2130         if (!dev) {
2131                 /* Deep shit could not allocate device structure */
2132                 yaffs_trace(YAFFS_TRACE_ALWAYS,
2133                         "yaffs_read_super failed trying to allocate yaffs_dev");
2134                 return NULL;
2135         }
2136         memset(dev, 0, sizeof(struct yaffs_dev));
2137         param = &(dev->param);
2138
2139         memset(context, 0, sizeof(struct yaffs_linux_context));
2140         dev->os_context = context;
2141         INIT_LIST_HEAD(&(context->context_list));
2142         context->dev = dev;
2143         context->super = sb;
2144
2145         dev->read_only = read_only;
2146
2147         sb->s_fs_info = dev;
2148
2149         dev->driver_context = mtd;
2150         param->name = mtd->name;
2151
2152         /* Set up the memory size parameters.... */
2153
2154         n_blocks =
2155             YCALCBLOCKS(mtd->size,
2156                         (YAFFS_CHUNKS_PER_BLOCK * YAFFS_BYTES_PER_CHUNK));
2157
2158         param->start_block = 0;
2159         param->end_block = n_blocks - 1;
2160         param->chunks_per_block = YAFFS_CHUNKS_PER_BLOCK;
2161         param->total_bytes_per_chunk = YAFFS_BYTES_PER_CHUNK;
2162         param->n_reserved_blocks = 5;
2163         param->n_caches = (options.no_cache) ? 0 : 10;
2164         param->inband_tags = options.inband_tags;
2165
2166         param->disable_lazy_load = 1;
2167         param->enable_xattr = 1;
2168         if (options.lazy_loading_overridden)
2169                 param->disable_lazy_load = !options.lazy_loading_enabled;
2170
2171         param->defered_dir_update = 1;
2172
2173         if (options.tags_ecc_overridden)
2174                 param->no_tags_ecc = !options.tags_ecc_on;
2175
2176         param->empty_lost_n_found = 1;
2177
2178         param->refresh_period = 500;
2179
2180         if (options.empty_lost_and_found_overridden)
2181                 param->empty_lost_n_found = options.empty_lost_and_found;
2182
2183         /* ... and the functions. */
2184         if (yaffs_version == 2) {
2185                 param->write_chunk_tags_fn = nandmtd2_write_chunk_tags;
2186                 param->read_chunk_tags_fn = nandmtd2_read_chunk_tags;
2187                 param->bad_block_fn = nandmtd2_mark_block_bad;
2188                 param->query_block_fn = nandmtd2_query_block;
2189                 yaffs_dev_to_lc(dev)->spare_buffer =
2190                                 kmalloc(mtd->oobsize, GFP_NOFS);
2191                 param->is_yaffs2 = 1;
2192                 param->total_bytes_per_chunk = mtd->writesize;
2193                 param->chunks_per_block = mtd->erasesize / mtd->writesize;
2194                 n_blocks = YCALCBLOCKS(mtd->size, mtd->erasesize);
2195
2196                 param->start_block = 0;
2197                 param->end_block = n_blocks - 1;
2198         } else {
2199                 /* use the MTD interface in yaffs_mtdif1.c */
2200                 param->write_chunk_tags_fn = nandmtd1_write_chunk_tags;
2201                 param->read_chunk_tags_fn = nandmtd1_read_chunk_tags;
2202                 param->bad_block_fn = nandmtd1_mark_block_bad;
2203                 param->query_block_fn = nandmtd1_query_block;
2204                 param->is_yaffs2 = 0;
2205         }
2206         /* ... and common functions */
2207         param->erase_fn = nandmtd_erase_block;
2208         param->initialise_flash_fn = nandmtd_initialise;
2209
2210         yaffs_dev_to_lc(dev)->put_super_fn = yaffs_mtd_put_super;
2211
2212         param->sb_dirty_fn = yaffs_touch_super;
2213         param->gc_control = yaffs_gc_control_callback;
2214
2215         yaffs_dev_to_lc(dev)->super = sb;
2216
2217         param->use_nand_ecc = 1;
2218
2219         param->skip_checkpt_rd = options.skip_checkpoint_read;
2220         param->skip_checkpt_wr = options.skip_checkpoint_write;
2221
2222         mutex_lock(&yaffs_context_lock);
2223         /* Get a mount id */
2224         for (mount_id = 0, found = 0; !found; mount_id++) {
2225                 found = 1;
2226                 list_for_each(l, &yaffs_context_list) {
2227                         context_iterator =
2228                                 list_entry(l, struct yaffs_linux_context,
2229                                         context_list);
2230                         if (context_iterator->mount_id == mount_id)
2231                                 found = 0;
2232                 }
2233         }
2234         context->mount_id = mount_id;
2235
2236         list_add_tail(&(yaffs_dev_to_lc(dev)->context_list),
2237                       &yaffs_context_list);
2238         mutex_unlock(&yaffs_context_lock);
2239
2240         /* Directory search handling... */
2241         INIT_LIST_HEAD(&(yaffs_dev_to_lc(dev)->search_contexts));
2242         param->remove_obj_fn = yaffs_remove_obj_callback;
2243
2244         mutex_init(&(yaffs_dev_to_lc(dev)->gross_lock));
2245
2246         yaffs_gross_lock(dev);
2247
2248         err = yaffs_guts_initialise(dev);
2249
2250         yaffs_trace(YAFFS_TRACE_OS,
2251                 "yaffs_read_super: guts initialised %s",
2252                 (err == YAFFS_OK) ? "OK" : "FAILED");
2253
2254         if (err == YAFFS_OK)
2255                 yaffs_bg_start(dev);
2256
2257         if (!context->bg_thread)
2258                 param->defered_dir_update = 0;
2259
2260         /* Release lock before yaffs_get_inode() */
2261         yaffs_gross_unlock(dev);
2262
2263         /* Create root inode */
2264         if (err == YAFFS_OK)
2265                 inode = yaffs_get_inode(sb, S_IFDIR | 0755, 0, yaffs_root(dev));
2266
2267         if (!inode)
2268                 return NULL;
2269
2270         inode->i_op = &yaffs_dir_inode_operations;
2271         inode->i_fop = &yaffs_dir_operations;
2272
2273         yaffs_trace(YAFFS_TRACE_OS, "yaffs_read_super: got root inode");
2274
2275         root = d_alloc_root(inode);
2276
2277         yaffs_trace(YAFFS_TRACE_OS, "yaffs_read_super: d_alloc_root done");
2278
2279         if (!root) {
2280                 iput(inode);
2281                 return NULL;
2282         }
2283         sb->s_root = root;
2284         sb->s_dirt = !dev->is_checkpointed;
2285         yaffs_trace(YAFFS_TRACE_ALWAYS,
2286                 "yaffs_read_super: is_checkpointed %d",
2287                 dev->is_checkpointed);
2288
2289         yaffs_trace(YAFFS_TRACE_OS, "yaffs_read_super: done");
2290         return sb;
2291 }
2292
2293 static int yaffs_internal_read_super_mtd(struct super_block *sb, void *data,
2294                                          int silent)
2295 {
2296         return yaffs_internal_read_super(1, sb, data, silent) ? 0 : -EINVAL;
2297 }
2298
2299 static struct dentry *yaffs_mount(struct file_system_type *fs,
2300                             int flags, const char *dev_name,
2301                             void *data)
2302 {
2303         return mount_bdev(fs, flags, dev_name, data,
2304                            yaffs_internal_read_super_mtd);
2305 }
2306
2307 static struct file_system_type yaffs_fs_type = {
2308         .owner = THIS_MODULE,
2309         .name = "yaffs",
2310         .mount = yaffs_mount,
2311         .kill_sb = kill_block_super,
2312         .fs_flags = FS_REQUIRES_DEV,
2313 };
2314
2315 static int yaffs2_internal_read_super_mtd(struct super_block *sb, void *data,
2316                                           int silent)
2317 {
2318         return yaffs_internal_read_super(2, sb, data, silent) ? 0 : -EINVAL;
2319 }
2320
2321 static struct dentry *yaffs2_mount(struct file_system_type *fs,
2322                              int flags, const char *dev_name, void *data)
2323 {
2324         return mount_bdev(fs, flags, dev_name, data,
2325                            yaffs2_internal_read_super_mtd);
2326 }
2327
2328 static struct file_system_type yaffs2_fs_type = {
2329         .owner = THIS_MODULE,
2330         .name = "yaffs2",
2331         .mount = yaffs2_mount,
2332         .kill_sb = kill_block_super,
2333         .fs_flags = FS_REQUIRES_DEV,
2334 };
2335
2336
2337 static struct proc_dir_entry *my_proc_entry;
2338
2339 static char *yaffs_dump_dev_part0(char *buf, struct yaffs_dev *dev)
2340 {
2341         struct yaffs_param *param = &dev->param;
2342
2343         buf += sprintf(buf, "start_block........... %d\n", param->start_block);
2344         buf += sprintf(buf, "end_block............. %d\n", param->end_block);
2345         buf += sprintf(buf, "total_bytes_per_chunk. %d\n",
2346                         param->total_bytes_per_chunk);
2347         buf += sprintf(buf, "use_nand_ecc.......... %d\n",
2348                         param->use_nand_ecc);
2349         buf += sprintf(buf, "no_tags_ecc........... %d\n", param->no_tags_ecc);
2350         buf += sprintf(buf, "is_yaffs2............. %d\n", param->is_yaffs2);
2351         buf += sprintf(buf, "inband_tags........... %d\n", param->inband_tags);
2352         buf += sprintf(buf, "empty_lost_n_found.... %d\n",
2353                         param->empty_lost_n_found);
2354         buf += sprintf(buf, "disable_lazy_load..... %d\n",
2355                         param->disable_lazy_load);
2356         buf += sprintf(buf, "refresh_period........ %d\n",
2357                         param->refresh_period);
2358         buf += sprintf(buf, "n_caches.............. %d\n", param->n_caches);
2359         buf += sprintf(buf, "n_reserved_blocks..... %d\n",
2360                         param->n_reserved_blocks);
2361         buf += sprintf(buf, "always_check_erased... %d\n",
2362                         param->always_check_erased);
2363
2364         return buf;
2365 }
2366
2367 static char *yaffs_dump_dev_part1(char *buf, struct yaffs_dev *dev)
2368 {
2369         buf +=
2370             sprintf(buf, "data_bytes_per_chunk.. %d\n",
2371                     dev->data_bytes_per_chunk);
2372         buf += sprintf(buf, "chunk_grp_bits........ %d\n", dev->chunk_grp_bits);
2373         buf += sprintf(buf, "chunk_grp_size........ %d\n", dev->chunk_grp_size);
2374         buf +=
2375             sprintf(buf, "n_erased_blocks....... %d\n", dev->n_erased_blocks);
2376         buf +=
2377             sprintf(buf, "blocks_in_checkpt..... %d\n", dev->blocks_in_checkpt);
2378         buf += sprintf(buf, "\n");
2379         buf += sprintf(buf, "n_tnodes.............. %d\n", dev->n_tnodes);
2380         buf += sprintf(buf, "n_obj................. %d\n", dev->n_obj);
2381         buf += sprintf(buf, "n_free_chunks......... %d\n", dev->n_free_chunks);
2382         buf += sprintf(buf, "\n");
2383         buf += sprintf(buf, "n_page_writes......... %u\n", dev->n_page_writes);
2384         buf += sprintf(buf, "n_page_reads.......... %u\n", dev->n_page_reads);
2385         buf += sprintf(buf, "n_erasures............ %u\n", dev->n_erasures);
2386         buf += sprintf(buf, "n_gc_copies........... %u\n", dev->n_gc_copies);
2387         buf += sprintf(buf, "all_gcs............... %u\n", dev->all_gcs);
2388         buf +=
2389             sprintf(buf, "passive_gc_count...... %u\n", dev->passive_gc_count);
2390         buf +=
2391             sprintf(buf, "oldest_dirty_gc_count. %u\n",
2392                     dev->oldest_dirty_gc_count);
2393         buf += sprintf(buf, "n_gc_blocks........... %u\n", dev->n_gc_blocks);
2394         buf += sprintf(buf, "bg_gcs................ %u\n", dev->bg_gcs);
2395         buf +=
2396             sprintf(buf, "n_retried_writes...... %u\n", dev->n_retried_writes);
2397         buf +=
2398             sprintf(buf, "n_retired_blocks...... %u\n", dev->n_retired_blocks);
2399         buf += sprintf(buf, "n_ecc_fixed........... %u\n", dev->n_ecc_fixed);
2400         buf += sprintf(buf, "n_ecc_unfixed......... %u\n", dev->n_ecc_unfixed);
2401         buf +=
2402             sprintf(buf, "n_tags_ecc_fixed...... %u\n", dev->n_tags_ecc_fixed);
2403         buf +=
2404             sprintf(buf, "n_tags_ecc_unfixed.... %u\n",
2405                     dev->n_tags_ecc_unfixed);
2406         buf += sprintf(buf, "cache_hits............ %u\n", dev->cache_hits);
2407         buf +=
2408             sprintf(buf, "n_deleted_files....... %u\n", dev->n_deleted_files);
2409         buf +=
2410             sprintf(buf, "n_unlinked_files...... %u\n", dev->n_unlinked_files);
2411         buf += sprintf(buf, "refresh_count......... %u\n", dev->refresh_count);
2412         buf += sprintf(buf, "n_bg_deletions........ %u\n", dev->n_bg_deletions);
2413
2414         return buf;
2415 }
2416
2417 static int yaffs_proc_read(char *page,
2418                            char **start,
2419                            off_t offset, int count, int *eof, void *data)
2420 {
2421         struct list_head *item;
2422         char *buf = page;
2423         int step = offset;
2424         int n = 0;
2425
2426         /* Get proc_file_read() to step 'offset' by one on each sucessive call.
2427          * We use 'offset' (*ppos) to indicate where we are in dev_list.
2428          * This also assumes the user has posted a read buffer large
2429          * enough to hold the complete output; but that's life in /proc.
2430          */
2431
2432         *(int *)start = 1;
2433
2434         /* Print header first */
2435         if (step == 0)
2436                 buf += sprintf(buf, "YAFFS built:" __DATE__ " " __TIME__ "\n");
2437         else if (step == 1)
2438                 buf += sprintf(buf, "\n");
2439         else {
2440                 step -= 2;
2441
2442                 mutex_lock(&yaffs_context_lock);
2443
2444                 /* Locate and print the Nth entry.
2445                  * Order N-squared but N is small. */
2446                 list_for_each(item, &yaffs_context_list) {
2447                         struct yaffs_linux_context *dc =
2448                             list_entry(item, struct yaffs_linux_context,
2449                                        context_list);
2450                         struct yaffs_dev *dev = dc->dev;
2451
2452                         if (n < (step & ~1)) {
2453                                 n += 2;
2454                                 continue;
2455                         }
2456                         if ((step & 1) == 0) {
2457                                 buf +=
2458                                     sprintf(buf, "\nDevice %d \"%s\"\n", n,
2459                                             dev->param.name);
2460                                 buf = yaffs_dump_dev_part0(buf, dev);
2461                         } else {
2462                                 buf = yaffs_dump_dev_part1(buf, dev);
2463                         }
2464
2465                         break;
2466                 }
2467                 mutex_unlock(&yaffs_context_lock);
2468         }
2469
2470         return buf - page < count ? buf - page : count;
2471 }
2472
2473
2474
2475 /* Stuff to handle installation of file systems */
2476 struct file_system_to_install {
2477         struct file_system_type *fst;
2478         int installed;
2479 };
2480
2481 static struct file_system_to_install fs_to_install[] = {
2482         {&yaffs_fs_type, 0},
2483         {&yaffs2_fs_type, 0},
2484         {NULL, 0}
2485 };
2486
2487 static int __init init_yaffs_fs(void)
2488 {
2489         int error = 0;
2490         struct file_system_to_install *fsinst;
2491
2492         yaffs_trace(YAFFS_TRACE_ALWAYS,
2493                 "yaffs built " __DATE__ " " __TIME__ " Installing.");
2494
2495         mutex_init(&yaffs_context_lock);
2496
2497         /* Install the proc_fs entries */
2498         my_proc_entry = create_proc_entry("yaffs",
2499                                           S_IRUGO | S_IFREG, NULL);
2500
2501         if (my_proc_entry) {
2502                 my_proc_entry->write_proc = NULL;
2503                 my_proc_entry->read_proc = yaffs_proc_read;
2504                 my_proc_entry->data = NULL;
2505         } else {
2506                 return -ENOMEM;
2507         }
2508
2509
2510         /* Now add the file system entries */
2511
2512         fsinst = fs_to_install;
2513
2514         while (fsinst->fst && !error) {
2515                 error = register_filesystem(fsinst->fst);
2516                 if (!error)
2517                         fsinst->installed = 1;
2518                 fsinst++;
2519         }
2520
2521         /* Any errors? uninstall  */
2522         if (error) {
2523                 fsinst = fs_to_install;
2524
2525                 while (fsinst->fst) {
2526                         if (fsinst->installed) {
2527                                 unregister_filesystem(fsinst->fst);
2528                                 fsinst->installed = 0;
2529                         }
2530                         fsinst++;
2531                 }
2532         }
2533
2534         return error;
2535 }
2536
2537 static void __exit exit_yaffs_fs(void)
2538 {
2539
2540         struct file_system_to_install *fsinst;
2541
2542         yaffs_trace(YAFFS_TRACE_ALWAYS,
2543                 "yaffs built " __DATE__ " " __TIME__ " removing.");
2544
2545         remove_proc_entry("yaffs", NULL);
2546
2547         fsinst = fs_to_install;
2548
2549         while (fsinst->fst) {
2550                 if (fsinst->installed) {
2551                         unregister_filesystem(fsinst->fst);
2552                         fsinst->installed = 0;
2553                 }
2554                 fsinst++;
2555         }
2556 }
2557
2558 module_init(init_yaffs_fs)
2559 module_exit(exit_yaffs_fs)
2560
2561 MODULE_DESCRIPTION("YAFFS2 - a NAND specific flash file system");
2562 MODULE_AUTHOR("Charles Manning, Aleph One Ltd., 2002-2011");
2563 MODULE_LICENSE("GPL");