Subversion Repositories or1k

/*

 * JFFS2 -- Journalling Flash File System, Version 2.

 *

 * Copyright (C) 2001 Red Hat, Inc.

 *

 * Created by David Woodhouse <dwmw2@cambridge.redhat.com>

 *

 * The original JFFS, from which the design for JFFS2 was derived,

 * was designed and implemented by Axis Communications AB.

 *

 * The contents of this file are subject to the Red Hat eCos Public

 * License Version 1.1 (the "Licence"); you may not use this file

 * except in compliance with the Licence.  You may obtain a copy of

 * the Licence at http://www.redhat.com/

 *

 * Software distributed under the Licence is distributed on an "AS IS"

 * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied.

 * See the Licence for the specific language governing rights and

 * limitations under the Licence.

 *

 * The Original Code is JFFS2 - Journalling Flash File System, version 2

 *

 * Alternatively, the contents of this file may be used under the

 * terms of the GNU General Public License version 2 (the "GPL"), in

 * which case the provisions of the GPL are applicable instead of the

 * above.  If you wish to allow the use of your version of this file

 * only under the terms of the GPL and not to allow others to use your

 * version of this file under the RHEPL, indicate your decision by

 * deleting the provisions above and replace them with the notice and

 * other provisions required by the GPL.  If you do not delete the

 * provisions above, a recipient may use your version of this file

 * under either the RHEPL or the GPL.

 *

 * $Id: dir.c,v 1.1.1.1 2004-04-15 01:11:03 phoenix Exp $

 *

 */

#include <linux/kernel.h>

#include <linux/slab.h>

#include <linux/fs.h>

#include <linux/mtd/compatmac.h> /* For completion */

#include <linux/jffs2.h>

#include <linux/jffs2_fs_i.h>

#include <linux/jffs2_fs_sb.h>

#include "nodelist.h"

#include <linux/crc32.h>

static int jffs2_readdir (struct file *, void *, filldir_t);

static int jffs2_create (struct inode *,struct dentry *,int);

static struct dentry *jffs2_lookup (struct inode *,struct dentry *);

static int jffs2_link (struct dentry *,struct inode *,struct dentry *);

static int jffs2_unlink (struct inode *,struct dentry *);

static int jffs2_symlink (struct inode *,struct dentry *,const char *);

static int jffs2_mkdir (struct inode *,struct dentry *,int);

static int jffs2_rmdir (struct inode *,struct dentry *);

static int jffs2_mknod (struct inode *,struct dentry *,int,int);

static int jffs2_rename (struct inode *, struct dentry *,

                        struct inode *, struct dentry *);

struct file_operations jffs2_dir_operations =

{

        read:           generic_read_dir,

        readdir:        jffs2_readdir,

        ioctl:          jffs2_ioctl,

        fsync:          jffs2_null_fsync

};

struct inode_operations jffs2_dir_inode_operations =

{

        create:         jffs2_create,

        lookup:         jffs2_lookup,

        link:           jffs2_link,

        unlink:         jffs2_unlink,

        symlink:        jffs2_symlink,

        mkdir:          jffs2_mkdir,

        rmdir:          jffs2_rmdir,

        mknod:          jffs2_mknod,

        rename:         jffs2_rename,

        setattr:        jffs2_setattr,

};

/***********************************************************************/

/* We keep the dirent list sorted in increasing order of name hash,

   and we use the same hash function as the dentries. Makes this

   nice and simple

*/

static struct dentry *jffs2_lookup(struct inode *dir_i, struct dentry *target)

{

        struct jffs2_inode_info *dir_f;

        struct jffs2_sb_info *c;

        struct jffs2_full_dirent *fd = NULL, *fd_list;

        __u32 ino = 0;

        struct inode *inode = NULL;

        D1(printk(KERN_DEBUG "jffs2_lookup()\n"));

        dir_f = JFFS2_INODE_INFO(dir_i);

        c = JFFS2_SB_INFO(dir_i->i_sb);

        down(&dir_f->sem);

        /* NB: The 2.2 backport will need to explicitly check for '.' and '..' here */

        for (fd_list = dir_f->dents; fd_list && fd_list->nhash <= target->d_name.hash; fd_list = fd_list->next) {

                if (fd_list->nhash == target->d_name.hash &&

                    (!fd || fd_list->version > fd->version) &&

                    strlen(fd_list->name) == target->d_name.len &&

                    !strncmp(fd_list->name, target->d_name.name, target->d_name.len)) {

                        fd = fd_list;

                }

        }

        if (fd)

                ino = fd->ino;

        up(&dir_f->sem);

        if (ino) {

                inode = iget(dir_i->i_sb, ino);

                if (!inode) {

                        printk(KERN_WARNING "iget() failed for ino #%u\n", ino);

                        return (ERR_PTR(-EIO));

                }

        }

        d_add(target, inode);

        return NULL;

}

/***********************************************************************/

static int jffs2_readdir(struct file *filp, void *dirent, filldir_t filldir)

{

        struct jffs2_inode_info *f;

        struct jffs2_sb_info *c;

        struct inode *inode = filp->f_dentry->d_inode;

        struct jffs2_full_dirent *fd;

        unsigned long offset, curofs;

        D1(printk(KERN_DEBUG "jffs2_readdir() for dir_i #%lu\n", filp->f_dentry->d_inode->i_ino));

        f = JFFS2_INODE_INFO(inode);

        c = JFFS2_SB_INFO(inode->i_sb);

        offset = filp->f_pos;

        if (offset == 0) {

                D1(printk(KERN_DEBUG "Dirent 0: \".\", ino #%lu\n", inode->i_ino));

                if (filldir(dirent, ".", 1, 0, inode->i_ino, DT_DIR) < 0)

                        goto out;

                offset++;

        }

        if (offset == 1) {

                D1(printk(KERN_DEBUG "Dirent 1: \"..\", ino #%lu\n", filp->f_dentry->d_parent->d_inode->i_ino));

                if (filldir(dirent, "..", 2, 1, filp->f_dentry->d_parent->d_inode->i_ino, DT_DIR) < 0)

                        goto out;

                offset++;

        }

        curofs=1;

        down(&f->sem);

        for (fd = f->dents; fd; fd = fd->next) {

                curofs++;

                /* First loop: curofs = 2; offset = 2 */

                if (curofs < offset) {

                        D2(printk(KERN_DEBUG "Skipping dirent: \"%s\", ino #%u, type %d, because curofs %ld < offset %ld\n",

                                  fd->name, fd->ino, fd->type, curofs, offset));

                        continue;

                }

                if (!fd->ino) {

                        D2(printk(KERN_DEBUG "Skipping deletion dirent \"%s\"\n", fd->name));

                        offset++;

                        continue;

                }

                D2(printk(KERN_DEBUG "Dirent %ld: \"%s\", ino #%u, type %d\n", offset, fd->name, fd->ino, fd->type));

                if (filldir(dirent, fd->name, strlen(fd->name), offset, fd->ino, fd->type) < 0)

                        break;

                offset++;

        }

        up(&f->sem);

 out:

        filp->f_pos = offset;

        return 0;

}

/***********************************************************************/

static int jffs2_create(struct inode *dir_i, struct dentry *dentry, int mode)

{

        struct jffs2_inode_info *f, *dir_f;

        struct jffs2_sb_info *c;

        struct inode *inode;

        struct jffs2_raw_inode *ri;

        struct jffs2_raw_dirent *rd;

        struct jffs2_full_dnode *fn;

        struct jffs2_full_dirent *fd;

        int namelen;

        __u32 alloclen, phys_ofs;

        __u32 writtenlen;

        int ret;

        ri = jffs2_alloc_raw_inode();

        if (!ri)

                return -ENOMEM;

        c = JFFS2_SB_INFO(dir_i->i_sb);

        D1(printk(KERN_DEBUG "jffs2_create()\n"));

        /* Try to reserve enough space for both node and dirent.

         * Just the node will do for now, though

         */

        namelen = dentry->d_name.len;

        ret = jffs2_reserve_space(c, sizeof(*ri), &phys_ofs, &alloclen, ALLOC_NORMAL);

        D1(printk(KERN_DEBUG "jffs2_create(): reserved 0x%x bytes\n", alloclen));

        if (ret) {

                jffs2_free_raw_inode(ri);

                return ret;

        }

        inode = jffs2_new_inode(dir_i, mode, ri);

        if (IS_ERR(inode)) {

                D1(printk(KERN_DEBUG "jffs2_new_inode() failed\n"));

                jffs2_free_raw_inode(ri);

                jffs2_complete_reservation(c);

                return PTR_ERR(inode);

        }

        inode->i_op = &jffs2_file_inode_operations;

        inode->i_fop = &jffs2_file_operations;

        inode->i_mapping->a_ops = &jffs2_file_address_operations;

        inode->i_mapping->nrpages = 0;

        f = JFFS2_INODE_INFO(inode);

        ri->data_crc = 0;

        ri->node_crc = crc32(0, ri, sizeof(*ri)-8);

        fn = jffs2_write_dnode(inode, ri, NULL, 0, phys_ofs, &writtenlen);

        D1(printk(KERN_DEBUG "jffs2_create created file with mode 0x%x\n", ri->mode));

        jffs2_free_raw_inode(ri);

        if (IS_ERR(fn)) {

                D1(printk(KERN_DEBUG "jffs2_write_dnode() failed\n"));

                /* Eeek. Wave bye bye */

                up(&f->sem);

                jffs2_complete_reservation(c);

                jffs2_clear_inode(inode);

                return PTR_ERR(fn);

        }

        /* No data here. Only a metadata node, which will be

           obsoleted by the first data write

        */

        f->metadata = fn;

        /* Work out where to put the dirent node now. */

        writtenlen = PAD(writtenlen);

        phys_ofs += writtenlen;

        alloclen -= writtenlen;

        up(&f->sem);

        if (alloclen < sizeof(*rd)+namelen) {

                /* Not enough space left in this chunk. Get some more */

                jffs2_complete_reservation(c);

                ret = jffs2_reserve_space(c, sizeof(*rd)+namelen, &phys_ofs, &alloclen, ALLOC_NORMAL);

                if (ret) {

                        /* Eep. */

                        D1(printk(KERN_DEBUG "jffs2_reserve_space() for dirent failed\n"));

                        jffs2_clear_inode(inode);

                        return ret;

                }

        }

        rd = jffs2_alloc_raw_dirent();

        if (!rd) {

                /* Argh. Now we treat it like a normal delete */

                jffs2_complete_reservation(c);

                jffs2_clear_inode(inode);

                return -ENOMEM;

        }

        dir_f = JFFS2_INODE_INFO(dir_i);

        down(&dir_f->sem);

        rd->magic = JFFS2_MAGIC_BITMASK;

        rd->nodetype = JFFS2_NODETYPE_DIRENT;

        rd->totlen = sizeof(*rd) + namelen;

        rd->hdr_crc = crc32(0, rd, sizeof(struct jffs2_unknown_node)-4);

        rd->pino = dir_i->i_ino;

        rd->version = ++dir_f->highest_version;

        rd->ino = inode->i_ino;

        rd->mctime = CURRENT_TIME;

        rd->nsize = namelen;

        rd->type = DT_REG;

        rd->node_crc = crc32(0, rd, sizeof(*rd)-8);

        rd->name_crc = crc32(0, dentry->d_name.name, namelen);

        fd = jffs2_write_dirent(dir_i, rd, dentry->d_name.name, namelen, phys_ofs, &writtenlen);

        jffs2_complete_reservation(c);

        if (IS_ERR(fd)) {

                /* dirent failed to write. Delete the inode normally

                   as if it were the final unlink() */

                jffs2_free_raw_dirent(rd);

                up(&dir_f->sem);

                jffs2_clear_inode(inode);

                return PTR_ERR(fd);

        }

        dir_i->i_mtime = dir_i->i_ctime = rd->mctime;

        jffs2_free_raw_dirent(rd);

        /* Link the fd into the inode's list, obsoleting an old

           one if necessary. */

        jffs2_add_fd_to_list(c, fd, &dir_f->dents);

        up(&dir_f->sem);

        d_instantiate(dentry, inode);

        D1(printk(KERN_DEBUG "jffs2_create: Created ino #%lu with mode %o, nlink %d(%d). nrpages %ld\n",

                  inode->i_ino, inode->i_mode, inode->i_nlink, f->inocache->nlink, inode->i_mapping->nrpages));

        return 0;

}

/***********************************************************************/

static int jffs2_do_unlink(struct inode *dir_i, struct dentry *dentry, int rename)

{

        struct jffs2_inode_info *dir_f, *f;

        struct jffs2_sb_info *c;

        struct jffs2_raw_dirent *rd;

        struct jffs2_full_dirent *fd;

        __u32 alloclen, phys_ofs;

        int ret;

        c = JFFS2_SB_INFO(dir_i->i_sb);

        rd = jffs2_alloc_raw_dirent();

        if (!rd)

                return -ENOMEM;

        ret = jffs2_reserve_space(c, sizeof(*rd)+dentry->d_name.len, &phys_ofs, &alloclen, ALLOC_DELETION);

        if (ret) {

                jffs2_free_raw_dirent(rd);

                return ret;

        }

        dir_f = JFFS2_INODE_INFO(dir_i);

        down(&dir_f->sem);

        /* Build a deletion node */

        rd->magic = JFFS2_MAGIC_BITMASK;

        rd->nodetype = JFFS2_NODETYPE_DIRENT;

        rd->totlen = sizeof(*rd) + dentry->d_name.len;

        rd->hdr_crc = crc32(0, rd, sizeof(struct jffs2_unknown_node)-4);

        rd->pino = dir_i->i_ino;

        rd->version = ++dir_f->highest_version;

        rd->ino = 0;

        rd->mctime = CURRENT_TIME;

        rd->nsize = dentry->d_name.len;

        rd->type = DT_UNKNOWN;

        rd->node_crc = crc32(0, rd, sizeof(*rd)-8);

        rd->name_crc = crc32(0, dentry->d_name.name, dentry->d_name.len);

        fd = jffs2_write_dirent(dir_i, rd, dentry->d_name.name, dentry->d_name.len, phys_ofs, NULL);

        jffs2_complete_reservation(c);

        jffs2_free_raw_dirent(rd);

        if (IS_ERR(fd)) {

                up(&dir_f->sem);

                return PTR_ERR(fd);

        }

        /* File it. This will mark the old one obsolete. */

        jffs2_add_fd_to_list(c, fd, &dir_f->dents);

        up(&dir_f->sem);

        if (!rename) {

                f = JFFS2_INODE_INFO(dentry->d_inode);

                down(&f->sem);

                while (f->dents) {

                        /* There can be only deleted ones */

                        fd = f->dents;

                        f->dents = fd->next;

                        if (fd->ino) {

                                printk(KERN_WARNING "Deleting inode #%u with active dentry \"%s\"->ino #%u\n",

                                       f->inocache->ino, fd->name, fd->ino);

                        } else {

                                D1(printk(KERN_DEBUG "Removing deletion dirent for \"%s\" from dir ino #%u\n", fd->name, f->inocache->ino));

                        }

                        jffs2_mark_node_obsolete(c, fd->raw);

                        jffs2_free_full_dirent(fd);

                }

                /* Don't oops on unlinking a bad inode */

                if (f->inocache)

                        f->inocache->nlink--;

                dentry->d_inode->i_nlink--;

                up(&f->sem);

        }

        return 0;

}

static int jffs2_unlink(struct inode *dir_i, struct dentry *dentry)

{

        return jffs2_do_unlink(dir_i, dentry, 0);

}

/***********************************************************************/

static int jffs2_do_link (struct dentry *old_dentry, struct inode *dir_i, struct dentry *dentry, int rename)

{

        struct jffs2_inode_info *dir_f, *f;

        struct jffs2_sb_info *c;

        struct jffs2_raw_dirent *rd;

        struct jffs2_full_dirent *fd;

        __u32 alloclen, phys_ofs;

        int ret;

        c = JFFS2_SB_INFO(dir_i->i_sb);

        rd = jffs2_alloc_raw_dirent();

        if (!rd)

                return -ENOMEM;

        ret = jffs2_reserve_space(c, sizeof(*rd)+dentry->d_name.len, &phys_ofs, &alloclen, ALLOC_NORMAL);

        if (ret) {

                jffs2_free_raw_dirent(rd);

                return ret;

        }

        dir_f = JFFS2_INODE_INFO(dir_i);

        down(&dir_f->sem);

        /* Build a deletion node */

        rd->magic = JFFS2_MAGIC_BITMASK;

        rd->nodetype = JFFS2_NODETYPE_DIRENT;

        rd->totlen = sizeof(*rd) + dentry->d_name.len;

        rd->hdr_crc = crc32(0, rd, sizeof(struct jffs2_unknown_node)-4);

        rd->pino = dir_i->i_ino;

        rd->version = ++dir_f->highest_version;

        rd->ino = old_dentry->d_inode->i_ino;

        rd->mctime = CURRENT_TIME;

        rd->nsize = dentry->d_name.len;

        /* XXX: This is ugly. */

        rd->type = (old_dentry->d_inode->i_mode & S_IFMT) >> 12;

        if (!rd->type) rd->type = DT_REG;

        rd->node_crc = crc32(0, rd, sizeof(*rd)-8);

        rd->name_crc = crc32(0, dentry->d_name.name, dentry->d_name.len);

        fd = jffs2_write_dirent(dir_i, rd, dentry->d_name.name, dentry->d_name.len, phys_ofs, NULL);

        jffs2_complete_reservation(c);

        jffs2_free_raw_dirent(rd);

        if (IS_ERR(fd)) {

                up(&dir_f->sem);

                return PTR_ERR(fd);

        }

        /* File it. This will mark the old one obsolete. */

        jffs2_add_fd_to_list(c, fd, &dir_f->dents);

        up(&dir_f->sem);

        if (!rename) {

                f = JFFS2_INODE_INFO(old_dentry->d_inode);

                down(&f->sem);

                old_dentry->d_inode->i_nlink = ++f->inocache->nlink;

                up(&f->sem);

        }

        return 0;

}

static int jffs2_link (struct dentry *old_dentry, struct inode *dir_i, struct dentry *dentry)

{

        int ret;

        /* Can't link a bad inode. */

        if (!JFFS2_INODE_INFO(old_dentry->d_inode)->inocache)

                return -EIO;

        if (S_ISDIR(old_dentry->d_inode->i_mode))

                return -EPERM;

        ret = jffs2_do_link(old_dentry, dir_i, dentry, 0);

        if (!ret) {

                d_instantiate(dentry, old_dentry->d_inode);

                atomic_inc(&old_dentry->d_inode->i_count);

        }

        return ret;

}

/***********************************************************************/

static int jffs2_symlink (struct inode *dir_i, struct dentry *dentry, const char *target)

{

        struct jffs2_inode_info *f, *dir_f;

        struct jffs2_sb_info *c;

        struct inode *inode;

        struct jffs2_raw_inode *ri;

        struct jffs2_raw_dirent *rd;

        struct jffs2_full_dnode *fn;

        struct jffs2_full_dirent *fd;

        int namelen;

        __u32 alloclen, phys_ofs;

        __u32 writtenlen;

        int ret;

        /* FIXME: If you care. We'd need to use frags for the target

           if it grows much more than this */

        if (strlen(target) > 254)

                return -EINVAL;

        ri = jffs2_alloc_raw_inode();

        if (!ri)

                return -ENOMEM;

        c = JFFS2_SB_INFO(dir_i->i_sb);

        /* Try to reserve enough space for both node and dirent.

         * Just the node will do for now, though

         */

        namelen = dentry->d_name.len;

        ret = jffs2_reserve_space(c, sizeof(*ri) + strlen(target), &phys_ofs, &alloclen, ALLOC_NORMAL);

        if (ret) {

                jffs2_free_raw_inode(ri);

                return ret;

        }

        inode = jffs2_new_inode(dir_i, S_IFLNK | S_IRWXUGO, ri);

        if (IS_ERR(inode)) {

                jffs2_free_raw_inode(ri);

                jffs2_complete_reservation(c);

                return PTR_ERR(inode);

        }

        inode->i_op = &jffs2_symlink_inode_operations;

        f = JFFS2_INODE_INFO(inode);

        inode->i_size = ri->isize = ri->dsize = ri->csize = strlen(target);

        ri->totlen = sizeof(*ri) + ri->dsize;

        ri->hdr_crc = crc32(0, ri, sizeof(struct jffs2_unknown_node)-4);

        ri->compr = JFFS2_COMPR_NONE;

        ri->data_crc = crc32(0, target, strlen(target));

        ri->node_crc = crc32(0, ri, sizeof(*ri)-8);

        fn = jffs2_write_dnode(inode, ri, target, strlen(target), phys_ofs, &writtenlen);

        jffs2_free_raw_inode(ri);

        if (IS_ERR(fn)) {

                /* Eeek. Wave bye bye */

                up(&f->sem);

                jffs2_complete_reservation(c);

                jffs2_clear_inode(inode);

                return PTR_ERR(fn);

        }

        /* No data here. Only a metadata node, which will be

           obsoleted by the first data write

        */

        f->metadata = fn;

        up(&f->sem);

        /* Work out where to put the dirent node now. */

        writtenlen = (writtenlen+3)&~3;

        phys_ofs += writtenlen;

        alloclen -= writtenlen;

        if (alloclen < sizeof(*rd)+namelen) {

                /* Not enough space left in this chunk. Get some more */

                jffs2_complete_reservation(c);

                ret = jffs2_reserve_space(c, sizeof(*rd)+namelen, &phys_ofs, &alloclen, ALLOC_NORMAL);

                if (ret) {

                        /* Eep. */

                        jffs2_clear_inode(inode);

                        return ret;

                }

        }

        rd = jffs2_alloc_raw_dirent();

        if (!rd) {

                /* Argh. Now we treat it like a normal delete */

                jffs2_complete_reservation(c);

                jffs2_clear_inode(inode);

                return -ENOMEM;

        }

        dir_f = JFFS2_INODE_INFO(dir_i);

        down(&dir_f->sem);

        rd->magic = JFFS2_MAGIC_BITMASK;

        rd->nodetype = JFFS2_NODETYPE_DIRENT;

        rd->totlen = sizeof(*rd) + namelen;

        rd->hdr_crc = crc32(0, rd, sizeof(struct jffs2_unknown_node)-4);

        rd->pino = dir_i->i_ino;

        rd->version = ++dir_f->highest_version;

        rd->ino = inode->i_ino;

        rd->mctime = CURRENT_TIME;

        rd->nsize = namelen;

        rd->type = DT_LNK;

        rd->node_crc = crc32(0, rd, sizeof(*rd)-8);

        rd->name_crc = crc32(0, dentry->d_name.name, namelen);

        fd = jffs2_write_dirent(dir_i, rd, dentry->d_name.name, namelen, phys_ofs, &writtenlen);

        jffs2_complete_reservation(c);

        if (IS_ERR(fd)) {

                /* dirent failed to write. Delete the inode normally

                   as if it were the final unlink() */

                jffs2_free_raw_dirent(rd);

                up(&dir_f->sem);

                jffs2_clear_inode(inode);