2 * JFFS2 -- Journalling Flash File System, Version 2.
4 * Copyright © 2001-2007 Red Hat, Inc.
6 * Created by David Woodhouse <dwmw2@infradead.org>
8 * For licensing information, see the file 'LICENCE' in this directory.
12 #include <linux/kernel.h>
13 #include <linux/sched.h>
15 #include <linux/mtd/mtd.h>
16 #include <linux/rbtree.h>
17 #include <linux/crc32.h>
18 #include <linux/slab.h>
19 #include <linux/pagemap.h>
22 static void jffs2_obsolete_node_frag(struct jffs2_sb_info *c,
23 struct jffs2_node_frag *this);
25 void jffs2_add_fd_to_list(struct jffs2_sb_info *c, struct jffs2_full_dirent *new, struct jffs2_full_dirent **list)
27 struct jffs2_full_dirent **prev = list;
29 dbg_dentlist("add dirent \"%s\", ino #%u\n", new->name, new->ino);
31 while ((*prev) && (*prev)->nhash <= new->nhash) {
32 if ((*prev)->nhash == new->nhash && !strcmp((*prev)->name, new->name)) {
33 /* Duplicate. Free one */
34 if (new->version < (*prev)->version) {
35 dbg_dentlist("Eep! Marking new dirent node is obsolete, old is \"%s\", ino #%u\n",
36 (*prev)->name, (*prev)->ino);
37 jffs2_mark_node_obsolete(c, new->raw);
38 jffs2_free_full_dirent(new);
40 dbg_dentlist("marking old dirent \"%s\", ino #%u bsolete\n",
41 (*prev)->name, (*prev)->ino);
42 new->next = (*prev)->next;
43 jffs2_mark_node_obsolete(c, ((*prev)->raw));
44 jffs2_free_full_dirent(*prev);
49 prev = &((*prev)->next);
55 uint32_t jffs2_truncate_fragtree(struct jffs2_sb_info *c, struct rb_root *list, uint32_t size)
57 struct jffs2_node_frag *frag = jffs2_lookup_node_frag(list, size);
59 dbg_fragtree("truncating fragtree to 0x%08x bytes\n", size);
61 /* We know frag->ofs <= size. That's what lookup does for us */
62 if (frag && frag->ofs != size) {
63 if (frag->ofs+frag->size > size) {
64 frag->size = size - frag->ofs;
66 frag = frag_next(frag);
68 while (frag && frag->ofs >= size) {
69 struct jffs2_node_frag *next = frag_next(frag);
71 frag_erase(frag, list);
72 jffs2_obsolete_node_frag(c, frag);
79 frag = frag_last(list);
81 /* Sanity check for truncation to longer than we started with... */
84 if (frag->ofs + frag->size < size)
85 return frag->ofs + frag->size;
87 /* If the last fragment starts at the RAM page boundary, it is
88 * REF_PRISTINE irrespective of its size. */
89 if (frag->node && (frag->ofs & (PAGE_CACHE_SIZE - 1)) == 0) {
90 dbg_fragtree2("marking the last fragment 0x%08x-0x%08x REF_PRISTINE.\n",
91 frag->ofs, frag->ofs + frag->size);
92 frag->node->raw->flash_offset = ref_offset(frag->node->raw) | REF_PRISTINE;
97 static void jffs2_obsolete_node_frag(struct jffs2_sb_info *c,
98 struct jffs2_node_frag *this)
102 if (!this->node->frags) {
103 /* The node has no valid frags left. It's totally obsoleted */
104 dbg_fragtree2("marking old node @0x%08x (0x%04x-0x%04x) obsolete\n",
105 ref_offset(this->node->raw), this->node->ofs, this->node->ofs+this->node->size);
106 jffs2_mark_node_obsolete(c, this->node->raw);
107 jffs2_free_full_dnode(this->node);
109 dbg_fragtree2("marking old node @0x%08x (0x%04x-0x%04x) REF_NORMAL. frags is %d\n",
110 ref_offset(this->node->raw), this->node->ofs, this->node->ofs+this->node->size, this->node->frags);
111 mark_ref_normal(this->node->raw);
115 jffs2_free_node_frag(this);
118 static void jffs2_fragtree_insert(struct jffs2_node_frag *newfrag, struct jffs2_node_frag *base)
120 struct rb_node *parent = &base->rb;
121 struct rb_node **link = &parent;
123 dbg_fragtree2("insert frag (0x%04x-0x%04x)\n", newfrag->ofs, newfrag->ofs + newfrag->size);
127 base = rb_entry(parent, struct jffs2_node_frag, rb);
129 if (newfrag->ofs > base->ofs)
130 link = &base->rb.rb_right;
131 else if (newfrag->ofs < base->ofs)
132 link = &base->rb.rb_left;
134 JFFS2_ERROR("duplicate frag at %08x (%p,%p)\n", newfrag->ofs, newfrag, base);
139 rb_link_node(&newfrag->rb, &base->rb, link);
143 * Allocate and initializes a new fragment.
145 static struct jffs2_node_frag * new_fragment(struct jffs2_full_dnode *fn, uint32_t ofs, uint32_t size)
147 struct jffs2_node_frag *newfrag;
149 newfrag = jffs2_alloc_node_frag();
150 if (likely(newfrag)) {
152 newfrag->size = size;
155 JFFS2_ERROR("cannot allocate a jffs2_node_frag object\n");
162 * Called when there is no overlapping fragment exist. Inserts a hole before the new
163 * fragment and inserts the new fragment to the fragtree.
165 static int no_overlapping_node(struct jffs2_sb_info *c, struct rb_root *root,
166 struct jffs2_node_frag *newfrag,
167 struct jffs2_node_frag *this, uint32_t lastend)
169 if (lastend < newfrag->node->ofs) {
170 /* put a hole in before the new fragment */
171 struct jffs2_node_frag *holefrag;
173 holefrag= new_fragment(NULL, lastend, newfrag->node->ofs - lastend);
174 if (unlikely(!holefrag)) {
175 jffs2_free_node_frag(newfrag);
180 /* By definition, the 'this' node has no right-hand child,
181 because there are no frags with offset greater than it.
182 So that's where we want to put the hole */
183 dbg_fragtree2("add hole frag %#04x-%#04x on the right of the new frag.\n",
184 holefrag->ofs, holefrag->ofs + holefrag->size);
185 rb_link_node(&holefrag->rb, &this->rb, &this->rb.rb_right);
187 dbg_fragtree2("Add hole frag %#04x-%#04x to the root of the tree.\n",
188 holefrag->ofs, holefrag->ofs + holefrag->size);
189 rb_link_node(&holefrag->rb, NULL, &root->rb_node);
191 rb_insert_color(&holefrag->rb, root);
196 /* By definition, the 'this' node has no right-hand child,
197 because there are no frags with offset greater than it.
198 So that's where we want to put new fragment */
199 dbg_fragtree2("add the new node at the right\n");
200 rb_link_node(&newfrag->rb, &this->rb, &this->rb.rb_right);
202 dbg_fragtree2("insert the new node at the root of the tree\n");
203 rb_link_node(&newfrag->rb, NULL, &root->rb_node);
205 rb_insert_color(&newfrag->rb, root);
210 /* Doesn't set inode->i_size */
211 static int jffs2_add_frag_to_fragtree(struct jffs2_sb_info *c, struct rb_root *root, struct jffs2_node_frag *newfrag)
213 struct jffs2_node_frag *this;
216 /* Skip all the nodes which are completed before this one starts */
217 this = jffs2_lookup_node_frag(root, newfrag->node->ofs);
220 dbg_fragtree2("lookup gave frag 0x%04x-0x%04x; phys 0x%08x (*%p)\n",
221 this->ofs, this->ofs+this->size, this->node?(ref_offset(this->node->raw)):0xffffffff, this);
222 lastend = this->ofs + this->size;
224 dbg_fragtree2("lookup gave no frag\n");
228 /* See if we ran off the end of the fragtree */
229 if (lastend <= newfrag->ofs) {
232 /* Check if 'this' node was on the same page as the new node.
233 If so, both 'this' and the new node get marked REF_NORMAL so
234 the GC can take a look.
236 if (lastend && (lastend-1) >> PAGE_CACHE_SHIFT == newfrag->ofs >> PAGE_CACHE_SHIFT) {
238 mark_ref_normal(this->node->raw);
239 mark_ref_normal(newfrag->node->raw);
242 return no_overlapping_node(c, root, newfrag, this, lastend);
246 dbg_fragtree2("dealing with frag %u-%u, phys %#08x(%d).\n",
247 this->ofs, this->ofs + this->size,
248 ref_offset(this->node->raw), ref_flags(this->node->raw));
250 dbg_fragtree2("dealing with hole frag %u-%u.\n",
251 this->ofs, this->ofs + this->size);
253 /* OK. 'this' is pointing at the first frag that newfrag->ofs at least partially obsoletes,
254 * - i.e. newfrag->ofs < this->ofs+this->size && newfrag->ofs >= this->ofs
256 if (newfrag->ofs > this->ofs) {
257 /* This node isn't completely obsoleted. The start of it remains valid */
259 /* Mark the new node and the partially covered node REF_NORMAL -- let
260 the GC take a look at them */
261 mark_ref_normal(newfrag->node->raw);
263 mark_ref_normal(this->node->raw);
265 if (this->ofs + this->size > newfrag->ofs + newfrag->size) {
266 /* The new node splits 'this' frag into two */
267 struct jffs2_node_frag *newfrag2;
270 dbg_fragtree2("split old frag 0x%04x-0x%04x, phys 0x%08x\n",
271 this->ofs, this->ofs+this->size, ref_offset(this->node->raw));
273 dbg_fragtree2("split old hole frag 0x%04x-0x%04x\n",
274 this->ofs, this->ofs+this->size);
276 /* New second frag pointing to this's node */
277 newfrag2 = new_fragment(this->node, newfrag->ofs + newfrag->size,
278 this->ofs + this->size - newfrag->ofs - newfrag->size);
279 if (unlikely(!newfrag2))
284 /* Adjust size of original 'this' */
285 this->size = newfrag->ofs - this->ofs;
287 /* Now, we know there's no node with offset
288 greater than this->ofs but smaller than
289 newfrag2->ofs or newfrag->ofs, for obvious
290 reasons. So we can do a tree insert from
291 'this' to insert newfrag, and a tree insert
292 from newfrag to insert newfrag2. */
293 jffs2_fragtree_insert(newfrag, this);
294 rb_insert_color(&newfrag->rb, root);
296 jffs2_fragtree_insert(newfrag2, newfrag);
297 rb_insert_color(&newfrag2->rb, root);
301 /* New node just reduces 'this' frag in size, doesn't split it */
302 this->size = newfrag->ofs - this->ofs;
304 /* Again, we know it lives down here in the tree */
305 jffs2_fragtree_insert(newfrag, this);
306 rb_insert_color(&newfrag->rb, root);
308 /* New frag starts at the same point as 'this' used to. Replace
309 it in the tree without doing a delete and insertion */
310 dbg_fragtree2("inserting newfrag (*%p),%d-%d in before 'this' (*%p),%d-%d\n",
311 newfrag, newfrag->ofs, newfrag->ofs+newfrag->size, this, this->ofs, this->ofs+this->size);
313 rb_replace_node(&this->rb, &newfrag->rb, root);
315 if (newfrag->ofs + newfrag->size >= this->ofs+this->size) {
316 dbg_fragtree2("obsoleting node frag %p (%x-%x)\n", this, this->ofs, this->ofs+this->size);
317 jffs2_obsolete_node_frag(c, this);
319 this->ofs += newfrag->size;
320 this->size -= newfrag->size;
322 jffs2_fragtree_insert(this, newfrag);
323 rb_insert_color(&this->rb, root);
327 /* OK, now we have newfrag added in the correct place in the tree, but
328 frag_next(newfrag) may be a fragment which is overlapped by it
330 while ((this = frag_next(newfrag)) && newfrag->ofs + newfrag->size >= this->ofs + this->size) {
331 /* 'this' frag is obsoleted completely. */
332 dbg_fragtree2("obsoleting node frag %p (%x-%x) and removing from tree\n",
333 this, this->ofs, this->ofs+this->size);
334 rb_erase(&this->rb, root);
335 jffs2_obsolete_node_frag(c, this);
337 /* Now we're pointing at the first frag which isn't totally obsoleted by
340 if (!this || newfrag->ofs + newfrag->size == this->ofs)
343 /* Still some overlap but we don't need to move it in the tree */
344 this->size = (this->ofs + this->size) - (newfrag->ofs + newfrag->size);
345 this->ofs = newfrag->ofs + newfrag->size;
347 /* And mark them REF_NORMAL so the GC takes a look at them */
349 mark_ref_normal(this->node->raw);
350 mark_ref_normal(newfrag->node->raw);
356 * Given an inode, probably with existing tree of fragments, add the new node
357 * to the fragment tree.
359 int jffs2_add_full_dnode_to_inode(struct jffs2_sb_info *c, struct jffs2_inode_info *f, struct jffs2_full_dnode *fn)
362 struct jffs2_node_frag *newfrag;
364 if (unlikely(!fn->size))
367 newfrag = new_fragment(fn, fn->ofs, fn->size);
368 if (unlikely(!newfrag))
370 newfrag->node->frags = 1;
372 dbg_fragtree("adding node %#04x-%#04x @0x%08x on flash, newfrag *%p\n",
373 fn->ofs, fn->ofs+fn->size, ref_offset(fn->raw), newfrag);
375 ret = jffs2_add_frag_to_fragtree(c, &f->fragtree, newfrag);
379 /* If we now share a page with other nodes, mark either previous
380 or next node REF_NORMAL, as appropriate. */
381 if (newfrag->ofs & (PAGE_CACHE_SIZE-1)) {
382 struct jffs2_node_frag *prev = frag_prev(newfrag);
384 mark_ref_normal(fn->raw);
385 /* If we don't start at zero there's _always_ a previous */
387 mark_ref_normal(prev->node->raw);
390 if ((newfrag->ofs+newfrag->size) & (PAGE_CACHE_SIZE-1)) {
391 struct jffs2_node_frag *next = frag_next(newfrag);
394 mark_ref_normal(fn->raw);
396 mark_ref_normal(next->node->raw);
399 jffs2_dbg_fragtree_paranoia_check_nolock(f);
404 void jffs2_set_inocache_state(struct jffs2_sb_info *c, struct jffs2_inode_cache *ic, int state)
406 spin_lock(&c->inocache_lock);
408 wake_up(&c->inocache_wq);
409 spin_unlock(&c->inocache_lock);
412 /* During mount, this needs no locking. During normal operation, its
413 callers want to do other stuff while still holding the inocache_lock.
414 Rather than introducing special case get_ino_cache functions or
415 callbacks, we just let the caller do the locking itself. */
417 struct jffs2_inode_cache *jffs2_get_ino_cache(struct jffs2_sb_info *c, uint32_t ino)
419 struct jffs2_inode_cache *ret;
421 ret = c->inocache_list[ino % INOCACHE_HASHSIZE];
422 while (ret && ret->ino < ino) {
426 if (ret && ret->ino != ino)
432 void jffs2_add_ino_cache (struct jffs2_sb_info *c, struct jffs2_inode_cache *new)
434 struct jffs2_inode_cache **prev;
436 spin_lock(&c->inocache_lock);
438 new->ino = ++c->highest_ino;
440 dbg_inocache("add %p (ino #%u)\n", new, new->ino);
442 prev = &c->inocache_list[new->ino % INOCACHE_HASHSIZE];
444 while ((*prev) && (*prev)->ino < new->ino) {
445 prev = &(*prev)->next;
450 spin_unlock(&c->inocache_lock);
453 void jffs2_del_ino_cache(struct jffs2_sb_info *c, struct jffs2_inode_cache *old)
455 struct jffs2_inode_cache **prev;
457 #ifdef CONFIG_JFFS2_FS_XATTR
460 dbg_inocache("del %p (ino #%u)\n", old, old->ino);
461 spin_lock(&c->inocache_lock);
463 prev = &c->inocache_list[old->ino % INOCACHE_HASHSIZE];
465 while ((*prev) && (*prev)->ino < old->ino) {
466 prev = &(*prev)->next;
468 if ((*prev) == old) {
472 /* Free it now unless it's in READING or CLEARING state, which
473 are the transitions upon read_inode() and clear_inode(). The
474 rest of the time we know nobody else is looking at it, and
475 if it's held by read_inode() or clear_inode() they'll free it
477 if (old->state != INO_STATE_READING && old->state != INO_STATE_CLEARING)
478 jffs2_free_inode_cache(old);
480 spin_unlock(&c->inocache_lock);
483 void jffs2_free_ino_caches(struct jffs2_sb_info *c)
486 struct jffs2_inode_cache *this, *next;
488 for (i=0; i<INOCACHE_HASHSIZE; i++) {
489 this = c->inocache_list[i];
492 jffs2_xattr_free_inode(c, this);
493 jffs2_free_inode_cache(this);
496 c->inocache_list[i] = NULL;
500 void jffs2_free_raw_node_refs(struct jffs2_sb_info *c)
503 struct jffs2_raw_node_ref *this, *next;
505 for (i=0; i<c->nr_blocks; i++) {
506 this = c->blocks[i].first_node;
508 if (this[REFS_PER_BLOCK].flash_offset == REF_LINK_NODE)
509 next = this[REFS_PER_BLOCK].next_in_ino;
513 jffs2_free_refblock(this);
516 c->blocks[i].first_node = c->blocks[i].last_node = NULL;
520 struct jffs2_node_frag *jffs2_lookup_node_frag(struct rb_root *fragtree, uint32_t offset)
522 /* The common case in lookup is that there will be a node
523 which precisely matches. So we go looking for that first */
524 struct rb_node *next;
525 struct jffs2_node_frag *prev = NULL;
526 struct jffs2_node_frag *frag = NULL;
528 dbg_fragtree2("root %p, offset %d\n", fragtree, offset);
530 next = fragtree->rb_node;
533 frag = rb_entry(next, struct jffs2_node_frag, rb);
535 if (frag->ofs + frag->size <= offset) {
536 /* Remember the closest smaller match on the way down */
537 if (!prev || frag->ofs > prev->ofs)
539 next = frag->rb.rb_right;
540 } else if (frag->ofs > offset) {
541 next = frag->rb.rb_left;
547 /* Exact match not found. Go back up looking at each parent,
548 and return the closest smaller one */
551 dbg_fragtree2("no match. Returning frag %#04x-%#04x, closest previous\n",
552 prev->ofs, prev->ofs+prev->size);
554 dbg_fragtree2("returning NULL, empty fragtree\n");
559 /* Pass 'c' argument to indicate that nodes should be marked obsolete as
561 void jffs2_kill_fragtree(struct rb_root *root, struct jffs2_sb_info *c)
563 struct jffs2_node_frag *frag;
564 struct jffs2_node_frag *parent;
569 dbg_fragtree("killing\n");
571 frag = (rb_entry(root->rb_node, struct jffs2_node_frag, rb));
573 if (frag->rb.rb_left) {
574 frag = frag_left(frag);
577 if (frag->rb.rb_right) {
578 frag = frag_right(frag);
582 if (frag->node && !(--frag->node->frags)) {
583 /* Not a hole, and it's the final remaining frag
584 of this node. Free the node */
586 jffs2_mark_node_obsolete(c, frag->node->raw);
588 jffs2_free_full_dnode(frag->node);
590 parent = frag_parent(frag);
592 if (frag_left(parent) == frag)
593 parent->rb.rb_left = NULL;
595 parent->rb.rb_right = NULL;
598 jffs2_free_node_frag(frag);
605 struct jffs2_raw_node_ref *jffs2_link_node_ref(struct jffs2_sb_info *c,
606 struct jffs2_eraseblock *jeb,
607 uint32_t ofs, uint32_t len,
608 struct jffs2_inode_cache *ic)
610 struct jffs2_raw_node_ref *ref;
612 BUG_ON(!jeb->allocated_refs);
613 jeb->allocated_refs--;
615 ref = jeb->last_node;
617 dbg_noderef("Last node at %p is (%08x,%p)\n", ref, ref->flash_offset,
620 while (ref->flash_offset != REF_EMPTY_NODE) {
621 if (ref->flash_offset == REF_LINK_NODE)
622 ref = ref->next_in_ino;
627 dbg_noderef("New ref is %p (%08x becomes %08x,%p) len 0x%x\n", ref,
628 ref->flash_offset, ofs, ref->next_in_ino, len);
630 ref->flash_offset = ofs;
632 if (!jeb->first_node) {
633 jeb->first_node = ref;
634 BUG_ON(ref_offset(ref) != jeb->offset);
635 } else if (unlikely(ref_offset(ref) != jeb->offset + c->sector_size - jeb->free_size)) {
636 uint32_t last_len = ref_totlen(c, jeb, jeb->last_node);
638 JFFS2_ERROR("Adding new ref %p at (0x%08x-0x%08x) not immediately after previous (0x%08x-0x%08x)\n",
639 ref, ref_offset(ref), ref_offset(ref)+len,
640 ref_offset(jeb->last_node),
641 ref_offset(jeb->last_node)+last_len);
644 jeb->last_node = ref;
647 ref->next_in_ino = ic->nodes;
650 ref->next_in_ino = NULL;
653 switch(ref_flags(ref)) {
655 c->unchecked_size += len;
656 jeb->unchecked_size += len;
662 jeb->used_size += len;
666 c->dirty_size += len;
667 jeb->dirty_size += len;
671 jeb->free_size -= len;
674 /* Set (and test) __totlen field... for now */
676 ref_totlen(c, jeb, ref);
681 /* No locking, no reservation of 'ref'. Do not use on a live file system */
682 int jffs2_scan_dirty_space(struct jffs2_sb_info *c, struct jffs2_eraseblock *jeb,
687 if (unlikely(size > jeb->free_size)) {
688 printk(KERN_CRIT "Dirty space 0x%x larger then free_size 0x%x (wasted 0x%x)\n",
689 size, jeb->free_size, jeb->wasted_size);
692 /* REF_EMPTY_NODE is !obsolete, so that works OK */
693 if (jeb->last_node && ref_obsolete(jeb->last_node)) {
695 jeb->last_node->__totlen += size;
697 c->dirty_size += size;
698 c->free_size -= size;
699 jeb->dirty_size += size;
700 jeb->free_size -= size;
702 uint32_t ofs = jeb->offset + c->sector_size - jeb->free_size;
705 jffs2_link_node_ref(c, jeb, ofs, size, NULL);
711 /* Calculate totlen from surrounding nodes or eraseblock */
712 static inline uint32_t __ref_totlen(struct jffs2_sb_info *c,
713 struct jffs2_eraseblock *jeb,
714 struct jffs2_raw_node_ref *ref)
717 struct jffs2_raw_node_ref *next_ref = ref_next(ref);
720 ref_end = ref_offset(next_ref);
723 jeb = &c->blocks[ref->flash_offset / c->sector_size];
725 /* Last node in block. Use free_space */
726 if (unlikely(ref != jeb->last_node)) {
727 printk(KERN_CRIT "ref %p @0x%08x is not jeb->last_node (%p @0x%08x)\n",
728 ref, ref_offset(ref), jeb->last_node, jeb->last_node?ref_offset(jeb->last_node):0);
731 ref_end = jeb->offset + c->sector_size - jeb->free_size;
733 return ref_end - ref_offset(ref);
736 uint32_t __jffs2_ref_totlen(struct jffs2_sb_info *c, struct jffs2_eraseblock *jeb,
737 struct jffs2_raw_node_ref *ref)
741 ret = __ref_totlen(c, jeb, ref);
744 if (unlikely(ret != ref->__totlen)) {
746 jeb = &c->blocks[ref->flash_offset / c->sector_size];
748 printk(KERN_CRIT "Totlen for ref at %p (0x%08x-0x%08x) miscalculated as 0x%x instead of %x\n",
749 ref, ref_offset(ref), ref_offset(ref)+ref->__totlen,
752 printk(KERN_CRIT "next %p (0x%08x-0x%08x)\n", ref_next(ref), ref_offset(ref_next(ref)),
753 ref_offset(ref_next(ref))+ref->__totlen);
755 printk(KERN_CRIT "No next ref. jeb->last_node is %p\n", jeb->last_node);
757 printk(KERN_CRIT "jeb->wasted_size %x, dirty_size %x, used_size %x, free_size %x\n", jeb->wasted_size, jeb->dirty_size, jeb->used_size, jeb->free_size);
759 #if defined(JFFS2_DBG_DUMPS) || defined(JFFS2_DBG_PARANOIA_CHECKS)
760 __jffs2_dbg_dump_node_refs_nolock(c, jeb);
767 #endif /* TEST_TOTLEN */