#include <linux/ceph/ceph_debug.h>

#include <linux/module.h>

#include <linux/fs.h>

#include <linux/slab.h>

#include <linux/string.h>

#include <linux/uaccess.h>

#include <linux/kernel.h>

#include <linux/writeback.h>

#include <linux/vmalloc.h>

#include <linux/xattr.h>

#include <linux/posix_acl.h>

#include <linux/random.h>

#include <linux/sort.h>

#include "super.h"

#include "mds_client.h"

#include "cache.h"

#include <linux/ceph/decode.h>

/*

* Ceph inode operations

*

* Implement basic inode helpers (get, alloc) and inode ops (getattr,

* setattr, etc.), xattr helpers, and helpers for assimilating

* metadata returned by the MDS into our cache.

*

* Also define helpers for doing asynchronous writeback, invalidation,

* and truncation for the benefit of those who can't afford to block

* (typically because they are in the message handler path).

*/

static const struct inode_operations ceph_symlink_iops;

static void ceph_invalidate_work(struct work_struct *work);

static void ceph_writeback_work(struct work_struct *work);

static void ceph_vmtruncate_work(struct work_struct *work);

/*

* find or create an inode, given the ceph ino number

*/

static int ceph_set_ino_cb(struct inode *inode, void *data)

{

ceph_inode(inode)->i_vino = *(struct ceph_vino *)data;

inode->i_ino = ceph_vino_to_ino(*(struct ceph_vino *)data);

return 0;

}

struct inode *ceph_get_inode(struct super_block *sb, struct ceph_vino vino)

{

struct inode *inode;

ino_t t = ceph_vino_to_ino(vino);

inode = iget5_locked(sb, t, ceph_ino_compare, ceph_set_ino_cb, &vino);

if (inode == NULL)

return ERR_PTR(-ENOMEM);

if (inode->i_state & I_NEW) {

dout("get_inode created new inode %p %llx.%llx ino %llx\n",

inode, ceph_vinop(inode), (u64)inode->i_ino);

unlock_new_inode(inode);

}

dout("get_inode on %lu=%llx.%llx got %p\n", inode->i_ino, vino.ino,

vino.snap, inode);

return inode;

}

/*

* get/constuct snapdir inode for a given directory

*/

struct inode *ceph_get_snapdir(struct inode *parent)

{

struct ceph_vino vino = {

.ino = ceph_ino(parent),

.snap = CEPH_SNAPDIR,

};

struct inode *inode = ceph_get_inode(parent->i_sb, vino);

struct ceph_inode_info *ci = ceph_inode(inode);

BUG_ON(!S_ISDIR(parent->i_mode));

if (IS_ERR(inode))

return inode;

inode->i_mode = parent->i_mode;

inode->i_uid = parent->i_uid;

inode->i_gid = parent->i_gid;

inode->i_op = &ceph_snapdir_iops;

inode->i_fop = &ceph_snapdir_fops;

ci->i_snap_caps = CEPH_CAP_PIN; /* so we can open */

ci->i_rbytes = 0;

return inode;

}

const struct inode_operations ceph_file_iops = {

.permission = ceph_permission,

.setattr = ceph_setattr,

.getattr = ceph_getattr,

.listxattr = ceph_listxattr,

.get_acl = ceph_get_acl,

.set_acl = ceph_set_acl,

};

/*

* We use a 'frag tree' to keep track of the MDS's directory fragments

* for a given inode (usually there is just a single fragment). We

* need to know when a child frag is delegated to a new MDS, or when

* it is flagged as replicated, so we can direct our requests

* accordingly.

*/

/*

* find/create a frag in the tree

*/

static struct ceph_inode_frag *__get_or_create_frag(struct ceph_inode_info *ci,

u32 f)

{

struct rb_node **p;

struct rb_node *parent = NULL;

struct ceph_inode_frag *frag;

int c;

p = &ci->i_fragtree.rb_node;

while (*p) {

parent = *p;

frag = rb_entry(parent, struct ceph_inode_frag, node);

c = ceph_frag_compare(f, frag->frag);

if (c < 0)

p = &(*p)->rb_left;

else if (c > 0)

p = &(*p)->rb_right;

else

return frag;

}

frag = kmalloc(sizeof(*frag), GFP_NOFS);

if (!frag) {

pr_err("__get_or_create_frag ENOMEM on %p %llx.%llx "

"frag %x\n", &ci->vfs_inode,

ceph_vinop(&ci->vfs_inode), f);

return ERR_PTR(-ENOMEM);

}

frag->frag = f;

frag->split_by = 0;

frag->mds = -1;

frag->ndist = 0;

rb_link_node(&frag->node, parent, p);

rb_insert_color(&frag->node, &ci->i_fragtree);

dout("get_or_create_frag added %llx.%llx frag %x\n",

ceph_vinop(&ci->vfs_inode), f);

return frag;

}

/*

* find a specific frag @f

*/

struct ceph_inode_frag *__ceph_find_frag(struct ceph_inode_info *ci, u32 f)

{

struct rb_node *n = ci->i_fragtree.rb_node;

while (n) {

struct ceph_inode_frag *frag =

rb_entry(n, struct ceph_inode_frag, node);

int c = ceph_frag_compare(f, frag->frag);

if (c < 0)

n = n->rb_left;

else if (c > 0)

n = n->rb_right;

else

return frag;

}

return NULL;

}

/*

* Choose frag containing the given value @v. If @pfrag is

* specified, copy the frag delegation info to the caller if

* it is present.

*/

static u32 __ceph_choose_frag(struct ceph_inode_info *ci, u32 v,

struct ceph_inode_frag *pfrag, int *found)

{

u32 t = ceph_frag_make(0, 0);

struct ceph_inode_frag *frag;

unsigned nway, i;

u32 n;

if (found)

*found = 0;

while (1) {

WARN_ON(!ceph_frag_contains_value(t, v));

frag = __ceph_find_frag(ci, t);

if (!frag)

break; /* t is a leaf */

if (frag->split_by == 0) {

if (pfrag)

memcpy(pfrag, frag, sizeof(*pfrag));

if (found)

*found = 1;

break;

}

/* choose child */

nway = 1 << frag->split_by;

dout("choose_frag(%x) %x splits by %d (%d ways)\n", v, t,

frag->split_by, nway);

for (i = 0; i < nway; i++) {

n = ceph_frag_make_child(t, frag->split_by, i);

if (ceph_frag_contains_value(n, v)) {

t = n;

break;

}

}

BUG_ON(i == nway);

}

dout("choose_frag(%x) = %x\n", v, t);

return t;

}

u32 ceph_choose_frag(struct ceph_inode_info *ci, u32 v,

struct ceph_inode_frag *pfrag, int *found)

{

u32 ret;

mutex_lock(&ci->i_fragtree_mutex);

ret = __ceph_choose_frag(ci, v, pfrag, found);

mutex_unlock(&ci->i_fragtree_mutex);

return ret;

}

/*

* Process dirfrag (delegation) info from the mds. Include leaf

* fragment in tree ONLY if ndist > 0. Otherwise, only

* branches/splits are included in i_fragtree)

*/

static int ceph_fill_dirfrag(struct inode *inode,

struct ceph_mds_reply_dirfrag *dirinfo)

{

struct ceph_inode_info *ci = ceph_inode(inode);

struct ceph_inode_frag *frag;

u32 id = le32_to_cpu(dirinfo->frag);

int mds = le32_to_cpu(dirinfo->auth);

int ndist = le32_to_cpu(dirinfo->ndist);

int diri_auth = -1;

int i;

int err = 0;

spin_lock(&ci->i_ceph_lock);

if (ci->i_auth_cap)

diri_auth = ci->i_auth_cap->mds;

spin_unlock(&ci->i_ceph_lock);

if (mds == -1) /* CDIR_AUTH_PARENT */

mds = diri_auth;

mutex_lock(&ci->i_fragtree_mutex);

if (ndist == 0 && mds == diri_auth) {

/* no delegation info needed. */

frag = __ceph_find_frag(ci, id);

if (!frag)

goto out;

if (frag->split_by == 0) {

/* tree leaf, remove */

dout("fill_dirfrag removed %llx.%llx frag %x"

" (no ref)\n", ceph_vinop(inode), id);

rb_erase(&frag->node, &ci->i_fragtree);

kfree(frag);

} else {

/* tree branch, keep and clear */

dout("fill_dirfrag cleared %llx.%llx frag %x"

" referral\n", ceph_vinop(inode), id);

frag->mds = -1;

frag->ndist = 0;

}

goto out;

}

/* find/add this frag to store mds delegation info */

frag = __get_or_create_frag(ci, id);

if (IS_ERR(frag)) {

/* this is not the end of the world; we can continue

with bad/inaccurate delegation info */

pr_err("fill_dirfrag ENOMEM on mds ref %llx.%llx fg %x\n",

ceph_vinop(inode), le32_to_cpu(dirinfo->frag));

err = -ENOMEM;

goto out;

}

frag->mds = mds;

frag->ndist = min_t(u32, ndist, CEPH_MAX_DIRFRAG_REP);

for (i = 0; i < frag->ndist; i++)

frag->dist[i] = le32_to_cpu(dirinfo->dist[i]);

dout("fill_dirfrag %llx.%llx frag %x ndist=%d\n",

ceph_vinop(inode), frag->frag, frag->ndist);

out:

mutex_unlock(&ci->i_fragtree_mutex);

return err;

}

static int frag_tree_split_cmp(const void *l, const void *r)

{

struct ceph_frag_tree_split *ls = (struct ceph_frag_tree_split*)l;

struct ceph_frag_tree_split *rs = (struct ceph_frag_tree_split*)r;

return ceph_frag_compare(le32_to_cpu(ls->frag),

le32_to_cpu(rs->frag));

}

static bool is_frag_child(u32 f, struct ceph_inode_frag *frag)

{

if (!frag)

return f == ceph_frag_make(0, 0);

if (ceph_frag_bits(f) != ceph_frag_bits(frag->frag) + frag->split_by)

return false;

return ceph_frag_contains_value(frag->frag, ceph_frag_value(f));

}

static int ceph_fill_fragtree(struct inode *inode,

struct ceph_frag_tree_head *fragtree,

struct ceph_mds_reply_dirfrag *dirinfo)

{

struct ceph_inode_info *ci = ceph_inode(inode);

struct ceph_inode_frag *frag, *prev_frag = NULL;

struct rb_node *rb_node;

unsigned i, split_by, nsplits;

u32 id;

bool update = false;

mutex_lock(&ci->i_fragtree_mutex);

nsplits = le32_to_cpu(fragtree->nsplits);

if (nsplits != ci->i_fragtree_nsplits) {

update = true;

} else if (nsplits) {

i = prandom_u32() % nsplits;

id = le32_to_cpu(fragtree->splits[i].frag);

if (!__ceph_find_frag(ci, id))

update = true;

} else if (!RB_EMPTY_ROOT(&ci->i_fragtree)) {

rb_node = rb_first(&ci->i_fragtree);

frag = rb_entry(rb_node, struct ceph_inode_frag, node);

if (frag->frag != ceph_frag_make(0, 0) || rb_next(rb_node))

update = true;

}

if (!update && dirinfo) {

id = le32_to_cpu(dirinfo->frag);

if (id != __ceph_choose_frag(ci, id, NULL, NULL))

update = true;

}

if (!update)

goto out_unlock;

if (nsplits > 1) {

sort(fragtree->splits, nsplits, sizeof(fragtree->splits[0]),

frag_tree_split_cmp, NULL);

}

dout("fill_fragtree %llx.%llx\n", ceph_vinop(inode));

rb_node = rb_first(&ci->i_fragtree);

for (i = 0; i < nsplits; i++) {

id = le32_to_cpu(fragtree->splits[i].frag);

split_by = le32_to_cpu(fragtree->splits[i].by);

if (split_by == 0 || ceph_frag_bits(id) + split_by > 24) {

pr_err("fill_fragtree %llx.%llx invalid split %d/%u, "

"frag %x split by %d\n", ceph_vinop(inode),

i, nsplits, id, split_by);

continue;

}

frag = NULL;

while (rb_node) {

frag = rb_entry(rb_node, struct ceph_inode_frag, node);

if (ceph_frag_compare(frag->frag, id) >= 0) {

if (frag->frag != id)

frag = NULL;

else

rb_node = rb_next(rb_node);

break;

}

rb_node = rb_next(rb_node);

/* delete stale split/leaf node */

if (frag->split_by > 0 ||

!is_frag_child(frag->frag, prev_frag)) {

rb_erase(&frag->node, &ci->i_fragtree);

if (frag->split_by > 0)

ci->i_fragtree_nsplits--;

kfree(frag);

}

frag = NULL;

}

if (!frag) {

frag = __get_or_create_frag(ci, id);

if (IS_ERR(frag))

continue;

}

if (frag->split_by == 0)

ci->i_fragtree_nsplits++;

frag->split_by = split_by;

dout(" frag %x split by %d\n", frag->frag, frag->split_by);

prev_frag = frag;

}

while (rb_node) {

frag = rb_entry(rb_node, struct ceph_inode_frag, node);

rb_node = rb_next(rb_node);

/* delete stale split/leaf node */

if (frag->split_by > 0 ||

!is_frag_child(frag->frag, prev_frag)) {

rb_erase(&frag->node, &ci->i_fragtree);

if (frag->split_by > 0)

ci->i_fragtree_nsplits--;

kfree(frag);

}

}

out_unlock:

mutex_unlock(&ci->i_fragtree_mutex);

return 0;

}

/*

* initialize a newly allocated inode.

*/

struct inode *ceph_alloc_inode(struct super_block *sb)

{

struct ceph_inode_info *ci;

int i;

ci = kmem_cache_alloc(ceph_inode_cachep, GFP_NOFS);

if (!ci)

return NULL;

dout("alloc_inode %p\n", &ci->vfs_inode);

spin_lock_init(&ci->i_ceph_lock);

ci->i_version = 0;

ci->i_inline_version = 0;

ci->i_time_warp_seq = 0;

ci->i_ceph_flags = 0;

atomic64_set(&ci->i_ordered_count, 1);

atomic64_set(&ci->i_release_count, 1);

atomic64_set(&ci->i_complete_seq[0], 0);

atomic64_set(&ci->i_complete_seq[1], 0);

ci->i_symlink = NULL;

memset(&ci->i_dir_layout, 0, sizeof(ci->i_dir_layout));

RCU_INIT_POINTER(ci->i_layout.pool_ns, NULL);

ci->i_fragtree = RB_ROOT;

mutex_init(&ci->i_fragtree_mutex);

ci->i_xattrs.blob = NULL;

ci->i_xattrs.prealloc_blob = NULL;

ci->i_xattrs.dirty = false;

ci->i_xattrs.index = RB_ROOT;

ci->i_xattrs.count = 0;

ci->i_xattrs.names_size = 0;

ci->i_xattrs.vals_size = 0;

ci->i_xattrs.version = 0;

ci->i_xattrs.index_version = 0;

ci->i_caps = RB_ROOT;

ci->i_auth_cap = NULL;

ci->i_dirty_caps = 0;

ci->i_flushing_caps = 0;

INIT_LIST_HEAD(&ci->i_dirty_item);

INIT_LIST_HEAD(&ci->i_flushing_item);

ci->i_prealloc_cap_flush = NULL;

INIT_LIST_HEAD(&ci->i_cap_flush_list);

init_waitqueue_head(&ci->i_cap_wq);

ci->i_hold_caps_min = 0;

ci->i_hold_caps_max = 0;

INIT_LIST_HEAD(&ci->i_cap_delay_list);

INIT_LIST_HEAD(&ci->i_cap_snaps);

ci->i_head_snapc = NULL;

ci->i_snap_caps = 0;

for (i = 0; i < CEPH_FILE_MODE_BITS; i++)

ci->i_nr_by_mode[i] = 0;

mutex_init(&ci->i_truncate_mutex);

ci->i_truncate_seq = 0;

ci->i_truncate_size = 0;

ci->i_truncate_pending = 0;

ci->i_max_size = 0;

ci->i_reported_size = 0;

ci->i_wanted_max_size = 0;

ci->i_requested_max_size = 0;

ci->i_pin_ref = 0;

ci->i_rd_ref = 0;

ci->i_rdcache_ref = 0;

ci->i_wr_ref = 0;

ci->i_wb_ref = 0;

ci->i_wrbuffer_ref = 0;

ci->i_wrbuffer_ref_head = 0;

ci->i_shared_gen = 0;

ci->i_rdcache_gen = 0;

ci->i_rdcache_revoking = 0;

INIT_LIST_HEAD(&ci->i_unsafe_dirops);

INIT_LIST_HEAD(&ci->i_unsafe_iops);

spin_lock_init(&ci->i_unsafe_lock);

ci->i_snap_realm = NULL;

INIT_LIST_HEAD(&ci->i_snap_realm_item);

INIT_LIST_HEAD(&ci->i_snap_flush_item);

INIT_WORK(&ci->i_wb_work, ceph_writeback_work);

INIT_WORK(&ci->i_pg_inv_work, ceph_invalidate_work);

INIT_WORK(&ci->i_vmtruncate_work, ceph_vmtruncate_work);

ceph_fscache_inode_init(ci);

return &ci->vfs_inode;

}

static void ceph_i_callback(struct rcu_head *head)

{

struct inode *inode = container_of(head, struct inode, i_rcu);

struct ceph_inode_info *ci = ceph_inode(inode);

kmem_cache_free(ceph_inode_cachep, ci);

}

void ceph_destroy_inode(struct inode *inode)

{

struct ceph_inode_info *ci = ceph_inode(inode);

struct ceph_inode_frag *frag;

struct rb_node *n;

dout("destroy_inode %p ino %llx.%llx\n", inode, ceph_vinop(inode));

ceph_fscache_unregister_inode_cookie(ci);

ceph_queue_caps_release(inode);

/*

* we may still have a snap_realm reference if there are stray

* caps in i_snap_caps.

*/

if (ci->i_snap_realm) {

struct ceph_mds_client *mdsc =

ceph_sb_to_client(ci->vfs_inode.i_sb)->mdsc;

struct ceph_snap_realm *realm = ci->i_snap_realm;

dout(" dropping residual ref to snap realm %p\n", realm);

spin_lock(&realm->inodes_with_caps_lock);

list_del_init(&ci->i_snap_realm_item);

spin_unlock(&realm->inodes_with_caps_lock);

ceph_put_snap_realm(mdsc, realm);

}

kfree(ci->i_symlink);

while ((n = rb_first(&ci->i_fragtree)) != NULL) {

frag = rb_entry(n, struct ceph_inode_frag, node);

rb_erase(n, &ci->i_fragtree);

kfree(frag);

}

ci->i_fragtree_nsplits = 0;

__ceph_destroy_xattrs(ci);

if (ci->i_xattrs.blob)

ceph_buffer_put(ci->i_xattrs.blob);

if (ci->i_xattrs.prealloc_blob)

ceph_buffer_put(ci->i_xattrs.prealloc_blob);

ceph_put_string(rcu_dereference_raw(ci->i_layout.pool_ns));

call_rcu(&inode->i_rcu, ceph_i_callback);

}

int ceph_drop_inode(struct inode *inode)

{

/*

* Positve dentry and corresponding inode are always accompanied

* in MDS reply. So no need to keep inode in the cache after

* dropping all its aliases.

*/

return 1;

}

static inline blkcnt_t calc_inode_blocks(u64 size)

{

return (size + (1<<9) - 1) >> 9;

}

/*

* Helpers to fill in size, ctime, mtime, and atime. We have to be

* careful because either the client or MDS may have more up to date

* info, depending on which capabilities are held, and whether

* time_warp_seq or truncate_seq have increased. (Ordinarily, mtime

* and size are monotonically increasing, except when utimes() or

* truncate() increments the corresponding _seq values.)

*/

int ceph_fill_file_size(struct inode *inode, int issued,

u32 truncate_seq, u64 truncate_size, u64 size)

{

struct ceph_inode_info *ci = ceph_inode(inode);

int queue_trunc = 0;

if (ceph_seq_cmp(truncate_seq, ci->i_truncate_seq) > 0 ||

(truncate_seq == ci->i_truncate_seq && size > inode->i_size)) {

dout("size %lld -> %llu\n", inode->i_size, size);

if (size > 0 && S_ISDIR(inode->i_mode)) {

pr_err("fill_file_size non-zero size for directory\n");

size = 0;

}

i_size_write(inode, size);

inode->i_blocks = calc_inode_blocks(size);

ci->i_reported_size = size;

if (truncate_seq != ci->i_truncate_seq) {

dout("truncate_seq %u -> %u\n",

ci->i_truncate_seq, truncate_seq);

ci->i_truncate_seq = truncate_seq;

/* the MDS should have revoked these caps */

WARN_ON_ONCE(issued & (CEPH_CAP_FILE_EXCL |

CEPH_CAP_FILE_RD |

CEPH_CAP_FILE_WR |

CEPH_CAP_FILE_LAZYIO));

/*

* If we hold relevant caps, or in the case where we're

* not the only client referencing this file and we

* don't hold those caps, then we need to check whether

* the file is either opened or mmaped

*/

if ((issued & (CEPH_CAP_FILE_CACHE|

CEPH_CAP_FILE_BUFFER)) ||

mapping_mapped(inode->i_mapping) ||

__ceph_caps_file_wanted(ci)) {

ci->i_truncate_pending++;

queue_trunc = 1;

}

}

}

if (ceph_seq_cmp(truncate_seq, ci->i_truncate_seq) >= 0 &&

ci->i_truncate_size != truncate_size) {

dout("truncate_size %lld -> %llu\n", ci->i_truncate_size,

truncate_size);

ci->i_truncate_size = truncate_size;

}

if (queue_trunc)

ceph_fscache_invalidate(inode);

return queue_trunc;

}

void ceph_fill_file_time(struct inode *inode, int issued,

u64 time_warp_seq, struct timespec *ctime,

struct timespec *mtime, struct timespec *atime)

{

struct ceph_inode_info *ci = ceph_inode(inode);

int warn = 0;

if (issued & (CEPH_CAP_FILE_EXCL|

CEPH_CAP_FILE_WR|

CEPH_CAP_FILE_BUFFER|

CEPH_CAP_AUTH_EXCL|

CEPH_CAP_XATTR_EXCL)) {

if (timespec_compare(ctime, &inode->i_ctime) > 0) {

dout("ctime %ld.%09ld -> %ld.%09ld inc w/ cap\n",

inode->i_ctime.tv_sec, inode->i_ctime.tv_nsec,

ctime->tv_sec, ctime->tv_nsec);

inode->i_ctime = *ctime;

}

if (ceph_seq_cmp(time_warp_seq, ci->i_time_warp_seq) > 0) {

/* the MDS did a utimes() */

dout("mtime %ld.%09ld -> %ld.%09ld "

"tw %d -> %d\n",

inode->i_mtime.tv_sec, inode->i_mtime.tv_nsec,

mtime->tv_sec, mtime->tv_nsec,

ci->i_time_warp_seq, (int)time_warp_seq);

inode->i_mtime = *mtime;

inode->i_atime = *atime;

ci->i_time_warp_seq = time_warp_seq;

} else if (time_warp_seq == ci->i_time_warp_seq) {

/* nobody did utimes(); take the max */

if (timespec_compare(mtime, &inode->i_mtime) > 0) {

dout("mtime %ld.%09ld -> %ld.%09ld inc\n",

inode->i_mtime.tv_sec,

inode->i_mtime.tv_nsec,

mtime->tv_sec, mtime->tv_nsec);

inode->i_mtime = *mtime;

}

if (timespec_compare(atime, &inode->i_atime) > 0) {

dout("atime %ld.%09ld -> %ld.%09ld inc\n",

inode->i_atime.tv_sec,

inode->i_atime.tv_nsec,

atime->tv_sec, atime->tv_nsec);

inode->i_atime = *atime;

}

} else if (issued & CEPH_CAP_FILE_EXCL) {

/* we did a utimes(); ignore mds values */

} else {

warn = 1;

}

} else {

/* we have no write|excl caps; whatever the MDS says is true */

if (ceph_seq_cmp(time_warp_seq, ci->i_time_warp_seq) >= 0) {

inode->i_ctime = *ctime;

inode->i_mtime = *mtime;

inode->i_atime = *atime;

ci->i_time_warp_seq = time_warp_seq;

} else {

warn = 1;

}

}

if (warn) /* time_warp_seq shouldn't go backwards */

dout("%p mds time_warp_seq %llu < %u\n",

inode, time_warp_seq, ci->i_time_warp_seq);

}

/*

* Populate an inode based on info from mds. May be called on new or

* existing inodes.

*/

static int fill_inode(struct inode *inode, struct page *locked_page,

struct ceph_mds_reply_info_in *iinfo,

struct ceph_mds_reply_dirfrag *dirinfo,

struct ceph_mds_session *session,

unsigned long ttl_from, int cap_fmode,

struct ceph_cap_reservation *caps_reservation)

{

struct ceph_mds_client *mdsc = ceph_inode_to_client(inode)->mdsc;

struct ceph_mds_reply_inode *info = iinfo->in;

struct ceph_inode_info *ci = ceph_inode(inode);

int issued = 0, implemented, new_issued;

struct timespec mtime, atime, ctime;

struct ceph_buffer *xattr_blob = NULL;

struct ceph_string *pool_ns = NULL;

struct ceph_cap *new_cap = NULL;

int err = 0;

bool wake = false;

bool queue_trunc = false;

bool new_version = false;

bool fill_inline = false;

dout("fill_inode %p ino %llx.%llx v %llu had %llu\n",

inode, ceph_vinop(inode), le64_to_cpu(info->version),

ci->i_version);

/* prealloc new cap struct */

if (info->cap.caps && ceph_snap(inode) == CEPH_NOSNAP)

new_cap = ceph_get_cap(mdsc, caps_reservation);

/*

* prealloc xattr data, if it looks like we'll need it. only

* if len > 4 (meaning there are actually xattrs; the first 4

* bytes are the xattr count).

*/

if (iinfo->xattr_len > 4) {

xattr_blob = ceph_buffer_new(iinfo->xattr_len, GFP_NOFS);

if (!xattr_blob)

pr_err("fill_inode ENOMEM xattr blob %d bytes\n",

iinfo->xattr_len);

}

if (iinfo->pool_ns_len > 0)

pool_ns = ceph_find_or_create_string(iinfo->pool_ns_data,

iinfo->pool_ns_len);

spin_lock(&ci->i_ceph_lock);

/*

* provided version will be odd if inode value is projected,

* even if stable. skip the update if we have newer stable

* info (ours>=theirs, e.g. due to racing mds replies), unless

* we are getting projected (unstable) info (in which case the

* version is odd, and we want ours>theirs).

* us them

* 2 2 skip

* 3 2 skip

* 3 3 update

*/

if (ci->i_version == 0 ||

((info->cap.flags & CEPH_CAP_FLAG_AUTH) &&

le64_to_cpu(info->version) > (ci->i_version & ~1)))

new_version = true;

issued = __ceph_caps_issued(ci, &implemented);

issued |= implemented | __ceph_caps_dirty(ci);

new_issued = ~issued & le32_to_cpu(info->cap.caps);

/* update inode */

ci->i_version = le64_to_cpu(info->version);

inode->i_version++;

inode->i_rdev = le32_to_cpu(info->rdev);

inode->i_blkbits = fls(le32_to_cpu(info->layout.fl_stripe_unit)) - 1;

if ((new_version || (new_issued & CEPH_CAP_AUTH_SHARED)) &&

(issued & CEPH_CAP_AUTH_EXCL) == 0) {

inode->i_mode = le32_to_cpu(info->mode);

inode->i_uid = make_kuid(&init_user_ns, le32_to_cpu(info->uid));

inode->i_gid = make_kgid(&init_user_ns, le32_to_cpu(info->gid));

dout("%p mode 0%o uid.gid %d.%d\n", inode, inode->i_mode,

from_kuid(&init_user_ns, inode->i_uid),

from_kgid(&init_user_ns, inode->i_gid));

}

if ((new_version || (new_issued & CEPH_CAP_LINK_SHARED)) &&

(issued & CEPH_CAP_LINK_EXCL) == 0)

set_nlink(inode, le32_to_cpu(info->nlink));

if (new_version || (new_issued & CEPH_CAP_ANY_RD)) {

/* be careful with mtime, atime, size */

ceph_decode_timespec(&atime, &info->atime);

ceph_decode_timespec(&mtime, &info->mtime);

ceph_decode_timespec(&ctime, &info->ctime);

ceph_fill_file_time(inode, issued,

le32_to_cpu(info->time_warp_seq),

&ctime, &mtime, &atime);

}

if (new_version ||

(new_issued & (CEPH_CAP_ANY_FILE_RD | CEPH_CAP_ANY_FILE_WR))) {

s64 old_pool = ci->i_layout.pool_id;

struct ceph_string *old_ns;

ceph_file_layout_from_legacy(&ci->i_layout, &info->layout);

old_ns = rcu_dereference_protected(ci->i_layout.pool_ns,

lockdep_is_held(&ci->i_ceph_lock));

rcu_assign_pointer(ci->i_layout.pool_ns, pool_ns);

if (ci->i_layout.pool_id != old_pool || pool_ns != old_ns)

ci->i_ceph_flags &= ~CEPH_I_POOL_PERM;

pool_ns = old_ns;

queue_trunc = ceph_fill_file_size(inode, issued,

le32_to_cpu(info->truncate_seq),

le64_to_cpu(info->truncate_size),

le64_to_cpu(info->size));

/* only update max_size on auth cap */

if ((info->cap.flags & CEPH_CAP_FLAG_AUTH) &&

ci->i_max_size != le64_to_cpu(info->max_size)) {

dout("max_size %lld -> %llu\n", ci->i_max_size,

le64_to_cpu(info->max_size));

ci->i_max_size = le64_to_cpu(info->max_size);

}

}

/* xattrs */

/* note that if i_xattrs.len <= 4, i_xattrs.data will still be NULL. */

if ((ci->i_xattrs.version == 0 || !(issued & CEPH_CAP_XATTR_EXCL)) &&

le64_to_cpu(info->xattr_version) > ci->i_xattrs.version) {

if (ci->i_xattrs.blob)

ceph_buffer_put(ci->i_xattrs.blob);

ci->i_xattrs.blob = xattr_blob;

if (xattr_blob)

memcpy(ci->i_xattrs.blob->vec.iov_base,

iinfo->xattr_data, iinfo->xattr_len);

ci->i_xattrs.version = le64_to_cpu(info->xattr_version);

ceph_forget_all_cached_acls(inode);

xattr_blob = NULL;

}

inode->i_mapping->a_ops = &ceph_aops;

switch (inode->i_mode & S_IFMT) {

case S_IFIFO:

case S_IFBLK:

case S_IFCHR:

case S_IFSOCK:

init_special_inode(inode, inode->i_mode, inode->i_rdev);

inode->i_op = &ceph_file_iops;

break;

case S_IFREG:

inode->i_op = &ceph_file_iops;

inode->i_fop = &ceph_file_fops;

break;

case S_IFLNK:

inode->i_op = &ceph_symlink_iops;

if (!ci->i_symlink) {

u32 symlen = iinfo->symlink_len;

char *sym;

spin_unlock(&ci->i_ceph_lock);

if (symlen != i_size_read(inode)) {

pr_err("fill_inode %llx.%llx BAD symlink "

"size %lld\n", ceph_vinop(inode),

i_size_read(inode));

i_size_write(inode, symlen);

inode->i_blocks = calc_inode_blocks(symlen);

}

err = -ENOMEM;

sym = kstrndup(iinfo->symlink, symlen, GFP_NOFS);

if (!sym)

goto out;

spin_lock(&ci->i_ceph_lock);

if (!ci->i_symlink)

ci->i_symlink = sym;

else

kfree(sym); /* lost a race */

}

inode->i_link = ci->i_symlink;

break;

case S_IFDIR:

inode->i_op = &ceph_dir_iops;

inode->i_fop = &ceph_dir_fops;

ci->i_dir_layout = iinfo->dir_layout;

ci->i_files = le64_to_cpu(info->files);

ci->i_subdirs = le64_to_cpu(info->subdirs);

ci->i_rbytes = le64_to_cpu(info->rbytes);

ci->i_rfiles = le64_to_cpu(info->rfiles);

ci->i_rsubdirs = le64_to_cpu(info->rsubdirs);

ceph_decode_timespec(&ci->i_rctime, &info->rctime);

break;

default:

pr_err("fill_inode %llx.%llx BAD mode 0%o\n",

ceph_vinop(inode), inode->i_mode);

}

/* were we issued a capability? */

if (info->cap.caps) {

if (ceph_snap(inode) == CEPH_NOSNAP) {

unsigned caps = le32_to_cpu(info->cap.caps);

ceph_add_cap(inode, session,

le64_to_cpu(info->cap.cap_id),

cap_fmode, caps,

le32_to_cpu(info->cap.wanted),

le32_to_cpu(info->cap.seq),

le32_to_cpu(info->cap.mseq),

le64_to_cpu(info->cap.realm),

info->cap.flags, &new_cap);

/* set dir completion flag? */

if (S_ISDIR(inode->i_mode) &&

ci->i_files == 0 && ci->i_subdirs == 0 &&

(caps & CEPH_CAP_FILE_SHARED) &&

(issued & CEPH_CAP_FILE_EXCL) == 0 &&

!__ceph_dir_is_complete(ci)) {

dout(" marking %p complete (empty)\n", inode);

i_size_write(inode, 0);

__ceph_dir_set_complete(ci,

atomic64_read(&ci->i_release_count),

atomic64_read(&ci->i_ordered_count));

}

wake = true;

} else {

dout(" %p got snap_caps %s\n", inode,

ceph_cap_string(le32_to_cpu(info->cap.caps)));

ci->i_snap_caps |= le32_to_cpu(info->cap.caps);

if (cap_fmode >= 0)

__ceph_get_fmode(ci, cap_fmode);

}

} else if (cap_fmode >= 0) {

pr_warn("mds issued no caps on %llx.%llx\n",

ceph_vinop(inode));

__ceph_get_fmode(ci, cap_fmode);

}

if (iinfo->inline_version > 0 &&

iinfo->inline_version >= ci->i_inline_version) {

int cache_caps = CEPH_CAP_FILE_CACHE | CEPH_CAP_FILE_LAZYIO;

ci->i_inline_version = iinfo->inline_version;

if (ci->i_inline_version != CEPH_INLINE_NONE &&

(locked_page ||

(le32_to_cpu(info->cap.caps) & cache_caps)))

fill_inline = true;

}

spin_unlock(&ci->i_ceph_lock);

if (fill_inline)

ceph_fill_inline_data(inode, locked_page,

iinfo->inline_data, iinfo->inline_len);

if (wake)

wake_up_all(&ci->i_cap_wq);

/* queue truncate if we saw i_size decrease */

if (queue_trunc)

ceph_queue_vmtruncate(inode);

/* populate frag tree */

if (S_ISDIR(inode->i_mode))

ceph_fill_fragtree(inode, &info->fragtree, dirinfo);

/* update delegation info? */

if (dirinfo)

ceph_fill_dirfrag(inode, dirinfo);

err = 0;

out:

if (new_cap)

ceph_put_cap(mdsc, new_cap);

if (xattr_blob)

ceph_buffer_put(xattr_blob);

ceph_put_string(pool_ns);