yaffs: Remove a whole lot of function wrappers and forward declarations
[yaffs2.git] / yaffs_guts.c
index c56e060ef5bc384e231eadb49bd484991d221492..15d0238ba8c76757fb9483b82a38a7a119a5d357 100644 (file)
 
 #include "yaffs_ecc.h"
 
-/* Robustification (if it ever comes about...) */
-static void yaffs_retire_block(struct yaffs_dev *dev, int flash_block);
-static void yaffs_handle_chunk_wr_error(struct yaffs_dev *dev, int nand_chunk,
-                                       int erased_ok);
-static void yaffs_handle_chunk_wr_ok(struct yaffs_dev *dev, int nand_chunk,
-                                    const u8 * data,
-                                    const struct yaffs_ext_tags *tags);
-static void yaffs_handle_chunk_update(struct yaffs_dev *dev, int nand_chunk,
-                                     const struct yaffs_ext_tags *tags);
-
-/* Other local prototypes */
-static void yaffs_update_parent(struct yaffs_obj *obj);
-static int yaffs_unlink_obj(struct yaffs_obj *obj);
-static int yaffs_obj_cache_dirty(struct yaffs_obj *obj);
-
-static int yaffs_write_new_chunk(struct yaffs_dev *dev,
-                                const u8 * buffer,
-                                struct yaffs_ext_tags *tags, int use_reserver);
-
-static struct yaffs_obj *yaffs_new_obj(struct yaffs_dev *dev, int number,
-                                      enum yaffs_obj_type type);
-
-static int yaffs_apply_xattrib_mod(struct yaffs_obj *obj, char *buffer,
-                                  struct yaffs_xattr_mod *xmod);
-
-static void yaffs_remove_obj_from_dir(struct yaffs_obj *obj);
-static int yaffs_generic_obj_del(struct yaffs_obj *in);
-
-static int yaffs_check_chunk_erased(struct yaffs_dev *dev, int nand_chunk);
-
-static int yaffs_unlink_worker(struct yaffs_obj *obj);
-
-static int yaffs_tags_match(const struct yaffs_ext_tags *tags, int obj_id,
-                           int chunk_obj);
-
-static int yaffs_alloc_chunk(struct yaffs_dev *dev, int use_reserver,
-                            struct yaffs_block_info **block_ptr);
-
-static void yaffs_check_obj_details_loaded(struct yaffs_obj *in);
+/* Forward declarations */
 
-static void yaffs_invalidate_whole_cache(struct yaffs_obj *in);
-static void yaffs_invalidate_chunk_cache(struct yaffs_obj *object,
-                                        int chunk_id);
 
-static int yaffs_find_chunk_in_file(struct yaffs_obj *in, int inode_chunk,
-                                   struct yaffs_ext_tags *tags);
+static int yaffs_wr_data_obj(struct yaffs_obj *in, int inode_chunk,
+                            const u8 * buffer, int n_bytes, int use_reserve);
 
-static int yaffs_verify_chunk_written(struct yaffs_dev *dev,
-                                     int nand_chunk,
-                                     const u8 * data,
-                                     struct yaffs_ext_tags *tags);
 
-static void yaffs_load_name_from_oh(struct yaffs_dev *dev, YCHAR * name,
-                                   const YCHAR * oh_name, int buff_size);
-static void yaffs_load_oh_from_name(struct yaffs_dev *dev, YCHAR * oh_name,
-                                   const YCHAR * name);
 
 /* Function to calculate chunk and offset */
 
@@ -186,7 +137,7 @@ static int yaffs_init_tmp_buffers(struct yaffs_dev *dev)
        for (i = 0; buf && i < YAFFS_N_TEMP_BUFFERS; i++) {
                dev->temp_buffer[i].line = 0;   /* not in use */
                dev->temp_buffer[i].buffer = buf =
-                   YMALLOC_DMA(dev->param.total_bytes_per_chunk);
+                   kmalloc(dev->param.total_bytes_per_chunk, GFP_NOFS);
        }
 
        return buf ? YAFFS_OK : YAFFS_FAIL;
@@ -229,7 +180,7 @@ u8 *yaffs_get_temp_buffer(struct yaffs_dev * dev, int line_no)
         */
 
        dev->unmanaged_buffer_allocs++;
-       return YMALLOC(dev->data_bytes_per_chunk);
+       return kmalloc(dev->data_bytes_per_chunk, GFP_NOFS);
 
 }
 
@@ -251,7 +202,7 @@ void yaffs_release_temp_buffer(struct yaffs_dev *dev, u8 * buffer, int line_no)
                T(YAFFS_TRACE_BUFFERS,
                  (TSTR("Releasing unmanaged temp buffer in line %d" TENDSTR),
                   line_no));
-               YFREE(buffer);
+               kfree(buffer);
                dev->unmanaged_buffer_deallocs++;
        }
 
@@ -282,6 +233,66 @@ int yaffs_is_managed_tmp_buffer(struct yaffs_dev *dev, const u8 * buffer)
        return 0;
 }
 
+/*
+ * Functions for robustisizing TODO
+ *
+ */
+
+static void yaffs_handle_chunk_wr_ok(struct yaffs_dev *dev, int nand_chunk,
+                                    const u8 * data,
+                                    const struct yaffs_ext_tags *tags)
+{
+       dev = dev;
+       nand_chunk = nand_chunk;
+       data = data;
+       tags = tags;
+}
+
+static void yaffs_handle_chunk_update(struct yaffs_dev *dev, int nand_chunk,
+                                     const struct yaffs_ext_tags *tags)
+{
+       dev = dev;
+       nand_chunk = nand_chunk;
+       tags = tags;
+}
+
+void yaffs_handle_chunk_error(struct yaffs_dev *dev,
+                             struct yaffs_block_info *bi)
+{
+       if (!bi->gc_prioritise) {
+               bi->gc_prioritise = 1;
+               dev->has_pending_prioritised_gc = 1;
+               bi->chunk_error_strikes++;
+
+               if (bi->chunk_error_strikes > 3) {
+                       bi->needs_retiring = 1; /* Too many stikes, so retire this */
+                       T(YAFFS_TRACE_ALWAYS,
+                         (TSTR("yaffs: Block struck out" TENDSTR)));
+
+               }
+       }
+}
+
+static void yaffs_handle_chunk_wr_error(struct yaffs_dev *dev, int nand_chunk,
+                                       int erased_ok)
+{
+       int flash_block = nand_chunk / dev->param.chunks_per_block;
+       struct yaffs_block_info *bi = yaffs_get_block_info(dev, flash_block);
+
+       yaffs_handle_chunk_error(dev, bi);
+
+       if (erased_ok) {
+               /* Was an actual write failure, so mark the block for retirement  */
+               bi->needs_retiring = 1;
+               T(YAFFS_TRACE_ERROR | YAFFS_TRACE_BAD_BLOCKS,
+                 (TSTR("**>> Block %d needs retiring" TENDSTR), flash_block));
+       }
+
+       /* Delete the chunk */
+       yaffs_chunk_del(dev, nand_chunk, 1, __LINE__);
+       yaffs_skip_rest_of_block(dev);
+}
+
 /*
  * Verification code
  */
@@ -372,6 +383,150 @@ static int yaffs_verify_chunk_written(struct yaffs_dev *dev,
        return retval;
 }
 
+
+int yaffs_check_alloc_available(struct yaffs_dev *dev, int n_chunks)
+{
+       int reserved_chunks;
+       int reserved_blocks = dev->param.n_reserved_blocks;
+       int checkpt_blocks;
+
+       checkpt_blocks = yaffs_calc_checkpt_blocks_required(dev);
+
+       reserved_chunks =
+           ((reserved_blocks + checkpt_blocks) * dev->param.chunks_per_block);
+
+       return (dev->n_free_chunks > (reserved_chunks + n_chunks));
+}
+
+static int yaffs_find_alloc_block(struct yaffs_dev *dev)
+{
+       int i;
+
+       struct yaffs_block_info *bi;
+
+       if (dev->n_erased_blocks < 1) {
+               /* Hoosterman we've got a problem.
+                * Can't get space to gc
+                */
+               T(YAFFS_TRACE_ERROR,
+                 (TSTR("yaffs tragedy: no more erased blocks" TENDSTR)));
+
+               return -1;
+       }
+
+       /* Find an empty block. */
+
+       for (i = dev->internal_start_block; i <= dev->internal_end_block; i++) {
+               dev->alloc_block_finder++;
+               if (dev->alloc_block_finder < dev->internal_start_block
+                   || dev->alloc_block_finder > dev->internal_end_block) {
+                       dev->alloc_block_finder = dev->internal_start_block;
+               }
+
+               bi = yaffs_get_block_info(dev, dev->alloc_block_finder);
+
+               if (bi->block_state == YAFFS_BLOCK_STATE_EMPTY) {
+                       bi->block_state = YAFFS_BLOCK_STATE_ALLOCATING;
+                       dev->seq_number++;
+                       bi->seq_number = dev->seq_number;
+                       dev->n_erased_blocks--;
+                       T(YAFFS_TRACE_ALLOCATE,
+                         (TSTR("Allocated block %d, seq  %d, %d left" TENDSTR),
+                          dev->alloc_block_finder, dev->seq_number,
+                          dev->n_erased_blocks));
+                       return dev->alloc_block_finder;
+               }
+       }
+
+       T(YAFFS_TRACE_ALWAYS,
+         (TSTR
+          ("yaffs tragedy: no more erased blocks, but there should have been %d"
+           TENDSTR), dev->n_erased_blocks));
+
+       return -1;
+}
+static int yaffs_alloc_chunk(struct yaffs_dev *dev, int use_reserver,
+                            struct yaffs_block_info **block_ptr)
+{
+       int ret_val;
+       struct yaffs_block_info *bi;
+
+       if (dev->alloc_block < 0) {
+               /* Get next block to allocate off */
+               dev->alloc_block = yaffs_find_alloc_block(dev);
+               dev->alloc_page = 0;
+       }
+
+       if (!use_reserver && !yaffs_check_alloc_available(dev, 1)) {
+               /* Not enough space to allocate unless we're allowed to use the reserve. */
+               return -1;
+       }
+
+       if (dev->n_erased_blocks < dev->param.n_reserved_blocks
+           && dev->alloc_page == 0) {
+               T(YAFFS_TRACE_ALLOCATE, (TSTR("Allocating reserve" TENDSTR)));
+       }
+
+       /* Next page please.... */
+       if (dev->alloc_block >= 0) {
+               bi = yaffs_get_block_info(dev, dev->alloc_block);
+
+               ret_val = (dev->alloc_block * dev->param.chunks_per_block) +
+                   dev->alloc_page;
+               bi->pages_in_use++;
+               yaffs_set_chunk_bit(dev, dev->alloc_block, dev->alloc_page);
+
+               dev->alloc_page++;
+
+               dev->n_free_chunks--;
+
+               /* If the block is full set the state to full */
+               if (dev->alloc_page >= dev->param.chunks_per_block) {
+                       bi->block_state = YAFFS_BLOCK_STATE_FULL;
+                       dev->alloc_block = -1;
+               }
+
+               if (block_ptr)
+                       *block_ptr = bi;
+
+               return ret_val;
+       }
+
+       T(YAFFS_TRACE_ERROR,
+         (TSTR("!!!!!!!!! Allocator out !!!!!!!!!!!!!!!!!" TENDSTR)));
+
+       return -1;
+}
+
+static int yaffs_get_erased_chunks(struct yaffs_dev *dev)
+{
+       int n;
+
+       n = dev->n_erased_blocks * dev->param.chunks_per_block;
+
+       if (dev->alloc_block > 0)
+               n += (dev->param.chunks_per_block - dev->alloc_page);
+
+       return n;
+
+}
+
+/*
+ * yaffs_skip_rest_of_block() skips over the rest of the allocation block
+ * if we don't want to write to it.
+ */
+void yaffs_skip_rest_of_block(struct yaffs_dev *dev)
+{
+       if (dev->alloc_block > 0) {
+               struct yaffs_block_info *bi =
+                   yaffs_get_block_info(dev, dev->alloc_block);
+               if (bi->block_state == YAFFS_BLOCK_STATE_ALLOCATING) {
+                       bi->block_state = YAFFS_BLOCK_STATE_FULL;
+                       dev->alloc_block = -1;
+               }
+       }
+}
+
 static int yaffs_write_new_chunk(struct yaffs_dev *dev,
                                 const u8 * data,
                                 struct yaffs_ext_tags *tags, int use_reserver)
@@ -522,76 +677,16 @@ static void yaffs_retire_block(struct yaffs_dev *dev, int flash_block)
        dev->n_retired_blocks++;
 }
 
-/*
- * Functions for robustisizing TODO
- *
- */
+/*---------------- Name handling functions ------------*/
 
-static void yaffs_handle_chunk_wr_ok(struct yaffs_dev *dev, int nand_chunk,
-                                    const u8 * data,
-                                    const struct yaffs_ext_tags *tags)
+static u16 yaffs_calc_name_sum(const YCHAR * name)
 {
-       dev = dev;
-       nand_chunk = nand_chunk;
-       data = data;
-       tags = tags;
-}
+       u16 sum = 0;
+       u16 i = 1;
 
-static void yaffs_handle_chunk_update(struct yaffs_dev *dev, int nand_chunk,
-                                     const struct yaffs_ext_tags *tags)
-{
-       dev = dev;
-       nand_chunk = nand_chunk;
-       tags = tags;
-}
-
-void yaffs_handle_chunk_error(struct yaffs_dev *dev,
-                             struct yaffs_block_info *bi)
-{
-       if (!bi->gc_prioritise) {
-               bi->gc_prioritise = 1;
-               dev->has_pending_prioritised_gc = 1;
-               bi->chunk_error_strikes++;
-
-               if (bi->chunk_error_strikes > 3) {
-                       bi->needs_retiring = 1; /* Too many stikes, so retire this */
-                       T(YAFFS_TRACE_ALWAYS,
-                         (TSTR("yaffs: Block struck out" TENDSTR)));
-
-               }
-       }
-}
-
-static void yaffs_handle_chunk_wr_error(struct yaffs_dev *dev, int nand_chunk,
-                                       int erased_ok)
-{
-       int flash_block = nand_chunk / dev->param.chunks_per_block;
-       struct yaffs_block_info *bi = yaffs_get_block_info(dev, flash_block);
-
-       yaffs_handle_chunk_error(dev, bi);
-
-       if (erased_ok) {
-               /* Was an actual write failure, so mark the block for retirement  */
-               bi->needs_retiring = 1;
-               T(YAFFS_TRACE_ERROR | YAFFS_TRACE_BAD_BLOCKS,
-                 (TSTR("**>> Block %d needs retiring" TENDSTR), flash_block));
-       }
-
-       /* Delete the chunk */
-       yaffs_chunk_del(dev, nand_chunk, 1, __LINE__);
-       yaffs_skip_rest_of_block(dev);
-}
-
-/*---------------- Name handling functions ------------*/
-
-static u16 yaffs_calc_name_sum(const YCHAR * name)
-{
-       u16 sum = 0;
-       u16 i = 1;
-
-       const YUCHAR *bname = (const YUCHAR *)name;
-       if (bname) {
-               while ((*bname) && (i < (YAFFS_MAX_NAME_LENGTH / 2))) {
+       const YUCHAR *bname = (const YUCHAR *)name;
+       if (bname) {
+               while ((*bname) && (i < (YAFFS_MAX_NAME_LENGTH / 2))) {
 
                        /* 0x1f mask is case insensitive */
                        sum += ((*bname) & 0x1f) * i;
@@ -607,9 +702,9 @@ void yaffs_set_obj_name(struct yaffs_obj *obj, const YCHAR * name)
 #ifndef CONFIG_YAFFS_NO_SHORT_NAMES
        memset(obj->short_name, 0, sizeof(obj->short_name));
        if (name && 
-               yaffs_strnlen(name, YAFFS_SHORT_NAME_LENGTH + 1) <=
+               strnlen(name, YAFFS_SHORT_NAME_LENGTH + 1) <=
            YAFFS_SHORT_NAME_LENGTH)
-               yaffs_strcpy(obj->short_name, name);
+               strcpy(obj->short_name, name);
        else
                obj->short_name[0] = _Y('\0');
 #endif
@@ -884,6 +979,14 @@ struct yaffs_tnode *yaffs_add_find_tnode_0(struct yaffs_dev *dev,
        return tn;
 }
 
+static int yaffs_tags_match(const struct yaffs_ext_tags *tags, int obj_id,
+                           int chunk_obj)
+{
+       return (tags->chunk_id == chunk_obj &&
+               tags->obj_id == obj_id && !tags->is_deleted) ? 1 : 0;
+
+}
+
 static int yaffs_find_chunk_in_group(struct yaffs_dev *dev, int the_chunk,
                                     struct yaffs_ext_tags *tags, int obj_id,
                                     int inode_chunk)
@@ -911,6 +1014,194 @@ static int yaffs_find_chunk_in_group(struct yaffs_dev *dev, int the_chunk,
        return -1;
 }
 
+static int yaffs_find_chunk_in_file(struct yaffs_obj *in, int inode_chunk,
+                                   struct yaffs_ext_tags *tags)
+{
+       /*Get the Tnode, then get the level 0 offset chunk offset */
+       struct yaffs_tnode *tn;
+       int the_chunk = -1;
+       struct yaffs_ext_tags local_tags;
+       int ret_val = -1;
+
+       struct yaffs_dev *dev = in->my_dev;
+
+       if (!tags) {
+               /* Passed a NULL, so use our own tags space */
+               tags = &local_tags;
+       }
+
+       tn = yaffs_find_tnode_0(dev, &in->variant.file_variant, inode_chunk);
+
+       if (tn) {
+               the_chunk = yaffs_get_group_base(dev, tn, inode_chunk);
+
+               ret_val =
+                   yaffs_find_chunk_in_group(dev, the_chunk, tags, in->obj_id,
+                                             inode_chunk);
+       }
+       return ret_val;
+}
+
+static int yaffs_find_del_file_chunk(struct yaffs_obj *in, int inode_chunk,
+                                    struct yaffs_ext_tags *tags)
+{
+       /* Get the Tnode, then get the level 0 offset chunk offset */
+       struct yaffs_tnode *tn;
+       int the_chunk = -1;
+       struct yaffs_ext_tags local_tags;
+
+       struct yaffs_dev *dev = in->my_dev;
+       int ret_val = -1;
+
+       if (!tags) {
+               /* Passed a NULL, so use our own tags space */
+               tags = &local_tags;
+       }
+
+       tn = yaffs_find_tnode_0(dev, &in->variant.file_variant, inode_chunk);
+
+       if (tn) {
+
+               the_chunk = yaffs_get_group_base(dev, tn, inode_chunk);
+
+               ret_val =
+                   yaffs_find_chunk_in_group(dev, the_chunk, tags, in->obj_id,
+                                             inode_chunk);
+
+               /* Delete the entry in the filestructure (if found) */
+               if (ret_val != -1)
+                       yaffs_load_tnode_0(dev, tn, inode_chunk, 0);
+       }
+
+       return ret_val;
+}
+
+int yaffs_put_chunk_in_file(struct yaffs_obj *in, int inode_chunk,
+                           int nand_chunk, int in_scan)
+{
+       /* NB in_scan is zero unless scanning.
+        * For forward scanning, in_scan is > 0;
+        * for backward scanning in_scan is < 0
+        *
+        * nand_chunk = 0 is a dummy insert to make sure the tnodes are there.
+        */
+
+       struct yaffs_tnode *tn;
+       struct yaffs_dev *dev = in->my_dev;
+       int existing_cunk;
+       struct yaffs_ext_tags existing_tags;
+       struct yaffs_ext_tags new_tags;
+       unsigned existing_serial, new_serial;
+
+       if (in->variant_type != YAFFS_OBJECT_TYPE_FILE) {
+               /* Just ignore an attempt at putting a chunk into a non-file during scanning
+                * If it is not during Scanning then something went wrong!
+                */
+               if (!in_scan) {
+                       T(YAFFS_TRACE_ERROR,
+                         (TSTR
+                          ("yaffs tragedy:attempt to put data chunk into a non-file"
+                           TENDSTR)));
+                       YBUG();
+               }
+
+               yaffs_chunk_del(dev, nand_chunk, 1, __LINE__);
+               return YAFFS_OK;
+       }
+
+       tn = yaffs_add_find_tnode_0(dev,
+                                   &in->variant.file_variant,
+                                   inode_chunk, NULL);
+       if (!tn)
+               return YAFFS_FAIL;
+
+       if (!nand_chunk)
+               /* Dummy insert, bail now */
+               return YAFFS_OK;
+
+       existing_cunk = yaffs_get_group_base(dev, tn, inode_chunk);
+
+       if (in_scan != 0) {
+               /* If we're scanning then we need to test for duplicates
+                * NB This does not need to be efficient since it should only ever
+                * happen when the power fails during a write, then only one
+                * chunk should ever be affected.
+                *
+                * Correction for YAFFS2: This could happen quite a lot and we need to think about efficiency! TODO
+                * Update: For backward scanning we don't need to re-read tags so this is quite cheap.
+                */
+
+               if (existing_cunk > 0) {
+                       /* NB Right now existing chunk will not be real chunk_id if the chunk group size > 1
+                        *    thus we have to do a FindChunkInFile to get the real chunk id.
+                        *
+                        * We have a duplicate now we need to decide which one to use:
+                        *
+                        * Backwards scanning YAFFS2: The old one is what we use, dump the new one.
+                        * Forward scanning YAFFS2: The new one is what we use, dump the old one.
+                        * YAFFS1: Get both sets of tags and compare serial numbers.
+                        */
+
+                       if (in_scan > 0) {
+                               /* Only do this for forward scanning */
+                               yaffs_rd_chunk_tags_nand(dev,
+                                                        nand_chunk,
+                                                        NULL, &new_tags);
+
+                               /* Do a proper find */
+                               existing_cunk =
+                                   yaffs_find_chunk_in_file(in, inode_chunk,
+                                                            &existing_tags);
+                       }
+
+                       if (existing_cunk <= 0) {
+                               /*Hoosterman - how did this happen? */
+
+                               T(YAFFS_TRACE_ERROR,
+                                 (TSTR
+                                  ("yaffs tragedy: existing chunk < 0 in scan"
+                                   TENDSTR)));
+
+                       }
+
+                       /* NB The deleted flags should be false, otherwise the chunks will
+                        * not be loaded during a scan
+                        */
+
+                       if (in_scan > 0) {
+                               new_serial = new_tags.serial_number;
+                               existing_serial = existing_tags.serial_number;
+                       }
+
+                       if ((in_scan > 0) &&
+                           (existing_cunk <= 0 ||
+                            ((existing_serial + 1) & 3) == new_serial)) {
+                               /* Forward scanning.
+                                * Use new
+                                * Delete the old one and drop through to update the tnode
+                                */
+                               yaffs_chunk_del(dev, existing_cunk, 1,
+                                               __LINE__);
+                       } else {
+                               /* Backward scanning or we want to use the existing one
+                                * Use existing.
+                                * Delete the new one and return early so that the tnode isn't changed
+                                */
+                               yaffs_chunk_del(dev, nand_chunk, 1, __LINE__);
+                               return YAFFS_OK;
+                       }
+               }
+
+       }
+
+       if (existing_cunk == 0)
+               in->n_data_chunks++;
+
+       yaffs_load_tnode_0(dev, tn, inode_chunk, nand_chunk);
+
+       return YAFFS_OK;
+}
+
 static void yaffs_soft_del_chunk(struct yaffs_dev *dev, int chunk)
 {
        struct yaffs_block_info *the_block;
@@ -991,1075 +1282,1258 @@ static int yaffs_soft_del_worker(struct yaffs_obj *in, struct yaffs_tnode *tn,
 
 }
 
-static void yaffs_soft_del_file(struct yaffs_obj *obj)
+static void yaffs_remove_obj_from_dir(struct yaffs_obj *obj)
 {
-       if (obj->deleted &&
-           obj->variant_type == YAFFS_OBJECT_TYPE_FILE && !obj->soft_del) {
-               if (obj->n_data_chunks <= 0) {
-                       /* Empty file with no duplicate object headers, just delete it immediately */
-                       yaffs_free_tnode(obj->my_dev,
-                                        obj->variant.file_variant.top);
-                       obj->variant.file_variant.top = NULL;
-                       T(YAFFS_TRACE_TRACING,
-                         (TSTR("yaffs: Deleting empty file %d" TENDSTR),
-                          obj->obj_id));
-                       yaffs_generic_obj_del(obj);
-               } else {
-                       yaffs_soft_del_worker(obj,
-                                             obj->variant.file_variant.top,
-                                             obj->variant.
-                                             file_variant.top_level, 0);
-                       obj->soft_del = 1;
-               }
-       }
-}
-
-/* Pruning removes any part of the file structure tree that is beyond the
- * bounds of the file (ie that does not point to chunks).
- *
- * A file should only get pruned when its size is reduced.
- *
- * Before pruning, the chunks must be pulled from the tree and the
- * level 0 tnode entries must be zeroed out.
- * Could also use this for file deletion, but that's probably better handled
- * by a special case.
- *
- * This function is recursive. For levels > 0 the function is called again on
- * any sub-tree. For level == 0 we just check if the sub-tree has data.
- * If there is no data in a subtree then it is pruned.
- */
-
-static struct yaffs_tnode *yaffs_prune_worker(struct yaffs_dev *dev,
-                                             struct yaffs_tnode *tn, u32 level,
-                                             int del0)
-{
-       int i;
-       int has_data;
-
-       if (tn) {
-               has_data = 0;
-
-               if (level > 0) {
-                       for (i = 0; i < YAFFS_NTNODES_INTERNAL; i++) {
-                               if (tn->internal[i]) {
-                                       tn->internal[i] =
-                                           yaffs_prune_worker(dev,
-                                                              tn->internal[i],
-                                                              level - 1,
-                                                              (i ==
-                                                               0) ? del0 : 1);
-                               }
-
-                               if (tn->internal[i])
-                                       has_data++;
-                       }
-               } else {
-                       int tnode_size_u32 = dev->tnode_size / sizeof(u32);
-                       u32 *map = (u32 *) tn;
-
-                       for (i = 0; !has_data && i < tnode_size_u32; i++) {
-                               if (map[i])
-                                       has_data++;
-                       }
-               }
+       struct yaffs_dev *dev = obj->my_dev;
+       struct yaffs_obj *parent;
 
-               if (has_data == 0 && del0) {
-                       /* Free and return NULL */
+       yaffs_verify_obj_in_dir(obj);
+       parent = obj->parent;
 
-                       yaffs_free_tnode(dev, tn);
-                       tn = NULL;
-               }
+       yaffs_verify_dir(parent);
 
-       }
+       if (dev && dev->param.remove_obj_fn)
+               dev->param.remove_obj_fn(obj);
 
-       return tn;
+       list_del_init(&obj->siblings);
+       obj->parent = NULL;
 
+       yaffs_verify_dir(parent);
 }
 
-static int yaffs_prune_tree(struct yaffs_dev *dev,
-                           struct yaffs_file_var *file_struct)
+void yaffs_add_obj_to_dir(struct yaffs_obj *directory, struct yaffs_obj *obj)
 {
-       int i;
-       int has_data;
-       int done = 0;
-       struct yaffs_tnode *tn;
+       if (!directory) {
+               T(YAFFS_TRACE_ALWAYS,
+                 (TSTR
+                  ("tragedy: Trying to add an object to a null pointer directory"
+                   TENDSTR)));
+               YBUG();
+               return;
+       }
+       if (directory->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY) {
+               T(YAFFS_TRACE_ALWAYS,
+                 (TSTR
+                  ("tragedy: Trying to add an object to a non-directory"
+                   TENDSTR)));
+               YBUG();
+       }
 
-       if (file_struct->top_level > 0) {
-               file_struct->top =
-                   yaffs_prune_worker(dev, file_struct->top,
-                                      file_struct->top_level, 0);
+       if (obj->siblings.prev == NULL) {
+               /* Not initialised */
+               YBUG();
+       }
 
-               /* Now we have a tree with all the non-zero branches NULL but the height
-                * is the same as it was.
-                * Let's see if we can trim internal tnodes to shorten the tree.
-                * We can do this if only the 0th element in the tnode is in use
-                * (ie all the non-zero are NULL)
-                */
+       yaffs_verify_dir(directory);
 
-               while (file_struct->top_level && !done) {
-                       tn = file_struct->top;
+       yaffs_remove_obj_from_dir(obj);
 
-                       has_data = 0;
-                       for (i = 1; i < YAFFS_NTNODES_INTERNAL; i++) {
-                               if (tn->internal[i])
-                                       has_data++;
-                       }
+       /* Now add it */
+       list_add(&obj->siblings, &directory->variant.dir_variant.children);
+       obj->parent = directory;
 
-                       if (!has_data) {
-                               file_struct->top = tn->internal[0];
-                               file_struct->top_level--;
-                               yaffs_free_tnode(dev, tn);
-                       } else {
-                               done = 1;
-                       }
-               }
+       if (directory == obj->my_dev->unlinked_dir
+           || directory == obj->my_dev->del_dir) {
+               obj->unlinked = 1;
+               obj->my_dev->n_unlinked_files++;
+               obj->rename_allowed = 0;
        }
 
-       return YAFFS_OK;
+       yaffs_verify_dir(directory);
+       yaffs_verify_obj_in_dir(obj);
 }
 
-/*-------------------- End of File Structure functions.-------------------*/
-
-/* AllocateEmptyObject gets us a clean Object. Tries to make allocate more if we run out */
-static struct yaffs_obj *yaffs_alloc_empty_obj(struct yaffs_dev *dev)
+static int yaffs_change_obj_name(struct yaffs_obj *obj,
+                                struct yaffs_obj *new_dir,
+                                const YCHAR * new_name, int force, int shadows)
 {
-       struct yaffs_obj *obj = yaffs_alloc_raw_obj(dev);
-
-       if (obj) {
-               dev->n_obj++;
+       int unlink_op;
+       int del_op;
 
-               /* Now sweeten it up... */
+       struct yaffs_obj *existing_target;
 
-               memset(obj, 0, sizeof(struct yaffs_obj));
-               obj->being_created = 1;
+       if (new_dir == NULL)
+               new_dir = obj->parent;  /* use the old directory */
 
-               obj->my_dev = dev;
-               obj->hdr_chunk = 0;
-               obj->variant_type = YAFFS_OBJECT_TYPE_UNKNOWN;
-               INIT_LIST_HEAD(&(obj->hard_links));
-               INIT_LIST_HEAD(&(obj->hash_link));
-               INIT_LIST_HEAD(&obj->siblings);
+       if (new_dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY) {
+               T(YAFFS_TRACE_ALWAYS,
+                 (TSTR
+                  ("tragedy: yaffs_change_obj_name: new_dir is not a directory"
+                   TENDSTR)));
+               YBUG();
+       }
 
-               /* Now make the directory sane */
-               if (dev->root_dir) {
-                       obj->parent = dev->root_dir;
-                       list_add(&(obj->siblings),
-                                &dev->root_dir->variant.dir_variant.children);
-               }
+       /* TODO: Do we need this different handling for YAFFS2 and YAFFS1?? */
+       if (obj->my_dev->param.is_yaffs2)
+               unlink_op = (new_dir == obj->my_dev->unlinked_dir);
+       else
+               unlink_op = (new_dir == obj->my_dev->unlinked_dir
+                            && obj->variant_type == YAFFS_OBJECT_TYPE_FILE);
 
-               /* Add it to the lost and found directory.
-                * NB Can't put root or lost-n-found in lost-n-found so
-                * check if lost-n-found exists first
-                */
-               if (dev->lost_n_found)
-                       yaffs_add_obj_to_dir(dev->lost_n_found, obj);
+       del_op = (new_dir == obj->my_dev->del_dir);
 
-               obj->being_created = 0;
-       }
+       existing_target = yaffs_find_by_name(new_dir, new_name);
 
-       dev->checkpoint_blocks_required = 0;    /* force recalculation */
+       /* If the object is a file going into the unlinked directory,
+        *   then it is OK to just stuff it in since duplicate names are allowed.
+        *   else only proceed if the new name does not exist and if we're putting
+        *   it into a directory.
+        */
+       if ((unlink_op ||
+            del_op ||
+            force ||
+            (shadows > 0) ||
+            !existing_target) &&
+           new_dir->variant_type == YAFFS_OBJECT_TYPE_DIRECTORY) {
+               yaffs_set_obj_name(obj, new_name);
+               obj->dirty = 1;
 
-       return obj;
-}
+               yaffs_add_obj_to_dir(new_dir, obj);
 
-static struct yaffs_obj *yaffs_create_fake_dir(struct yaffs_dev *dev,
-                                              int number, u32 mode)
-{
+               if (unlink_op)
+                       obj->unlinked = 1;
 
-       struct yaffs_obj *obj =
-           yaffs_new_obj(dev, number, YAFFS_OBJECT_TYPE_DIRECTORY);
-       if (obj) {
-               obj->fake = 1;  /* it is fake so it might have no NAND presence... */
-               obj->rename_allowed = 0;        /* ... and we're not allowed to rename it... */
-               obj->unlink_allowed = 0;        /* ... or unlink it */
-               obj->deleted = 0;
-               obj->unlinked = 0;
-               obj->yst_mode = mode;
-               obj->my_dev = dev;
-               obj->hdr_chunk = 0;     /* Not a valid chunk. */
+               /* If it is a deletion then we mark it as a shrink for gc purposes. */
+               if (yaffs_update_oh(obj, new_name, 0, del_op, shadows, NULL) >=
+                   0)
+                       return YAFFS_OK;
        }
 
-       return obj;
-
+       return YAFFS_FAIL;
 }
 
-static void yaffs_unhash_obj(struct yaffs_obj *obj)
+/*------------------------ Short Operations Cache ----------------------------------------
+ *   In many situations where there is no high level buffering  a lot of
+ *   reads might be short sequential reads, and a lot of writes may be short
+ *   sequential writes. eg. scanning/writing a jpeg file.
+ *   In these cases, a short read/write cache can provide a huge perfomance
+ *   benefit with dumb-as-a-rock code.
+ *   In Linux, the page cache provides read buffering and the short op cache 
+ *   provides write buffering.
+ *
+ *   There are a limited number (~10) of cache chunks per device so that we don't
+ *   need a very intelligent search.
+ */
+
+static int yaffs_obj_cache_dirty(struct yaffs_obj *obj)
 {
-       int bucket;
        struct yaffs_dev *dev = obj->my_dev;
+       int i;
+       struct yaffs_cache *cache;
+       int n_caches = obj->my_dev->param.n_caches;
 
-       /* If it is still linked into the bucket list, free from the list */
-       if (!list_empty(&obj->hash_link)) {
-               list_del_init(&obj->hash_link);
-               bucket = yaffs_hash_fn(obj->obj_id);
-               dev->obj_bucket[bucket].count--;
+       for (i = 0; i < n_caches; i++) {
+               cache = &dev->cache[i];
+               if (cache->object == obj && cache->dirty)
+                       return 1;
        }
+
+       return 0;
 }
 
-/*  FreeObject frees up a Object and puts it back on the free list */
-static void yaffs_free_obj(struct yaffs_obj *obj)
+static void yaffs_flush_file_cache(struct yaffs_obj *obj)
 {
        struct yaffs_dev *dev = obj->my_dev;
+       int lowest = -99;       /* Stop compiler whining. */
+       int i;
+       struct yaffs_cache *cache;
+       int chunk_written = 0;
+       int n_caches = obj->my_dev->param.n_caches;
 
-       T(YAFFS_TRACE_OS,
-         (TSTR("FreeObject %p inode %p" TENDSTR), obj, obj->my_inode));
+       if (n_caches > 0) {
+               do {
+                       cache = NULL;
 
-       if (!obj)
-               YBUG();
-       if (obj->parent)
-               YBUG();
-       if (!list_empty(&obj->siblings))
-               YBUG();
+                       /* Find the dirty cache for this object with the lowest chunk id. */
+                       for (i = 0; i < n_caches; i++) {
+                               if (dev->cache[i].object == obj &&
+                                   dev->cache[i].dirty) {
+                                       if (!cache
+                                           || dev->cache[i].chunk_id <
+                                           lowest) {
+                                               cache = &dev->cache[i];
+                                               lowest = cache->chunk_id;
+                                       }
+                               }
+                       }
 
-       if (obj->my_inode) {
-               /* We're still hooked up to a cached inode.
-                * Don't delete now, but mark for later deletion
-                */
-               obj->defered_free = 1;
-               return;
-       }
+                       if (cache && !cache->locked) {
+                               /* Write it out and free it up */
 
-       yaffs_unhash_obj(obj);
+                               chunk_written =
+                                   yaffs_wr_data_obj(cache->object,
+                                                     cache->chunk_id,
+                                                     cache->data,
+                                                     cache->n_bytes, 1);
+                               cache->dirty = 0;
+                               cache->object = NULL;
+                       }
 
-       yaffs_free_raw_obj(dev, obj);
-       dev->n_obj--;
-       dev->checkpoint_blocks_required = 0;    /* force recalculation */
-}
+               } while (cache && chunk_written > 0);
+
+               if (cache) {
+                       /* Hoosterman, disk full while writing cache out. */
+                       T(YAFFS_TRACE_ERROR,
+                         (TSTR
+                          ("yaffs tragedy: no space during cache write"
+                           TENDSTR)));
+
+               }
+       }
 
-void yaffs_handle_defered_free(struct yaffs_obj *obj)
-{
-       if (obj->defered_free)
-               yaffs_free_obj(obj);
 }
 
-static void yaffs_init_tnodes_and_objs(struct yaffs_dev *dev)
+/*yaffs_flush_whole_cache(dev)
+ *
+ *
+ */
+
+void yaffs_flush_whole_cache(struct yaffs_dev *dev)
 {
+       struct yaffs_obj *obj;
+       int n_caches = dev->param.n_caches;
        int i;
 
-       dev->n_obj = 0;
-       dev->n_tnodes = 0;
+       /* Find a dirty object in the cache and flush it...
+        * until there are no further dirty objects.
+        */
+       do {
+               obj = NULL;
+               for (i = 0; i < n_caches && !obj; i++) {
+                       if (dev->cache[i].object && dev->cache[i].dirty)
+                               obj = dev->cache[i].object;
 
-       yaffs_init_raw_tnodes_and_objs(dev);
+               }
+               if (obj)
+                       yaffs_flush_file_cache(obj);
+
+       } while (obj);
 
-       for (i = 0; i < YAFFS_NOBJECT_BUCKETS; i++) {
-               INIT_LIST_HEAD(&dev->obj_bucket[i].list);
-               dev->obj_bucket[i].count = 0;
-       }
 }
 
-static int yaffs_find_nice_bucket(struct yaffs_dev *dev)
+/* Grab us a cache chunk for use.
+ * First look for an empty one.
+ * Then look for the least recently used non-dirty one.
+ * Then look for the least recently used dirty one...., flush and look again.
+ */
+static struct yaffs_cache *yaffs_grab_chunk_worker(struct yaffs_dev *dev)
 {
        int i;
-       int l = 999;
-       int lowest = 999999;
-
-       /* Search for the shortest list or one that
-        * isn't too long.
-        */
 
-       for (i = 0; i < 10 && lowest > 4; i++) {
-               dev->bucket_finder++;
-               dev->bucket_finder %= YAFFS_NOBJECT_BUCKETS;
-               if (dev->obj_bucket[dev->bucket_finder].count < lowest) {
-                       lowest = dev->obj_bucket[dev->bucket_finder].count;
-                       l = dev->bucket_finder;
+       if (dev->param.n_caches > 0) {
+               for (i = 0; i < dev->param.n_caches; i++) {
+                       if (!dev->cache[i].object)
+                               return &dev->cache[i];
                }
-
        }
 
-       return l;
+       return NULL;
 }
 
-static int yaffs_new_obj_id(struct yaffs_dev *dev)
+static struct yaffs_cache *yaffs_grab_chunk_cache(struct yaffs_dev *dev)
 {
-       int bucket = yaffs_find_nice_bucket(dev);
+       struct yaffs_cache *cache;
+       struct yaffs_obj *the_obj;
+       int usage;
+       int i;
+       int pushout;
 
-       /* Now find an object value that has not already been taken
-        * by scanning the list.
-        */
+       if (dev->param.n_caches > 0) {
+               /* Try find a non-dirty one... */
 
-       int found = 0;
-       struct list_head *i;
+               cache = yaffs_grab_chunk_worker(dev);
 
-       u32 n = (u32) bucket;
+               if (!cache) {
+                       /* They were all dirty, find the last recently used object and flush
+                        * its cache, then  find again.
+                        * NB what's here is not very accurate, we actually flush the object
+                        * the last recently used page.
+                        */
 
-       /* yaffs_check_obj_hash_sane();  */
+                       /* With locking we can't assume we can use entry zero */
 
-       while (!found) {
-               found = 1;
-               n += YAFFS_NOBJECT_BUCKETS;
-               if (1 || dev->obj_bucket[bucket].count > 0) {
-                       list_for_each(i, &dev->obj_bucket[bucket].list) {
-                               /* If there is already one in the list */
-                               if (i && list_entry(i, struct yaffs_obj,
-                                                   hash_link)->obj_id == n) {
-                                       found = 0;
+                       the_obj = NULL;
+                       usage = -1;
+                       cache = NULL;
+                       pushout = -1;
+
+                       for (i = 0; i < dev->param.n_caches; i++) {
+                               if (dev->cache[i].object &&
+                                   !dev->cache[i].locked &&
+                                   (dev->cache[i].last_use < usage
+                                    || !cache)) {
+                                       usage = dev->cache[i].last_use;
+                                       the_obj = dev->cache[i].object;
+                                       cache = &dev->cache[i];
+                                       pushout = i;
                                }
                        }
-               }
-       }
 
-       return n;
-}
-
-static void yaffs_hash_obj(struct yaffs_obj *in)
-{
-       int bucket = yaffs_hash_fn(in->obj_id);
-       struct yaffs_dev *dev = in->my_dev;
+                       if (!cache || cache->dirty) {
+                               /* Flush and try again */
+                               yaffs_flush_file_cache(the_obj);
+                               cache = yaffs_grab_chunk_worker(dev);
+                       }
 
-       list_add(&in->hash_link, &dev->obj_bucket[bucket].list);
-       dev->obj_bucket[bucket].count++;
+               }
+               return cache;
+       } else {
+               return NULL;
+        }
 }
 
-struct yaffs_obj *yaffs_find_by_number(struct yaffs_dev *dev, u32 number)
+/* Find a cached chunk */
+static struct yaffs_cache *yaffs_find_chunk_cache(const struct yaffs_obj *obj,
+                                                 int chunk_id)
 {
-       int bucket = yaffs_hash_fn(number);
-       struct list_head *i;
-       struct yaffs_obj *in;
-
-       list_for_each(i, &dev->obj_bucket[bucket].list) {
-               /* Look if it is in the list */
-               if (i) {
-                       in = list_entry(i, struct yaffs_obj, hash_link);
-                       if (in->obj_id == number) {
-
-                               /* Don't tell the VFS about this one if it is defered free */
-                               if (in->defered_free)
-                                       return NULL;
+       struct yaffs_dev *dev = obj->my_dev;
+       int i;
+       if (dev->param.n_caches > 0) {
+               for (i = 0; i < dev->param.n_caches; i++) {
+                       if (dev->cache[i].object == obj &&
+                           dev->cache[i].chunk_id == chunk_id) {
+                               dev->cache_hits++;
 
-                               return in;
+                               return &dev->cache[i];
                        }
                }
        }
-
        return NULL;
 }
 
-struct yaffs_obj *yaffs_new_obj(struct yaffs_dev *dev, int number,
-                               enum yaffs_obj_type type)
+/* Mark the chunk for the least recently used algorithym */
+static void yaffs_use_cache(struct yaffs_dev *dev, struct yaffs_cache *cache,
+                           int is_write)
 {
-       struct yaffs_obj *the_obj = NULL;
-       struct yaffs_tnode *tn = NULL;
 
-       if (number < 0)
-               number = yaffs_new_obj_id(dev);
+       if (dev->param.n_caches > 0) {
+               if (dev->cache_last_use < 0 || dev->cache_last_use > 100000000) {
+                       /* Reset the cache usages */
+                       int i;
+                       for (i = 1; i < dev->param.n_caches; i++)
+                               dev->cache[i].last_use = 0;
 
-       if (type == YAFFS_OBJECT_TYPE_FILE) {
-               tn = yaffs_get_tnode(dev);
-               if (!tn)
-                       return NULL;
-       }
+                       dev->cache_last_use = 0;
+               }
 
-       the_obj = yaffs_alloc_empty_obj(dev);
-       if (!the_obj) {
-               if (tn)
-                       yaffs_free_tnode(dev, tn);
-               return NULL;
-       }
+               dev->cache_last_use++;
 
-       if (the_obj) {
-               the_obj->fake = 0;
-               the_obj->rename_allowed = 1;
-               the_obj->unlink_allowed = 1;
-               the_obj->obj_id = number;
-               yaffs_hash_obj(the_obj);
-               the_obj->variant_type = type;
-               yaffs_load_current_time(the_obj, 1, 1);
+               cache->last_use = dev->cache_last_use;
 
-               switch (type) {
-               case YAFFS_OBJECT_TYPE_FILE:
-                       the_obj->variant.file_variant.file_size = 0;
-                       the_obj->variant.file_variant.scanned_size = 0;
-                       the_obj->variant.file_variant.shrink_size = ~0; /* max */
-                       the_obj->variant.file_variant.top_level = 0;
-                       the_obj->variant.file_variant.top = tn;
-                       break;
-               case YAFFS_OBJECT_TYPE_DIRECTORY:
-                       INIT_LIST_HEAD(&the_obj->variant.dir_variant.children);
-                       INIT_LIST_HEAD(&the_obj->variant.dir_variant.dirty);
-                       break;
-               case YAFFS_OBJECT_TYPE_SYMLINK:
-               case YAFFS_OBJECT_TYPE_HARDLINK:
-               case YAFFS_OBJECT_TYPE_SPECIAL:
-                       /* No action required */
-                       break;
-               case YAFFS_OBJECT_TYPE_UNKNOWN:
-                       /* todo this should not happen */
-                       break;
-               }
+               if (is_write)
+                       cache->dirty = 1;
        }
-
-       return the_obj;
 }
 
-struct yaffs_obj *yaffs_find_or_create_by_number(struct yaffs_dev *dev,
-                                                int number,
-                                                enum yaffs_obj_type type)
+/* Invalidate a single cache page.
+ * Do this when a whole page gets written,
+ * ie the short cache for this page is no longer valid.
+ */
+static void yaffs_invalidate_chunk_cache(struct yaffs_obj *object, int chunk_id)
 {
-       struct yaffs_obj *the_obj = NULL;
-
-       if (number > 0)
-               the_obj = yaffs_find_by_number(dev, number);
+       if (object->my_dev->param.n_caches > 0) {
+               struct yaffs_cache *cache =
+                   yaffs_find_chunk_cache(object, chunk_id);
 
-       if (!the_obj)
-               the_obj = yaffs_new_obj(dev, number, type);
+               if (cache)
+                       cache->object = NULL;
+       }
+}
 
-       return the_obj;
+/* Invalidate all the cache pages associated with this object
+ * Do this whenever ther file is deleted or resized.
+ */
+static void yaffs_invalidate_whole_cache(struct yaffs_obj *in)
+{
+       int i;
+       struct yaffs_dev *dev = in->my_dev;
 
+       if (dev->param.n_caches > 0) {
+               /* Invalidate it. */
+               for (i = 0; i < dev->param.n_caches; i++) {
+                       if (dev->cache[i].object == in)
+                               dev->cache[i].object = NULL;
+               }
+       }
 }
 
-YCHAR *yaffs_clone_str(const YCHAR * str)
+static void yaffs_unhash_obj(struct yaffs_obj *obj)
 {
-       YCHAR *new_str = NULL;
-       int len;
-
-       if (!str)
-               str = _Y("");
+       int bucket;
+       struct yaffs_dev *dev = obj->my_dev;
 
-       len = yaffs_strnlen(str, YAFFS_MAX_ALIAS_LENGTH);
-       new_str = YMALLOC((len + 1) * sizeof(YCHAR));
-       if (new_str) {
-               yaffs_strncpy(new_str, str, len);
-               new_str[len] = 0;
+       /* If it is still linked into the bucket list, free from the list */
+       if (!list_empty(&obj->hash_link)) {
+               list_del_init(&obj->hash_link);
+               bucket = yaffs_hash_fn(obj->obj_id);
+               dev->obj_bucket[bucket].count--;
        }
-       return new_str;
-
 }
 
-/*
- * Mknod (create) a new object.
- * equiv_obj only has meaning for a hard link;
- * alias_str only has meaning for a symlink.
- * rdev only has meaning for devices (a subset of special objects)
- */
-
-static struct yaffs_obj *yaffs_create_obj(enum yaffs_obj_type type,
-                                         struct yaffs_obj *parent,
-                                         const YCHAR * name,
-                                         u32 mode,
-                                         u32 uid,
-                                         u32 gid,
-                                         struct yaffs_obj *equiv_obj,
-                                         const YCHAR * alias_str, u32 rdev)
+/*  FreeObject frees up a Object and puts it back on the free list */
+static void yaffs_free_obj(struct yaffs_obj *obj)
 {
-       struct yaffs_obj *in;
-       YCHAR *str = NULL;
+       struct yaffs_dev *dev = obj->my_dev;
 
-       struct yaffs_dev *dev = parent->my_dev;
+       T(YAFFS_TRACE_OS,
+         (TSTR("FreeObject %p inode %p" TENDSTR), obj, obj->my_inode));
 
-       /* Check if the entry exists. If it does then fail the call since we don't want a dup. */
-       if (yaffs_find_by_name(parent, name))
-               return NULL;
+       if (!obj)
+               YBUG();
+       if (obj->parent)
+               YBUG();
+       if (!list_empty(&obj->siblings))
+               YBUG();
 
-       if (type == YAFFS_OBJECT_TYPE_SYMLINK) {
-               str = yaffs_clone_str(alias_str);
-               if (!str)
-                       return NULL;
+       if (obj->my_inode) {
+               /* We're still hooked up to a cached inode.
+                * Don't delete now, but mark for later deletion
+                */
+               obj->defered_free = 1;
+               return;
        }
 
-       in = yaffs_new_obj(dev, -1, type);
+       yaffs_unhash_obj(obj);
 
-       if (!in) {
-               if (str)
-                       YFREE(str);
-               return NULL;
-       }
+       yaffs_free_raw_obj(dev, obj);
+       dev->n_obj--;
+       dev->checkpoint_blocks_required = 0;    /* force recalculation */
+}
 
-       if (in) {
-               in->hdr_chunk = 0;
-               in->valid = 1;
-               in->variant_type = type;
+void yaffs_handle_defered_free(struct yaffs_obj *obj)
+{
+       if (obj->defered_free)
+               yaffs_free_obj(obj);
+}
 
-               in->yst_mode = mode;
+static int yaffs_generic_obj_del(struct yaffs_obj *in)
+{
 
-               yaffs_attribs_init(in, gid, uid, rdev);
+       /* First off, invalidate the file's data in the cache, without flushing. */
+       yaffs_invalidate_whole_cache(in);
 
-               in->n_data_chunks = 0;
+       if (in->my_dev->param.is_yaffs2 && (in->parent != in->my_dev->del_dir)) {
+               /* Move to the unlinked directory so we have a record that it was deleted. */
+               yaffs_change_obj_name(in, in->my_dev->del_dir, _Y("deleted"), 0,
+                                     0);
 
-               yaffs_set_obj_name(in, name);
-               in->dirty = 1;
+       }
 
-               yaffs_add_obj_to_dir(parent, in);
+       yaffs_remove_obj_from_dir(in);
+       yaffs_chunk_del(in->my_dev, in->hdr_chunk, 1, __LINE__);
+       in->hdr_chunk = 0;
 
-               in->my_dev = parent->my_dev;
+       yaffs_free_obj(in);
+       return YAFFS_OK;
 
-               switch (type) {
-               case YAFFS_OBJECT_TYPE_SYMLINK:
-                       in->variant.symlink_variant.alias = str;
-                       break;
-               case YAFFS_OBJECT_TYPE_HARDLINK:
-                       in->variant.hardlink_variant.equiv_obj = equiv_obj;
-                       in->variant.hardlink_variant.equiv_id =
-                           equiv_obj->obj_id;
-                       list_add(&in->hard_links, &equiv_obj->hard_links);
-                       break;
-               case YAFFS_OBJECT_TYPE_FILE:
-               case YAFFS_OBJECT_TYPE_DIRECTORY:
-               case YAFFS_OBJECT_TYPE_SPECIAL:
-               case YAFFS_OBJECT_TYPE_UNKNOWN:
-                       /* do nothing */
-                       break;
-               }
+}
 
-               if (yaffs_update_oh(in, name, 0, 0, 0, NULL) < 0) {
-                       /* Could not create the object header, fail the creation */
-                       yaffs_del_obj(in);
-                       in = NULL;
+static void yaffs_soft_del_file(struct yaffs_obj *obj)
+{
+       if (obj->deleted &&
+           obj->variant_type == YAFFS_OBJECT_TYPE_FILE && !obj->soft_del) {
+               if (obj->n_data_chunks <= 0) {
+                       /* Empty file with no duplicate object headers, just delete it immediately */
+                       yaffs_free_tnode(obj->my_dev,
+                                        obj->variant.file_variant.top);
+                       obj->variant.file_variant.top = NULL;
+                       T(YAFFS_TRACE_TRACING,
+                         (TSTR("yaffs: Deleting empty file %d" TENDSTR),
+                          obj->obj_id));
+                       yaffs_generic_obj_del(obj);
+               } else {
+                       yaffs_soft_del_worker(obj,
+                                             obj->variant.file_variant.top,
+                                             obj->variant.
+                                             file_variant.top_level, 0);
+                       obj->soft_del = 1;
                }
-
-               yaffs_update_parent(parent);
        }
-
-       return in;
 }
 
-struct yaffs_obj *yaffs_create_file(struct yaffs_obj *parent,
-                                   const YCHAR * name, u32 mode, u32 uid,
-                                   u32 gid)
-{
-       return yaffs_create_obj(YAFFS_OBJECT_TYPE_FILE, parent, name, mode,
-                               uid, gid, NULL, NULL, 0);
-}
+/* Pruning removes any part of the file structure tree that is beyond the
+ * bounds of the file (ie that does not point to chunks).
+ *
+ * A file should only get pruned when its size is reduced.
+ *
+ * Before pruning, the chunks must be pulled from the tree and the
+ * level 0 tnode entries must be zeroed out.
+ * Could also use this for file deletion, but that's probably better handled
+ * by a special case.
+ *
+ * This function is recursive. For levels > 0 the function is called again on
+ * any sub-tree. For level == 0 we just check if the sub-tree has data.
+ * If there is no data in a subtree then it is pruned.
+ */
 
-struct yaffs_obj *yaffs_create_dir(struct yaffs_obj *parent, const YCHAR * name,
-                                  u32 mode, u32 uid, u32 gid)
+static struct yaffs_tnode *yaffs_prune_worker(struct yaffs_dev *dev,
+                                             struct yaffs_tnode *tn, u32 level,
+                                             int del0)
 {
-       return yaffs_create_obj(YAFFS_OBJECT_TYPE_DIRECTORY, parent, name,
-                               mode, uid, gid, NULL, NULL, 0);
-}
+       int i;
+       int has_data;
 
-struct yaffs_obj *yaffs_create_special(struct yaffs_obj *parent,
-                                      const YCHAR * name, u32 mode, u32 uid,
-                                      u32 gid, u32 rdev)
-{
-       return yaffs_create_obj(YAFFS_OBJECT_TYPE_SPECIAL, parent, name, mode,
-                               uid, gid, NULL, NULL, rdev);
-}
+       if (tn) {
+               has_data = 0;
 
-struct yaffs_obj *yaffs_create_symlink(struct yaffs_obj *parent,
-                                      const YCHAR * name, u32 mode, u32 uid,
-                                      u32 gid, const YCHAR * alias)
-{
-       return yaffs_create_obj(YAFFS_OBJECT_TYPE_SYMLINK, parent, name, mode,
-                               uid, gid, NULL, alias, 0);
-}
-
-/* yaffs_link_obj returns the object id of the equivalent object.*/
-struct yaffs_obj *yaffs_link_obj(struct yaffs_obj *parent, const YCHAR * name,
-                                struct yaffs_obj *equiv_obj)
-{
-       /* Get the real object in case we were fed a hard link as an equivalent object */
-       equiv_obj = yaffs_get_equivalent_obj(equiv_obj);
-
-       if (yaffs_create_obj
-           (YAFFS_OBJECT_TYPE_HARDLINK, parent, name, 0, 0, 0,
-            equiv_obj, NULL, 0)) {
-               return equiv_obj;
-       } else {
-               return NULL;
-       }
+               if (level > 0) {
+                       for (i = 0; i < YAFFS_NTNODES_INTERNAL; i++) {
+                               if (tn->internal[i]) {
+                                       tn->internal[i] =
+                                           yaffs_prune_worker(dev,
+                                                              tn->internal[i],
+                                                              level - 1,
+                                                              (i ==
+                                                               0) ? del0 : 1);
+                               }
 
-}
+                               if (tn->internal[i])
+                                       has_data++;
+                       }
+               } else {
+                       int tnode_size_u32 = dev->tnode_size / sizeof(u32);
+                       u32 *map = (u32 *) tn;
 
-static int yaffs_change_obj_name(struct yaffs_obj *obj,
-                                struct yaffs_obj *new_dir,
-                                const YCHAR * new_name, int force, int shadows)
-{
-       int unlink_op;
-       int del_op;
+                       for (i = 0; !has_data && i < tnode_size_u32; i++) {
+                               if (map[i])
+                                       has_data++;
+                       }
+               }
 
-       struct yaffs_obj *existing_target;
+               if (has_data == 0 && del0) {
+                       /* Free and return NULL */
 
-       if (new_dir == NULL)
-               new_dir = obj->parent;  /* use the old directory */
+                       yaffs_free_tnode(dev, tn);
+                       tn = NULL;
+               }
 
-       if (new_dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY) {
-               T(YAFFS_TRACE_ALWAYS,
-                 (TSTR
-                  ("tragedy: yaffs_change_obj_name: new_dir is not a directory"
-                   TENDSTR)));
-               YBUG();
        }
 
-       /* TODO: Do we need this different handling for YAFFS2 and YAFFS1?? */
-       if (obj->my_dev->param.is_yaffs2)
-               unlink_op = (new_dir == obj->my_dev->unlinked_dir);
-       else
-               unlink_op = (new_dir == obj->my_dev->unlinked_dir
-                            && obj->variant_type == YAFFS_OBJECT_TYPE_FILE);
+       return tn;
 
-       del_op = (new_dir == obj->my_dev->del_dir);
+}
 
-       existing_target = yaffs_find_by_name(new_dir, new_name);
+static int yaffs_prune_tree(struct yaffs_dev *dev,
+                           struct yaffs_file_var *file_struct)
+{
+       int i;
+       int has_data;
+       int done = 0;
+       struct yaffs_tnode *tn;
 
-       /* If the object is a file going into the unlinked directory,
-        *   then it is OK to just stuff it in since duplicate names are allowed.
-        *   else only proceed if the new name does not exist and if we're putting
-        *   it into a directory.
-        */
-       if ((unlink_op ||
-            del_op ||
-            force ||
-            (shadows > 0) ||
-            !existing_target) &&
-           new_dir->variant_type == YAFFS_OBJECT_TYPE_DIRECTORY) {
-               yaffs_set_obj_name(obj, new_name);
-               obj->dirty = 1;
+       if (file_struct->top_level > 0) {
+               file_struct->top =
+                   yaffs_prune_worker(dev, file_struct->top,
+                                      file_struct->top_level, 0);
 
-               yaffs_add_obj_to_dir(new_dir, obj);
+               /* Now we have a tree with all the non-zero branches NULL but the height
+                * is the same as it was.
+                * Let's see if we can trim internal tnodes to shorten the tree.
+                * We can do this if only the 0th element in the tnode is in use
+                * (ie all the non-zero are NULL)
+                */
 
-               if (unlink_op)
-                       obj->unlinked = 1;
+               while (file_struct->top_level && !done) {
+                       tn = file_struct->top;
 
-               /* If it is a deletion then we mark it as a shrink for gc purposes. */
-               if (yaffs_update_oh(obj, new_name, 0, del_op, shadows, NULL) >=
-                   0)
-                       return YAFFS_OK;
+                       has_data = 0;
+                       for (i = 1; i < YAFFS_NTNODES_INTERNAL; i++) {
+                               if (tn->internal[i])
+                                       has_data++;
+                       }
+
+                       if (!has_data) {
+                               file_struct->top = tn->internal[0];
+                               file_struct->top_level--;
+                               yaffs_free_tnode(dev, tn);
+                       } else {
+                               done = 1;
+                       }
+               }
        }
 
-       return YAFFS_FAIL;
+       return YAFFS_OK;
 }
 
+/*-------------------- End of File Structure functions.-------------------*/
 
-/* Note:
- * If old_name is NULL then we take old_dir as the object to be renamed.
- */
-int yaffs_rename_obj(struct yaffs_obj *old_dir, const YCHAR * old_name,
-                    struct yaffs_obj *new_dir, const YCHAR * new_name)
+/* AllocateEmptyObject gets us a clean Object. Tries to make allocate more if we run out */
+static struct yaffs_obj *yaffs_alloc_empty_obj(struct yaffs_dev *dev)
 {
-       struct yaffs_obj *obj = NULL;
-       struct yaffs_obj *existing_target = NULL;
-       int force = 0;
-       int result;
-       struct yaffs_dev *dev;
+       struct yaffs_obj *obj = yaffs_alloc_raw_obj(dev);
 
-       if (!old_dir || old_dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY)
-               YBUG();
-       if (!new_dir || new_dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY)
-               YBUG();
+       if (obj) {
+               dev->n_obj++;
 
-       dev = old_dir->my_dev;
+               /* Now sweeten it up... */
 
-#ifdef CONFIG_YAFFS_CASE_INSENSITIVE
-       /* Special case for case insemsitive systems.
-        * While look-up is case insensitive, the name isn't.
-        * Therefore we might want to change x.txt to X.txt
-        */
-       if (old_dir == new_dir && 
-               old_name && new_name && 
-               yaffs_strcmp(old_name, new_name) == 0)
-               force = 1;
-#endif
+               memset(obj, 0, sizeof(struct yaffs_obj));
+               obj->being_created = 1;
 
-       if (yaffs_strnlen(new_name, YAFFS_MAX_NAME_LENGTH + 1) >
-           YAFFS_MAX_NAME_LENGTH)
-               /* ENAMETOOLONG */
-               return YAFFS_FAIL;
+               obj->my_dev = dev;
+               obj->hdr_chunk = 0;
+               obj->variant_type = YAFFS_OBJECT_TYPE_UNKNOWN;
+               INIT_LIST_HEAD(&(obj->hard_links));
+               INIT_LIST_HEAD(&(obj->hash_link));
+               INIT_LIST_HEAD(&obj->siblings);
 
-       if(old_name)
-               obj = yaffs_find_by_name(old_dir, old_name);
-       else{
-               obj = old_dir;
-               old_dir = obj->parent;
-       }
+               /* Now make the directory sane */
+               if (dev->root_dir) {
+                       obj->parent = dev->root_dir;
+                       list_add(&(obj->siblings),
+                                &dev->root_dir->variant.dir_variant.children);
+               }
 
+               /* Add it to the lost and found directory.
+                * NB Can't put root or lost-n-found in lost-n-found so
+                * check if lost-n-found exists first
+                */
+               if (dev->lost_n_found)
+                       yaffs_add_obj_to_dir(dev->lost_n_found, obj);
 
-       if (obj && obj->rename_allowed) {
+               obj->being_created = 0;
+       }
 
-               /* Now do the handling for an existing target, if there is one */
+       dev->checkpoint_blocks_required = 0;    /* force recalculation */
 
-               existing_target = yaffs_find_by_name(new_dir, new_name);
-               if (yaffs_is_non_empty_dir(existing_target)){
-                       return YAFFS_FAIL;      /* ENOTEMPTY */
-               } else if (existing_target && existing_target != obj) {
-                       /* Nuke the target first, using shadowing,
-                        * but only if it isn't the same object.
-                        *
-                        * Note we must disable gc otherwise it can mess up the shadowing.
-                        *
-                        */
-                       dev->gc_disable = 1;
-                       yaffs_change_obj_name(obj, new_dir, new_name, force,
-                                             existing_target->obj_id);
-                       existing_target->is_shadowed = 1;
-                       yaffs_unlink_obj(existing_target);
-                       dev->gc_disable = 0;
-               }
+       return obj;
+}
 
-               result = yaffs_change_obj_name(obj, new_dir, new_name, 1, 0);
+static int yaffs_find_nice_bucket(struct yaffs_dev *dev)
+{
+       int i;
+       int l = 999;
+       int lowest = 999999;
 
-               yaffs_update_parent(old_dir);
-               if (new_dir != old_dir)
-                       yaffs_update_parent(new_dir);
+       /* Search for the shortest list or one that
+        * isn't too long.
+        */
+
+       for (i = 0; i < 10 && lowest > 4; i++) {
+               dev->bucket_finder++;
+               dev->bucket_finder %= YAFFS_NOBJECT_BUCKETS;
+               if (dev->obj_bucket[dev->bucket_finder].count < lowest) {
+                       lowest = dev->obj_bucket[dev->bucket_finder].count;
+                       l = dev->bucket_finder;
+               }
 
-               return result;
        }
-       return YAFFS_FAIL;
-}
 
-/*------------------------- Block Management and Page Allocation ----------------*/
+       return l;
+}
 
-static int yaffs_init_blocks(struct yaffs_dev *dev)
+static int yaffs_new_obj_id(struct yaffs_dev *dev)
 {
-       int n_blocks = dev->internal_end_block - dev->internal_start_block + 1;
+       int bucket = yaffs_find_nice_bucket(dev);
 
-       dev->block_info = NULL;
-       dev->chunk_bits = NULL;
+       /* Now find an object value that has not already been taken
+        * by scanning the list.
+        */
 
-       dev->alloc_block = -1;  /* force it to get a new one */
+       int found = 0;
+       struct list_head *i;
 
-       /* If the first allocation strategy fails, thry the alternate one */
-       dev->block_info = YMALLOC(n_blocks * sizeof(struct yaffs_block_info));
-       if (!dev->block_info) {
-               dev->block_info =
-                   YMALLOC_ALT(n_blocks * sizeof(struct yaffs_block_info));
-               dev->block_info_alt = 1;
-       } else {
-               dev->block_info_alt = 0;
-        }
+       u32 n = (u32) bucket;
 
-       if (dev->block_info) {
-               /* Set up dynamic blockinfo stuff. */
-               dev->chunk_bit_stride = (dev->param.chunks_per_block + 7) / 8;  /* round up bytes */
-               dev->chunk_bits = YMALLOC(dev->chunk_bit_stride * n_blocks);
-               if (!dev->chunk_bits) {
-                       dev->chunk_bits =
-                           YMALLOC_ALT(dev->chunk_bit_stride * n_blocks);
-                       dev->chunk_bits_alt = 1;
-               } else {
-                       dev->chunk_bits_alt = 0;
-                }
-       }
+       /* yaffs_check_obj_hash_sane();  */
 
-       if (dev->block_info && dev->chunk_bits) {
-               memset(dev->block_info, 0,
-                      n_blocks * sizeof(struct yaffs_block_info));
-               memset(dev->chunk_bits, 0, dev->chunk_bit_stride * n_blocks);
-               return YAFFS_OK;
+       while (!found) {
+               found = 1;
+               n += YAFFS_NOBJECT_BUCKETS;
+               if (1 || dev->obj_bucket[bucket].count > 0) {
+                       list_for_each(i, &dev->obj_bucket[bucket].list) {
+                               /* If there is already one in the list */
+                               if (i && list_entry(i, struct yaffs_obj,
+                                                   hash_link)->obj_id == n) {
+                                       found = 0;
+                               }
+                       }
+               }
        }
 
-       return YAFFS_FAIL;
+       return n;
 }
 
-static void yaffs_deinit_blocks(struct yaffs_dev *dev)
+static void yaffs_hash_obj(struct yaffs_obj *in)
 {
-       if (dev->block_info_alt && dev->block_info)
-               YFREE_ALT(dev->block_info);
-       else if (dev->block_info)
-               YFREE(dev->block_info);
-
-       dev->block_info_alt = 0;
-
-       dev->block_info = NULL;
+       int bucket = yaffs_hash_fn(in->obj_id);
+       struct yaffs_dev *dev = in->my_dev;
 
-       if (dev->chunk_bits_alt && dev->chunk_bits)
-               YFREE_ALT(dev->chunk_bits);
-       else if (dev->chunk_bits)
-               YFREE(dev->chunk_bits);
-       dev->chunk_bits_alt = 0;
-       dev->chunk_bits = NULL;
+       list_add(&in->hash_link, &dev->obj_bucket[bucket].list);
+       dev->obj_bucket[bucket].count++;
 }
 
-void yaffs_block_became_dirty(struct yaffs_dev *dev, int block_no)
+struct yaffs_obj *yaffs_find_by_number(struct yaffs_dev *dev, u32 number)
 {
-       struct yaffs_block_info *bi = yaffs_get_block_info(dev, block_no);
+       int bucket = yaffs_hash_fn(number);
+       struct list_head *i;
+       struct yaffs_obj *in;
 
-       int erased_ok = 0;
+       list_for_each(i, &dev->obj_bucket[bucket].list) {
+               /* Look if it is in the list */
+               if (i) {
+                       in = list_entry(i, struct yaffs_obj, hash_link);
+                       if (in->obj_id == number) {
 
-       /* If the block is still healthy erase it and mark as clean.
-        * If the block has had a data failure, then retire it.
-        */
+                               /* Don't tell the VFS about this one if it is defered free */
+                               if (in->defered_free)
+                                       return NULL;
 
-       T(YAFFS_TRACE_GC | YAFFS_TRACE_ERASE,
-         (TSTR("yaffs_block_became_dirty block %d state %d %s" TENDSTR),
-          block_no, bi->block_state,
-          (bi->needs_retiring) ? "needs retiring" : ""));
+                               return in;
+                       }
+               }
+       }
 
-       yaffs2_clear_oldest_dirty_seq(dev, bi);
+       return NULL;
+}
 
-       bi->block_state = YAFFS_BLOCK_STATE_DIRTY;
+struct yaffs_obj *yaffs_new_obj(struct yaffs_dev *dev, int number,
+                               enum yaffs_obj_type type)
+{
+       struct yaffs_obj *the_obj = NULL;
+       struct yaffs_tnode *tn = NULL;
 
-       /* If this is the block being garbage collected then stop gc'ing this block */
-       if (block_no == dev->gc_block)
-               dev->gc_block = 0;
+       if (number < 0)
+               number = yaffs_new_obj_id(dev);
 
-       /* If this block is currently the best candidate for gc then drop as a candidate */
-       if (block_no == dev->gc_dirtiest) {
-               dev->gc_dirtiest = 0;
-               dev->gc_pages_in_use = 0;
+       if (type == YAFFS_OBJECT_TYPE_FILE) {
+               tn = yaffs_get_tnode(dev);
+               if (!tn)
+                       return NULL;
        }
 
-       if (!bi->needs_retiring) {
-               yaffs2_checkpt_invalidate(dev);
-               erased_ok = yaffs_erase_block(dev, block_no);
-               if (!erased_ok) {
-                       dev->n_erase_failures++;
-                       T(YAFFS_TRACE_ERROR | YAFFS_TRACE_BAD_BLOCKS,
-                         (TSTR("**>> Erasure failed %d" TENDSTR), block_no));
-               }
+       the_obj = yaffs_alloc_empty_obj(dev);
+       if (!the_obj) {
+               if (tn)
+                       yaffs_free_tnode(dev, tn);
+               return NULL;
        }
 
-       if (erased_ok &&
-           ((yaffs_trace_mask & YAFFS_TRACE_ERASE)
-            || !yaffs_skip_verification(dev))) {
-               int i;
-               for (i = 0; i < dev->param.chunks_per_block; i++) {
-                       if (!yaffs_check_chunk_erased
-                           (dev, block_no * dev->param.chunks_per_block + i)) {
-                               T(YAFFS_TRACE_ERROR,
-                                 (TSTR
-                                  (">>Block %d erasure supposedly OK, but chunk %d not erased"
-                                   TENDSTR), block_no, i));
-                       }
+       if (the_obj) {
+               the_obj->fake = 0;
+               the_obj->rename_allowed = 1;
+               the_obj->unlink_allowed = 1;
+               the_obj->obj_id = number;
+               yaffs_hash_obj(the_obj);
+               the_obj->variant_type = type;
+               yaffs_load_current_time(the_obj, 1, 1);
+
+               switch (type) {
+               case YAFFS_OBJECT_TYPE_FILE:
+                       the_obj->variant.file_variant.file_size = 0;
+                       the_obj->variant.file_variant.scanned_size = 0;
+                       the_obj->variant.file_variant.shrink_size = ~0; /* max */
+                       the_obj->variant.file_variant.top_level = 0;
+                       the_obj->variant.file_variant.top = tn;
+                       break;
+               case YAFFS_OBJECT_TYPE_DIRECTORY:
+                       INIT_LIST_HEAD(&the_obj->variant.dir_variant.children);
+                       INIT_LIST_HEAD(&the_obj->variant.dir_variant.dirty);
+                       break;
+               case YAFFS_OBJECT_TYPE_SYMLINK:
+               case YAFFS_OBJECT_TYPE_HARDLINK:
+               case YAFFS_OBJECT_TYPE_SPECIAL:
+                       /* No action required */
+                       break;
+               case YAFFS_OBJECT_TYPE_UNKNOWN:
+                       /* todo this should not happen */
+                       break;
                }
        }
 
-       if (erased_ok) {
-               /* Clean it up... */
-               bi->block_state = YAFFS_BLOCK_STATE_EMPTY;
-               bi->seq_number = 0;
-               dev->n_erased_blocks++;
-               bi->pages_in_use = 0;
-               bi->soft_del_pages = 0;
-               bi->has_shrink_hdr = 0;
-               bi->skip_erased_check = 1;      /* This is clean, so no need to check */
-               bi->gc_prioritise = 0;
-               yaffs_clear_chunk_bits(dev, block_no);
+       return the_obj;
+}
 
-               T(YAFFS_TRACE_ERASE,
-                 (TSTR("Erased block %d" TENDSTR), block_no));
-       } else {
-               dev->n_free_chunks -= dev->param.chunks_per_block;      /* We lost a block of free space */
+static struct yaffs_obj *yaffs_create_fake_dir(struct yaffs_dev *dev,
+                                              int number, u32 mode)
+{
 
-               yaffs_retire_block(dev, block_no);
-               T(YAFFS_TRACE_ERROR | YAFFS_TRACE_BAD_BLOCKS,
-                 (TSTR("**>> Block %d retired" TENDSTR), block_no));
+       struct yaffs_obj *obj =
+           yaffs_new_obj(dev, number, YAFFS_OBJECT_TYPE_DIRECTORY);
+       if (obj) {
+               obj->fake = 1;  /* it is fake so it might have no NAND presence... */
+               obj->rename_allowed = 0;        /* ... and we're not allowed to rename it... */
+               obj->unlink_allowed = 0;        /* ... or unlink it */
+               obj->deleted = 0;
+               obj->unlinked = 0;
+               obj->yst_mode = mode;
+               obj->my_dev = dev;
+               obj->hdr_chunk = 0;     /* Not a valid chunk. */
        }
+
+       return obj;
+
 }
 
-static int yaffs_find_alloc_block(struct yaffs_dev *dev)
+
+static void yaffs_init_tnodes_and_objs(struct yaffs_dev *dev)
 {
        int i;
 
-       struct yaffs_block_info *bi;
+       dev->n_obj = 0;
+       dev->n_tnodes = 0;
 
-       if (dev->n_erased_blocks < 1) {
-               /* Hoosterman we've got a problem.
-                * Can't get space to gc
-                */
-               T(YAFFS_TRACE_ERROR,
-                 (TSTR("yaffs tragedy: no more erased blocks" TENDSTR)));
+       yaffs_init_raw_tnodes_and_objs(dev);
 
-               return -1;
+       for (i = 0; i < YAFFS_NOBJECT_BUCKETS; i++) {
+               INIT_LIST_HEAD(&dev->obj_bucket[i].list);
+               dev->obj_bucket[i].count = 0;
        }
+}
 
-       /* Find an empty block. */
-
-       for (i = dev->internal_start_block; i <= dev->internal_end_block; i++) {
-               dev->alloc_block_finder++;
-               if (dev->alloc_block_finder < dev->internal_start_block
-                   || dev->alloc_block_finder > dev->internal_end_block) {
-                       dev->alloc_block_finder = dev->internal_start_block;
-               }
+struct yaffs_obj *yaffs_find_or_create_by_number(struct yaffs_dev *dev,
+                                                int number,
+                                                enum yaffs_obj_type type)
+{
+       struct yaffs_obj *the_obj = NULL;
 
-               bi = yaffs_get_block_info(dev, dev->alloc_block_finder);
+       if (number > 0)
+               the_obj = yaffs_find_by_number(dev, number);
 
-               if (bi->block_state == YAFFS_BLOCK_STATE_EMPTY) {
-                       bi->block_state = YAFFS_BLOCK_STATE_ALLOCATING;
-                       dev->seq_number++;
-                       bi->seq_number = dev->seq_number;
-                       dev->n_erased_blocks--;
-                       T(YAFFS_TRACE_ALLOCATE,
-                         (TSTR("Allocated block %d, seq  %d, %d left" TENDSTR),
-                          dev->alloc_block_finder, dev->seq_number,
-                          dev->n_erased_blocks));
-                       return dev->alloc_block_finder;
-               }
-       }
+       if (!the_obj)
+               the_obj = yaffs_new_obj(dev, number, type);
 
-       T(YAFFS_TRACE_ALWAYS,
-         (TSTR
-          ("yaffs tragedy: no more erased blocks, but there should have been %d"
-           TENDSTR), dev->n_erased_blocks));
+       return the_obj;
 
-       return -1;
 }
 
-/*
- * Check if there's space to allocate...
- * Thinks.... do we need top make this ths same as yaffs_get_free_chunks()?
- */
-int yaffs_check_alloc_available(struct yaffs_dev *dev, int n_chunks)
+YCHAR *yaffs_clone_str(const YCHAR * str)
 {
-       int reserved_chunks;
-       int reserved_blocks = dev->param.n_reserved_blocks;
-       int checkpt_blocks;
+       YCHAR *new_str = NULL;
+       int len;
 
-       checkpt_blocks = yaffs_calc_checkpt_blocks_required(dev);
+       if (!str)
+               str = _Y("");
 
-       reserved_chunks =
-           ((reserved_blocks + checkpt_blocks) * dev->param.chunks_per_block);
+       len = strnlen(str, YAFFS_MAX_ALIAS_LENGTH);
+       new_str = kmalloc((len + 1) * sizeof(YCHAR), GFP_NOFS);
+       if (new_str) {
+               strncpy(new_str, str, len);
+               new_str[len] = 0;
+       }
+       return new_str;
 
-       return (dev->n_free_chunks > (reserved_chunks + n_chunks));
 }
+/*
+ *yaffs_update_parent() handles fixing a directories mtime and ctime when a new
+ * link (ie. name) is created or deleted in the directory.
+ *
+ * ie.
+ *   create dir/a : update dir's mtime/ctime
+ *   rm dir/a:   update dir's mtime/ctime
+ *   modify dir/a: don't update dir's mtimme/ctime
+ *
+ * This can be handled immediately or defered. Defering helps reduce the number
+ * of updates when many files in a directory are changed within a brief period.
+ *
+ * If the directory updating is defered then yaffs_update_dirty_dirs must be
+ * called periodically.
+ */
 
-static int yaffs_alloc_chunk(struct yaffs_dev *dev, int use_reserver,
-                            struct yaffs_block_info **block_ptr)
+static void yaffs_update_parent(struct yaffs_obj *obj)
 {
-       int ret_val;
-       struct yaffs_block_info *bi;
-
-       if (dev->alloc_block < 0) {
-               /* Get next block to allocate off */
-               dev->alloc_block = yaffs_find_alloc_block(dev);
-               dev->alloc_page = 0;
-       }
-
-       if (!use_reserver && !yaffs_check_alloc_available(dev, 1)) {
-               /* Not enough space to allocate unless we're allowed to use the reserve. */
-               return -1;
-       }
-
-       if (dev->n_erased_blocks < dev->param.n_reserved_blocks
-           && dev->alloc_page == 0) {
-               T(YAFFS_TRACE_ALLOCATE, (TSTR("Allocating reserve" TENDSTR)));
-       }
-
-       /* Next page please.... */
-       if (dev->alloc_block >= 0) {
-               bi = yaffs_get_block_info(dev, dev->alloc_block);
-
-               ret_val = (dev->alloc_block * dev->param.chunks_per_block) +
-                   dev->alloc_page;
-               bi->pages_in_use++;
-               yaffs_set_chunk_bit(dev, dev->alloc_block, dev->alloc_page);
-
-               dev->alloc_page++;
-
-               dev->n_free_chunks--;
+       struct yaffs_dev *dev;
+       if (!obj)
+               return;
+       dev = obj->my_dev;
+       obj->dirty = 1;
+       yaffs_load_current_time(obj, 0, 1);
+       if (dev->param.defered_dir_update) {
+               struct list_head *link = &obj->variant.dir_variant.dirty;
 
-               /* If the block is full set the state to full */
-               if (dev->alloc_page >= dev->param.chunks_per_block) {
-                       bi->block_state = YAFFS_BLOCK_STATE_FULL;
-                       dev->alloc_block = -1;
+               if (list_empty(link)) {
+                       list_add(link, &dev->dirty_dirs);
+                       T(YAFFS_TRACE_BACKGROUND,
+                         (TSTR("Added object %d to dirty directories" TENDSTR),
+                          obj->obj_id));
                }
 
-               if (block_ptr)
-                       *block_ptr = bi;
-
-               return ret_val;
-       }
-
-       T(YAFFS_TRACE_ERROR,
-         (TSTR("!!!!!!!!! Allocator out !!!!!!!!!!!!!!!!!" TENDSTR)));
-
-       return -1;
+       } else {
+               yaffs_update_oh(obj, NULL, 0, 0, 0, NULL);
+        }
 }
 
-static int yaffs_get_erased_chunks(struct yaffs_dev *dev)
+void yaffs_update_dirty_dirs(struct yaffs_dev *dev)
 {
-       int n;
+       struct list_head *link;
+       struct yaffs_obj *obj;
+       struct yaffs_dir_var *d_s;
+       union yaffs_obj_var *o_v;
 
-       n = dev->n_erased_blocks * dev->param.chunks_per_block;
+       T(YAFFS_TRACE_BACKGROUND, (TSTR("Update dirty directories" TENDSTR)));
 
-       if (dev->alloc_block > 0)
-               n += (dev->param.chunks_per_block - dev->alloc_page);
+       while (!list_empty(&dev->dirty_dirs)) {
+               link = dev->dirty_dirs.next;
+               list_del_init(link);
 
-       return n;
+               d_s = list_entry(link, struct yaffs_dir_var, dirty);
+               o_v = list_entry(d_s, union yaffs_obj_var, dir_variant);
+               obj = list_entry(o_v, struct yaffs_obj, variant);
+
+               T(YAFFS_TRACE_BACKGROUND,
+                 (TSTR("Update directory %d" TENDSTR), obj->obj_id));
 
+               if (obj->dirty)
+                       yaffs_update_oh(obj, NULL, 0, 0, 0, NULL);
+       }
 }
 
 /*
- * yaffs_skip_rest_of_block() skips over the rest of the allocation block
- * if we don't want to write to it.
+ * Mknod (create) a new object.
+ * equiv_obj only has meaning for a hard link;
+ * alias_str only has meaning for a symlink.
+ * rdev only has meaning for devices (a subset of special objects)
  */
-void yaffs_skip_rest_of_block(struct yaffs_dev *dev)
-{
-       if (dev->alloc_block > 0) {
-               struct yaffs_block_info *bi =
-                   yaffs_get_block_info(dev, dev->alloc_block);
-               if (bi->block_state == YAFFS_BLOCK_STATE_ALLOCATING) {
-                       bi->block_state = YAFFS_BLOCK_STATE_FULL;
-                       dev->alloc_block = -1;
-               }
-       }
-}
 
-static int yaffs_gc_block(struct yaffs_dev *dev, int block, int whole_block)
+static struct yaffs_obj *yaffs_create_obj(enum yaffs_obj_type type,
+                                         struct yaffs_obj *parent,
+                                         const YCHAR * name,
+                                         u32 mode,
+                                         u32 uid,
+                                         u32 gid,
+                                         struct yaffs_obj *equiv_obj,
+                                         const YCHAR * alias_str, u32 rdev)
 {
-       int old_chunk;
-       int new_chunk;
-       int mark_flash;
-       int ret_val = YAFFS_OK;
-       int i;
-       int is_checkpt_block;
-       int matching_chunk;
-       int max_copies;
-
-       int chunks_before = yaffs_get_erased_chunks(dev);
-       int chunks_after;
-
-       struct yaffs_ext_tags tags;
+       struct yaffs_obj *in;
+       YCHAR *str = NULL;
 
-       struct yaffs_block_info *bi = yaffs_get_block_info(dev, block);
+       struct yaffs_dev *dev = parent->my_dev;
 
-       struct yaffs_obj *object;
+       /* Check if the entry exists. If it does then fail the call since we don't want a dup. */
+       if (yaffs_find_by_name(parent, name))
+               return NULL;
 
-       is_checkpt_block = (bi->block_state == YAFFS_BLOCK_STATE_CHECKPOINT);
+       if (type == YAFFS_OBJECT_TYPE_SYMLINK) {
+               str = yaffs_clone_str(alias_str);
+               if (!str)
+                       return NULL;
+       }
 
-       T(YAFFS_TRACE_TRACING,
-         (TSTR
-          ("Collecting block %d, in use %d, shrink %d, whole_block %d"
-           TENDSTR), block, bi->pages_in_use, bi->has_shrink_hdr,
-          whole_block));
+       in = yaffs_new_obj(dev, -1, type);
 
-       /*yaffs_verify_free_chunks(dev); */
+       if (!in) {
+               if (str)
+                       kfree(str);
+               return NULL;
+       }
 
-       if (bi->block_state == YAFFS_BLOCK_STATE_FULL)
-               bi->block_state = YAFFS_BLOCK_STATE_COLLECTING;
+       if (in) {
+               in->hdr_chunk = 0;
+               in->valid = 1;
+               in->variant_type = type;
 
-       bi->has_shrink_hdr = 0; /* clear the flag so that the block can erase */
+               in->yst_mode = mode;
 
-       dev->gc_disable = 1;
+               yaffs_attribs_init(in, gid, uid, rdev);
 
-       if (is_checkpt_block || !yaffs_still_some_chunks(dev, block)) {
-               T(YAFFS_TRACE_TRACING,
-                 (TSTR
-                  ("Collecting block %d that has no chunks in use" TENDSTR),
-                  block));
-               yaffs_block_became_dirty(dev, block);
-       } else {
+               in->n_data_chunks = 0;
 
-               u8 *buffer = yaffs_get_temp_buffer(dev, __LINE__);
+               yaffs_set_obj_name(in, name);
+               in->dirty = 1;
 
-               yaffs_verify_blk(dev, bi, block);
+               yaffs_add_obj_to_dir(parent, in);
 
-               max_copies = (whole_block) ? dev->param.chunks_per_block : 5;
-               old_chunk = block * dev->param.chunks_per_block + dev->gc_chunk;
+               in->my_dev = parent->my_dev;
 
-               for ( /* init already done */ ;
-                    ret_val == YAFFS_OK &&
-                    dev->gc_chunk < dev->param.chunks_per_block &&
-                    (bi->block_state == YAFFS_BLOCK_STATE_COLLECTING) &&
-                    max_copies > 0; dev->gc_chunk++, old_chunk++) {
-                       if (yaffs_check_chunk_bit(dev, block, dev->gc_chunk)) {
+               switch (type) {
+               case YAFFS_OBJECT_TYPE_SYMLINK:
+                       in->variant.symlink_variant.alias = str;
+                       break;
+               case YAFFS_OBJECT_TYPE_HARDLINK:
+                       in->variant.hardlink_variant.equiv_obj = equiv_obj;
+                       in->variant.hardlink_variant.equiv_id =
+                           equiv_obj->obj_id;
+                       list_add(&in->hard_links, &equiv_obj->hard_links);
+                       break;
+               case YAFFS_OBJECT_TYPE_FILE:
+               case YAFFS_OBJECT_TYPE_DIRECTORY:
+               case YAFFS_OBJECT_TYPE_SPECIAL:
+               case YAFFS_OBJECT_TYPE_UNKNOWN:
+                       /* do nothing */
+                       break;
+               }
 
-                               /* This page is in use and might need to be copied off */
+               if (yaffs_update_oh(in, name, 0, 0, 0, NULL) < 0) {
+                       /* Could not create the object header, fail the creation */
+                       yaffs_del_obj(in);
+                       in = NULL;
+               }
 
-                               max_copies--;
+               yaffs_update_parent(parent);
+       }
 
-                               mark_flash = 1;
+       return in;
+}
 
-                               yaffs_init_tags(&tags);
+struct yaffs_obj *yaffs_create_file(struct yaffs_obj *parent,
+                                   const YCHAR * name, u32 mode, u32 uid,
+                                   u32 gid)
+{
+       return yaffs_create_obj(YAFFS_OBJECT_TYPE_FILE, parent, name, mode,
+                               uid, gid, NULL, NULL, 0);
+}
 
-                               yaffs_rd_chunk_tags_nand(dev, old_chunk,
-                                                        buffer, &tags);
+struct yaffs_obj *yaffs_create_dir(struct yaffs_obj *parent, const YCHAR * name,
+                                  u32 mode, u32 uid, u32 gid)
+{
+       return yaffs_create_obj(YAFFS_OBJECT_TYPE_DIRECTORY, parent, name,
+                               mode, uid, gid, NULL, NULL, 0);
+}
 
-                               object = yaffs_find_by_number(dev, tags.obj_id);
+struct yaffs_obj *yaffs_create_special(struct yaffs_obj *parent,
+                                      const YCHAR * name, u32 mode, u32 uid,
+                                      u32 gid, u32 rdev)
+{
+       return yaffs_create_obj(YAFFS_OBJECT_TYPE_SPECIAL, parent, name, mode,
+                               uid, gid, NULL, NULL, rdev);
+}
 
-                               T(YAFFS_TRACE_GC_DETAIL,
-                                 (TSTR
-                                  ("Collecting chunk in block %d, %d %d %d "
+struct yaffs_obj *yaffs_create_symlink(struct yaffs_obj *parent,
+                                      const YCHAR * name, u32 mode, u32 uid,
+                                      u32 gid, const YCHAR * alias)
+{
+       return yaffs_create_obj(YAFFS_OBJECT_TYPE_SYMLINK, parent, name, mode,
+                               uid, gid, NULL, alias, 0);
+}
+
+/* yaffs_link_obj returns the object id of the equivalent object.*/
+struct yaffs_obj *yaffs_link_obj(struct yaffs_obj *parent, const YCHAR * name,
+                                struct yaffs_obj *equiv_obj)
+{
+       /* Get the real object in case we were fed a hard link as an equivalent object */
+       equiv_obj = yaffs_get_equivalent_obj(equiv_obj);
+
+       if (yaffs_create_obj
+           (YAFFS_OBJECT_TYPE_HARDLINK, parent, name, 0, 0, 0,
+            equiv_obj, NULL, 0)) {
+               return equiv_obj;
+       } else {
+               return NULL;
+       }
+
+}
+
+
+
+/*------------------------- Block Management and Page Allocation ----------------*/
+
+static int yaffs_init_blocks(struct yaffs_dev *dev)
+{
+       int n_blocks = dev->internal_end_block - dev->internal_start_block + 1;
+
+       dev->block_info = NULL;
+       dev->chunk_bits = NULL;
+
+       dev->alloc_block = -1;  /* force it to get a new one */
+
+       /* If the first allocation strategy fails, thry the alternate one */
+       dev->block_info =
+               kmalloc(n_blocks * sizeof(struct yaffs_block_info), GFP_NOFS);
+       if (!dev->block_info) {
+               dev->block_info =
+                   vmalloc(n_blocks * sizeof(struct yaffs_block_info));
+               dev->block_info_alt = 1;
+       } else {
+               dev->block_info_alt = 0;
+        }
+
+       if (dev->block_info) {
+               /* Set up dynamic blockinfo stuff. Round up bytes. */
+               dev->chunk_bit_stride = (dev->param.chunks_per_block + 7) / 8;
+               dev->chunk_bits =
+                       kmalloc(dev->chunk_bit_stride * n_blocks, GFP_NOFS);
+               if (!dev->chunk_bits) {
+                       dev->chunk_bits =
+                           vmalloc(dev->chunk_bit_stride * n_blocks);
+                       dev->chunk_bits_alt = 1;
+               } else {
+                       dev->chunk_bits_alt = 0;
+                }
+       }
+
+       if (dev->block_info && dev->chunk_bits) {
+               memset(dev->block_info, 0,
+                      n_blocks * sizeof(struct yaffs_block_info));
+               memset(dev->chunk_bits, 0, dev->chunk_bit_stride * n_blocks);
+               return YAFFS_OK;
+       }
+
+       return YAFFS_FAIL;
+}
+
+static void yaffs_deinit_blocks(struct yaffs_dev *dev)
+{
+       if (dev->block_info_alt && dev->block_info)
+               vfree(dev->block_info);
+       else if (dev->block_info)
+               kfree(dev->block_info);
+
+       dev->block_info_alt = 0;
+
+       dev->block_info = NULL;
+
+       if (dev->chunk_bits_alt && dev->chunk_bits)
+               vfree(dev->chunk_bits);
+       else if (dev->chunk_bits)
+               kfree(dev->chunk_bits);
+       dev->chunk_bits_alt = 0;
+       dev->chunk_bits = NULL;
+}
+
+void yaffs_block_became_dirty(struct yaffs_dev *dev, int block_no)
+{
+       struct yaffs_block_info *bi = yaffs_get_block_info(dev, block_no);
+
+       int erased_ok = 0;
+
+       /* If the block is still healthy erase it and mark as clean.
+        * If the block has had a data failure, then retire it.
+        */
+
+       T(YAFFS_TRACE_GC | YAFFS_TRACE_ERASE,
+         (TSTR("yaffs_block_became_dirty block %d state %d %s" TENDSTR),
+          block_no, bi->block_state,
+          (bi->needs_retiring) ? "needs retiring" : ""));
+
+       yaffs2_clear_oldest_dirty_seq(dev, bi);
+
+       bi->block_state = YAFFS_BLOCK_STATE_DIRTY;
+
+       /* If this is the block being garbage collected then stop gc'ing this block */
+       if (block_no == dev->gc_block)
+               dev->gc_block = 0;
+
+       /* If this block is currently the best candidate for gc then drop as a candidate */
+       if (block_no == dev->gc_dirtiest) {
+               dev->gc_dirtiest = 0;
+               dev->gc_pages_in_use = 0;
+       }
+
+       if (!bi->needs_retiring) {
+               yaffs2_checkpt_invalidate(dev);
+               erased_ok = yaffs_erase_block(dev, block_no);
+               if (!erased_ok) {
+                       dev->n_erase_failures++;
+                       T(YAFFS_TRACE_ERROR | YAFFS_TRACE_BAD_BLOCKS,
+                         (TSTR("**>> Erasure failed %d" TENDSTR), block_no));
+               }
+       }
+
+       if (erased_ok &&
+           ((yaffs_trace_mask & YAFFS_TRACE_ERASE)
+            || !yaffs_skip_verification(dev))) {
+               int i;
+               for (i = 0; i < dev->param.chunks_per_block; i++) {
+                       if (!yaffs_check_chunk_erased
+                           (dev, block_no * dev->param.chunks_per_block + i)) {
+                               T(YAFFS_TRACE_ERROR,
+                                 (TSTR
+                                  (">>Block %d erasure supposedly OK, but chunk %d not erased"
+                                   TENDSTR), block_no, i));
+                       }
+               }
+       }
+
+       if (erased_ok) {
+               /* Clean it up... */
+               bi->block_state = YAFFS_BLOCK_STATE_EMPTY;
+               bi->seq_number = 0;
+               dev->n_erased_blocks++;
+               bi->pages_in_use = 0;
+               bi->soft_del_pages = 0;
+               bi->has_shrink_hdr = 0;
+               bi->skip_erased_check = 1;      /* This is clean, so no need to check */
+               bi->gc_prioritise = 0;
+               yaffs_clear_chunk_bits(dev, block_no);
+
+               T(YAFFS_TRACE_ERASE,
+                 (TSTR("Erased block %d" TENDSTR), block_no));
+       } else {
+               dev->n_free_chunks -= dev->param.chunks_per_block;      /* We lost a block of free space */
+
+               yaffs_retire_block(dev, block_no);
+               T(YAFFS_TRACE_ERROR | YAFFS_TRACE_BAD_BLOCKS,
+                 (TSTR("**>> Block %d retired" TENDSTR), block_no));
+       }
+}
+
+
+
+static int yaffs_gc_block(struct yaffs_dev *dev, int block, int whole_block)
+{
+       int old_chunk;
+       int new_chunk;
+       int mark_flash;
+       int ret_val = YAFFS_OK;
+       int i;
+       int is_checkpt_block;
+       int matching_chunk;
+       int max_copies;
+
+       int chunks_before = yaffs_get_erased_chunks(dev);
+       int chunks_after;
+
+       struct yaffs_ext_tags tags;
+
+       struct yaffs_block_info *bi = yaffs_get_block_info(dev, block);
+
+       struct yaffs_obj *object;
+
+       is_checkpt_block = (bi->block_state == YAFFS_BLOCK_STATE_CHECKPOINT);
+
+       T(YAFFS_TRACE_TRACING,
+         (TSTR
+          ("Collecting block %d, in use %d, shrink %d, whole_block %d"
+           TENDSTR), block, bi->pages_in_use, bi->has_shrink_hdr,
+          whole_block));
+
+       /*yaffs_verify_free_chunks(dev); */
+
+       if (bi->block_state == YAFFS_BLOCK_STATE_FULL)
+               bi->block_state = YAFFS_BLOCK_STATE_COLLECTING;
+
+       bi->has_shrink_hdr = 0; /* clear the flag so that the block can erase */
+
+       dev->gc_disable = 1;
+
+       if (is_checkpt_block || !yaffs_still_some_chunks(dev, block)) {
+               T(YAFFS_TRACE_TRACING,
+                 (TSTR
+                  ("Collecting block %d that has no chunks in use" TENDSTR),
+                  block));
+               yaffs_block_became_dirty(dev, block);
+       } else {
+
+               u8 *buffer = yaffs_get_temp_buffer(dev, __LINE__);
+
+               yaffs_verify_blk(dev, bi, block);
+
+               max_copies = (whole_block) ? dev->param.chunks_per_block : 5;
+               old_chunk = block * dev->param.chunks_per_block + dev->gc_chunk;
+
+               for ( /* init already done */ ;
+                    ret_val == YAFFS_OK &&
+                    dev->gc_chunk < dev->param.chunks_per_block &&
+                    (bi->block_state == YAFFS_BLOCK_STATE_COLLECTING) &&
+                    max_copies > 0; dev->gc_chunk++, old_chunk++) {
+                       if (yaffs_check_chunk_bit(dev, block, dev->gc_chunk)) {
+
+                               /* This page is in use and might need to be copied off */
+
+                               max_copies--;
+
+                               mark_flash = 1;
+
+                               yaffs_init_tags(&tags);
+
+                               yaffs_rd_chunk_tags_nand(dev, old_chunk,
+                                                        buffer, &tags);
+
+                               object = yaffs_find_by_number(dev, tags.obj_id);
+
+                               T(YAFFS_TRACE_GC_DETAIL,
+                                 (TSTR
+                                  ("Collecting chunk in block %d, %d %d %d "
                                    TENDSTR), dev->gc_chunk, tags.obj_id,
                                   tags.chunk_id, tags.n_bytes));
 
@@ -2546,223 +3020,25 @@ int yaffs_bg_gc(struct yaffs_dev *dev, unsigned urgency)
        return erased_chunks > dev->n_free_chunks / 2;
 }
 
-/*-------------------------  TAGS --------------------------------*/
+/*-------------------- Data file manipulation -----------------*/
 
-static int yaffs_tags_match(const struct yaffs_ext_tags *tags, int obj_id,
-                           int chunk_obj)
+static int yaffs_rd_data_obj(struct yaffs_obj *in, int inode_chunk, u8 * buffer)
 {
-       return (tags->chunk_id == chunk_obj &&
-               tags->obj_id == obj_id && !tags->is_deleted) ? 1 : 0;
+       int nand_chunk = yaffs_find_chunk_in_file(in, inode_chunk, NULL);
 
-}
+       if (nand_chunk >= 0)
+               return yaffs_rd_chunk_tags_nand(in->my_dev, nand_chunk,
+                                               buffer, NULL);
+       else {
+               T(YAFFS_TRACE_NANDACCESS,
+                 (TSTR("Chunk %d not found zero instead" TENDSTR),
+                  nand_chunk));
+               /* get sane (zero) data if you read a hole */
+               memset(buffer, 0, in->my_dev->data_bytes_per_chunk);
+               return 0;
+       }
 
-/*-------------------- Data file manipulation -----------------*/
-
-static int yaffs_find_chunk_in_file(struct yaffs_obj *in, int inode_chunk,
-                                   struct yaffs_ext_tags *tags)
-{
-       /*Get the Tnode, then get the level 0 offset chunk offset */
-       struct yaffs_tnode *tn;
-       int the_chunk = -1;
-       struct yaffs_ext_tags local_tags;
-       int ret_val = -1;
-
-       struct yaffs_dev *dev = in->my_dev;
-
-       if (!tags) {
-               /* Passed a NULL, so use our own tags space */
-               tags = &local_tags;
-       }
-
-       tn = yaffs_find_tnode_0(dev, &in->variant.file_variant, inode_chunk);
-
-       if (tn) {
-               the_chunk = yaffs_get_group_base(dev, tn, inode_chunk);
-
-               ret_val =
-                   yaffs_find_chunk_in_group(dev, the_chunk, tags, in->obj_id,
-                                             inode_chunk);
-       }
-       return ret_val;
-}
-
-static int yaffs_find_del_file_chunk(struct yaffs_obj *in, int inode_chunk,
-                                    struct yaffs_ext_tags *tags)
-{
-       /* Get the Tnode, then get the level 0 offset chunk offset */
-       struct yaffs_tnode *tn;
-       int the_chunk = -1;
-       struct yaffs_ext_tags local_tags;
-
-       struct yaffs_dev *dev = in->my_dev;
-       int ret_val = -1;
-
-       if (!tags) {
-               /* Passed a NULL, so use our own tags space */
-               tags = &local_tags;
-       }
-
-       tn = yaffs_find_tnode_0(dev, &in->variant.file_variant, inode_chunk);
-
-       if (tn) {
-
-               the_chunk = yaffs_get_group_base(dev, tn, inode_chunk);
-
-               ret_val =
-                   yaffs_find_chunk_in_group(dev, the_chunk, tags, in->obj_id,
-                                             inode_chunk);
-
-               /* Delete the entry in the filestructure (if found) */
-               if (ret_val != -1)
-                       yaffs_load_tnode_0(dev, tn, inode_chunk, 0);
-       }
-
-       return ret_val;
-}
-
-int yaffs_put_chunk_in_file(struct yaffs_obj *in, int inode_chunk,
-                           int nand_chunk, int in_scan)
-{
-       /* NB in_scan is zero unless scanning.
-        * For forward scanning, in_scan is > 0;
-        * for backward scanning in_scan is < 0
-        *
-        * nand_chunk = 0 is a dummy insert to make sure the tnodes are there.
-        */
-
-       struct yaffs_tnode *tn;
-       struct yaffs_dev *dev = in->my_dev;
-       int existing_cunk;
-       struct yaffs_ext_tags existing_tags;
-       struct yaffs_ext_tags new_tags;
-       unsigned existing_serial, new_serial;
-
-       if (in->variant_type != YAFFS_OBJECT_TYPE_FILE) {
-               /* Just ignore an attempt at putting a chunk into a non-file during scanning
-                * If it is not during Scanning then something went wrong!
-                */
-               if (!in_scan) {
-                       T(YAFFS_TRACE_ERROR,
-                         (TSTR
-                          ("yaffs tragedy:attempt to put data chunk into a non-file"
-                           TENDSTR)));
-                       YBUG();
-               }
-
-               yaffs_chunk_del(dev, nand_chunk, 1, __LINE__);
-               return YAFFS_OK;
-       }
-
-       tn = yaffs_add_find_tnode_0(dev,
-                                   &in->variant.file_variant,
-                                   inode_chunk, NULL);
-       if (!tn)
-               return YAFFS_FAIL;
-
-       if (!nand_chunk)
-               /* Dummy insert, bail now */
-               return YAFFS_OK;
-
-       existing_cunk = yaffs_get_group_base(dev, tn, inode_chunk);
-
-       if (in_scan != 0) {
-               /* If we're scanning then we need to test for duplicates
-                * NB This does not need to be efficient since it should only ever
-                * happen when the power fails during a write, then only one
-                * chunk should ever be affected.
-                *
-                * Correction for YAFFS2: This could happen quite a lot and we need to think about efficiency! TODO
-                * Update: For backward scanning we don't need to re-read tags so this is quite cheap.
-                */
-
-               if (existing_cunk > 0) {
-                       /* NB Right now existing chunk will not be real chunk_id if the chunk group size > 1
-                        *    thus we have to do a FindChunkInFile to get the real chunk id.
-                        *
-                        * We have a duplicate now we need to decide which one to use:
-                        *
-                        * Backwards scanning YAFFS2: The old one is what we use, dump the new one.
-                        * Forward scanning YAFFS2: The new one is what we use, dump the old one.
-                        * YAFFS1: Get both sets of tags and compare serial numbers.
-                        */
-
-                       if (in_scan > 0) {
-                               /* Only do this for forward scanning */
-                               yaffs_rd_chunk_tags_nand(dev,
-                                                        nand_chunk,
-                                                        NULL, &new_tags);
-
-                               /* Do a proper find */
-                               existing_cunk =
-                                   yaffs_find_chunk_in_file(in, inode_chunk,
-                                                            &existing_tags);
-                       }
-
-                       if (existing_cunk <= 0) {
-                               /*Hoosterman - how did this happen? */
-
-                               T(YAFFS_TRACE_ERROR,
-                                 (TSTR
-                                  ("yaffs tragedy: existing chunk < 0 in scan"
-                                   TENDSTR)));
-
-                       }
-
-                       /* NB The deleted flags should be false, otherwise the chunks will
-                        * not be loaded during a scan
-                        */
-
-                       if (in_scan > 0) {
-                               new_serial = new_tags.serial_number;
-                               existing_serial = existing_tags.serial_number;
-                       }
-
-                       if ((in_scan > 0) &&
-                           (existing_cunk <= 0 ||
-                            ((existing_serial + 1) & 3) == new_serial)) {
-                               /* Forward scanning.
-                                * Use new
-                                * Delete the old one and drop through to update the tnode
-                                */
-                               yaffs_chunk_del(dev, existing_cunk, 1,
-                                               __LINE__);
-                       } else {
-                               /* Backward scanning or we want to use the existing one
-                                * Use existing.
-                                * Delete the new one and return early so that the tnode isn't changed
-                                */
-                               yaffs_chunk_del(dev, nand_chunk, 1, __LINE__);
-                               return YAFFS_OK;
-                       }
-               }
-
-       }
-
-       if (existing_cunk == 0)
-               in->n_data_chunks++;
-
-       yaffs_load_tnode_0(dev, tn, inode_chunk, nand_chunk);
-
-       return YAFFS_OK;
-}
-
-static int yaffs_rd_data_obj(struct yaffs_obj *in, int inode_chunk, u8 * buffer)
-{
-       int nand_chunk = yaffs_find_chunk_in_file(in, inode_chunk, NULL);
-
-       if (nand_chunk >= 0)
-               return yaffs_rd_chunk_tags_nand(in->my_dev, nand_chunk,
-                                               buffer, NULL);
-       else {
-               T(YAFFS_TRACE_NANDACCESS,
-                 (TSTR("Chunk %d not found zero instead" TENDSTR),
-                  nand_chunk));
-               /* get sane (zero) data if you read a hole */
-               memset(buffer, 0, in->my_dev->data_bytes_per_chunk);
-               return 0;
-       }
-
-}
+}
 
 void yaffs_chunk_del(struct yaffs_dev *dev, int chunk_id, int mark_flash,
                     int lyn)
@@ -2885,421 +3161,400 @@ static int yaffs_wr_data_obj(struct yaffs_obj *in, int inode_chunk,
 
 }
 
-/* UpdateObjectHeader updates the header on NAND for an object.
- * If name is not NULL, then that new name is used.
- */
-int yaffs_update_oh(struct yaffs_obj *in, const YCHAR * name, int force,
-                   int is_shrink, int shadows, struct yaffs_xattr_mod *xmod)
-{
-
-       struct yaffs_block_info *bi;
 
-       struct yaffs_dev *dev = in->my_dev;
 
-       int prev_chunk_id;
-       int ret_val = 0;
-       int result = 0;
+static int yaffs_do_xattrib_mod(struct yaffs_obj *obj, int set,
+                               const YCHAR * name, const void *value, int size,
+                               int flags)
+{
+       struct yaffs_xattr_mod xmod;
 
-       int new_chunk_id;
-       struct yaffs_ext_tags new_tags;
-       struct yaffs_ext_tags old_tags;
-       const YCHAR *alias = NULL;
+       int result;
 
-       u8 *buffer = NULL;
-       YCHAR old_name[YAFFS_MAX_NAME_LENGTH + 1];
+       xmod.set = set;
+       xmod.name = name;
+       xmod.data = value;
+       xmod.size = size;
+       xmod.flags = flags;
+       xmod.result = -ENOSPC;
 
-       struct yaffs_obj_hdr *oh = NULL;
+       result = yaffs_update_oh(obj, NULL, 0, 0, 0, &xmod);
 
-       yaffs_strcpy(old_name, _Y("silly old name"));
+       if (result > 0)
+               return xmod.result;
+       else
+               return -ENOSPC;
+}
 
-       if (!in->fake || in == dev->root_dir || /* The root_dir should also be saved */
-           force || xmod) {
+static int yaffs_apply_xattrib_mod(struct yaffs_obj *obj, char *buffer,
+                                  struct yaffs_xattr_mod *xmod)
+{
+       int retval = 0;
+       int x_offs = sizeof(struct yaffs_obj_hdr);
+       struct yaffs_dev *dev = obj->my_dev;
+       int x_size = dev->data_bytes_per_chunk - sizeof(struct yaffs_obj_hdr);
 
-               yaffs_check_gc(dev, 0);
-               yaffs_check_obj_details_loaded(in);
+       char *x_buffer = buffer + x_offs;
 
-               buffer = yaffs_get_temp_buffer(in->my_dev, __LINE__);
-               oh = (struct yaffs_obj_hdr *)buffer;
+       if (xmod->set)
+               retval =
+                   nval_set(x_buffer, x_size, xmod->name, xmod->data,
+                            xmod->size, xmod->flags);
+       else
+               retval = nval_del(x_buffer, x_size, xmod->name);
 
-               prev_chunk_id = in->hdr_chunk;
+       obj->has_xattr = nval_hasvalues(x_buffer, x_size);
+       obj->xattr_known = 1;
 
-               if (prev_chunk_id > 0) {
-                       result = yaffs_rd_chunk_tags_nand(dev, prev_chunk_id,
-                                                         buffer, &old_tags);
+       xmod->result = retval;
 
-                       yaffs_verify_oh(in, oh, &old_tags, 0);
+       return retval;
+}
 
-                       memcpy(old_name, oh->name, sizeof(oh->name));
-                       memset(buffer, 0xFF, sizeof(struct yaffs_obj_hdr));
-               } else {
-                       memset(buffer, 0xFF, dev->data_bytes_per_chunk);
-                }
+static int yaffs_do_xattrib_fetch(struct yaffs_obj *obj, const YCHAR * name,
+                                 void *value, int size)
+{
+       char *buffer = NULL;
+       int result;
+       struct yaffs_ext_tags tags;
+       struct yaffs_dev *dev = obj->my_dev;
+       int x_offs = sizeof(struct yaffs_obj_hdr);
+       int x_size = dev->data_bytes_per_chunk - sizeof(struct yaffs_obj_hdr);
 
-               oh->type = in->variant_type;
-               oh->yst_mode = in->yst_mode;
-               oh->shadows_obj = oh->inband_shadowed_obj_id = shadows;
+       char *x_buffer;
 
-               yaffs_load_attribs_oh(oh, in);
+       int retval = 0;
 
-               if (in->parent)
-                       oh->parent_obj_id = in->parent->obj_id;
+       if (obj->hdr_chunk < 1)
+               return -ENODATA;
+
+       /* If we know that the object has no xattribs then don't do all the
+        * reading and parsing.
+        */
+       if (obj->xattr_known && !obj->has_xattr) {
+               if (name)
+                       return -ENODATA;
                else
-                       oh->parent_obj_id = 0;
+                       return 0;
+       }
 
-               if (name && *name) {
-                       memset(oh->name, 0, sizeof(oh->name));
-                       yaffs_load_oh_from_name(dev, oh->name, name);
-               } else if (prev_chunk_id > 0) {
-                       memcpy(oh->name, old_name, sizeof(oh->name));
-               } else {
-                       memset(oh->name, 0, sizeof(oh->name));
-                }
+       buffer = (char *)yaffs_get_temp_buffer(dev, __LINE__);
+       if (!buffer)
+               return -ENOMEM;
 
-               oh->is_shrink = is_shrink;
+       result =
+           yaffs_rd_chunk_tags_nand(dev, obj->hdr_chunk, (u8 *) buffer, &tags);
 
-               switch (in->variant_type) {
-               case YAFFS_OBJECT_TYPE_UNKNOWN:
-                       /* Should not happen */
-                       break;
-               case YAFFS_OBJECT_TYPE_FILE:
-                       oh->file_size =
-                           (oh->parent_obj_id == YAFFS_OBJECTID_DELETED
-                            || oh->parent_obj_id ==
-                            YAFFS_OBJECTID_UNLINKED) ? 0 : in->
-                           variant.file_variant.file_size;
-                       break;
-               case YAFFS_OBJECT_TYPE_HARDLINK:
-                       oh->equiv_id = in->variant.hardlink_variant.equiv_id;
-                       break;
-               case YAFFS_OBJECT_TYPE_SPECIAL:
-                       /* Do nothing */
-                       break;
-               case YAFFS_OBJECT_TYPE_DIRECTORY:
-                       /* Do nothing */
-                       break;
-               case YAFFS_OBJECT_TYPE_SYMLINK:
-                       alias = in->variant.symlink_variant.alias;
-                       if (!alias)
-                               alias = _Y("no alias");
-                       yaffs_strncpy(oh->alias, alias, YAFFS_MAX_ALIAS_LENGTH);
-                       oh->alias[YAFFS_MAX_ALIAS_LENGTH] = 0;
-                       break;
+       if (result != YAFFS_OK)
+               retval = -ENOENT;
+       else {
+               x_buffer = buffer + x_offs;
+
+               if (!obj->xattr_known) {
+                       obj->has_xattr = nval_hasvalues(x_buffer, x_size);
+                       obj->xattr_known = 1;
                }
 
-               /* process any xattrib modifications */
-               if (xmod)
-                       yaffs_apply_xattrib_mod(in, (char *)buffer, xmod);
+               if (name)
+                       retval = nval_get(x_buffer, x_size, name, value, size);
+               else
+                       retval = nval_list(x_buffer, x_size, value, size);
+       }
+       yaffs_release_temp_buffer(dev, (u8 *) buffer, __LINE__);
+       return retval;
+}
 
-               /* Tags */
-               yaffs_init_tags(&new_tags);
-               in->serial++;
-               new_tags.chunk_id = 0;
-               new_tags.obj_id = in->obj_id;
-               new_tags.serial_number = in->serial;
+int yaffs_set_xattrib(struct yaffs_obj *obj, const YCHAR * name,
+                     const void *value, int size, int flags)
+{
+       return yaffs_do_xattrib_mod(obj, 1, name, value, size, flags);
+}
 
-               /* Add extra info for file header */
+int yaffs_remove_xattrib(struct yaffs_obj *obj, const YCHAR * name)
+{
+       return yaffs_do_xattrib_mod(obj, 0, name, NULL, 0, 0);
+}
 
-               new_tags.extra_available = 1;
-               new_tags.extra_parent_id = oh->parent_obj_id;
-               new_tags.extra_length = oh->file_size;
-               new_tags.extra_is_shrink = oh->is_shrink;
-               new_tags.extra_equiv_id = oh->equiv_id;
-               new_tags.extra_shadows = (oh->shadows_obj > 0) ? 1 : 0;
-               new_tags.extra_obj_type = in->variant_type;
+int yaffs_get_xattrib(struct yaffs_obj *obj, const YCHAR * name, void *value,
+                     int size)
+{
+       return yaffs_do_xattrib_fetch(obj, name, value, size);
+}
 
-               yaffs_verify_oh(in, oh, &new_tags, 1);
+int yaffs_list_xattrib(struct yaffs_obj *obj, char *buffer, int size)
+{
+       return yaffs_do_xattrib_fetch(obj, NULL, buffer, size);
+}
 
-               /* Create new chunk in NAND */
-               new_chunk_id =
-                   yaffs_write_new_chunk(dev, buffer, &new_tags,
-                                         (prev_chunk_id > 0) ? 1 : 0);
+static void yaffs_check_obj_details_loaded(struct yaffs_obj *in)
+{
+       u8 *chunk_data;
+       struct yaffs_obj_hdr *oh;
+       struct yaffs_dev *dev;
+       struct yaffs_ext_tags tags;
+       int result;
+       int alloc_failed = 0;
 
-               if (new_chunk_id >= 0) {
+       if (!in)
+               return;
 
-                       in->hdr_chunk = new_chunk_id;
+       dev = in->my_dev;
 
-                       if (prev_chunk_id > 0) {
-                               yaffs_chunk_del(dev, prev_chunk_id, 1,
-                                               __LINE__);
-                       }
+       if (in->lazy_loaded && in->hdr_chunk > 0) {
+               in->lazy_loaded = 0;
+               chunk_data = yaffs_get_temp_buffer(dev, __LINE__);
 
-                       if (!yaffs_obj_cache_dirty(in))
-                               in->dirty = 0;
+               result =
+                   yaffs_rd_chunk_tags_nand(dev, in->hdr_chunk, chunk_data,
+                                            &tags);
+               oh = (struct yaffs_obj_hdr *)chunk_data;
 
-                       /* If this was a shrink, then mark the block that the chunk lives on */
-                       if (is_shrink) {
-                               bi = yaffs_get_block_info(in->my_dev,
-                                                         new_chunk_id /
-                                                         in->my_dev->param.
-                                                         chunks_per_block);
-                               bi->has_shrink_hdr = 1;
-                       }
+               in->yst_mode = oh->yst_mode;
+               yaffs_load_attribs(in, oh);
+               yaffs_set_obj_name_from_oh(in, oh);
 
+               if (in->variant_type == YAFFS_OBJECT_TYPE_SYMLINK) {
+                       in->variant.symlink_variant.alias =
+                           yaffs_clone_str(oh->alias);
+                       if (!in->variant.symlink_variant.alias)
+                               alloc_failed = 1;       /* Not returned to caller */
                }
 
-               ret_val = new_chunk_id;
-
+               yaffs_release_temp_buffer(dev, chunk_data, __LINE__);
        }
-
-       if (buffer)
-               yaffs_release_temp_buffer(dev, buffer, __LINE__);
-
-       return ret_val;
 }
 
-/*------------------------ Short Operations Cache ----------------------------------------
- *   In many situations where there is no high level buffering  a lot of
- *   reads might be short sequential reads, and a lot of writes may be short
- *   sequential writes. eg. scanning/writing a jpeg file.
- *   In these cases, a short read/write cache can provide a huge perfomance
- *   benefit with dumb-as-a-rock code.
- *   In Linux, the page cache provides read buffering and the short op cache 
- *   provides write buffering.
- *
- *   There are a limited number (~10) of cache chunks per device so that we don't
- *   need a very intelligent search.
- */
-
-static int yaffs_obj_cache_dirty(struct yaffs_obj *obj)
+static void yaffs_load_name_from_oh(struct yaffs_dev *dev, YCHAR * name,
+                                   const YCHAR * oh_name, int buff_size)
 {
-       struct yaffs_dev *dev = obj->my_dev;
-       int i;
-       struct yaffs_cache *cache;
-       int n_caches = obj->my_dev->param.n_caches;
-
-       for (i = 0; i < n_caches; i++) {
-               cache = &dev->cache[i];
-               if (cache->object == obj && cache->dirty)
-                       return 1;
-       }
-
-       return 0;
+#ifdef CONFIG_YAFFS_AUTO_UNICODE
+       if (dev->param.auto_unicode) {
+               if (*oh_name) {
+                       /* It is an ASCII name, so do an ASCII to unicode conversion */
+                       const char *ascii_oh_name = (const char *)oh_name;
+                       int n = buff_size - 1;
+                       while (n > 0 && *ascii_oh_name) {
+                               *name = *ascii_oh_name;
+                               name++;
+                               ascii_oh_name++;
+                               n--;
+                       }
+               } else {
+                       strncpy(name, oh_name + 1, buff_size - 1);
+                }
+       } else {
+#else
+        {
+#endif
+               strncpy(name, oh_name, buff_size - 1);
+        }
 }
 
-static void yaffs_flush_file_cache(struct yaffs_obj *obj)
+static void yaffs_load_oh_from_name(struct yaffs_dev *dev, YCHAR * oh_name,
+                                   const YCHAR * name)
 {
-       struct yaffs_dev *dev = obj->my_dev;
-       int lowest = -99;       /* Stop compiler whining. */
-       int i;
-       struct yaffs_cache *cache;
-       int chunk_written = 0;
-       int n_caches = obj->my_dev->param.n_caches;
-
-       if (n_caches > 0) {
-               do {
-                       cache = NULL;
-
-                       /* Find the dirty cache for this object with the lowest chunk id. */
-                       for (i = 0; i < n_caches; i++) {
-                               if (dev->cache[i].object == obj &&
-                                   dev->cache[i].dirty) {
-                                       if (!cache
-                                           || dev->cache[i].chunk_id <
-                                           lowest) {
-                                               cache = &dev->cache[i];
-                                               lowest = cache->chunk_id;
-                                       }
-                               }
-                       }
+#ifdef CONFIG_YAFFS_AUTO_UNICODE
 
-                       if (cache && !cache->locked) {
-                               /* Write it out and free it up */
+       int is_ascii;
+       YCHAR *w;
 
-                               chunk_written =
-                                   yaffs_wr_data_obj(cache->object,
-                                                     cache->chunk_id,
-                                                     cache->data,
-                                                     cache->n_bytes, 1);
-                               cache->dirty = 0;
-                               cache->object = NULL;
-                       }
+       if (dev->param.auto_unicode) {
 
-               } while (cache && chunk_written > 0);
+               is_ascii = 1;
+               w = name;
 
-               if (cache) {
-                       /* Hoosterman, disk full while writing cache out. */
-                       T(YAFFS_TRACE_ERROR,
-                         (TSTR
-                          ("yaffs tragedy: no space during cache write"
-                           TENDSTR)));
+               /* Figure out if the name will fit in ascii character set */
+               while (is_ascii && *w) {
+                       if ((*w) & 0xff00)
+                               is_ascii = 0;
+                       w++;
+               }
 
+               if (is_ascii) {
+                       /* It is an ASCII name, so do a unicode to ascii conversion */
+                       char *ascii_oh_name = (char *)oh_name;
+                       int n = YAFFS_MAX_NAME_LENGTH - 1;
+                       while (n > 0 && *name) {
+                               *ascii_oh_name = *name;
+                               name++;
+                               ascii_oh_name++;
+                               n--;
+                       }
+               } else {
+                       /* It is a unicode name, so save starting at the second YCHAR */
+                       *oh_name = 0;
+                       strncpy(oh_name + 1, name,
+                                     YAFFS_MAX_NAME_LENGTH - 2);
                }
-       }
+       } else {
+#else
+        {
+#endif
+               strncpy(oh_name, name, YAFFS_MAX_NAME_LENGTH - 1);
+        }
 
 }
 
-/*yaffs_flush_whole_cache(dev)
- *
- *
+/* UpdateObjectHeader updates the header on NAND for an object.
+ * If name is not NULL, then that new name is used.
  */
-
-void yaffs_flush_whole_cache(struct yaffs_dev *dev)
+int yaffs_update_oh(struct yaffs_obj *in, const YCHAR * name, int force,
+                   int is_shrink, int shadows, struct yaffs_xattr_mod *xmod)
 {
-       struct yaffs_obj *obj;
-       int n_caches = dev->param.n_caches;
-       int i;
 
-       /* Find a dirty object in the cache and flush it...
-        * until there are no further dirty objects.
-        */
-       do {
-               obj = NULL;
-               for (i = 0; i < n_caches && !obj; i++) {
-                       if (dev->cache[i].object && dev->cache[i].dirty)
-                               obj = dev->cache[i].object;
+       struct yaffs_block_info *bi;
+
+       struct yaffs_dev *dev = in->my_dev;
+
+       int prev_chunk_id;
+       int ret_val = 0;
+       int result = 0;
+
+       int new_chunk_id;
+       struct yaffs_ext_tags new_tags;
+       struct yaffs_ext_tags old_tags;
+       const YCHAR *alias = NULL;
+
+       u8 *buffer = NULL;
+       YCHAR old_name[YAFFS_MAX_NAME_LENGTH + 1];
 
-               }
-               if (obj)
-                       yaffs_flush_file_cache(obj);
+       struct yaffs_obj_hdr *oh = NULL;
 
-       } while (obj);
+       strcpy(old_name, _Y("silly old name"));
 
-}
+       if (!in->fake || in == dev->root_dir || /* The root_dir should also be saved */
+           force || xmod) {
 
-/* Grab us a cache chunk for use.
- * First look for an empty one.
- * Then look for the least recently used non-dirty one.
- * Then look for the least recently used dirty one...., flush and look again.
- */
-static struct yaffs_cache *yaffs_grab_chunk_worker(struct yaffs_dev *dev)
-{
-       int i;
+               yaffs_check_gc(dev, 0);
+               yaffs_check_obj_details_loaded(in);
 
-       if (dev->param.n_caches > 0) {
-               for (i = 0; i < dev->param.n_caches; i++) {
-                       if (!dev->cache[i].object)
-                               return &dev->cache[i];
-               }
-       }
+               buffer = yaffs_get_temp_buffer(in->my_dev, __LINE__);
+               oh = (struct yaffs_obj_hdr *)buffer;
 
-       return NULL;
-}
+               prev_chunk_id = in->hdr_chunk;
 
-static struct yaffs_cache *yaffs_grab_chunk_cache(struct yaffs_dev *dev)
-{
-       struct yaffs_cache *cache;
-       struct yaffs_obj *the_obj;
-       int usage;
-       int i;
-       int pushout;
+               if (prev_chunk_id > 0) {
+                       result = yaffs_rd_chunk_tags_nand(dev, prev_chunk_id,
+                                                         buffer, &old_tags);
 
-       if (dev->param.n_caches > 0) {
-               /* Try find a non-dirty one... */
+                       yaffs_verify_oh(in, oh, &old_tags, 0);
 
-               cache = yaffs_grab_chunk_worker(dev);
+                       memcpy(old_name, oh->name, sizeof(oh->name));
+                       memset(buffer, 0xFF, sizeof(struct yaffs_obj_hdr));
+               } else {
+                       memset(buffer, 0xFF, dev->data_bytes_per_chunk);
+                }
 
-               if (!cache) {
-                       /* They were all dirty, find the last recently used object and flush
-                        * its cache, then  find again.
-                        * NB what's here is not very accurate, we actually flush the object
-                        * the last recently used page.
-                        */
+               oh->type = in->variant_type;
+               oh->yst_mode = in->yst_mode;
+               oh->shadows_obj = oh->inband_shadowed_obj_id = shadows;
 
-                       /* With locking we can't assume we can use entry zero */
+               yaffs_load_attribs_oh(oh, in);
 
-                       the_obj = NULL;
-                       usage = -1;
-                       cache = NULL;
-                       pushout = -1;
+               if (in->parent)
+                       oh->parent_obj_id = in->parent->obj_id;
+               else
+                       oh->parent_obj_id = 0;
 
-                       for (i = 0; i < dev->param.n_caches; i++) {
-                               if (dev->cache[i].object &&
-                                   !dev->cache[i].locked &&
-                                   (dev->cache[i].last_use < usage
-                                    || !cache)) {
-                                       usage = dev->cache[i].last_use;
-                                       the_obj = dev->cache[i].object;
-                                       cache = &dev->cache[i];
-                                       pushout = i;
-                               }
-                       }
+               if (name && *name) {
+                       memset(oh->name, 0, sizeof(oh->name));
+                       yaffs_load_oh_from_name(dev, oh->name, name);
+               } else if (prev_chunk_id > 0) {
+                       memcpy(oh->name, old_name, sizeof(oh->name));
+               } else {
+                       memset(oh->name, 0, sizeof(oh->name));
+                }
 
-                       if (!cache || cache->dirty) {
-                               /* Flush and try again */
-                               yaffs_flush_file_cache(the_obj);
-                               cache = yaffs_grab_chunk_worker(dev);
-                       }
+               oh->is_shrink = is_shrink;
 
+               switch (in->variant_type) {
+               case YAFFS_OBJECT_TYPE_UNKNOWN:
+                       /* Should not happen */
+                       break;
+               case YAFFS_OBJECT_TYPE_FILE:
+                       oh->file_size =
+                           (oh->parent_obj_id == YAFFS_OBJECTID_DELETED
+                            || oh->parent_obj_id ==
+                            YAFFS_OBJECTID_UNLINKED) ? 0 : in->
+                           variant.file_variant.file_size;
+                       break;
+               case YAFFS_OBJECT_TYPE_HARDLINK:
+                       oh->equiv_id = in->variant.hardlink_variant.equiv_id;
+                       break;
+               case YAFFS_OBJECT_TYPE_SPECIAL:
+                       /* Do nothing */
+                       break;
+               case YAFFS_OBJECT_TYPE_DIRECTORY:
+                       /* Do nothing */
+                       break;
+               case YAFFS_OBJECT_TYPE_SYMLINK:
+                       alias = in->variant.symlink_variant.alias;
+                       if (!alias)
+                               alias = _Y("no alias");
+                       strncpy(oh->alias, alias, YAFFS_MAX_ALIAS_LENGTH);
+                       oh->alias[YAFFS_MAX_ALIAS_LENGTH] = 0;
+                       break;
                }
-               return cache;
-       } else {
-               return NULL;
-        }
-}
 
-/* Find a cached chunk */
-static struct yaffs_cache *yaffs_find_chunk_cache(const struct yaffs_obj *obj,
-                                                 int chunk_id)
-{
-       struct yaffs_dev *dev = obj->my_dev;
-       int i;
-       if (dev->param.n_caches > 0) {
-               for (i = 0; i < dev->param.n_caches; i++) {
-                       if (dev->cache[i].object == obj &&
-                           dev->cache[i].chunk_id == chunk_id) {
-                               dev->cache_hits++;
+               /* process any xattrib modifications */
+               if (xmod)
+                       yaffs_apply_xattrib_mod(in, (char *)buffer, xmod);
 
-                               return &dev->cache[i];
-                       }
-               }
-       }
-       return NULL;
-}
+               /* Tags */
+               yaffs_init_tags(&new_tags);
+               in->serial++;
+               new_tags.chunk_id = 0;
+               new_tags.obj_id = in->obj_id;
+               new_tags.serial_number = in->serial;
 
-/* Mark the chunk for the least recently used algorithym */
-static void yaffs_use_cache(struct yaffs_dev *dev, struct yaffs_cache *cache,
-                           int is_write)
-{
+               /* Add extra info for file header */
 
-       if (dev->param.n_caches > 0) {
-               if (dev->cache_last_use < 0 || dev->cache_last_use > 100000000) {
-                       /* Reset the cache usages */
-                       int i;
-                       for (i = 1; i < dev->param.n_caches; i++)
-                               dev->cache[i].last_use = 0;
+               new_tags.extra_available = 1;
+               new_tags.extra_parent_id = oh->parent_obj_id;
+               new_tags.extra_length = oh->file_size;
+               new_tags.extra_is_shrink = oh->is_shrink;
+               new_tags.extra_equiv_id = oh->equiv_id;
+               new_tags.extra_shadows = (oh->shadows_obj > 0) ? 1 : 0;
+               new_tags.extra_obj_type = in->variant_type;
 
-                       dev->cache_last_use = 0;
-               }
+               yaffs_verify_oh(in, oh, &new_tags, 1);
 
-               dev->cache_last_use++;
+               /* Create new chunk in NAND */
+               new_chunk_id =
+                   yaffs_write_new_chunk(dev, buffer, &new_tags,
+                                         (prev_chunk_id > 0) ? 1 : 0);
 
-               cache->last_use = dev->cache_last_use;
+               if (new_chunk_id >= 0) {
 
-               if (is_write)
-                       cache->dirty = 1;
-       }
-}
+                       in->hdr_chunk = new_chunk_id;
 
-/* Invalidate a single cache page.
- * Do this when a whole page gets written,
- * ie the short cache for this page is no longer valid.
- */
-static void yaffs_invalidate_chunk_cache(struct yaffs_obj *object, int chunk_id)
-{
-       if (object->my_dev->param.n_caches > 0) {
-               struct yaffs_cache *cache =
-                   yaffs_find_chunk_cache(object, chunk_id);
+                       if (prev_chunk_id > 0) {
+                               yaffs_chunk_del(dev, prev_chunk_id, 1,
+                                               __LINE__);
+                       }
 
-               if (cache)
-                       cache->object = NULL;
-       }
-}
+                       if (!yaffs_obj_cache_dirty(in))
+                               in->dirty = 0;
 
-/* Invalidate all the cache pages associated with this object
- * Do this whenever ther file is deleted or resized.
- */
-static void yaffs_invalidate_whole_cache(struct yaffs_obj *in)
-{
-       int i;
-       struct yaffs_dev *dev = in->my_dev;
+                       /* If this was a shrink, then mark the block that the chunk lives on */
+                       if (is_shrink) {
+                               bi = yaffs_get_block_info(in->my_dev,
+                                                         new_chunk_id /
+                                                         in->my_dev->param.
+                                                         chunks_per_block);
+                               bi->has_shrink_hdr = 1;
+                       }
 
-       if (dev->param.n_caches > 0) {
-               /* Invalidate it. */
-               for (i = 0; i < dev->param.n_caches; i++) {
-                       if (dev->cache[i].object == in)
-                               dev->cache[i].object = NULL;
                }
+
+               ret_val = new_chunk_id;
+
        }
+
+       if (buffer)
+               yaffs_release_temp_buffer(dev, buffer, __LINE__);
+
+       return ret_val;
 }
 
 /*--------------------- File read/write ------------------------
@@ -3699,44 +3954,23 @@ int yaffs_flush_file(struct yaffs_obj *in, int update_time, int data_sync)
        if (in->dirty) {
                yaffs_flush_file_cache(in);
                if (data_sync)  /* Only sync data */
-                       ret_val = YAFFS_OK;
-               else {
-                       if (update_time)
-                               yaffs_load_current_time(in, 0, 0);
-
-                       ret_val = (yaffs_update_oh(in, NULL, 0, 0, 0, NULL) >=
-                                  0) ? YAFFS_OK : YAFFS_FAIL;
-               }
-       } else {
-               ret_val = YAFFS_OK;
-       }
-
-       return ret_val;
-
-}
-
-static int yaffs_generic_obj_del(struct yaffs_obj *in)
-{
-
-       /* First off, invalidate the file's data in the cache, without flushing. */
-       yaffs_invalidate_whole_cache(in);
-
-       if (in->my_dev->param.is_yaffs2 && (in->parent != in->my_dev->del_dir)) {
-               /* Move to the unlinked directory so we have a record that it was deleted. */
-               yaffs_change_obj_name(in, in->my_dev->del_dir, _Y("deleted"), 0,
-                                     0);
+                       ret_val = YAFFS_OK;
+               else {
+                       if (update_time)
+                               yaffs_load_current_time(in, 0, 0);
 
+                       ret_val = (yaffs_update_oh(in, NULL, 0, 0, 0, NULL) >=
+                                  0) ? YAFFS_OK : YAFFS_FAIL;
+               }
+       } else {
+               ret_val = YAFFS_OK;
        }
 
-       yaffs_remove_obj_from_dir(in);
-       yaffs_chunk_del(in->my_dev, in->hdr_chunk, 1, __LINE__);
-       in->hdr_chunk = 0;
-
-       yaffs_free_obj(in);
-       return YAFFS_OK;
+       return ret_val;
 
 }
 
+
 /* yaffs_del_file deletes the whole file data
  * and the inode associated with the file.
  * It does not delete the links associated with the file.
@@ -3826,7 +4060,7 @@ static int yaffs_del_dir(struct yaffs_obj *obj)
 static int yaffs_del_symlink(struct yaffs_obj *in)
 {
        if (in->variant.symlink_variant.alias)
-               YFREE(in->variant.symlink_variant.alias);
+               kfree(in->variant.symlink_variant.alias);
        in->variant.symlink_variant.alias = NULL;
 
        return yaffs_generic_obj_del(in);
@@ -3971,6 +4205,82 @@ int yaffs_unlinker(struct yaffs_obj *dir, const YCHAR * name)
        return yaffs_unlink_obj(obj);
 }
 
+/* Note:
+ * If old_name is NULL then we take old_dir as the object to be renamed.
+ */
+int yaffs_rename_obj(struct yaffs_obj *old_dir, const YCHAR * old_name,
+                    struct yaffs_obj *new_dir, const YCHAR * new_name)
+{
+       struct yaffs_obj *obj = NULL;
+       struct yaffs_obj *existing_target = NULL;
+       int force = 0;
+       int result;
+       struct yaffs_dev *dev;
+
+       if (!old_dir || old_dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY)
+               YBUG();
+       if (!new_dir || new_dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY)
+               YBUG();
+
+       dev = old_dir->my_dev;
+
+#ifdef CONFIG_YAFFS_CASE_INSENSITIVE
+       /* Special case for case insemsitive systems.
+        * While look-up is case insensitive, the name isn't.
+        * Therefore we might want to change x.txt to X.txt
+        */
+       if (old_dir == new_dir && 
+               old_name && new_name && 
+               strcmp(old_name, new_name) == 0)
+               force = 1;
+#endif
+
+       if (strnlen(new_name, YAFFS_MAX_NAME_LENGTH + 1) >
+           YAFFS_MAX_NAME_LENGTH)
+               /* ENAMETOOLONG */
+               return YAFFS_FAIL;
+
+       if(old_name)
+               obj = yaffs_find_by_name(old_dir, old_name);
+       else{
+               obj = old_dir;
+               old_dir = obj->parent;
+       }
+
+
+       if (obj && obj->rename_allowed) {
+
+               /* Now do the handling for an existing target, if there is one */
+
+               existing_target = yaffs_find_by_name(new_dir, new_name);
+               if (yaffs_is_non_empty_dir(existing_target)){
+                       return YAFFS_FAIL;      /* ENOTEMPTY */
+               } else if (existing_target && existing_target != obj) {
+                       /* Nuke the target first, using shadowing,
+                        * but only if it isn't the same object.
+                        *
+                        * Note we must disable gc otherwise it can mess up the shadowing.
+                        *
+                        */
+                       dev->gc_disable = 1;
+                       yaffs_change_obj_name(obj, new_dir, new_name, force,
+                                             existing_target->obj_id);
+                       existing_target->is_shadowed = 1;
+                       yaffs_unlink_obj(existing_target);
+                       dev->gc_disable = 0;
+               }
+
+               result = yaffs_change_obj_name(obj, new_dir, new_name, 1, 0);
+
+               yaffs_update_parent(old_dir);
+               if (new_dir != old_dir)
+                       yaffs_update_parent(new_dir);
+
+               return result;
+       }
+       return YAFFS_FAIL;
+}
+
 /*----------------------- Initialisation Scanning ---------------------- */
 
 void yaffs_handle_shadowed_obj(struct yaffs_dev *dev, int obj_id,
@@ -4143,216 +4453,52 @@ static void yaffs_fix_hanging_objs(struct yaffs_dev *dev)
                                        T(YAFFS_TRACE_SCAN,
                                          (TSTR
                                           ("Hanging object %d moved to lost and found"
-                                           TENDSTR), obj->obj_id));
-                                       yaffs_add_obj_to_dir(dev->lost_n_found,
-                                                            obj);
-                               }
-                       }
-               }
-       }
-}
-
-/*
- * Delete directory contents for cleaning up lost and found.
- */
-static void yaffs_del_dir_contents(struct yaffs_obj *dir)
-{
-       struct yaffs_obj *obj;
-       struct list_head *lh;
-       struct list_head *n;
-
-       if (dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY)
-               YBUG();
-
-       list_for_each_safe(lh, n, &dir->variant.dir_variant.children) {
-               if (lh) {
-                       obj = list_entry(lh, struct yaffs_obj, siblings);
-                       if (obj->variant_type == YAFFS_OBJECT_TYPE_DIRECTORY)
-                               yaffs_del_dir_contents(obj);
-
-                       T(YAFFS_TRACE_SCAN,
-                         (TSTR("Deleting lost_found object %d" TENDSTR),
-                          obj->obj_id));
-
-                       /* Need to use UnlinkObject since Delete would not handle
-                        * hardlinked objects correctly.
-                        */
-                       yaffs_unlink_obj(obj);
-               }
-       }
-
-}
-
-static void yaffs_empty_l_n_f(struct yaffs_dev *dev)
-{
-       yaffs_del_dir_contents(dev->lost_n_found);
-}
-
-static void yaffs_check_obj_details_loaded(struct yaffs_obj *in)
-{
-       u8 *chunk_data;
-       struct yaffs_obj_hdr *oh;
-       struct yaffs_dev *dev;
-       struct yaffs_ext_tags tags;
-       int result;
-       int alloc_failed = 0;
-
-       if (!in)
-               return;
-
-       dev = in->my_dev;
-
-       if (in->lazy_loaded && in->hdr_chunk > 0) {
-               in->lazy_loaded = 0;
-               chunk_data = yaffs_get_temp_buffer(dev, __LINE__);
-
-               result =
-                   yaffs_rd_chunk_tags_nand(dev, in->hdr_chunk, chunk_data,
-                                            &tags);
-               oh = (struct yaffs_obj_hdr *)chunk_data;
-
-               in->yst_mode = oh->yst_mode;
-               yaffs_load_attribs(in, oh);
-               yaffs_set_obj_name_from_oh(in, oh);
-
-               if (in->variant_type == YAFFS_OBJECT_TYPE_SYMLINK) {
-                       in->variant.symlink_variant.alias =
-                           yaffs_clone_str(oh->alias);
-                       if (!in->variant.symlink_variant.alias)
-                               alloc_failed = 1;       /* Not returned to caller */
-               }
-
-               yaffs_release_temp_buffer(dev, chunk_data, __LINE__);
-       }
-}
-
-/*------------------------------  Directory Functions ----------------------------- */
-
-/*
- *yaffs_update_parent() handles fixing a directories mtime and ctime when a new
- * link (ie. name) is created or deleted in the directory.
- *
- * ie.
- *   create dir/a : update dir's mtime/ctime
- *   rm dir/a:   update dir's mtime/ctime
- *   modify dir/a: don't update dir's mtimme/ctime
- *
- * This can be handled immediately or defered. Defering helps reduce the number
- * of updates when many files in a directory are changed within a brief period.
- *
- * If the directory updating is defered then yaffs_update_dirty_dirs must be
- * called periodically.
- */
-
-static void yaffs_update_parent(struct yaffs_obj *obj)
-{
-       struct yaffs_dev *dev;
-       if (!obj)
-               return;
-       dev = obj->my_dev;
-       obj->dirty = 1;
-       yaffs_load_current_time(obj, 0, 1);
-       if (dev->param.defered_dir_update) {
-               struct list_head *link = &obj->variant.dir_variant.dirty;
-
-               if (list_empty(link)) {
-                       list_add(link, &dev->dirty_dirs);
-                       T(YAFFS_TRACE_BACKGROUND,
-                         (TSTR("Added object %d to dirty directories" TENDSTR),
-                          obj->obj_id));
-               }
-
-       } else {
-               yaffs_update_oh(obj, NULL, 0, 0, 0, NULL);
-        }
-}
-
-void yaffs_update_dirty_dirs(struct yaffs_dev *dev)
-{
-       struct list_head *link;
-       struct yaffs_obj *obj;
-       struct yaffs_dir_var *d_s;
-       union yaffs_obj_var *o_v;
-
-       T(YAFFS_TRACE_BACKGROUND, (TSTR("Update dirty directories" TENDSTR)));
-
-       while (!list_empty(&dev->dirty_dirs)) {
-               link = dev->dirty_dirs.next;
-               list_del_init(link);
-
-               d_s = list_entry(link, struct yaffs_dir_var, dirty);
-               o_v = list_entry(d_s, union yaffs_obj_var, dir_variant);
-               obj = list_entry(o_v, struct yaffs_obj, variant);
-
-               T(YAFFS_TRACE_BACKGROUND,
-                 (TSTR("Update directory %d" TENDSTR), obj->obj_id));
-
-               if (obj->dirty)
-                       yaffs_update_oh(obj, NULL, 0, 0, 0, NULL);
-       }
-}
-
-static void yaffs_remove_obj_from_dir(struct yaffs_obj *obj)
-{
-       struct yaffs_dev *dev = obj->my_dev;
-       struct yaffs_obj *parent;
-
-       yaffs_verify_obj_in_dir(obj);
-       parent = obj->parent;
-
-       yaffs_verify_dir(parent);
-
-       if (dev && dev->param.remove_obj_fn)
-               dev->param.remove_obj_fn(obj);
-
-       list_del_init(&obj->siblings);
-       obj->parent = NULL;
-
-       yaffs_verify_dir(parent);
+                                           TENDSTR), obj->obj_id));
+                                       yaffs_add_obj_to_dir(dev->lost_n_found,
+                                                            obj);
+                               }
+                       }
+               }
+       }
 }
 
-void yaffs_add_obj_to_dir(struct yaffs_obj *directory, struct yaffs_obj *obj)
+/*
+ * Delete directory contents for cleaning up lost and found.
+ */
+static void yaffs_del_dir_contents(struct yaffs_obj *dir)
 {
-       if (!directory) {
-               T(YAFFS_TRACE_ALWAYS,
-                 (TSTR
-                  ("tragedy: Trying to add an object to a null pointer directory"
-                   TENDSTR)));
-               YBUG();
-               return;
-       }
-       if (directory->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY) {
-               T(YAFFS_TRACE_ALWAYS,
-                 (TSTR
-                  ("tragedy: Trying to add an object to a non-directory"
-                   TENDSTR)));
-               YBUG();
-       }
+       struct yaffs_obj *obj;
+       struct list_head *lh;
+       struct list_head *n;
 
-       if (obj->siblings.prev == NULL) {
-               /* Not initialised */
+       if (dir->variant_type != YAFFS_OBJECT_TYPE_DIRECTORY)
                YBUG();
-       }
-
-       yaffs_verify_dir(directory);
 
-       yaffs_remove_obj_from_dir(obj);
+       list_for_each_safe(lh, n, &dir->variant.dir_variant.children) {
+               if (lh) {
+                       obj = list_entry(lh, struct yaffs_obj, siblings);
+                       if (obj->variant_type == YAFFS_OBJECT_TYPE_DIRECTORY)
+                               yaffs_del_dir_contents(obj);
 
-       /* Now add it */
-       list_add(&obj->siblings, &directory->variant.dir_variant.children);
-       obj->parent = directory;
+                       T(YAFFS_TRACE_SCAN,
+                         (TSTR("Deleting lost_found object %d" TENDSTR),
+                          obj->obj_id));
 
-       if (directory == obj->my_dev->unlinked_dir
-           || directory == obj->my_dev->del_dir) {
-               obj->unlinked = 1;
-               obj->my_dev->n_unlinked_files++;
-               obj->rename_allowed = 0;
+                       /* Need to use UnlinkObject since Delete would not handle
+                        * hardlinked objects correctly.
+                        */
+                       yaffs_unlink_obj(obj);
+               }
        }
 
-       yaffs_verify_dir(directory);
-       yaffs_verify_obj_in_dir(obj);
 }
 
+static void yaffs_empty_l_n_f(struct yaffs_dev *dev)
+{
+       yaffs_del_dir_contents(dev->lost_n_found);
+}
+
+
 struct yaffs_obj *yaffs_find_by_name(struct yaffs_obj *directory,
                                     const YCHAR * name)
 {
@@ -4393,16 +4539,16 @@ struct yaffs_obj *yaffs_find_by_name(struct yaffs_obj *directory,
 
                        /* Special case for lost-n-found */
                        if (l->obj_id == YAFFS_OBJECTID_LOSTNFOUND) {
-                               if (!yaffs_strcmp(name, YAFFS_LOSTNFOUND_NAME))
+                               if (!strcmp(name, YAFFS_LOSTNFOUND_NAME))
                                        return l;
-                       } else if (yaffs_sum_cmp(l->sum, sum)
+                       } else if (l->sum == sum
                                   || l->hdr_chunk <= 0) {
                                /* LostnFound chunk called Objxxx
                                 * Do a real check
                                 */
                                yaffs_get_obj_name(l, buffer,
                                                   YAFFS_MAX_NAME_LENGTH + 1);
-                               if (yaffs_strncmp
+                               if (strncmp
                                    (name, buffer, YAFFS_MAX_NAME_LENGTH) == 0)
                                        return l;
                        }
@@ -4449,7 +4595,7 @@ static void yaffs_fix_null_name(struct yaffs_obj *obj, YCHAR * name,
                                int buffer_size)
 {
        /* Create an object name if we could not find one. */
-       if (yaffs_strnlen(name, YAFFS_MAX_NAME_LENGTH) == 0) {
+       if (strnlen(name, YAFFS_MAX_NAME_LENGTH) == 0) {
                YCHAR local_name[20];
                YCHAR num_string[20];
                YCHAR *x = &num_string[19];
@@ -4461,83 +4607,12 @@ static void yaffs_fix_null_name(struct yaffs_obj *obj, YCHAR * name,
                        v /= 10;
                }
                /* make up a name */
-               yaffs_strcpy(local_name, YAFFS_LOSTNFOUND_PREFIX);
-               yaffs_strcat(local_name, x);
-               yaffs_strncpy(name, local_name, buffer_size - 1);
+               strcpy(local_name, YAFFS_LOSTNFOUND_PREFIX);
+               strcat(local_name, x);
+               strncpy(name, local_name, buffer_size - 1);
        }
 }
 
-static void yaffs_load_name_from_oh(struct yaffs_dev *dev, YCHAR * name,
-                                   const YCHAR * oh_name, int buff_size)
-{
-#ifdef CONFIG_YAFFS_AUTO_UNICODE
-       if (dev->param.auto_unicode) {
-               if (*oh_name) {
-                       /* It is an ASCII name, so do an ASCII to unicode conversion */
-                       const char *ascii_oh_name = (const char *)oh_name;
-                       int n = buff_size - 1;
-                       while (n > 0 && *ascii_oh_name) {
-                               *name = *ascii_oh_name;
-                               name++;
-                               ascii_oh_name++;
-                               n--;
-                       }
-               } else {
-                       yaffs_strncpy(name, oh_name + 1, buff_size - 1);
-                }
-       } else {
-#else
-        {
-#endif
-               yaffs_strncpy(name, oh_name, buff_size - 1);
-        }
-}
-
-static void yaffs_load_oh_from_name(struct yaffs_dev *dev, YCHAR * oh_name,
-                                   const YCHAR * name)
-{
-#ifdef CONFIG_YAFFS_AUTO_UNICODE
-
-       int is_ascii;
-       YCHAR *w;
-
-       if (dev->param.auto_unicode) {
-
-               is_ascii = 1;
-               w = name;
-
-               /* Figure out if the name will fit in ascii character set */
-               while (is_ascii && *w) {
-                       if ((*w) & 0xff00)
-                               is_ascii = 0;
-                       w++;
-               }
-
-               if (is_ascii) {
-                       /* It is an ASCII name, so do a unicode to ascii conversion */
-                       char *ascii_oh_name = (char *)oh_name;
-                       int n = YAFFS_MAX_NAME_LENGTH - 1;
-                       while (n > 0 && *name) {
-                               *ascii_oh_name = *name;
-                               name++;
-                               ascii_oh_name++;
-                               n--;
-                       }
-               } else {
-                       /* It is a unicode name, so save starting at the second YCHAR */
-                       *oh_name = 0;
-                       yaffs_strncpy(oh_name + 1, name,
-                                     YAFFS_MAX_NAME_LENGTH - 2);
-               }
-       } else {
-#else
-        {
-#endif
-               yaffs_strncpy(oh_name, name, YAFFS_MAX_NAME_LENGTH - 1);
-        }
-
-}
-
 int yaffs_get_obj_name(struct yaffs_obj *obj, YCHAR * name, int buffer_size)
 {
        memset(name, 0, buffer_size * sizeof(YCHAR));
@@ -4545,11 +4620,11 @@ int yaffs_get_obj_name(struct yaffs_obj *obj, YCHAR * name, int buffer_size)
        yaffs_check_obj_details_loaded(obj);
 
        if (obj->obj_id == YAFFS_OBJECTID_LOSTNFOUND) {
-               yaffs_strncpy(name, YAFFS_LOSTNFOUND_NAME, buffer_size - 1);
+               strncpy(name, YAFFS_LOSTNFOUND_NAME, buffer_size - 1);
        }
 #ifndef CONFIG_YAFFS_NO_SHORT_NAMES
        else if (obj->short_name[0]) {
-               yaffs_strcpy(name, obj->short_name);
+               strcpy(name, obj->short_name);
        }
 #endif
        else if (obj->hdr_chunk > 0) {
@@ -4573,7 +4648,7 @@ int yaffs_get_obj_name(struct yaffs_obj *obj, YCHAR * name, int buffer_size)
 
        yaffs_fix_null_name(obj, name, buffer_size);
 
-       return yaffs_strnlen(name, YAFFS_MAX_NAME_LENGTH);
+       return strnlen(name, YAFFS_MAX_NAME_LENGTH);
 }
 
 int yaffs_get_obj_length(struct yaffs_obj *obj)
@@ -4586,7 +4661,7 @@ int yaffs_get_obj_length(struct yaffs_obj *obj)
        if (obj->variant_type == YAFFS_OBJECT_TYPE_SYMLINK) {
                if (!obj->variant.symlink_variant.alias)
                        return 0;
-               return yaffs_strnlen(obj->variant.symlink_variant.alias,
+               return strnlen(obj->variant.symlink_variant.alias,
                                     YAFFS_MAX_ALIAS_LENGTH);
        } else {
                /* Only a directory should drop through to here */
@@ -4656,130 +4731,7 @@ YCHAR *yaffs_get_symlink_alias(struct yaffs_obj *obj)
                return yaffs_clone_str(_Y(""));
 }
 
-static int yaffs_do_xattrib_mod(struct yaffs_obj *obj, int set,
-                               const YCHAR * name, const void *value, int size,
-                               int flags)
-{
-       struct yaffs_xattr_mod xmod;
-
-       int result;
-
-       xmod.set = set;
-       xmod.name = name;
-       xmod.data = value;
-       xmod.size = size;
-       xmod.flags = flags;
-       xmod.result = -ENOSPC;
-
-       result = yaffs_update_oh(obj, NULL, 0, 0, 0, &xmod);
-
-       if (result > 0)
-               return xmod.result;
-       else
-               return -ENOSPC;
-}
-
-static int yaffs_apply_xattrib_mod(struct yaffs_obj *obj, char *buffer,
-                                  struct yaffs_xattr_mod *xmod)
-{
-       int retval = 0;
-       int x_offs = sizeof(struct yaffs_obj_hdr);
-       struct yaffs_dev *dev = obj->my_dev;
-       int x_size = dev->data_bytes_per_chunk - sizeof(struct yaffs_obj_hdr);
-
-       char *x_buffer = buffer + x_offs;
-
-       if (xmod->set)
-               retval =
-                   nval_set(x_buffer, x_size, xmod->name, xmod->data,
-                            xmod->size, xmod->flags);
-       else
-               retval = nval_del(x_buffer, x_size, xmod->name);
-
-       obj->has_xattr = nval_hasvalues(x_buffer, x_size);
-       obj->xattr_known = 1;
-
-       xmod->result = retval;
-
-       return retval;
-}
-
-static int yaffs_do_xattrib_fetch(struct yaffs_obj *obj, const YCHAR * name,
-                                 void *value, int size)
-{
-       char *buffer = NULL;
-       int result;
-       struct yaffs_ext_tags tags;
-       struct yaffs_dev *dev = obj->my_dev;
-       int x_offs = sizeof(struct yaffs_obj_hdr);
-       int x_size = dev->data_bytes_per_chunk - sizeof(struct yaffs_obj_hdr);
-
-       char *x_buffer;
-
-       int retval = 0;
-
-       if (obj->hdr_chunk < 1)
-               return -ENODATA;
-
-       /* If we know that the object has no xattribs then don't do all the
-        * reading and parsing.
-        */
-       if (obj->xattr_known && !obj->has_xattr) {
-               if (name)
-                       return -ENODATA;
-               else
-                       return 0;
-       }
-
-       buffer = (char *)yaffs_get_temp_buffer(dev, __LINE__);
-       if (!buffer)
-               return -ENOMEM;
-
-       result =
-           yaffs_rd_chunk_tags_nand(dev, obj->hdr_chunk, (u8 *) buffer, &tags);
-
-       if (result != YAFFS_OK)
-               retval = -ENOENT;
-       else {
-               x_buffer = buffer + x_offs;
-
-               if (!obj->xattr_known) {
-                       obj->has_xattr = nval_hasvalues(x_buffer, x_size);
-                       obj->xattr_known = 1;
-               }
-
-               if (name)
-                       retval = nval_get(x_buffer, x_size, name, value, size);
-               else
-                       retval = nval_list(x_buffer, x_size, value, size);
-       }
-       yaffs_release_temp_buffer(dev, (u8 *) buffer, __LINE__);
-       return retval;
-}
-
-int yaffs_set_xattrib(struct yaffs_obj *obj, const YCHAR * name,
-                     const void *value, int size, int flags)
-{
-       return yaffs_do_xattrib_mod(obj, 1, name, value, size, flags);
-}
-
-int yaffs_remove_xattrib(struct yaffs_obj *obj, const YCHAR * name)
-{
-       return yaffs_do_xattrib_mod(obj, 0, name, NULL, 0, 0);
-}
-
-int yaffs_get_xattrib(struct yaffs_obj *obj, const YCHAR * name, void *value,
-                     int size)
-{
-       return yaffs_do_xattrib_fetch(obj, name, value, size);
-}
-
-int yaffs_list_xattrib(struct yaffs_obj *obj, char *buffer, int size)
-{
-       return yaffs_do_xattrib_fetch(obj, NULL, buffer, size);
-}
-
-/*---------------------------- Initialisation code -------------------------------------- */
+/*--------------------------- Initialisation code -------------------------- */
 
 static int yaffs_check_dev_fns(const struct yaffs_dev *dev)
 {
@@ -5022,7 +4974,7 @@ int yaffs_guts_initialise(struct yaffs_dev *dev)
                if (dev->param.n_caches > YAFFS_MAX_SHORT_OP_CACHES)
                        dev->param.n_caches = YAFFS_MAX_SHORT_OP_CACHES;
 
-               dev->cache = YMALLOC(cache_bytes);
+               dev->cache = kmalloc(cache_bytes, GFP_NOFS);
 
                buf = (u8 *) dev->cache;
 
@@ -5034,7 +4986,7 @@ int yaffs_guts_initialise(struct yaffs_dev *dev)
                        dev->cache[i].last_use = 0;
                        dev->cache[i].dirty = 0;
                        dev->cache[i].data = buf =
-                           YMALLOC_DMA(dev->param.total_bytes_per_chunk);
+                           kmalloc(dev->param.total_bytes_per_chunk, GFP_NOFS);
                }
                if (!buf)
                        init_failed = 1;
@@ -5046,7 +4998,8 @@ int yaffs_guts_initialise(struct yaffs_dev *dev)
 
        if (!init_failed) {
                dev->gc_cleanup_list =
-                   YMALLOC(dev->param.chunks_per_block * sizeof(u32));
+                   kmalloc(dev->param.chunks_per_block * sizeof(u32),
+                                       GFP_NOFS);
                if (!dev->gc_cleanup_list)
                        init_failed = 1;
        }
@@ -5152,18 +5105,18 @@ void yaffs_deinitialise(struct yaffs_dev *dev)
 
                        for (i = 0; i < dev->param.n_caches; i++) {
                                if (dev->cache[i].data)
-                                       YFREE(dev->cache[i].data);
+                                       kfree(dev->cache[i].data);
                                dev->cache[i].data = NULL;
                        }
 
-                       YFREE(dev->cache);
+                       kfree(dev->cache);
                        dev->cache = NULL;
                }
 
-               YFREE(dev->gc_cleanup_list);
+               kfree(dev->gc_cleanup_list);
 
                for (i = 0; i < YAFFS_N_TEMP_BUFFERS; i++)
-                       YFREE(dev->temp_buffer[i].buffer);
+                       kfree(dev->temp_buffer[i].buffer);
 
                dev->is_mounted = 0;