Whamcloud - gitweb
Branch HEAD
[fs/lustre-release.git] / lustre / osd / osd_handler.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * GPL HEADER START
5  *
6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 only,
10  * as published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * General Public License version 2 for more details (a copy is included
16  * in the LICENSE file that accompanied this code).
17  *
18  * You should have received a copy of the GNU General Public License
19  * version 2 along with this program; If not, see
20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
21  *
22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
23  * CA 95054 USA or visit www.sun.com if you need additional information or
24  * have any questions.
25  *
26  * GPL HEADER END
27  */
28 /*
29  * Copyright  2008 Sun Microsystems, Inc. All rights reserved
30  * Use is subject to license terms.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/osd/osd_handler.c
37  *
38  * Top-level entry points into osd module
39  *
40  * Author: Nikita Danilov <nikita@clusterfs.com>
41  */
42
43 #ifndef EXPORT_SYMTAB
44 # define EXPORT_SYMTAB
45 #endif
46 #define DEBUG_SUBSYSTEM S_MDS
47
48 #include <linux/module.h>
49
50 /* LUSTRE_VERSION_CODE */
51 #include <lustre_ver.h>
52 /* prerequisite for linux/xattr.h */
53 #include <linux/types.h>
54 /* prerequisite for linux/xattr.h */
55 #include <linux/fs.h>
56 /* XATTR_{REPLACE,CREATE} */
57 #include <linux/xattr.h>
58 /*
59  * XXX temporary stuff: direct access to ldiskfs/jdb. Interface between osd
60  * and file system is not yet specified.
61  */
62 /* handle_t, journal_start(), journal_stop() */
63 #include <linux/jbd.h>
64 /* LDISKFS_SB() */
65 #include <linux/ldiskfs_fs.h>
66 #include <linux/ldiskfs_jbd.h>
67 /* simple_mkdir() */
68 #include <lvfs.h>
69
70 /*
71  * struct OBD_{ALLOC,FREE}*()
72  * OBD_FAIL_CHECK
73  */
74 #include <obd_support.h>
75 /* struct ptlrpc_thread */
76 #include <lustre_net.h>
77
78 /* fid_is_local() */
79 #include <lustre_fid.h>
80 #include <linux/lustre_iam.h>
81
82 #include "osd_internal.h"
83 #include "osd_igif.h"
84
85 /* llo_* api support */
86 #include <md_object.h>
87
88 static const char dot[] = ".";
89 static const char dotdot[] = "..";
90 static const char remote_obj_dir[] = "REM_OBJ_DIR";
91
92 struct osd_directory {
93         struct iam_container od_container;
94         struct iam_descr     od_descr;
95         struct semaphore     od_sem;
96 };
97
98 struct osd_object {
99         struct dt_object       oo_dt;
100         /**
101          * Inode for file system object represented by this osd_object. This
102          * inode is pinned for the whole duration of lu_object life.
103          *
104          * Not modified concurrently (either setup early during object
105          * creation, or assigned by osd_object_create() under write lock).
106          */
107         struct inode          *oo_inode;
108         struct rw_semaphore    oo_sem;
109         struct osd_directory  *oo_dir;
110         /** protects inode attributes. */
111         spinlock_t             oo_guard;
112         /**
113          * Following two members are used to indicate the presence of dot and
114          * dotdot in the given directory. This is required for interop mode
115          * (b11826).
116          */
117         int oo_compat_dot_created;
118         int oo_compat_dotdot_created;
119
120         const struct lu_env   *oo_owner;
121 #ifdef CONFIG_LOCKDEP
122         struct lockdep_map     oo_dep_map;
123 #endif
124 };
125
126 static int   osd_root_get      (const struct lu_env *env,
127                                 struct dt_device *dev, struct lu_fid *f);
128
129 static int   lu_device_is_osd  (const struct lu_device *d);
130 static void  osd_mod_exit      (void) __exit;
131 static int   osd_mod_init      (void) __init;
132 static int   osd_type_init     (struct lu_device_type *t);
133 static void  osd_type_fini     (struct lu_device_type *t);
134 static int   osd_object_init   (const struct lu_env *env,
135                                 struct lu_object *l,
136                                 const struct lu_object_conf *_);
137 static void  osd_object_release(const struct lu_env *env,
138                                 struct lu_object *l);
139 static int   osd_object_print  (const struct lu_env *env, void *cookie,
140                                 lu_printer_t p, const struct lu_object *o);
141 static struct lu_device *osd_device_free   (const struct lu_env *env,
142                                 struct lu_device *m);
143 static void *osd_key_init      (const struct lu_context *ctx,
144                                 struct lu_context_key *key);
145 static void  osd_key_fini      (const struct lu_context *ctx,
146                                 struct lu_context_key *key, void *data);
147 static void  osd_key_exit      (const struct lu_context *ctx,
148                                 struct lu_context_key *key, void *data);
149 static int   osd_has_index     (const struct osd_object *obj);
150 static void  osd_object_init0  (struct osd_object *obj);
151 static int   osd_device_init   (const struct lu_env *env,
152                                 struct lu_device *d, const char *,
153                                 struct lu_device *);
154 static int   osd_fid_lookup    (const struct lu_env *env,
155                                 struct osd_object *obj,
156                                 const struct lu_fid *fid);
157 static void  osd_inode_getattr (const struct lu_env *env,
158                                 struct inode *inode, struct lu_attr *attr);
159 static int   osd_inode_setattr (const struct lu_env *env,
160                                 struct inode *inode, const struct lu_attr *attr);
161 static int   osd_param_is_sane (const struct osd_device *dev,
162                                 const struct txn_param *param);
163 static int   osd_index_iam_lookup(const struct lu_env *env,
164                                   struct dt_object *dt,
165                                   struct dt_rec *rec, const struct dt_key *key,
166                                   struct lustre_capa *capa);
167 static int   osd_index_ea_lookup(const struct lu_env *env,
168                                  struct dt_object *dt,
169                                  struct dt_rec *rec, const struct dt_key *key,
170                                  struct lustre_capa *capa);
171 static int   osd_index_iam_insert(const struct lu_env *env,
172                                   struct dt_object *dt,
173                                   const struct dt_rec *rec,
174                                   const struct dt_key *key,
175                                   struct thandle *handle,
176                                   struct lustre_capa *capa,
177                                   int ingore_quota);
178 static int   osd_index_ea_insert (const struct lu_env *env,
179                                   struct dt_object *dt,
180                                   const struct dt_rec *rec,
181                                   const struct dt_key *key,
182                                   struct thandle *handle,
183                                   struct lustre_capa *capa,
184                                   int ingore_quota);
185 static int   osd_index_iam_delete(const struct lu_env *env,
186                                   struct dt_object *dt, const struct dt_key *key,
187                                   struct thandle *handle,
188                                   struct lustre_capa *capa);
189 static int   osd_index_ea_delete (const struct lu_env *env,
190                                   struct dt_object *dt, const struct dt_key *key,
191                                   struct thandle *handle,
192                                   struct lustre_capa *capa);
193
194 static int   osd_iam_index_probe   (const struct lu_env *env,
195                                     struct osd_object *o,
196                                     const struct dt_index_features *feat);
197 static int   osd_index_try     (const struct lu_env *env,
198                                 struct dt_object *dt,
199                                 const struct dt_index_features *feat);
200 static void  osd_index_fini    (struct osd_object *o);
201
202 static void  osd_it_iam_fini       (const struct lu_env *env, struct dt_it *di);
203 static int   osd_it_iam_get        (const struct lu_env *env,
204                                     struct dt_it *di, const struct dt_key *key);
205 static void  osd_it_iam_put        (const struct lu_env *env, struct dt_it *di);
206 static int   osd_it_iam_next       (const struct lu_env *env, struct dt_it *di);
207 static int   osd_it_iam_key_size   (const struct lu_env *env,
208                                     const struct dt_it *di);
209 static void  osd_it_ea_fini    (const struct lu_env *env, struct dt_it *di);
210 static int   osd_it_ea_get     (const struct lu_env *env,
211                                 struct dt_it *di, const struct dt_key *key);
212 static void  osd_it_ea_put     (const struct lu_env *env, struct dt_it *di);
213 static int   osd_it_ea_next    (const struct lu_env *env, struct dt_it *di);
214 static int   osd_it_ea_key_size(const struct lu_env *env,
215                                 const struct dt_it *di);
216
217 static void  osd_conf_get      (const struct lu_env *env,
218                                 const struct dt_device *dev,
219                                 struct dt_device_param *param);
220 static void  osd_trans_stop    (const struct lu_env *env,
221                                 struct thandle *th);
222 static int   osd_object_is_root(const struct osd_object *obj);
223
224 static struct osd_object  *osd_obj          (const struct lu_object *o);
225 static struct osd_device  *osd_dev          (const struct lu_device *d);
226 static struct osd_device  *osd_dt_dev       (const struct dt_device *d);
227 static struct osd_object  *osd_dt_obj       (const struct dt_object *d);
228 static struct osd_device  *osd_obj2dev      (const struct osd_object *o);
229 static struct lu_device   *osd2lu_dev       (struct osd_device *osd);
230 static struct lu_device   *osd_device_fini  (const struct lu_env *env,
231                                              struct lu_device *d);
232 static struct lu_device   *osd_device_alloc (const struct lu_env *env,
233                                              struct lu_device_type *t,
234                                              struct lustre_cfg *cfg);
235 static struct lu_object   *osd_object_alloc (const struct lu_env *env,
236                                              const struct lu_object_header *hdr,
237                                              struct lu_device *d);
238 static struct inode       *osd_iget         (struct osd_thread_info *info,
239                                              struct osd_device *dev,
240                                              const struct osd_inode_id *id);
241 static struct super_block *osd_sb           (const struct osd_device *dev);
242 static struct dt_it       *osd_it_iam_init  (const struct lu_env *env,
243                                              struct dt_object *dt,
244                                              struct lustre_capa *capa);
245 static struct dt_key      *osd_it_iam_key   (const struct lu_env *env,
246                                              const struct dt_it *di);
247 static struct dt_rec      *osd_it_iam_rec   (const struct lu_env *env,
248                                              const struct dt_it *di);
249 static struct dt_it       *osd_it_ea_init   (const struct lu_env *env,
250                                              struct dt_object *dt,
251                                              struct lustre_capa *capa);
252 static struct dt_key      *osd_it_ea_key    (const struct lu_env *env,
253                                              const struct dt_it *di);
254 static struct dt_rec      *osd_it_ea_rec    (const struct lu_env *env,
255                                              const struct dt_it *di);
256
257 static struct timespec    *osd_inode_time   (const struct lu_env *env,
258                                              struct inode *inode,
259                                              __u64 seconds);
260 static struct thandle     *osd_trans_start  (const struct lu_env *env,
261                                              struct dt_device *d,
262                                              struct txn_param *p);
263 static journal_t          *osd_journal      (const struct osd_device *dev);
264
265 static int __osd_ea_add_rec(struct osd_thread_info *info,
266                             struct osd_object *pobj,
267                             struct osd_object *cobj,
268                             const char *name,
269                             struct thandle *th);
270
271 static const struct lu_device_type_operations osd_device_type_ops;
272 static       struct lu_device_type            osd_device_type;
273 static const struct lu_object_operations      osd_lu_obj_ops;
274 static       struct obd_ops                   osd_obd_device_ops;
275 static const struct lu_device_operations      osd_lu_ops;
276 static       struct lu_context_key            osd_key;
277 static const struct dt_object_operations      osd_obj_ops;
278 static const struct dt_object_operations      osd_obj_ea_ops;
279 static const struct dt_body_operations        osd_body_ops;
280 static const struct dt_index_operations       osd_index_iam_ops;
281 static const struct dt_index_operations       osd_index_ea_ops;
282
283 struct osd_thandle {
284         struct thandle          ot_super;
285         handle_t               *ot_handle;
286         struct journal_callback ot_jcb;
287         /* Link to the device, for debugging. */
288         struct lu_ref_link     *ot_dev_link;
289
290 };
291
292 #ifdef HAVE_QUOTA_SUPPORT
293 static inline void
294 osd_push_ctxt(const struct lu_env *env, struct osd_ctxt *save)
295 {
296         struct md_ucred    *uc = md_ucred(env);
297
298         LASSERT(uc != NULL);
299
300         save->oc_uid = current->fsuid;
301         save->oc_gid = current->fsgid;
302         save->oc_cap = current->cap_effective;
303         current->fsuid         = uc->mu_fsuid;
304         current->fsgid         = uc->mu_fsgid;
305         current->cap_effective = uc->mu_cap;
306 }
307
308 static inline void
309 osd_pop_ctxt(struct osd_ctxt *save)
310 {
311         current->fsuid         = save->oc_uid;
312         current->fsgid         = save->oc_gid;
313         current->cap_effective = save->oc_cap;
314 }
315 #endif
316
317 /*
318  * Invariants, assertions.
319  */
320
321 /*
322  * XXX: do not enable this, until invariant checking code is made thread safe
323  * in the face of pdirops locking.
324  */
325 #define OSD_INVARIANT_CHECKS (0)
326
327 #if OSD_INVARIANT_CHECKS
328 static int osd_invariant(const struct osd_object *obj)
329 {
330         return
331                 obj != NULL &&
332                 ergo(obj->oo_inode != NULL,
333                      obj->oo_inode->i_sb == osd_sb(osd_obj2dev(obj)) &&
334                      atomic_read(&obj->oo_inode->i_count) > 0) &&
335                 ergo(obj->oo_dir != NULL &&
336                      obj->oo_dir->od_conationer.ic_object != NULL,
337                      obj->oo_dir->od_conationer.ic_object == obj->oo_inode);
338 }
339 #else
340 #define osd_invariant(obj) (1)
341 #endif
342
343 static inline struct osd_thread_info *osd_oti_get(const struct lu_env *env)
344 {
345         return lu_context_key_get(&env->le_ctx, &osd_key);
346 }
347
348 /*
349  * Concurrency: doesn't matter
350  */
351 static int osd_read_locked(const struct lu_env *env, struct osd_object *o)
352 {
353         return osd_oti_get(env)->oti_r_locks > 0;
354 }
355
356 /*
357  * Concurrency: doesn't matter
358  */
359 static int osd_write_locked(const struct lu_env *env, struct osd_object *o)
360 {
361         struct osd_thread_info *oti = osd_oti_get(env);
362         return oti->oti_w_locks > 0 && o->oo_owner == env;
363 }
364
365 /*
366  * Concurrency: doesn't access mutable data
367  */
368 static int osd_root_get(const struct lu_env *env,
369                         struct dt_device *dev, struct lu_fid *f)
370 {
371         struct inode *inode;
372
373         inode = osd_sb(osd_dt_dev(dev))->s_root->d_inode;
374         lu_igif_build(f, inode->i_ino, inode->i_generation);
375         return 0;
376 }
377
378 /*
379  * OSD object methods.
380  */
381
382 /*
383  * Concurrency: no concurrent access is possible that early in object
384  * life-cycle.
385  */
386 static struct lu_object *osd_object_alloc(const struct lu_env *env,
387                                           const struct lu_object_header *hdr,
388                                           struct lu_device *d)
389 {
390         struct osd_object *mo;
391
392         OBD_ALLOC_PTR(mo);
393         if (mo != NULL) {
394                 struct lu_object *l;
395
396                 l = &mo->oo_dt.do_lu;
397                 dt_object_init(&mo->oo_dt, NULL, d);
398                 if (osd_dev(d)->od_iop_mode)
399                         mo->oo_dt.do_ops = &osd_obj_ea_ops;
400                 else
401                         mo->oo_dt.do_ops = &osd_obj_ops;
402
403                 l->lo_ops = &osd_lu_obj_ops;
404                 init_rwsem(&mo->oo_sem);
405                 spin_lock_init(&mo->oo_guard);
406                 return l;
407         } else
408                 return NULL;
409 }
410
411 /*
412  * Concurrency: shouldn't matter.
413  */
414 static void osd_object_init0(struct osd_object *obj)
415 {
416         LASSERT(obj->oo_inode != NULL);
417         obj->oo_dt.do_body_ops = &osd_body_ops;
418         obj->oo_dt.do_lu.lo_header->loh_attr |=
419                 (LOHA_EXISTS | (obj->oo_inode->i_mode & S_IFMT));
420 }
421
422 /*
423  * Concurrency: no concurrent access is possible that early in object
424  * life-cycle.
425  */
426 static int osd_object_init(const struct lu_env *env, struct lu_object *l,
427                            const struct lu_object_conf *_)
428 {
429         struct osd_object *obj = osd_obj(l);
430         int result;
431
432         LINVRNT(osd_invariant(obj));
433
434         result = osd_fid_lookup(env, obj, lu_object_fid(l));
435         if (result == 0) {
436                 if (obj->oo_inode != NULL)
437                         osd_object_init0(obj);
438         }
439         LINVRNT(osd_invariant(obj));
440         return result;
441 }
442
443 /*
444  * Concurrency: no concurrent access is possible that late in object
445  * life-cycle.
446  */
447 static void osd_object_free(const struct lu_env *env, struct lu_object *l)
448 {
449         struct osd_object *obj = osd_obj(l);
450
451         LINVRNT(osd_invariant(obj));
452
453         dt_object_fini(&obj->oo_dt);
454         OBD_FREE_PTR(obj);
455 }
456
457 static struct iam_path_descr *osd_it_ipd_get(const struct lu_env *env,
458                                              const struct iam_container *bag)
459 {
460         return bag->ic_descr->id_ops->id_ipd_alloc(bag,
461                                            osd_oti_get(env)->oti_it_ipd);
462 }
463
464 static struct iam_path_descr *osd_idx_ipd_get(const struct lu_env *env,
465                                               const struct iam_container *bag)
466 {
467         return bag->ic_descr->id_ops->id_ipd_alloc(bag,
468                                            osd_oti_get(env)->oti_idx_ipd);
469 }
470
471 static void osd_ipd_put(const struct lu_env *env,
472                         const struct iam_container *bag,
473                         struct iam_path_descr *ipd)
474 {
475         bag->ic_descr->id_ops->id_ipd_free(ipd);
476 }
477
478 /*
479  * Concurrency: no concurrent access is possible that late in object
480  * life-cycle.
481  */
482 static void osd_index_fini(struct osd_object *o)
483 {
484         struct iam_container *bag;
485
486         if (o->oo_dir != NULL) {
487                 bag = &o->oo_dir->od_container;
488                 if (o->oo_inode != NULL) {
489                         if (bag->ic_object == o->oo_inode)
490                                 iam_container_fini(bag);
491                 }
492                 OBD_FREE_PTR(o->oo_dir);
493                 o->oo_dir = NULL;
494         }
495 }
496
497 /*
498  * Concurrency: no concurrent access is possible that late in object
499  * life-cycle (for all existing callers, that is. New callers have to provide
500  * their own locking.)
501  */
502 static int osd_inode_unlinked(const struct inode *inode)
503 {
504         return inode->i_nlink == 0;
505 }
506
507 enum {
508         OSD_TXN_OI_DELETE_CREDITS    = 20,
509         OSD_TXN_INODE_DELETE_CREDITS = 20
510 };
511
512 /*
513  * Concurrency: no concurrent access is possible that late in object
514  * life-cycle.
515  */
516 static int osd_inode_remove(const struct lu_env *env, struct osd_object *obj)
517 {
518         const struct lu_fid    *fid = lu_object_fid(&obj->oo_dt.do_lu);
519         struct osd_device      *osd = osd_obj2dev(obj);
520         struct osd_thread_info *oti = osd_oti_get(env);
521         struct txn_param       *prm = &oti->oti_txn;
522         struct thandle         *th;
523         int result;
524
525         txn_param_init(prm, OSD_TXN_OI_DELETE_CREDITS +
526                             OSD_TXN_INODE_DELETE_CREDITS);
527         th = osd_trans_start(env, &osd->od_dt_dev, prm);
528         if (!IS_ERR(th)) {
529                 result = osd_oi_delete(oti, &osd->od_oi, fid, th);
530                 osd_trans_stop(env, th);
531         } else
532                 result = PTR_ERR(th);
533         return result;
534 }
535
536 /*
537  * Called just before object is freed. Releases all resources except for
538  * object itself (that is released by osd_object_free()).
539  *
540  * Concurrency: no concurrent access is possible that late in object
541  * life-cycle.
542  */
543 static void osd_object_delete(const struct lu_env *env, struct lu_object *l)
544 {
545         struct osd_object *obj   = osd_obj(l);
546         struct inode      *inode = obj->oo_inode;
547
548         LINVRNT(osd_invariant(obj));
549
550         /*
551          * If object is unlinked remove fid->ino mapping from object index.
552          */
553
554         osd_index_fini(obj);
555         if (inode != NULL) {
556                 int result;
557
558                 if (osd_inode_unlinked(inode)) {
559                         result = osd_inode_remove(env, obj);
560                         if (result != 0)
561                                 LU_OBJECT_DEBUG(D_ERROR, env, l,
562                                                 "Failed to cleanup: %d\n",
563                                                 result);
564                 }
565
566                 iput(inode);
567                 obj->oo_inode = NULL;
568         }
569 }
570
571 /*
572  * Concurrency: ->loo_object_release() is called under site spin-lock.
573  */
574 static void osd_object_release(const struct lu_env *env,
575                                struct lu_object *l)
576 {
577         struct osd_object *o = osd_obj(l);
578
579         LASSERT(!lu_object_is_dying(l->lo_header));
580         if (o->oo_inode != NULL && osd_inode_unlinked(o->oo_inode))
581                 set_bit(LU_OBJECT_HEARD_BANSHEE, &l->lo_header->loh_flags);
582 }
583
584 /*
585  * Concurrency: shouldn't matter.
586  */
587 static int osd_object_print(const struct lu_env *env, void *cookie,
588                             lu_printer_t p, const struct lu_object *l)
589 {
590         struct osd_object *o = osd_obj(l);
591         struct iam_descr  *d;
592
593         if (o->oo_dir != NULL)
594                 d = o->oo_dir->od_container.ic_descr;
595         else
596                 d = NULL;
597         return (*p)(env, cookie, LUSTRE_OSD_NAME"-object@%p(i:%p:%lu/%u)[%s]",
598                     o, o->oo_inode,
599                     o->oo_inode ? o->oo_inode->i_ino : 0UL,
600                     o->oo_inode ? o->oo_inode->i_generation : 0,
601                     d ? d->id_ops->id_name : "plain");
602 }
603
604 /*
605  * Concurrency: shouldn't matter.
606  */
607 int osd_statfs(const struct lu_env *env, struct dt_device *d,
608                struct kstatfs *sfs)
609 {
610         struct osd_device *osd = osd_dt_dev(d);
611         struct super_block *sb = osd_sb(osd);
612         int result = 0;
613
614         spin_lock(&osd->od_osfs_lock);
615         /* cache 1 second */
616         if (cfs_time_before_64(osd->od_osfs_age, cfs_time_shift_64(-1))) {
617                 result = ll_do_statfs(sb, &osd->od_kstatfs);
618                 if (likely(result == 0)) /* N.B. statfs can't really fail */
619                         osd->od_osfs_age = cfs_time_current_64();
620         }
621
622         if (likely(result == 0))
623                 *sfs = osd->od_kstatfs;
624         spin_unlock(&osd->od_osfs_lock);
625
626         return result;
627 }
628
629 /*
630  * Concurrency: doesn't access mutable data.
631  */
632 static void osd_conf_get(const struct lu_env *env,
633                          const struct dt_device *dev,
634                          struct dt_device_param *param)
635 {
636         /*
637          * XXX should be taken from not-yet-existing fs abstraction layer.
638          */
639         param->ddp_max_name_len  = LDISKFS_NAME_LEN;
640         param->ddp_max_nlink     = LDISKFS_LINK_MAX;
641         param->ddp_block_shift   = osd_sb(osd_dt_dev(dev))->s_blocksize_bits;
642 }
643
644 /**
645  * Helper function to get and fill the buffer with input values.
646  */
647 static struct lu_buf *osd_buf_get(const struct lu_env *env, void *area, ssize_t len)
648 {
649         struct lu_buf *buf;
650
651         buf = &osd_oti_get(env)->oti_buf;
652         buf->lb_buf = area;
653         buf->lb_len = len;
654         return buf;
655 }
656
657 /*
658  * Journal
659  */
660
661 /*
662  * Concurrency: doesn't access mutable data.
663  */
664 static int osd_param_is_sane(const struct osd_device *dev,
665                              const struct txn_param *param)
666 {
667         return param->tp_credits <= osd_journal(dev)->j_max_transaction_buffers;
668 }
669
670 /*
671  * Concurrency: shouldn't matter.
672  */
673 static void osd_trans_commit_cb(struct journal_callback *jcb, int error)
674 {
675         struct osd_thandle *oh = container_of0(jcb, struct osd_thandle, ot_jcb);
676         struct thandle     *th  = &oh->ot_super;
677         struct dt_device   *dev = th->th_dev;
678         struct lu_device   *lud = &dev->dd_lu_dev;
679
680         LASSERT(dev != NULL);
681         LASSERT(oh->ot_handle == NULL);
682
683         if (error) {
684                 CERROR("transaction @0x%p commit error: %d\n", th, error);
685         } else {
686                 struct lu_env *env = &osd_dt_dev(dev)->od_env_for_commit;
687                 /*
688                  * This od_env_for_commit is only for commit usage.  see
689                  * "struct dt_device"
690                  */
691                 lu_context_enter(&env->le_ctx);
692                 dt_txn_hook_commit(env, th);
693                 lu_context_exit(&env->le_ctx);
694         }
695
696         lu_ref_del_at(&lud->ld_reference, oh->ot_dev_link, "osd-tx", th);
697         lu_device_put(lud);
698         th->th_dev = NULL;
699
700         lu_context_exit(&th->th_ctx);
701         lu_context_fini(&th->th_ctx);
702         OBD_FREE_PTR(oh);
703 }
704
705 /*
706  * Concurrency: shouldn't matter.
707  */
708 static struct thandle *osd_trans_start(const struct lu_env *env,
709                                        struct dt_device *d,
710                                        struct txn_param *p)
711 {
712         struct osd_device  *dev = osd_dt_dev(d);
713         handle_t           *jh;
714         struct osd_thandle *oh;
715         struct thandle     *th;
716         int hook_res;
717
718         ENTRY;
719
720         hook_res = dt_txn_hook_start(env, d, p);
721         if (hook_res != 0)
722                 RETURN(ERR_PTR(hook_res));
723
724         if (osd_param_is_sane(dev, p)) {
725                 OBD_ALLOC_GFP(oh, sizeof *oh, CFS_ALLOC_IO);
726                 if (oh != NULL) {
727                         struct osd_thread_info *oti = osd_oti_get(env);
728
729                         /*
730                          * XXX temporary stuff. Some abstraction layer should
731                          * be used.
732                          */
733
734                         jh = journal_start(osd_journal(dev), p->tp_credits);
735                         if (!IS_ERR(jh)) {
736                                 oh->ot_handle = jh;
737                                 th = &oh->ot_super;
738                                 th->th_dev = d;
739                                 th->th_result = 0;
740                                 jh->h_sync = p->tp_sync;
741                                 lu_device_get(&d->dd_lu_dev);
742                                 oh->ot_dev_link = lu_ref_add
743                                         (&d->dd_lu_dev.ld_reference,
744                                          "osd-tx", th);
745                                 /* add commit callback */
746                                 lu_context_init(&th->th_ctx, LCT_TX_HANDLE);
747                                 lu_context_enter(&th->th_ctx);
748                                 journal_callback_set(jh, osd_trans_commit_cb,
749                                                      (struct journal_callback *)&oh->ot_jcb);
750                                         LASSERT(oti->oti_txns == 0);
751                                         LASSERT(oti->oti_r_locks == 0);
752                                         LASSERT(oti->oti_w_locks == 0);
753                                         oti->oti_txns++;
754                         } else {
755                                 OBD_FREE_PTR(oh);
756                                 th = (void *)jh;
757                         }
758                 } else
759                         th = ERR_PTR(-ENOMEM);
760         } else {
761                 CERROR("Invalid transaction parameters\n");
762                 th = ERR_PTR(-EINVAL);
763         }
764
765         RETURN(th);
766 }
767
768 /*
769  * Concurrency: shouldn't matter.
770  */
771 static void osd_trans_stop(const struct lu_env *env, struct thandle *th)
772 {
773         int result;
774         struct osd_thandle *oh;
775         struct osd_thread_info *oti = osd_oti_get(env);
776
777         ENTRY;
778
779         oh = container_of0(th, struct osd_thandle, ot_super);
780         if (oh->ot_handle != NULL) {
781                 handle_t *hdl = oh->ot_handle;
782
783                 LASSERT(oti->oti_txns == 1);
784                 oti->oti_txns--;
785                 LASSERT(oti->oti_r_locks == 0);
786                 LASSERT(oti->oti_w_locks == 0);
787                 result = dt_txn_hook_stop(env, th);
788                 if (result != 0)
789                         CERROR("Failure in transaction hook: %d\n", result);
790                 oh->ot_handle = NULL;
791                 result = journal_stop(hdl);
792                 if (result != 0)
793                         CERROR("Failure to stop transaction: %d\n", result);
794         }
795         EXIT;
796 }
797
798 /*
799  * Concurrency: shouldn't matter.
800  */
801 static int osd_sync(const struct lu_env *env, struct dt_device *d)
802 {
803         CDEBUG(D_HA, "syncing OSD %s\n", LUSTRE_OSD_NAME);
804         return ldiskfs_force_commit(osd_sb(osd_dt_dev(d)));
805 }
806
807 /**
808  * Start commit for OSD device.
809  *
810  * An implementation of dt_commit_async method for OSD device.
811  * Asychronously starts underlayng fs sync and thereby a transaction
812  * commit.
813  *
814  * \param env environment
815  * \param d dt device
816  *
817  * \see dt_device_operations
818  */
819 static int osd_commit_async(const struct lu_env *env,
820                             struct dt_device *d)
821 {
822         struct super_block *s = osd_sb(osd_dt_dev(d));
823         ENTRY;
824
825         CDEBUG(D_HA, "async commit OSD %s\n", LUSTRE_OSD_NAME);
826         RETURN(s->s_op->sync_fs(s, 0));
827 }
828
829 /*
830  * Concurrency: shouldn't matter.
831  */
832 lvfs_sbdev_type fsfilt_ldiskfs_journal_sbdev(struct super_block *);
833
834 static void osd_ro(const struct lu_env *env, struct dt_device *d)
835 {
836         ENTRY;
837
838         CERROR("*** setting device %s read-only ***\n", LUSTRE_OSD_NAME);
839
840         __lvfs_set_rdonly(lvfs_sbdev(osd_sb(osd_dt_dev(d))),
841                           fsfilt_ldiskfs_journal_sbdev(osd_sb(osd_dt_dev(d))));
842         EXIT;
843 }
844
845
846 /*
847  * Concurrency: serialization provided by callers.
848  */
849 static int osd_init_capa_ctxt(const struct lu_env *env, struct dt_device *d,
850                               int mode, unsigned long timeout, __u32 alg,
851                               struct lustre_capa_key *keys)
852 {
853         struct osd_device *dev = osd_dt_dev(d);
854         ENTRY;
855
856         dev->od_fl_capa = mode;
857         dev->od_capa_timeout = timeout;
858         dev->od_capa_alg = alg;
859         dev->od_capa_keys = keys;
860         RETURN(0);
861 }
862
863 /**
864  * Concurrency: serialization provided by callers.
865  */
866 static void osd_init_quota_ctxt(const struct lu_env *env, struct dt_device *d,
867                                struct dt_quota_ctxt *ctxt, void *data)
868 {
869         struct obd_device *obd = (void *)ctxt;
870         struct vfsmount *mnt = (struct vfsmount *)data;
871         ENTRY;
872
873         obd->u.obt.obt_sb = mnt->mnt_root->d_inode->i_sb;
874         OBD_SET_CTXT_MAGIC(&obd->obd_lvfs_ctxt);
875         obd->obd_lvfs_ctxt.pwdmnt = mnt;
876         obd->obd_lvfs_ctxt.pwd = mnt->mnt_root;
877         obd->obd_lvfs_ctxt.fs = get_ds();
878
879         EXIT;
880 }
881
882 /**
883  * Note: we do not count into QUOTA here.
884  * If we mount with --data_journal we may need more.
885  */
886 static const int osd_dto_credits_noquota[DTO_NR] = {
887         /**
888          * Insert/Delete.
889          * INDEX_EXTRA_TRANS_BLOCKS(8) +
890          * SINGLEDATA_TRANS_BLOCKS(8)
891          * XXX Note: maybe iam need more, since iam have more level than
892          *           EXT3 htree.
893          */
894         [DTO_INDEX_INSERT]  = 16,
895         [DTO_INDEX_DELETE]  = 16,
896         /**
897          * Unused now
898          */
899         [DTO_IDNEX_UPDATE]  = 16,
900         /**
901          * Create a object. The same as create object in EXT3.
902          * DATA_TRANS_BLOCKS(14) +
903          * INDEX_EXTRA_BLOCKS(8) +
904          * 3(inode bits, groups, GDT)
905          */
906         [DTO_OBJECT_CREATE] = 25,
907         /**
908          * Unused now
909          */
910         [DTO_OBJECT_DELETE] = 25,
911         /**
912          * Attr set credits.
913          * 3(inode bits, group, GDT)
914          */
915         [DTO_ATTR_SET_BASE] = 3,
916         /**
917          * Xattr set. The same as xattr of EXT3.
918          * DATA_TRANS_BLOCKS(14)
919          * XXX Note: in original MDS implmentation INDEX_EXTRA_TRANS_BLOCKS are
920          *           also counted in. Do not know why?
921          */
922         [DTO_XATTR_SET]     = 14,
923         [DTO_LOG_REC]       = 14,
924         /**
925          * creadits for inode change during write.
926          */
927         [DTO_WRITE_BASE]    = 3,
928         /**
929          * credits for single block write.
930          */
931         [DTO_WRITE_BLOCK]   = 14,
932         /**
933          * Attr set credits for chown.
934          * 3 (inode bit, group, GDT)
935          */
936         [DTO_ATTR_SET_CHOWN]= 3
937 };
938
939 /**
940  * Note: we count into QUOTA here.
941  * If we mount with --data_journal we may need more.
942  */
943 static const int osd_dto_credits_quota[DTO_NR] = {
944         /**
945          * INDEX_EXTRA_TRANS_BLOCKS(8) +
946          * SINGLEDATA_TRANS_BLOCKS(8) +
947          * 2 * QUOTA_TRANS_BLOCKS(2)
948          */
949         [DTO_INDEX_INSERT]  = 20,
950         /**
951          * INDEX_EXTRA_TRANS_BLOCKS(8) +
952          * SINGLEDATA_TRANS_BLOCKS(8) +
953          * 2 * QUOTA_TRANS_BLOCKS(2)
954          */
955         [DTO_INDEX_DELETE]  = 20,
956         /**
957          * Unused now.
958          */ 
959         [DTO_IDNEX_UPDATE]  = 16,
960         /*
961          * Create a object. Same as create object in EXT3 filesystem.
962          * DATA_TRANS_BLOCKS(16) +
963          * INDEX_EXTRA_BLOCKS(8) +
964          * 3(inode bits, groups, GDT) +
965          * 2 * QUOTA_INIT_BLOCKS(25)
966          */
967         [DTO_OBJECT_CREATE] = 77,
968         /*
969          * Unused now.
970          * DATA_TRANS_BLOCKS(16) +
971          * INDEX_EXTRA_BLOCKS(8) +
972          * 3(inode bits, groups, GDT) +
973          * QUOTA(?)
974          */ 
975         [DTO_OBJECT_DELETE] = 27,
976         /**
977          * Attr set credits.
978          * 3 (inode bit, group, GDT) +
979          */
980         [DTO_ATTR_SET_BASE] = 3,
981         /**
982          * Xattr set. The same as xattr of EXT3.
983          * DATA_TRANS_BLOCKS(16)
984          * XXX Note: in original MDS implmentation INDEX_EXTRA_TRANS_BLOCKS are
985          *           also counted in. Do not know why?
986          */
987         [DTO_XATTR_SET]     = 16,
988         [DTO_LOG_REC]       = 16,
989         /**
990          * creadits for inode change during write.
991          */
992         [DTO_WRITE_BASE]    = 3,
993         /**
994          * credits for single block write.
995          */
996         [DTO_WRITE_BLOCK]   = 16,
997         /**
998          * Attr set credits for chown.
999          * 3 (inode bit, group, GDT) +
1000          * 2 * QUOTA_INIT_BLOCKS(25) +
1001          * 2 * QUOTA_DEL_BLOCKS(9)
1002          */
1003         [DTO_ATTR_SET_CHOWN]= 71
1004 };
1005
1006 static int osd_credit_get(const struct lu_env *env, struct dt_device *d,
1007                           enum dt_txn_op op)
1008 {
1009         LASSERT(ARRAY_SIZE(osd_dto_credits_noquota) ==
1010                 ARRAY_SIZE(osd_dto_credits_quota));
1011         LASSERT(0 <= op && op < ARRAY_SIZE(osd_dto_credits_noquota));
1012 #ifdef HAVE_QUOTA_SUPPORT
1013         if (test_opt(osd_sb(osd_dt_dev(d)), QUOTA))
1014                 return osd_dto_credits_quota[op];
1015         else
1016 #endif
1017                 return osd_dto_credits_noquota[op];
1018 }
1019
1020 static const struct dt_device_operations osd_dt_ops = {
1021         .dt_root_get       = osd_root_get,
1022         .dt_statfs         = osd_statfs,
1023         .dt_trans_start    = osd_trans_start,
1024         .dt_trans_stop     = osd_trans_stop,
1025         .dt_conf_get       = osd_conf_get,
1026         .dt_sync           = osd_sync,
1027         .dt_ro             = osd_ro,
1028         .dt_commit_async   = osd_commit_async,
1029         .dt_credit_get     = osd_credit_get,
1030         .dt_init_capa_ctxt = osd_init_capa_ctxt,
1031         .dt_init_quota_ctxt= osd_init_quota_ctxt,
1032 };
1033
1034 static void osd_object_read_lock(const struct lu_env *env,
1035                                  struct dt_object *dt, unsigned role)
1036 {
1037         struct osd_object *obj = osd_dt_obj(dt);
1038         struct osd_thread_info *oti = osd_oti_get(env);
1039
1040         LINVRNT(osd_invariant(obj));
1041
1042         LASSERT(obj->oo_owner != env);
1043         down_read_nested(&obj->oo_sem, role);
1044
1045         LASSERT(obj->oo_owner == NULL);
1046         oti->oti_r_locks++;
1047 }
1048
1049 static void osd_object_write_lock(const struct lu_env *env,
1050                                   struct dt_object *dt, unsigned role)
1051 {
1052         struct osd_object *obj = osd_dt_obj(dt);
1053         struct osd_thread_info *oti = osd_oti_get(env);
1054
1055         LINVRNT(osd_invariant(obj));
1056
1057         LASSERT(obj->oo_owner != env);
1058         down_write_nested(&obj->oo_sem, role);
1059
1060         LASSERT(obj->oo_owner == NULL);
1061         obj->oo_owner = env;
1062         oti->oti_w_locks++;
1063 }
1064
1065 static void osd_object_read_unlock(const struct lu_env *env,
1066                                    struct dt_object *dt)
1067 {
1068         struct osd_object *obj = osd_dt_obj(dt);
1069         struct osd_thread_info *oti = osd_oti_get(env);
1070
1071         LINVRNT(osd_invariant(obj));
1072
1073         LASSERT(oti->oti_r_locks > 0);
1074         oti->oti_r_locks--;
1075         up_read(&obj->oo_sem);
1076 }
1077
1078 static void osd_object_write_unlock(const struct lu_env *env,
1079                                     struct dt_object *dt)
1080 {
1081         struct osd_object *obj = osd_dt_obj(dt);
1082         struct osd_thread_info *oti = osd_oti_get(env);
1083
1084         LINVRNT(osd_invariant(obj));
1085
1086         LASSERT(obj->oo_owner == env);
1087         LASSERT(oti->oti_w_locks > 0);
1088         oti->oti_w_locks--;
1089         obj->oo_owner = NULL;
1090         up_write(&obj->oo_sem);
1091 }
1092
1093 static int capa_is_sane(const struct lu_env *env,
1094                         struct osd_device *dev,
1095                         struct lustre_capa *capa,
1096                         struct lustre_capa_key *keys)
1097 {
1098         struct osd_thread_info *oti = osd_oti_get(env);
1099         struct lustre_capa *tcapa = &oti->oti_capa;
1100         struct obd_capa *oc;
1101         int i, rc = 0;
1102         ENTRY;
1103
1104         oc = capa_lookup(dev->od_capa_hash, capa, 0);
1105         if (oc) {
1106                 if (capa_is_expired(oc)) {
1107                         DEBUG_CAPA(D_ERROR, capa, "expired");
1108                         rc = -ESTALE;
1109                 }
1110                 capa_put(oc);
1111                 RETURN(rc);
1112         }
1113
1114         if (capa_is_expired_sec(capa)) {
1115                 DEBUG_CAPA(D_ERROR, capa, "expired");
1116                 RETURN(-ESTALE);
1117         }
1118
1119         spin_lock(&capa_lock);
1120         for (i = 0; i < 2; i++) {
1121                 if (keys[i].lk_keyid == capa->lc_keyid) {
1122                         oti->oti_capa_key = keys[i];
1123                         break;
1124                 }
1125         }
1126         spin_unlock(&capa_lock);
1127
1128         if (i == 2) {
1129                 DEBUG_CAPA(D_ERROR, capa, "no matched capa key");
1130                 RETURN(-ESTALE);
1131         }
1132
1133         rc = capa_hmac(tcapa->lc_hmac, capa, oti->oti_capa_key.lk_key);
1134         if (rc)
1135                 RETURN(rc);
1136
1137         if (memcmp(tcapa->lc_hmac, capa->lc_hmac, sizeof(capa->lc_hmac))) {
1138                 DEBUG_CAPA(D_ERROR, capa, "HMAC mismatch");
1139                 RETURN(-EACCES);
1140         }
1141
1142         oc = capa_add(dev->od_capa_hash, capa);
1143         capa_put(oc);
1144
1145         RETURN(0);
1146 }
1147
1148 static int osd_object_auth(const struct lu_env *env, struct dt_object *dt,
1149                            struct lustre_capa *capa, __u64 opc)
1150 {
1151         const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
1152         struct osd_device *dev = osd_dev(dt->do_lu.lo_dev);
1153         struct md_capainfo *ci;
1154         int rc;
1155
1156         if (!dev->od_fl_capa)
1157                 return 0;
1158
1159         if (capa == BYPASS_CAPA)
1160                 return 0;
1161
1162         ci = md_capainfo(env);
1163         if (unlikely(!ci))
1164                 return 0;
1165
1166         if (ci->mc_auth == LC_ID_NONE)
1167                 return 0;
1168
1169         if (!capa) {
1170                 CERROR("no capability is provided for fid "DFID"\n", PFID(fid));
1171                 return -EACCES;
1172         }
1173
1174         if (!lu_fid_eq(fid, &capa->lc_fid)) {
1175                 DEBUG_CAPA(D_ERROR, capa, "fid "DFID" mismatch with",
1176                            PFID(fid));
1177                 return -EACCES;
1178         }
1179
1180         if (!capa_opc_supported(capa, opc)) {
1181                 DEBUG_CAPA(D_ERROR, capa, "opc "LPX64" not supported by", opc);
1182                 return -EACCES;
1183         }
1184
1185         if ((rc = capa_is_sane(env, dev, capa, dev->od_capa_keys))) {
1186                 DEBUG_CAPA(D_ERROR, capa, "insane (rc %d)", rc);
1187                 return -EACCES;
1188         }
1189
1190         return 0;
1191 }
1192
1193 static int osd_attr_get(const struct lu_env *env,
1194                         struct dt_object *dt,
1195                         struct lu_attr *attr,
1196                         struct lustre_capa *capa)
1197 {
1198         struct osd_object *obj = osd_dt_obj(dt);
1199
1200         LASSERT(dt_object_exists(dt));
1201         LINVRNT(osd_invariant(obj));
1202
1203         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_READ))
1204                 return -EACCES;
1205
1206         spin_lock(&obj->oo_guard);
1207         osd_inode_getattr(env, obj->oo_inode, attr);
1208         spin_unlock(&obj->oo_guard);
1209         return 0;
1210 }
1211
1212 static int osd_attr_set(const struct lu_env *env,
1213                         struct dt_object *dt,
1214                         const struct lu_attr *attr,
1215                         struct thandle *handle,
1216                         struct lustre_capa *capa)
1217 {
1218         struct osd_object *obj = osd_dt_obj(dt);
1219         int rc;
1220
1221         LASSERT(handle != NULL);
1222         LASSERT(dt_object_exists(dt));
1223         LASSERT(osd_invariant(obj));
1224
1225         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_WRITE))
1226                 return -EACCES;
1227
1228         spin_lock(&obj->oo_guard);
1229         rc = osd_inode_setattr(env, obj->oo_inode, attr);
1230         spin_unlock(&obj->oo_guard);
1231
1232         if (!rc)
1233                 mark_inode_dirty(obj->oo_inode);
1234         return rc;
1235 }
1236
1237 static struct timespec *osd_inode_time(const struct lu_env *env,
1238                                        struct inode *inode, __u64 seconds)
1239 {
1240         struct osd_thread_info *oti = osd_oti_get(env);
1241         struct timespec        *t   = &oti->oti_time;
1242
1243         t->tv_sec  = seconds;
1244         t->tv_nsec = 0;
1245         *t = timespec_trunc(*t, get_sb_time_gran(inode->i_sb));
1246         return t;
1247 }
1248
1249 static int osd_inode_setattr(const struct lu_env *env,
1250                              struct inode *inode, const struct lu_attr *attr)
1251 {
1252         __u64 bits;
1253
1254         bits = attr->la_valid;
1255
1256         LASSERT(!(bits & LA_TYPE)); /* Huh? You want too much. */
1257
1258 #ifdef HAVE_QUOTA_SUPPORT
1259         if ((bits & LA_UID && attr->la_uid != inode->i_uid) ||
1260             (bits & LA_GID && attr->la_gid != inode->i_gid)) {
1261                 struct osd_ctxt *save = &osd_oti_get(env)->oti_ctxt;
1262                 struct iattr iattr;
1263                 int rc;
1264
1265                 iattr.ia_valid = 0;
1266                 if (bits & LA_UID)
1267                         iattr.ia_valid |= ATTR_UID;
1268                 if (bits & LA_GID)
1269                         iattr.ia_valid |= ATTR_GID;
1270                 iattr.ia_uid = attr->la_uid;
1271                 iattr.ia_gid = attr->la_gid;
1272                 osd_push_ctxt(env, save);
1273                 rc = DQUOT_TRANSFER(inode, &iattr) ? -EDQUOT : 0;
1274                 osd_pop_ctxt(save);
1275                 if (rc != 0)
1276                         return rc;
1277         }
1278 #endif
1279
1280         if (bits & LA_ATIME)
1281                 inode->i_atime  = *osd_inode_time(env, inode, attr->la_atime);
1282         if (bits & LA_CTIME)
1283                 inode->i_ctime  = *osd_inode_time(env, inode, attr->la_ctime);
1284         if (bits & LA_MTIME)
1285                 inode->i_mtime  = *osd_inode_time(env, inode, attr->la_mtime);
1286         if (bits & LA_SIZE) {
1287                 LDISKFS_I(inode)->i_disksize = attr->la_size;
1288                 i_size_write(inode, attr->la_size);
1289         }
1290 # if 0
1291         /*
1292          * OSD should not change "i_blocks" which is used by quota.
1293          * "i_blocks" should be changed by ldiskfs only.
1294          * Disable this assignment until SOM to fix some EA field. */
1295         if (bits & LA_BLOCKS)
1296                 inode->i_blocks = attr->la_blocks;
1297 #endif
1298         if (bits & LA_MODE)
1299                 inode->i_mode   = (inode->i_mode & S_IFMT) |
1300                         (attr->la_mode & ~S_IFMT);
1301         if (bits & LA_UID)
1302                 inode->i_uid    = attr->la_uid;
1303         if (bits & LA_GID)
1304                 inode->i_gid    = attr->la_gid;
1305         if (bits & LA_NLINK)
1306                 inode->i_nlink  = attr->la_nlink;
1307         if (bits & LA_RDEV)
1308                 inode->i_rdev   = attr->la_rdev;
1309
1310         if (bits & LA_FLAGS) {
1311                 struct ldiskfs_inode_info *li = LDISKFS_I(inode);
1312
1313                 li->i_flags = (li->i_flags & ~LDISKFS_FL_USER_MODIFIABLE) |
1314                         (attr->la_flags & LDISKFS_FL_USER_MODIFIABLE);
1315         }
1316         return 0;
1317 }
1318
1319 /*
1320  * Object creation.
1321  *
1322  * XXX temporary solution.
1323  */
1324
1325 static int osd_create_pre(struct osd_thread_info *info, struct osd_object *obj,
1326                           struct lu_attr *attr, struct thandle *th)
1327 {
1328         return 0;
1329 }
1330
1331 static int osd_create_post(struct osd_thread_info *info, struct osd_object *obj,
1332                            struct lu_attr *attr, struct thandle *th)
1333 {
1334         LASSERT(obj->oo_inode != NULL);
1335
1336         osd_object_init0(obj);
1337         return 0;
1338 }
1339
1340 extern struct inode *ldiskfs_create_inode(handle_t *handle,
1341                                           struct inode * dir, int mode);
1342 extern int ldiskfs_add_entry(handle_t *handle, struct dentry *dentry,
1343                              struct inode *inode);
1344 extern int ldiskfs_delete_entry(handle_t *handle,
1345                                 struct inode * dir,
1346                                 struct ldiskfs_dir_entry_2 * de_del,
1347                                 struct buffer_head * bh);
1348 extern struct buffer_head * ldiskfs_find_entry(struct dentry *dentry,
1349                                                struct ldiskfs_dir_entry_2
1350                                                ** res_dir);
1351 extern int ldiskfs_add_dot_dotdot(handle_t *handle, struct inode *dir,
1352                                   struct inode *inode);
1353
1354 extern int ldiskfs_xattr_set_handle(handle_t *handle, struct inode *inode,
1355                                     int name_index, const char *name,
1356                                     const void *value, size_t value_len,
1357                                     int flags);
1358
1359 static struct dentry * osd_child_dentry_get(const struct lu_env *env,
1360                                             struct osd_object *obj,
1361                                             const char *name,
1362                                             const int namelen)
1363 {
1364         struct osd_thread_info *info   = osd_oti_get(env);
1365         struct dentry *child_dentry = &info->oti_child_dentry;
1366         struct dentry *obj_dentry = &info->oti_obj_dentry;
1367
1368         obj_dentry->d_inode = obj->oo_inode;
1369         obj_dentry->d_sb = osd_sb(osd_obj2dev(obj));
1370         obj_dentry->d_name.hash = 0;
1371
1372         child_dentry->d_name.hash = 0;
1373         child_dentry->d_parent = obj_dentry;
1374         child_dentry->d_name.name = name;
1375         child_dentry->d_name.len = namelen;
1376         return child_dentry;
1377 }
1378
1379
1380 static int osd_mkfile(struct osd_thread_info *info, struct osd_object *obj,
1381                       umode_t mode,
1382                       struct dt_allocation_hint *hint,
1383                       struct thandle *th)
1384 {
1385         int result;
1386         struct osd_device  *osd = osd_obj2dev(obj);
1387         struct osd_thandle *oth;
1388         struct dt_object   *parent;
1389         struct inode       *inode;
1390 #ifdef HAVE_QUOTA_SUPPORT
1391         struct osd_ctxt    *save = &info->oti_ctxt;
1392 #endif
1393
1394         LINVRNT(osd_invariant(obj));
1395         LASSERT(obj->oo_inode == NULL);
1396
1397         oth = container_of(th, struct osd_thandle, ot_super);
1398         LASSERT(oth->ot_handle->h_transaction != NULL);
1399
1400         if (hint && hint->dah_parent)
1401                 parent = hint->dah_parent;
1402         else
1403                 parent = osd->od_obj_area;
1404
1405         LASSERT(parent != NULL);
1406         LASSERT(osd_dt_obj(parent)->oo_inode->i_op != NULL);
1407
1408 #ifdef HAVE_QUOTA_SUPPORT
1409         osd_push_ctxt(info->oti_env, save);
1410 #endif
1411         inode = ldiskfs_create_inode(oth->ot_handle,
1412                                      osd_dt_obj(parent)->oo_inode, mode);
1413 #ifdef HAVE_QUOTA_SUPPORT
1414         osd_pop_ctxt(save);
1415 #endif
1416         if (!IS_ERR(inode)) {
1417                 obj->oo_inode = inode;
1418                 result = 0;
1419         } else
1420                 result = PTR_ERR(inode);
1421         LINVRNT(osd_invariant(obj));
1422         return result;
1423 }
1424
1425
1426 extern int iam_lvar_create(struct inode *obj, int keysize, int ptrsize,
1427                            int recsize, handle_t *handle);
1428
1429 extern int iam_lfix_create(struct inode *obj, int keysize, int ptrsize,
1430                            int recsize, handle_t *handle);
1431
1432
1433 enum {
1434         OSD_NAME_LEN = 255
1435 };
1436
1437 static int osd_mkdir(struct osd_thread_info *info, struct osd_object *obj,
1438                      struct lu_attr *attr,
1439                      struct dt_allocation_hint *hint,
1440                      struct dt_object_format *dof,
1441                      struct thandle *th)
1442 {
1443         int result;
1444         struct osd_thandle *oth;
1445         struct osd_device *osd = osd_obj2dev(obj);
1446         __u32 mode = (attr->la_mode & (S_IFMT | S_IRWXUGO | S_ISVTX));
1447
1448         LASSERT(S_ISDIR(attr->la_mode));
1449
1450         oth = container_of(th, struct osd_thandle, ot_super);
1451         LASSERT(oth->ot_handle->h_transaction != NULL);
1452         result = osd_mkfile(info, obj, mode, hint, th);
1453         if (result == 0 && osd->od_iop_mode == 0) {
1454                 LASSERT(obj->oo_inode != NULL);
1455                 /*
1456                  * XXX uh-oh... call low-level iam function directly.
1457                  */
1458
1459                 result = iam_lvar_create(obj->oo_inode, OSD_NAME_LEN, 4,
1460                                          sizeof (struct lu_fid_pack),
1461                                          oth->ot_handle);
1462         }
1463         return result;
1464 }
1465
1466 static int osd_mk_index(struct osd_thread_info *info, struct osd_object *obj,
1467                         struct lu_attr *attr,
1468                         struct dt_allocation_hint *hint,
1469                         struct dt_object_format *dof,
1470                         struct thandle *th)
1471 {
1472         int result;
1473         struct osd_thandle *oth;
1474         const struct dt_index_features *feat = dof->u.dof_idx.di_feat;
1475
1476         __u32 mode = (attr->la_mode & (S_IFMT | S_IRWXUGO | S_ISVTX));
1477
1478         LASSERT(S_ISREG(attr->la_mode));
1479
1480         oth = container_of(th, struct osd_thandle, ot_super);
1481         LASSERT(oth->ot_handle->h_transaction != NULL);
1482
1483         result = osd_mkfile(info, obj, mode, hint, th);
1484         if (result == 0) {
1485                 LASSERT(obj->oo_inode != NULL);
1486                 if (feat->dif_flags & DT_IND_VARKEY)
1487                         result = iam_lvar_create(obj->oo_inode,
1488                                                  feat->dif_keysize_max,
1489                                                  feat->dif_ptrsize,
1490                                                  feat->dif_recsize_max,
1491                                                  oth->ot_handle);
1492                 else
1493                         result = iam_lfix_create(obj->oo_inode,
1494                                                  feat->dif_keysize_max,
1495                                                  feat->dif_ptrsize,
1496                                                  feat->dif_recsize_max,
1497                                                  oth->ot_handle);
1498
1499         }
1500         return result;
1501 }
1502
1503 static int osd_mkreg(struct osd_thread_info *info, struct osd_object *obj,
1504                      struct lu_attr *attr,
1505                      struct dt_allocation_hint *hint,
1506                      struct dt_object_format *dof,
1507                      struct thandle *th)
1508 {
1509         LASSERT(S_ISREG(attr->la_mode));
1510         return osd_mkfile(info, obj, (attr->la_mode &
1511                                (S_IFMT | S_IRWXUGO | S_ISVTX)), hint, th);
1512 }
1513
1514 static int osd_mksym(struct osd_thread_info *info, struct osd_object *obj,
1515                      struct lu_attr *attr,
1516                      struct dt_allocation_hint *hint,
1517                      struct dt_object_format *dof,
1518                      struct thandle *th)
1519 {
1520         LASSERT(S_ISLNK(attr->la_mode));
1521         return osd_mkfile(info, obj, (attr->la_mode &
1522                               (S_IFMT | S_IRWXUGO | S_ISVTX)), hint, th);
1523 }
1524
1525 static int osd_mknod(struct osd_thread_info *info, struct osd_object *obj,
1526                      struct lu_attr *attr,
1527                      struct dt_allocation_hint *hint,
1528                      struct dt_object_format *dof,
1529                      struct thandle *th)
1530 {
1531         umode_t mode = attr->la_mode & (S_IFMT | S_IRWXUGO | S_ISVTX);
1532         int result;
1533
1534         LINVRNT(osd_invariant(obj));
1535         LASSERT(obj->oo_inode == NULL);
1536         LASSERT(S_ISCHR(mode) || S_ISBLK(mode) ||
1537                 S_ISFIFO(mode) || S_ISSOCK(mode));
1538
1539         result = osd_mkfile(info, obj, mode, hint, th);
1540         if (result == 0) {
1541                 LASSERT(obj->oo_inode != NULL);
1542                 init_special_inode(obj->oo_inode, mode, attr->la_rdev);
1543         }
1544         LINVRNT(osd_invariant(obj));
1545         return result;
1546 }
1547
1548 typedef int (*osd_obj_type_f)(struct osd_thread_info *, struct osd_object *,
1549                               struct lu_attr *,
1550                               struct dt_allocation_hint *hint,
1551                               struct dt_object_format *dof,
1552                               struct thandle *);
1553
1554 static osd_obj_type_f osd_create_type_f(enum dt_format_type type)
1555 {
1556         osd_obj_type_f result;
1557
1558         switch (type) {
1559         case DFT_DIR:
1560                 result = osd_mkdir;
1561                 break;
1562         case DFT_REGULAR:
1563                 result = osd_mkreg;
1564                 break;
1565         case DFT_SYM:
1566                 result = osd_mksym;
1567                 break;
1568         case DFT_NODE:
1569                 result = osd_mknod;
1570                 break;
1571         case DFT_INDEX:
1572                 result = osd_mk_index;
1573                 break;
1574
1575         default:
1576                 LBUG();
1577                 break;
1578         }
1579         return result;
1580 }
1581
1582
1583 static void osd_ah_init(const struct lu_env *env, struct dt_allocation_hint *ah,
1584                         struct dt_object *parent, umode_t child_mode)
1585 {
1586         LASSERT(ah);
1587
1588         memset(ah, 0, sizeof(*ah));
1589         ah->dah_parent = parent;
1590         ah->dah_mode = child_mode;
1591 }
1592
1593 /**
1594  * Helper function for osd_object_create()
1595  *
1596  * \retval 0, on success
1597  */
1598 static int __osd_object_create(struct osd_thread_info *info,
1599                                struct osd_object *obj, struct lu_attr *attr,
1600                                struct dt_allocation_hint *hint,
1601                                struct dt_object_format *dof,
1602                                struct thandle *th)
1603 {
1604
1605         int result;
1606
1607         result = osd_create_pre(info, obj, attr, th);
1608         if (result == 0) {
1609                 result = osd_create_type_f(dof->dof_type)(info, obj,
1610                                            attr, hint, dof, th);
1611                 if (result == 0)
1612                         result = osd_create_post(info, obj, attr, th);
1613         }
1614         return result;
1615 }
1616
1617 /**
1618  * Helper function for osd_object_create()
1619  *
1620  * \retval 0, on success
1621  */
1622 static int __osd_oi_insert(const struct lu_env *env, struct osd_object *obj,
1623                            const struct lu_fid *fid, struct thandle *th)
1624 {
1625         struct osd_thread_info *info = osd_oti_get(env);
1626         struct osd_inode_id    *id   = &info->oti_id;
1627         struct osd_device      *osd  = osd_obj2dev(obj);
1628         struct md_ucred        *uc   = md_ucred(env);
1629
1630         LASSERT(obj->oo_inode != NULL);
1631         LASSERT(uc != NULL);
1632
1633         id->oii_ino = obj->oo_inode->i_ino;
1634         id->oii_gen = obj->oo_inode->i_generation;
1635
1636         return osd_oi_insert(info, &osd->od_oi, fid, id, th,
1637                              uc->mu_cap & CFS_CAP_SYS_RESOURCE_MASK);
1638 }
1639
1640 static int osd_object_create(const struct lu_env *env, struct dt_object *dt,
1641                              struct lu_attr *attr,
1642                              struct dt_allocation_hint *hint,
1643                              struct dt_object_format *dof,
1644                              struct thandle *th)
1645 {
1646         const struct lu_fid    *fid    = lu_object_fid(&dt->do_lu);
1647         struct osd_object      *obj    = osd_dt_obj(dt);
1648         struct osd_thread_info *info   = osd_oti_get(env);
1649         int result;
1650
1651         ENTRY;
1652
1653         LINVRNT(osd_invariant(obj));
1654         LASSERT(!dt_object_exists(dt));
1655         LASSERT(osd_write_locked(env, obj));
1656         LASSERT(th != NULL);
1657
1658         result = __osd_object_create(info, obj, attr, hint, dof, th);
1659         if (result == 0)
1660                 result = __osd_oi_insert(env, obj, fid, th);
1661
1662         LASSERT(ergo(result == 0, dt_object_exists(dt)));
1663         LASSERT(osd_invariant(obj));
1664         RETURN(result);
1665 }
1666
1667 /**
1668  * Helper function for osd_xattr_set()
1669  */
1670 static int __osd_xattr_set(const struct lu_env *env, struct dt_object *dt,
1671                            const struct lu_buf *buf, const char *name, int fl)
1672 {
1673         struct osd_object      *obj      = osd_dt_obj(dt);
1674         struct inode           *inode    = obj->oo_inode;
1675         struct osd_thread_info *info     = osd_oti_get(env);
1676         struct dentry          *dentry   = &info->oti_child_dentry;
1677         struct timespec        *t        = &info->oti_time;
1678         int                     fs_flags = 0;
1679         int  rc;
1680
1681         LASSERT(dt_object_exists(dt));
1682         LASSERT(inode->i_op != NULL && inode->i_op->setxattr != NULL);
1683         LASSERT(osd_write_locked(env, obj));
1684
1685         if (fl & LU_XATTR_REPLACE)
1686                 fs_flags |= XATTR_REPLACE;
1687
1688         if (fl & LU_XATTR_CREATE)
1689                 fs_flags |= XATTR_CREATE;
1690
1691         dentry->d_inode = inode;
1692         *t = inode->i_ctime;
1693         rc = inode->i_op->setxattr(dentry, name, buf->lb_buf,
1694                                    buf->lb_len, fs_flags);
1695         if (likely(rc == 0)) {
1696                 spin_lock(&obj->oo_guard);
1697                 inode->i_ctime = *t;
1698                 spin_unlock(&obj->oo_guard);
1699                 mark_inode_dirty(inode);
1700         }
1701         return rc;
1702 }
1703
1704 /**
1705  * Put the fid into lustre_mdt_attrs, and then place the structure
1706  * inode's ea. This fid should not be altered during the life time
1707  * of the inode.
1708  *
1709  * \retval +ve, on success
1710  * \retval -ve, on error
1711  *
1712  * FIXME: It is good to have/use ldiskfs_xattr_set_handle() here
1713  */
1714 static int osd_ea_fid_set(const struct lu_env *env, struct dt_object *dt,
1715                           const struct lu_fid *fid)
1716 {
1717         struct osd_thread_info  *info      = osd_oti_get(env);
1718         struct lustre_mdt_attrs *mdt_attrs = &info->oti_mdt_attrs;
1719
1720         fid_cpu_to_be(&mdt_attrs->lma_self_fid, fid);
1721
1722         return __osd_xattr_set(env, dt,
1723                                osd_buf_get(env, mdt_attrs, sizeof *mdt_attrs),
1724                                XATTR_NAME_LMA, LU_XATTR_CREATE);
1725
1726 }
1727
1728 /**
1729  * Helper function to form igif
1730  */
1731 static inline void osd_igif_get(const struct lu_env *env, struct dentry *dentry,
1732                                 struct lu_fid *fid)
1733 {
1734         struct inode  *inode = dentry->d_inode;
1735         lu_igif_build(fid, inode->i_ino, inode->i_generation);
1736 }
1737
1738 /**
1739  * Helper function to pack the fid
1740  */
1741 static inline void osd_fid_pack(const struct lu_env *env, const struct lu_fid *fid,
1742                                 struct lu_fid_pack *pack)
1743 {
1744         fid_pack(pack, fid, &osd_oti_get(env)->oti_fid);
1745 }
1746
1747 /**
1748  * Try to read the fid from inode ea into dt_rec, if return value
1749  * i.e. rc is +ve, then we got fid, otherwise we will have to form igif
1750  *
1751  * \param rec, the data-structure into which fid/igif is read
1752  *
1753  * \retval 0, on success
1754  */
1755 static int osd_ea_fid_get(const struct lu_env *env, struct dentry *dentry,
1756                           struct dt_rec *rec)
1757 {
1758         struct inode            *inode     = dentry->d_inode;
1759         struct osd_thread_info  *info      = osd_oti_get(env);
1760         struct lustre_mdt_attrs *mdt_attrs = &info->oti_mdt_attrs;
1761         struct lu_fid           *fid       = &info->oti_fid;
1762         int rc;
1763
1764         LASSERT(inode->i_op != NULL && inode->i_op->getxattr != NULL);
1765
1766         rc = inode->i_op->getxattr(dentry, XATTR_NAME_LMA, (void *)mdt_attrs,
1767                                    sizeof *mdt_attrs);
1768
1769         if (rc > 0) {
1770                 fid_be_to_cpu(fid, &mdt_attrs->lma_self_fid);
1771                 rc = 0;
1772         } else if (rc == -ENODATA) {
1773                 osd_igif_get(env, dentry, fid);
1774                 rc = 0;
1775         }
1776
1777         if (rc == 0)
1778                 osd_fid_pack(env, fid, (struct lu_fid_pack*)rec);
1779
1780         return rc;
1781 }
1782
1783 /**
1784  * OSD layer object create function for interoperability mode (b11826).
1785  * This is mostly similar to osd_object_create(). Only difference being, fid is
1786  * inserted into inode ea here.
1787  *
1788  * \retval   0, on success
1789  * \retval -ve, on error
1790  */
1791 static int osd_object_ea_create(const struct lu_env *env, struct dt_object *dt,
1792                              struct lu_attr *attr,
1793                              struct dt_allocation_hint *hint,
1794                              struct dt_object_format *dof,
1795                              struct thandle *th)
1796 {
1797         const struct lu_fid    *fid    = lu_object_fid(&dt->do_lu);
1798         struct osd_object      *obj    = osd_dt_obj(dt);
1799         struct osd_thread_info *info   = osd_oti_get(env);
1800         int result;
1801         int is_root = 0;
1802
1803         ENTRY;
1804
1805         LASSERT(osd_invariant(obj));
1806         LASSERT(!dt_object_exists(dt));
1807         LASSERT(osd_write_locked(env, obj));
1808         LASSERT(th != NULL);
1809
1810         result = __osd_object_create(info, obj, attr, hint, dof, th);
1811
1812         if (hint && hint->dah_parent)
1813                 is_root = osd_object_is_root(osd_dt_obj(hint->dah_parent));
1814
1815         /* objects under osd root shld have igif fid, so dont add fid EA */
1816         if (result == 0 && is_root == 0)
1817                 result = osd_ea_fid_set(env, dt, fid);
1818
1819         if (result == 0)
1820                 result = __osd_oi_insert(env, obj, fid, th);
1821
1822         LASSERT(ergo(result == 0, dt_object_exists(dt)));
1823         LINVRNT(osd_invariant(obj));
1824         RETURN(result);
1825 }
1826
1827 /*
1828  * Concurrency: @dt is write locked.
1829  */
1830 static void osd_object_ref_add(const struct lu_env *env,
1831                                struct dt_object *dt,
1832                                struct thandle *th)
1833 {
1834         struct osd_object *obj = osd_dt_obj(dt);
1835         struct inode *inode = obj->oo_inode;
1836
1837         LINVRNT(osd_invariant(obj));
1838         LASSERT(dt_object_exists(dt));
1839         LASSERT(osd_write_locked(env, obj));
1840         LASSERT(th != NULL);
1841
1842         spin_lock(&obj->oo_guard);
1843         LASSERT(inode->i_nlink < LDISKFS_LINK_MAX);
1844         inode->i_nlink++;
1845         spin_unlock(&obj->oo_guard);
1846         mark_inode_dirty(inode);
1847         LINVRNT(osd_invariant(obj));
1848 }
1849
1850 /*
1851  * Concurrency: @dt is write locked.
1852  */
1853 static void osd_object_ref_del(const struct lu_env *env,
1854                                struct dt_object *dt,
1855                                struct thandle *th)
1856 {
1857         struct osd_object *obj = osd_dt_obj(dt);
1858         struct inode *inode = obj->oo_inode;
1859
1860         LINVRNT(osd_invariant(obj));
1861         LASSERT(dt_object_exists(dt));
1862         LASSERT(osd_write_locked(env, obj));
1863         LASSERT(th != NULL);
1864
1865         spin_lock(&obj->oo_guard);
1866         LASSERT(inode->i_nlink > 0);
1867         inode->i_nlink--;
1868         spin_unlock(&obj->oo_guard);
1869         mark_inode_dirty(inode);
1870         LINVRNT(osd_invariant(obj));
1871 }
1872
1873 /*
1874  * Concurrency: @dt is read locked.
1875  */
1876 static int osd_xattr_get(const struct lu_env *env,
1877                          struct dt_object *dt,
1878                          struct lu_buf *buf,
1879                          const char *name,
1880                          struct lustre_capa *capa)
1881 {
1882         struct osd_object      *obj    = osd_dt_obj(dt);
1883         struct inode           *inode  = obj->oo_inode;
1884         struct osd_thread_info *info   = osd_oti_get(env);
1885         struct dentry          *dentry = &info->oti_obj_dentry;
1886
1887         LASSERT(dt_object_exists(dt));
1888         LASSERT(inode->i_op != NULL && inode->i_op->getxattr != NULL);
1889         LASSERT(osd_read_locked(env, obj) || osd_write_locked(env, obj));
1890
1891         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_READ))
1892                 return -EACCES;
1893
1894         dentry->d_inode = inode;
1895         return inode->i_op->getxattr(dentry, name, buf->lb_buf, buf->lb_len);
1896 }
1897
1898
1899 /*
1900  * Concurrency: @dt is write locked.
1901  */
1902 static int osd_xattr_set(const struct lu_env *env, struct dt_object *dt,
1903                          const struct lu_buf *buf, const char *name, int fl,
1904                          struct thandle *handle, struct lustre_capa *capa)
1905 {
1906         LASSERT(handle != NULL);
1907
1908         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_WRITE))
1909                 return -EACCES;
1910
1911         return __osd_xattr_set(env, dt, buf, name, fl);
1912 }
1913
1914 /*
1915  * Concurrency: @dt is read locked.
1916  */
1917 static int osd_xattr_list(const struct lu_env *env,
1918                           struct dt_object *dt,
1919                           struct lu_buf *buf,
1920                           struct lustre_capa *capa)
1921 {
1922         struct osd_object      *obj    = osd_dt_obj(dt);
1923         struct inode           *inode  = obj->oo_inode;
1924         struct osd_thread_info *info   = osd_oti_get(env);
1925         struct dentry          *dentry = &info->oti_obj_dentry;
1926
1927         LASSERT(dt_object_exists(dt));
1928         LASSERT(inode->i_op != NULL && inode->i_op->listxattr != NULL);
1929         LASSERT(osd_read_locked(env, obj) || osd_write_locked(env, obj));
1930
1931         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_READ))
1932                 return -EACCES;
1933
1934         dentry->d_inode = inode;
1935         return inode->i_op->listxattr(dentry, buf->lb_buf, buf->lb_len);
1936 }
1937
1938 /*
1939  * Concurrency: @dt is write locked.
1940  */
1941 static int osd_xattr_del(const struct lu_env *env,
1942                          struct dt_object *dt,
1943                          const char *name,
1944                          struct thandle *handle,
1945                          struct lustre_capa *capa)
1946 {
1947         struct osd_object      *obj    = osd_dt_obj(dt);
1948         struct inode           *inode  = obj->oo_inode;
1949         struct osd_thread_info *info   = osd_oti_get(env);
1950         struct dentry          *dentry = &info->oti_obj_dentry;
1951         struct timespec        *t      = &info->oti_time;
1952         int                     rc;
1953
1954         LASSERT(dt_object_exists(dt));
1955         LASSERT(inode->i_op != NULL && inode->i_op->removexattr != NULL);
1956         LASSERT(osd_write_locked(env, obj));
1957         LASSERT(handle != NULL);
1958
1959         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_WRITE))
1960                 return -EACCES;
1961
1962         dentry->d_inode = inode;
1963         *t = inode->i_ctime;
1964         rc = inode->i_op->removexattr(dentry, name);
1965         if (likely(rc == 0)) {
1966                 /* ctime should not be updated with server-side time. */
1967                 spin_lock(&obj->oo_guard);
1968                 inode->i_ctime = *t;
1969                 spin_unlock(&obj->oo_guard);
1970                 mark_inode_dirty(inode);
1971         }
1972         return rc;
1973 }
1974
1975 static struct obd_capa *osd_capa_get(const struct lu_env *env,
1976                                      struct dt_object *dt,
1977                                      struct lustre_capa *old,
1978                                      __u64 opc)
1979 {
1980         struct osd_thread_info *info = osd_oti_get(env);
1981         const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
1982         struct osd_object *obj = osd_dt_obj(dt);
1983         struct osd_device *dev = osd_obj2dev(obj);
1984         struct lustre_capa_key *key = &info->oti_capa_key;
1985         struct lustre_capa *capa = &info->oti_capa;
1986         struct obd_capa *oc;
1987         struct md_capainfo *ci;
1988         int rc;
1989         ENTRY;
1990
1991         if (!dev->od_fl_capa)
1992                 RETURN(ERR_PTR(-ENOENT));
1993
1994         LASSERT(dt_object_exists(dt));
1995         LINVRNT(osd_invariant(obj));
1996
1997         /* renewal sanity check */
1998         if (old && osd_object_auth(env, dt, old, opc))
1999                 RETURN(ERR_PTR(-EACCES));
2000
2001         ci = md_capainfo(env);
2002         if (unlikely(!ci))
2003                 RETURN(ERR_PTR(-ENOENT));
2004
2005         switch (ci->mc_auth) {
2006         case LC_ID_NONE:
2007                 RETURN(NULL);
2008         case LC_ID_PLAIN:
2009                 capa->lc_uid = obj->oo_inode->i_uid;
2010                 capa->lc_gid = obj->oo_inode->i_gid;
2011                 capa->lc_flags = LC_ID_PLAIN;
2012                 break;
2013         case LC_ID_CONVERT: {
2014                 __u32 d[4], s[4];
2015
2016                 s[0] = obj->oo_inode->i_uid;
2017                 get_random_bytes(&(s[1]), sizeof(__u32));
2018                 s[2] = obj->oo_inode->i_gid;
2019                 get_random_bytes(&(s[3]), sizeof(__u32));
2020                 rc = capa_encrypt_id(d, s, key->lk_key, CAPA_HMAC_KEY_MAX_LEN);
2021                 if (unlikely(rc))
2022                         RETURN(ERR_PTR(rc));
2023
2024                 capa->lc_uid   = ((__u64)d[1] << 32) | d[0];
2025                 capa->lc_gid   = ((__u64)d[3] << 32) | d[2];
2026                 capa->lc_flags = LC_ID_CONVERT;
2027                 break;
2028         }
2029         default:
2030                 RETURN(ERR_PTR(-EINVAL));
2031         }
2032
2033         capa->lc_fid = *fid;
2034         capa->lc_opc = opc;
2035         capa->lc_flags |= dev->od_capa_alg << 24;
2036         capa->lc_timeout = dev->od_capa_timeout;
2037         capa->lc_expiry = 0;
2038
2039         oc = capa_lookup(dev->od_capa_hash, capa, 1);
2040         if (oc) {
2041                 LASSERT(!capa_is_expired(oc));
2042                 RETURN(oc);
2043         }
2044
2045         spin_lock(&capa_lock);
2046         *key = dev->od_capa_keys[1];
2047         spin_unlock(&capa_lock);
2048
2049         capa->lc_keyid = key->lk_keyid;
2050         capa->lc_expiry = cfs_time_current_sec() + dev->od_capa_timeout;
2051
2052         rc = capa_hmac(capa->lc_hmac, capa, key->lk_key);
2053         if (rc) {
2054                 DEBUG_CAPA(D_ERROR, capa, "HMAC failed: %d for", rc);
2055                 RETURN(ERR_PTR(rc));
2056         }
2057
2058         oc = capa_add(dev->od_capa_hash, capa);
2059         RETURN(oc);
2060 }
2061
2062 static int osd_object_sync(const struct lu_env *env, struct dt_object *dt)
2063 {
2064         int rc;
2065         struct osd_object      *obj    = osd_dt_obj(dt);
2066         struct inode           *inode  = obj->oo_inode;
2067         struct osd_thread_info *info   = osd_oti_get(env);
2068         struct dentry          *dentry = &info->oti_obj_dentry;
2069         struct file            *file   = &info->oti_file;
2070         ENTRY;
2071
2072         dentry->d_inode = inode;
2073         file->f_dentry = dentry;
2074         file->f_mapping = inode->i_mapping;
2075         file->f_op = inode->i_fop;
2076         LOCK_INODE_MUTEX(inode);
2077         rc = file->f_op->fsync(file, dentry, 0);
2078         UNLOCK_INODE_MUTEX(inode);
2079         RETURN(rc);
2080 }
2081
2082 static const struct dt_object_operations osd_obj_ops = {
2083         .do_read_lock    = osd_object_read_lock,
2084         .do_write_lock   = osd_object_write_lock,
2085         .do_read_unlock  = osd_object_read_unlock,
2086         .do_write_unlock = osd_object_write_unlock,
2087         .do_attr_get     = osd_attr_get,
2088         .do_attr_set     = osd_attr_set,
2089         .do_ah_init      = osd_ah_init,
2090         .do_create       = osd_object_create,
2091         .do_index_try    = osd_index_try,
2092         .do_ref_add      = osd_object_ref_add,
2093         .do_ref_del      = osd_object_ref_del,
2094         .do_xattr_get    = osd_xattr_get,
2095         .do_xattr_set    = osd_xattr_set,
2096         .do_xattr_del    = osd_xattr_del,
2097         .do_xattr_list   = osd_xattr_list,
2098         .do_capa_get     = osd_capa_get,
2099         .do_object_sync  = osd_object_sync,
2100 };
2101
2102 /**
2103  * dt_object_operations for interoperability mode
2104  * (i.e. to run 2.0 mds on 1.8 disk) (b11826)
2105  */
2106 static const struct dt_object_operations osd_obj_ea_ops = {
2107         .do_read_lock    = osd_object_read_lock,
2108         .do_write_lock   = osd_object_write_lock,
2109         .do_read_unlock  = osd_object_read_unlock,
2110         .do_write_unlock = osd_object_write_unlock,
2111         .do_attr_get     = osd_attr_get,
2112         .do_attr_set     = osd_attr_set,
2113         .do_ah_init      = osd_ah_init,
2114         .do_create       = osd_object_ea_create,
2115         .do_index_try    = osd_index_try,
2116         .do_ref_add      = osd_object_ref_add,
2117         .do_ref_del      = osd_object_ref_del,
2118         .do_xattr_get    = osd_xattr_get,
2119         .do_xattr_set    = osd_xattr_set,
2120         .do_xattr_del    = osd_xattr_del,
2121         .do_xattr_list   = osd_xattr_list,
2122         .do_capa_get     = osd_capa_get,
2123         .do_object_sync  = osd_object_sync,
2124 };
2125
2126 /*
2127  * Body operations.
2128  */
2129
2130 /*
2131  * XXX: Another layering violation for now.
2132  *
2133  * We don't want to use ->f_op->read methods, because generic file write
2134  *
2135  *         - serializes on ->i_sem, and
2136  *
2137  *         - does a lot of extra work like balance_dirty_pages(),
2138  *
2139  * which doesn't work for globally shared files like /last-received.
2140  */
2141 int fsfilt_ldiskfs_read(struct inode *inode, void *buf, int size, loff_t *offs);
2142 int fsfilt_ldiskfs_write_handle(struct inode *inode, void *buf, int bufsize,
2143                                 loff_t *offs, handle_t *handle);
2144
2145 static ssize_t osd_read(const struct lu_env *env, struct dt_object *dt,
2146                         struct lu_buf *buf, loff_t *pos,
2147                         struct lustre_capa *capa)
2148 {
2149         struct inode *inode = osd_dt_obj(dt)->oo_inode;
2150
2151         if (osd_object_auth(env, dt, capa, CAPA_OPC_BODY_READ))
2152                 RETURN(-EACCES);
2153
2154         return fsfilt_ldiskfs_read(inode, buf->lb_buf, buf->lb_len, pos);
2155 }
2156
2157 static ssize_t osd_write(const struct lu_env *env, struct dt_object *dt,
2158                          const struct lu_buf *buf, loff_t *pos,
2159                          struct thandle *handle, struct lustre_capa *capa,
2160                          int ignore_quota)
2161 {
2162         struct inode       *inode = osd_dt_obj(dt)->oo_inode;
2163         struct osd_thandle *oh;
2164         ssize_t             result;
2165 #ifdef HAVE_QUOTA_SUPPORT
2166         cfs_cap_t           save = current->cap_effective;
2167 #endif
2168
2169         LASSERT(handle != NULL);
2170
2171         if (osd_object_auth(env, dt, capa, CAPA_OPC_BODY_WRITE))
2172                 RETURN(-EACCES);
2173
2174         oh = container_of(handle, struct osd_thandle, ot_super);
2175         LASSERT(oh->ot_handle->h_transaction != NULL);
2176 #ifdef HAVE_QUOTA_SUPPORT
2177         if (ignore_quota)
2178                 current->cap_effective |= CFS_CAP_SYS_RESOURCE_MASK;
2179         else
2180                 current->cap_effective &= ~CFS_CAP_SYS_RESOURCE_MASK;
2181 #endif
2182         result = fsfilt_ldiskfs_write_handle(inode, buf->lb_buf, buf->lb_len,
2183                                              pos, oh->ot_handle);
2184 #ifdef HAVE_QUOTA_SUPPORT
2185         current->cap_effective = save;
2186 #endif
2187         if (result == 0)
2188                 result = buf->lb_len;
2189         return result;
2190 }
2191
2192 static const struct dt_body_operations osd_body_ops = {
2193         .dbo_read  = osd_read,
2194         .dbo_write = osd_write
2195 };
2196
2197 /*
2198  * Index operations.
2199  */
2200
2201 static int osd_object_is_root(const struct osd_object *obj)
2202 {
2203         return osd_sb(osd_obj2dev(obj))->s_root->d_inode == obj->oo_inode;
2204 }
2205
2206 static int osd_iam_index_probe(const struct lu_env *env, struct osd_object *o,
2207                            const struct dt_index_features *feat)
2208 {
2209         struct iam_descr *descr;
2210         struct dt_object *dt = &o->oo_dt;
2211
2212         if (osd_object_is_root(o))
2213                 return feat == &dt_directory_features;
2214
2215         LASSERT(o->oo_dir != NULL);
2216
2217         descr = o->oo_dir->od_container.ic_descr;
2218         if (feat == &dt_directory_features) {
2219                 if (descr->id_rec_size == sizeof(struct lu_fid_pack))
2220                         return 1;
2221
2222                 if (descr == &iam_htree_compat_param) {
2223                         /* if it is a HTREE dir then there is good chance that,
2224                          * we dealing with ext3 directory here with no FIDs. */
2225
2226                         if (descr->id_rec_size ==
2227                             sizeof ((struct ldiskfs_dir_entry_2 *)NULL)->inode) {
2228
2229                                 dt->do_index_ops = &osd_index_ea_ops;
2230                                 return 1;
2231                         }
2232                 }
2233                 return 0;
2234         } else {
2235                 return
2236                         feat->dif_keysize_min <= descr->id_key_size &&
2237                         descr->id_key_size <= feat->dif_keysize_max &&
2238                         feat->dif_recsize_min <= descr->id_rec_size &&
2239                         descr->id_rec_size <= feat->dif_recsize_max &&
2240                         !(feat->dif_flags & (DT_IND_VARKEY |
2241                                              DT_IND_VARREC | DT_IND_NONUNQ)) &&
2242                         ergo(feat->dif_flags & DT_IND_UPDATE,
2243                              1 /* XXX check that object (and file system) is
2244                                 * writable */);
2245         }
2246 }
2247
2248 static int osd_iam_container_init(const struct lu_env *env,
2249                                   struct osd_object *obj,
2250                                   struct osd_directory *dir)
2251 {
2252         int result;
2253         struct iam_container *bag;
2254
2255         bag    = &dir->od_container;
2256         result = iam_container_init(bag, &dir->od_descr, obj->oo_inode);
2257         if (result == 0) {
2258                 result = iam_container_setup(bag);
2259                 if (result == 0)
2260                         obj->oo_dt.do_index_ops = &osd_index_iam_ops;
2261                 else
2262                         iam_container_fini(bag);
2263         }
2264         return result;
2265 }
2266
2267 /*
2268  * Concurrency: no external locking is necessary.
2269  */
2270 static int osd_index_try(const struct lu_env *env, struct dt_object *dt,
2271                          const struct dt_index_features *feat)
2272 {
2273         int result;
2274         int ea_dir = 0;
2275         struct osd_object *obj = osd_dt_obj(dt);
2276         struct osd_device *osd = osd_obj2dev(obj);
2277
2278         LINVRNT(osd_invariant(obj));
2279         LASSERT(dt_object_exists(dt));
2280
2281         if (osd_object_is_root(obj)) {
2282                 dt->do_index_ops = &osd_index_ea_ops;
2283                 result = 0;
2284         } else if (feat == &dt_directory_features && osd->od_iop_mode) {
2285                 dt->do_index_ops = &osd_index_ea_ops;
2286                 if (S_ISDIR(obj->oo_inode->i_mode))
2287                         result = 0;
2288                 else
2289                         result = -ENOTDIR;
2290                 ea_dir = 1;
2291         } else if (!osd_has_index(obj)) {
2292                 struct osd_directory *dir;
2293
2294                 OBD_ALLOC_PTR(dir);
2295                 if (dir != NULL) {
2296                         sema_init(&dir->od_sem, 1);
2297
2298                         spin_lock(&obj->oo_guard);
2299                         if (obj->oo_dir == NULL)
2300                                 obj->oo_dir = dir;
2301                         else
2302                                 /*
2303                                  * Concurrent thread allocated container data.
2304                                  */
2305                                 OBD_FREE_PTR(dir);
2306                         spin_unlock(&obj->oo_guard);
2307                         /*
2308                          * Now, that we have container data, serialize its
2309                          * initialization.
2310                          */
2311                         down(&obj->oo_dir->od_sem);
2312                         /*
2313                          * recheck under lock.
2314                          */
2315                         if (!osd_has_index(obj))
2316                                 result = osd_iam_container_init(env, obj, dir);
2317                         else
2318                                 result = 0;
2319                         up(&obj->oo_dir->od_sem);
2320                 } else
2321                         result = -ENOMEM;
2322         } else
2323                 result = 0;
2324
2325         if (result == 0 && ea_dir == 0) {
2326                 if (!osd_iam_index_probe(env, obj, feat))
2327                         result = -ENOTDIR;
2328         }
2329         LINVRNT(osd_invariant(obj));
2330
2331         return result;
2332 }
2333
2334 /**
2335  *      delete a (key, value) pair from index \a dt specified by \a key
2336  *
2337  *      \param  dt_object      osd index object
2338  *      \param  key     key for index
2339  *      \param  rec     record reference
2340  *      \param  handle  transaction handler
2341  *
2342  *      \retval  0  success
2343  *      \retval -ve   failure
2344  */
2345
2346 static int osd_index_iam_delete(const struct lu_env *env, struct dt_object *dt,
2347                                 const struct dt_key *key, struct thandle *handle,
2348                                 struct lustre_capa *capa)
2349 {
2350         struct osd_object     *obj = osd_dt_obj(dt);
2351         struct osd_thandle    *oh;
2352         struct iam_path_descr *ipd;
2353         struct iam_container  *bag = &obj->oo_dir->od_container;
2354         int rc;
2355
2356         ENTRY;
2357
2358         LINVRNT(osd_invariant(obj));
2359         LASSERT(dt_object_exists(dt));
2360         LASSERT(bag->ic_object == obj->oo_inode);
2361         LASSERT(handle != NULL);
2362
2363         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_DELETE))
2364                 RETURN(-EACCES);
2365
2366         ipd = osd_idx_ipd_get(env, bag);
2367         if (unlikely(ipd == NULL))
2368                 RETURN(-ENOMEM);
2369
2370         oh = container_of0(handle, struct osd_thandle, ot_super);
2371         LASSERT(oh->ot_handle != NULL);
2372         LASSERT(oh->ot_handle->h_transaction != NULL);
2373
2374         rc = iam_delete(oh->ot_handle, bag, (const struct iam_key *)key, ipd);
2375         osd_ipd_put(env, bag, ipd);
2376         LINVRNT(osd_invariant(obj));
2377         RETURN(rc);
2378 }
2379
2380 /**
2381  * Index delete function for interoperability mode (b11826).
2382  * It will remove the directory entry added by osd_index_ea_insert().
2383  * This entry is needed to maintain name->fid mapping.
2384  *
2385  * \param key,  key i.e. file entry to be deleted
2386  *
2387  * \retval   0, on success
2388  * \retval -ve, on error
2389  */
2390 static int osd_index_ea_delete(const struct lu_env *env, struct dt_object *dt,
2391                                const struct dt_key *key, struct thandle *handle,
2392                                struct lustre_capa *capa)
2393 {
2394         struct osd_object          *obj    = osd_dt_obj(dt);
2395         struct inode               *dir    = obj->oo_inode;
2396         struct dentry              *dentry;
2397         struct osd_thandle         *oh;
2398         struct ldiskfs_dir_entry_2 *de;
2399         struct buffer_head         *bh;
2400
2401         int rc;
2402
2403         ENTRY;
2404
2405         LINVRNT(osd_invariant(obj));
2406         LASSERT(dt_object_exists(dt));
2407         LASSERT(handle != NULL);
2408
2409         oh = container_of(handle, struct osd_thandle, ot_super);
2410         LASSERT(oh->ot_handle != NULL);
2411         LASSERT(oh->ot_handle->h_transaction != NULL);
2412
2413         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_DELETE))
2414                 RETURN(-EACCES);
2415
2416         dentry = osd_child_dentry_get(env, obj,
2417                                       (char *)key, strlen((char *)key));
2418         bh = ldiskfs_find_entry(dentry, &de);
2419         if (bh) {
2420                 rc = ldiskfs_delete_entry(oh->ot_handle,
2421                                 dir, de, bh);
2422                 if (!rc)
2423                         mark_inode_dirty(dir);
2424                 brelse(bh);
2425         } else
2426                 rc = -ENOENT;
2427
2428         LASSERT(osd_invariant(obj));
2429         RETURN(rc);
2430 }
2431
2432 /**
2433  *      Lookup index for \a key and copy record to \a rec.
2434  *
2435  *      \param  dt_object      osd index object
2436  *      \param  key     key for index
2437  *      \param  rec     record reference
2438  *
2439  *      \retval  +ve  success : exact mach
2440  *      \retval  0    return record with key not greater than \a key
2441  *      \retval -ve   failure
2442  */
2443 static int osd_index_iam_lookup(const struct lu_env *env, struct dt_object *dt,
2444                                 struct dt_rec *rec, const struct dt_key *key,
2445                                 struct lustre_capa *capa)
2446 {
2447         struct osd_object     *obj = osd_dt_obj(dt);
2448         struct iam_path_descr *ipd;
2449         struct iam_container  *bag = &obj->oo_dir->od_container;
2450         struct osd_thread_info *oti = osd_oti_get(env);
2451         struct iam_iterator    *it = &oti->oti_idx_it;
2452         int rc;
2453         ENTRY;
2454
2455         LASSERT(osd_invariant(obj));
2456         LASSERT(dt_object_exists(dt));
2457         LASSERT(bag->ic_object == obj->oo_inode);
2458
2459         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_LOOKUP))
2460                 RETURN(-EACCES);
2461
2462         ipd = osd_idx_ipd_get(env, bag);
2463         if (IS_ERR(ipd))
2464                 RETURN(-ENOMEM);
2465
2466         /* got ipd now we can start iterator. */
2467         iam_it_init(it, bag, 0, ipd);
2468
2469         rc = iam_it_get(it, (struct iam_key *)key);
2470         if (rc >= 0)
2471                 iam_reccpy(&it->ii_path.ip_leaf, (struct iam_rec *)rec);
2472
2473         iam_it_put(it);
2474         iam_it_fini(it);
2475         osd_ipd_put(env, bag, ipd);
2476
2477         LINVRNT(osd_invariant(obj));
2478
2479         RETURN(rc);
2480 }
2481
2482 /**
2483  *      Inserts (key, value) pair in \a dt index object.
2484  *
2485  *      \param  dt      osd index object
2486  *      \param  key     key for index
2487  *      \param  rec     record reference
2488  *      \param  th      transaction handler
2489  *
2490  *      \retval  0  success
2491  *      \retval -ve failure
2492  */
2493 static int osd_index_iam_insert(const struct lu_env *env, struct dt_object *dt,
2494                                 const struct dt_rec *rec, const struct dt_key *key,
2495                                 struct thandle *th, struct lustre_capa *capa,
2496                                 int ignore_quota)
2497 {
2498         struct osd_object     *obj = osd_dt_obj(dt);
2499         struct iam_path_descr *ipd;
2500         struct osd_thandle    *oh;
2501         struct iam_container  *bag = &obj->oo_dir->od_container;
2502 #ifdef HAVE_QUOTA_SUPPORT
2503         cfs_cap_t              save = current->cap_effective;
2504 #endif
2505         int rc;
2506
2507         ENTRY;
2508
2509         LINVRNT(osd_invariant(obj));
2510         LASSERT(dt_object_exists(dt));
2511         LASSERT(bag->ic_object == obj->oo_inode);
2512         LASSERT(th != NULL);
2513
2514         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_INSERT))
2515                 return -EACCES;
2516
2517         ipd = osd_idx_ipd_get(env, bag);
2518         if (unlikely(ipd == NULL))
2519                 RETURN(-ENOMEM);
2520
2521         oh = container_of0(th, struct osd_thandle, ot_super);
2522         LASSERT(oh->ot_handle != NULL);
2523         LASSERT(oh->ot_handle->h_transaction != NULL);
2524 #ifdef HAVE_QUOTA_SUPPORT
2525         if (ignore_quota)
2526                 current->cap_effective |= CFS_CAP_SYS_RESOURCE_MASK;
2527         else
2528                 current->cap_effective &= ~CFS_CAP_SYS_RESOURCE_MASK;
2529 #endif
2530         rc = iam_insert(oh->ot_handle, bag, (const struct iam_key *)key,
2531                         (struct iam_rec *)rec, ipd);
2532 #ifdef HAVE_QUOTA_SUPPORT
2533         current->cap_effective = save;
2534 #endif
2535         osd_ipd_put(env, bag, ipd);
2536         LINVRNT(osd_invariant(obj));
2537         RETURN(rc);
2538 }
2539
2540 /**
2541  * Calls ldiskfs_add_dot_dotdot() to add dot and dotdot entries
2542  * into the directory.Also sets flags into osd object to
2543  * indicate dot and dotdot are created. This is required for
2544  * interoperability mode (b11826)
2545  *
2546  * \param dir   directory for dot and dotdot fixup.
2547  * \param obj   child object for linking
2548  *
2549  * \retval   0, on success
2550  * \retval -ve, on error
2551  */
2552 static int osd_add_dot_dotdot(struct osd_thread_info *info,
2553                               struct osd_object *dir,
2554                               struct osd_object *obj, const char *name,
2555                               struct thandle *th)
2556 {
2557         struct inode            *parent_dir   = obj->oo_inode;
2558         struct inode            *inode  = dir->oo_inode;
2559         struct osd_thandle      *oth;
2560         int result = 0;
2561
2562         oth = container_of(th, struct osd_thandle, ot_super);
2563         LASSERT(oth->ot_handle->h_transaction != NULL);
2564         LASSERT(S_ISDIR(dir->oo_inode->i_mode));
2565
2566         if (strcmp(name, dot) == 0) {
2567                 if (dir->oo_compat_dot_created) {
2568                         result = -EEXIST;
2569                 } else {
2570                         LASSERT(obj == dir);
2571                         dir->oo_compat_dot_created = 1;
2572                         result = 0;
2573                 }
2574         } else if(strcmp(name, dotdot) == 0) {
2575                 if (!dir->oo_compat_dot_created)
2576                         return -EINVAL;
2577                 if (dir->oo_compat_dotdot_created)
2578                         return __osd_ea_add_rec(info, dir, obj, name, th);
2579
2580                 result = ldiskfs_add_dot_dotdot(oth->ot_handle, parent_dir, inode);
2581                 if (result == 0)
2582                        dir->oo_compat_dotdot_created = 1;
2583         }
2584
2585         return result;
2586 }
2587
2588 /**
2589  * Calls ldiskfs_add_entry() to add directory entry
2590  * into the directory. This is required for
2591  * interoperability mode (b11826)
2592  *
2593  * \retval   0, on success
2594  * \retval -ve, on error
2595  */
2596 static int __osd_ea_add_rec(struct osd_thread_info *info,
2597                             struct osd_object *pobj,
2598                             struct osd_object *cobj,
2599                             const char *name,
2600                             struct thandle *th)
2601 {
2602         struct dentry      *child;
2603         struct osd_thandle *oth;
2604         struct inode       *cinode  = cobj->oo_inode;
2605         int rc;
2606
2607         oth = container_of(th, struct osd_thandle, ot_super);
2608         LASSERT(oth->ot_handle != NULL);
2609         LASSERT(oth->ot_handle->h_transaction != NULL);
2610
2611         child = osd_child_dentry_get(info->oti_env, pobj, name, strlen(name));
2612         rc = ldiskfs_add_entry(oth->ot_handle, child, cinode);
2613
2614         RETURN(rc);
2615 }
2616
2617 /**
2618  * It will call the appropriate osd_add* function and return the
2619  * value, return by respective functions.
2620  */
2621 static int osd_ea_add_rec(const struct lu_env *env,
2622                           struct osd_object *pobj,
2623                           struct osd_object *cobj,
2624                           const char *name,
2625                           struct thandle *th)
2626 {
2627         struct osd_thread_info    *info   = osd_oti_get(env);
2628         int rc;
2629
2630         if (name[0] == '.' && (name[1] == '\0' || (name[1] == '.' &&
2631                                                    name[2] =='\0')))
2632                 rc = osd_add_dot_dotdot(info, pobj, cobj, name, th);
2633         else
2634                 rc = __osd_ea_add_rec(info, pobj, cobj, name, th);
2635
2636         return rc;
2637 }
2638
2639 /**
2640  * Calls ->lookup() to find dentry. From dentry get inode and
2641  * read inode's ea to get fid. This is required for  interoperability
2642  * mode (b11826)
2643  *
2644  * \retval   0, on success
2645  * \retval -ve, on error
2646  */
2647 static int osd_ea_lookup_rec(const struct lu_env *env, struct osd_object *obj,
2648                              struct dt_rec *rec, const struct dt_key *key)
2649 {
2650         struct inode            *dir    = obj->oo_inode;
2651         struct osd_thread_info  *info   = osd_oti_get(env);
2652         struct dentry           *dentry;
2653         struct osd_device      *dev = osd_dev(obj->oo_dt.do_lu.lo_dev);
2654         struct osd_inode_id    *id     = &info->oti_id;
2655         struct ldiskfs_dir_entry_2 *de;
2656         struct buffer_head         *bh;
2657         struct inode *inode;
2658         int ino;
2659         int rc;
2660
2661         LASSERT(dir->i_op != NULL && dir->i_op->lookup != NULL);
2662
2663         dentry = osd_child_dentry_get(env, obj,
2664                                       (char *)key, strlen((char *)key));
2665         bh = ldiskfs_find_entry(dentry, &de);
2666         if (bh) {
2667                 ino = le32_to_cpu(de->inode);
2668                 brelse(bh);
2669                 id->oii_ino = ino;
2670                 id->oii_gen = OSD_OII_NOGEN;
2671
2672                 inode = osd_iget(info, dev, id);
2673                 if (!IS_ERR(inode)) {
2674                         dentry->d_inode = inode;
2675
2676                         rc = osd_ea_fid_get(env, dentry, rec);
2677                         iput(inode);
2678                 } else
2679                         rc = -ENOENT;
2680         } else
2681                 rc = -ENOENT;
2682
2683         RETURN (rc);
2684 }
2685
2686 /**
2687  * Find the osd object for given fid.
2688  *
2689  * \param fid, need to find the osd object having this fid
2690  *
2691  * \retval osd_object, on success
2692  * \retval        -ve, on error
2693  */
2694 struct osd_object *osd_object_find(const struct lu_env *env,
2695                                    struct dt_object *dt,
2696                                    const struct lu_fid *fid)
2697 {
2698         struct lu_device         *ludev = dt->do_lu.lo_dev;
2699         struct osd_object        *child = NULL;
2700         struct lu_object         *luch;
2701         struct lu_object         *lo;
2702
2703         luch = lu_object_find(env, ludev, fid, NULL);
2704         if (!IS_ERR(luch)) {
2705                 if (lu_object_exists(luch)) {
2706                         lo = lu_object_locate(luch->lo_header, ludev->ld_type);
2707                         if (lo != NULL)
2708                                 child = osd_obj(lo);
2709                         else
2710                                 LU_OBJECT_DEBUG(D_ERROR, env, luch,
2711                                                 "lu_object can't be located"
2712                                                 ""DFID"\n", PFID(fid));
2713
2714                         if (child == NULL) {
2715                                 lu_object_put(env, luch);
2716                                 CERROR("Unable to get osd_object\n");
2717                                 child = ERR_PTR(-ENOENT);
2718                         }
2719                 } else {
2720                         LU_OBJECT_DEBUG(D_ERROR, env, luch,
2721                                         "lu_object does not exists "DFID"\n",
2722                                         PFID(fid));
2723                         child = ERR_PTR(-ENOENT);
2724                 }
2725         } else
2726                 child = (void *)luch;
2727
2728         return child;
2729 }
2730
2731 /**
2732  * Put the osd object once done with it.
2733  *
2734  * \param obj, osd object that needs to be put
2735  */
2736 static inline void osd_object_put(const struct lu_env *env,
2737                                   struct osd_object *obj)
2738 {
2739         lu_object_put(env, &obj->oo_dt.do_lu);
2740 }
2741
2742 /**
2743  * Index add function for interoperability mode (b11826).
2744  * It will add the directory entry.This entry is needed to
2745  * maintain name->fid mapping.
2746  *
2747  * \param key, it is key i.e. file entry to be inserted
2748  * \param rec, it is value of given key i.e. fid
2749  *
2750  * \retval   0, on success
2751  * \retval -ve, on error
2752  */
2753 static int osd_index_ea_insert(const struct lu_env *env, struct dt_object *dt,
2754                                const struct dt_rec *rec,
2755                                const struct dt_key *key, struct thandle *th,
2756                                struct lustre_capa *capa, int ignore_quota)
2757 {
2758         struct osd_object        *obj   = osd_dt_obj(dt);
2759         struct lu_fid            *fid   = &osd_oti_get(env)->oti_fid;
2760         const struct lu_fid_pack *pack  = (const struct lu_fid_pack *)rec;
2761         const char               *name  = (const char *)key;
2762         struct osd_object        *child;
2763 #ifdef HAVE_QUOTA_SUPPORT
2764         cfs_cap_t              save = current->cap_effective;
2765 #endif
2766         int rc;
2767
2768         ENTRY;
2769
2770         LASSERT(osd_invariant(obj));
2771         LASSERT(dt_object_exists(dt));
2772         LASSERT(th != NULL);
2773
2774         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_INSERT))
2775                 RETURN(-EACCES);
2776
2777         rc = fid_unpack(pack, fid);
2778         if (rc != 0)
2779                 RETURN(rc);
2780         child = osd_object_find(env, dt, fid);
2781         if (!IS_ERR(child)) {
2782 #ifdef HAVE_QUOTA_SUPPORT
2783                 if (ignore_quota)
2784                         current->cap_effective |= CFS_CAP_SYS_RESOURCE_MASK;
2785                 else
2786                         current->cap_effective &= ~CFS_CAP_SYS_RESOURCE_MASK;
2787 #endif
2788                 rc = osd_ea_add_rec(env, obj, child, name, th);
2789
2790 #ifdef HAVE_QUOTA_SUPPORT
2791                 current->cap_effective = save;
2792 #endif
2793                 osd_object_put(env, child);
2794         } else {
2795                 rc = PTR_ERR(child);
2796         }
2797
2798         LASSERT(osd_invariant(obj));
2799         RETURN(rc);
2800 }
2801
2802 /**
2803  *  Initialize osd Iterator for given osd index object.
2804  *
2805  *  \param  dt      osd index object
2806  */
2807
2808 static struct dt_it *osd_it_iam_init(const struct lu_env *env,
2809                                  struct dt_object *dt,
2810                                  struct lustre_capa *capa)
2811 {
2812         struct osd_it_iam         *it;
2813         struct osd_thread_info *oti = osd_oti_get(env);
2814         struct osd_object     *obj = osd_dt_obj(dt);
2815         struct lu_object      *lo  = &dt->do_lu;
2816         struct iam_path_descr *ipd;
2817         struct iam_container  *bag = &obj->oo_dir->od_container;
2818
2819         LASSERT(lu_object_exists(lo));
2820
2821         if (osd_object_auth(env, dt, capa, CAPA_OPC_BODY_READ))
2822                 return ERR_PTR(-EACCES);
2823
2824         it = &oti->oti_it;
2825         ipd = osd_it_ipd_get(env, bag);
2826         if (likely(ipd != NULL)) {
2827                 it->oi_obj = obj;
2828                 it->oi_ipd = ipd;
2829                 lu_object_get(lo);
2830                 iam_it_init(&it->oi_it, bag, IAM_IT_MOVE, ipd);
2831                 return (struct dt_it *)it;
2832         }
2833         return ERR_PTR(-ENOMEM);
2834 }
2835
2836 /**
2837  * free given Iterator.
2838  */
2839
2840 static void osd_it_iam_fini(const struct lu_env *env, struct dt_it *di)
2841 {
2842         struct osd_it_iam     *it = (struct osd_it_iam *)di;
2843         struct osd_object *obj = it->oi_obj;
2844
2845         iam_it_fini(&it->oi_it);
2846         osd_ipd_put(env, &obj->oo_dir->od_container, it->oi_ipd);
2847         lu_object_put(env, &obj->oo_dt.do_lu);
2848 }
2849
2850 /**
2851  *  Move Iterator to record specified by \a key
2852  *
2853  *  \param  di      osd iterator
2854  *  \param  key     key for index
2855  *
2856  *  \retval +ve  di points to record with least key not larger than key
2857  *  \retval  0   di points to exact matched key
2858  *  \retval -ve  failure
2859  */
2860
2861 static int osd_it_iam_get(const struct lu_env *env,
2862                       struct dt_it *di, const struct dt_key *key)
2863 {
2864         struct osd_it_iam *it = (struct osd_it_iam *)di;
2865
2866         return iam_it_get(&it->oi_it, (const struct iam_key *)key);
2867 }
2868
2869 /**
2870  *  Release Iterator
2871  *
2872  *  \param  di      osd iterator
2873  */
2874
2875 static void osd_it_iam_put(const struct lu_env *env, struct dt_it *di)
2876 {
2877         struct osd_it_iam *it = (struct osd_it_iam *)di;
2878
2879         iam_it_put(&it->oi_it);
2880 }
2881
2882 /**
2883  *  Move iterator by one record
2884  *
2885  *  \param  di      osd iterator
2886  *
2887  *  \retval +1   end of container reached
2888  *  \retval  0   success
2889  *  \retval -ve  failure
2890  */
2891
2892 static int osd_it_iam_next(const struct lu_env *env, struct dt_it *di)
2893 {
2894         struct osd_it_iam *it = (struct osd_it_iam *)di;
2895
2896         return iam_it_next(&it->oi_it);
2897 }
2898
2899 /**
2900  * Return pointer to the key under iterator.
2901  */
2902
2903 static struct dt_key *osd_it_iam_key(const struct lu_env *env,
2904                                  const struct dt_it *di)
2905 {
2906         struct osd_it_iam *it = (struct osd_it_iam *)di;
2907
2908         return (struct dt_key *)iam_it_key_get(&it->oi_it);
2909 }
2910
2911 /**
2912  * Return size of key under iterator (in bytes)
2913  */
2914
2915 static int osd_it_iam_key_size(const struct lu_env *env, const struct dt_it *di)
2916 {
2917         struct osd_it_iam *it = (struct osd_it_iam *)di;
2918
2919         return iam_it_key_size(&it->oi_it);
2920 }
2921
2922 /**
2923  * Return pointer to the record under iterator.
2924  */
2925 static struct dt_rec *osd_it_iam_rec(const struct lu_env *env,
2926                                  const struct dt_it *di)
2927 {
2928         struct osd_it_iam *it = (struct osd_it_iam *)di;
2929
2930         return (struct dt_rec *)iam_it_rec_get(&it->oi_it);
2931 }
2932
2933 /**
2934  * Returns cookie for current Iterator position.
2935  */
2936 static __u64 osd_it_iam_store(const struct lu_env *env, const struct dt_it *di)
2937 {
2938         struct osd_it_iam *it = (struct osd_it_iam *)di;
2939
2940         return iam_it_store(&it->oi_it);
2941 }
2942
2943 /**
2944  * Restore iterator from cookie.
2945  *
2946  * \param  di      osd iterator
2947  * \param  hash    Iterator location cookie
2948  *
2949  * \retval +ve  di points to record with least key not larger than key.
2950  * \retval  0   di points to exact matched key
2951  * \retval -ve  failure
2952  */
2953
2954 static int osd_it_iam_load(const struct lu_env *env,
2955                        const struct dt_it *di, __u64 hash)
2956 {
2957         struct osd_it_iam *it = (struct osd_it_iam *)di;
2958
2959         return iam_it_load(&it->oi_it, hash);
2960 }
2961
2962 static const struct dt_index_operations osd_index_iam_ops = {
2963         .dio_lookup = osd_index_iam_lookup,
2964         .dio_insert = osd_index_iam_insert,
2965         .dio_delete = osd_index_iam_delete,
2966         .dio_it     = {
2967                 .init     = osd_it_iam_init,
2968                 .fini     = osd_it_iam_fini,
2969                 .get      = osd_it_iam_get,
2970                 .put      = osd_it_iam_put,
2971                 .next     = osd_it_iam_next,
2972                 .key      = osd_it_iam_key,
2973                 .key_size = osd_it_iam_key_size,
2974                 .rec      = osd_it_iam_rec,
2975                 .store    = osd_it_iam_store,
2976                 .load     = osd_it_iam_load
2977         }
2978 };
2979
2980 /**
2981  * Creates or initializes iterator context.
2982  *
2983  * \retval struct osd_it_ea, iterator structure on success
2984  *
2985  */
2986 static struct dt_it *osd_it_ea_init(const struct lu_env *env,
2987                                     struct dt_object *dt,
2988                                     struct lustre_capa *capa)
2989 {
2990         struct osd_object       *obj  = osd_dt_obj(dt);
2991         struct osd_thread_info  *info = osd_oti_get(env);
2992         struct osd_it_ea        *it   = &info->oti_it_ea;
2993         struct lu_object        *lo   = &dt->do_lu;
2994         struct dentry           *obj_dentry = &info->oti_it_dentry;
2995         ENTRY;
2996         LASSERT(lu_object_exists(lo));
2997
2998         obj_dentry->d_inode = obj->oo_inode;
2999         obj_dentry->d_sb = osd_sb(osd_obj2dev(obj));
3000         obj_dentry->d_name.hash = 0;
3001
3002         it->oie_namelen         = 0;
3003         it->oie_curr_pos        = 0;
3004         it->oie_next_pos        = 0;
3005         it->oie_obj             = obj;
3006         it->oie_file.f_dentry   = obj_dentry;
3007         it->oie_file.f_mapping    = obj->oo_inode->i_mapping;
3008         it->oie_file.f_op         = obj->oo_inode->i_fop;
3009         it->oie_file.private_data = NULL;
3010         lu_object_get(lo);
3011
3012         RETURN((struct dt_it*) it);
3013 }
3014
3015 /**
3016  * Destroy or finishes iterator context.
3017  *
3018  * \param di, struct osd_it_ea, iterator structure to be destroyed
3019  */
3020 static void osd_it_ea_fini(const struct lu_env *env, struct dt_it *di)
3021 {
3022         struct osd_it_ea     *it   = (struct osd_it_ea *)di;
3023         struct osd_object    *obj  = it->oie_obj;
3024
3025
3026         ENTRY;
3027         lu_object_put(env, &obj->oo_dt.do_lu);
3028         EXIT;
3029 }
3030
3031 /**
3032  * It position the iterator at given key, so that next lookup continues from
3033  * that key Or it is similar to dio_it->load() but based on a key,
3034  * rather than file position.
3035  *
3036  * As a special convention, osd_it_ea_get(env, di, "") has to rewind iterator
3037  * to the beginning.
3038  *
3039  * TODO: Presently return +1 considering it is only used by mdd_dir_is_empty().
3040  */
3041 static int osd_it_ea_get(const struct lu_env *env,
3042                          struct dt_it *di, const struct dt_key *key)
3043 {
3044         struct osd_it_ea     *it   = (struct osd_it_ea *)di;
3045
3046         ENTRY;
3047         LASSERT(((const char *)key)[0] == '\0');
3048         it->oie_namelen         = 0;
3049         it->oie_curr_pos        = 0;
3050         it->oie_next_pos        = 0;
3051
3052         RETURN(+1);
3053 }
3054
3055 /**
3056  * Does nothing
3057  */
3058 static void osd_it_ea_put(const struct lu_env *env, struct dt_it *di)
3059 {
3060 }
3061
3062 /**
3063  * It is called internally by ->readdir(). It fills the
3064  * iterator's in-memory data structure with required
3065  * information i.e. name, namelen, rec_size etc.
3066  *
3067  * \param buf, in which information to be filled in.
3068  * \param name, name of the file in given dir
3069  *
3070  * \retval 0, on success
3071  * \retval 1, on buffer full
3072  */
3073 static int osd_ldiskfs_filldir(char *buf, const char *name, int namelen,
3074                                loff_t offset, ino_t ino,
3075                                unsigned int d_type)
3076 {
3077         struct osd_it_ea   *it     = (struct osd_it_ea *)buf;
3078         struct dirent64    *dirent = &it->oie_dirent64;
3079         int                 reclen = LDISKFS_DIR_REC_LEN(namelen);
3080
3081
3082         ENTRY;
3083         if (it->oie_namelen)
3084                 RETURN(-ENOENT);
3085
3086         if (namelen == 0 || namelen > LDISKFS_NAME_LEN)
3087                 RETURN(-EIO);
3088
3089         strncpy(dirent->d_name, name, LDISKFS_NAME_LEN);
3090         dirent->d_name[namelen] = 0;
3091         dirent->d_ino           = ino;
3092         dirent->d_off           = offset;
3093         dirent->d_reclen        = reclen;
3094         it->oie_namelen         = namelen;
3095         it->oie_curr_pos        = offset;
3096
3097         RETURN(0);
3098 }
3099
3100 /**
3101  * Calls ->readdir() to load a directory entry at a time
3102  * and stored it in iterator's in-memory data structure.
3103  *
3104  * \param di, struct osd_it_ea, iterator's in memory structure
3105  *
3106  * \retval   0, on success
3107  * \retval -ve, on error
3108  */
3109 int osd_ldiskfs_it_fill(const struct dt_it *di)
3110 {
3111         struct osd_it_ea   *it    = (struct osd_it_ea *)di;
3112         struct osd_object  *obj   = it->oie_obj;
3113         struct inode       *inode = obj->oo_inode;
3114         int                result = 0;
3115
3116         ENTRY;
3117         it->oie_namelen    = 0;
3118         it->oie_file.f_pos = it->oie_curr_pos;
3119
3120         result = inode->i_fop->readdir(&it->oie_file, it,
3121                                        (filldir_t) osd_ldiskfs_filldir);
3122
3123         it->oie_next_pos = it->oie_file.f_pos;
3124
3125         if(!result && it->oie_namelen == 0)
3126                 result = -EIO;
3127
3128         RETURN(result);
3129 }
3130
3131 /**
3132  * It calls osd_ldiskfs_it_fill() which will use ->readdir()
3133  * to load a directory entry at a time and stored it in
3134  * iterator's in-memory data structure.
3135  *
3136  * \param di, struct osd_it_ea, iterator's in memory structure
3137  *
3138  * \retval +ve, iterator reached to end
3139  * \retval   0, iterator not reached to end
3140  * \retval -ve, on error
3141  */
3142 static int osd_it_ea_next(const struct lu_env *env, struct dt_it *di)
3143 {
3144         struct osd_it_ea *it = (struct osd_it_ea *)di;
3145         int rc;
3146
3147         ENTRY;
3148         it->oie_curr_pos = it->oie_next_pos;
3149
3150         if (it->oie_curr_pos == LDISKFS_HTREE_EOF)
3151                 rc = +1;
3152         else
3153                 rc = osd_ldiskfs_it_fill(di);
3154
3155         RETURN(rc);
3156 }
3157
3158 /**
3159  * Returns the key at current position from iterator's in memory structure.
3160  *
3161  * \param di, struct osd_it_ea, iterator's in memory structure
3162  *
3163  * \retval key i.e. struct dt_key on success
3164  */
3165 static struct dt_key *osd_it_ea_key(const struct lu_env *env,
3166                                     const struct dt_it *di)
3167 {
3168         struct osd_it_ea *it = (struct osd_it_ea *)di;
3169         ENTRY;
3170         RETURN((struct dt_key *)it->oie_dirent64.d_name);
3171 }
3172
3173 /**
3174  * Returns the key's size at current position from iterator's in memory structure.
3175  *
3176  * \param di, struct osd_it_ea, iterator's in memory structure
3177  *
3178  * \retval key_size i.e. struct dt_key on success
3179  */
3180 static int osd_it_ea_key_size(const struct lu_env *env, const struct dt_it *di)
3181 {
3182         struct osd_it_ea *it = (struct osd_it_ea *)di;
3183         ENTRY;
3184         RETURN(it->oie_namelen);
3185 }
3186
3187 /**
3188  * Returns the value (i.e. fid/igif) at current position from iterator's
3189  * in memory structure.
3190  *
3191  * \param di, struct osd_it_ea, iterator's in memory structure
3192  *
3193  * \retval value i.e. struct dt_rec on success
3194  */
3195 static struct dt_rec *osd_it_ea_rec(const struct lu_env *env,
3196                                     const struct dt_it *di)
3197 {
3198         struct osd_it_ea       *it     = (struct osd_it_ea *)di;
3199         struct osd_object      *obj    = it->oie_obj;
3200         struct osd_thread_info *info   = osd_oti_get(env);
3201         struct osd_inode_id    *id     = &info->oti_id;
3202         struct lu_fid_pack     *rec    = &info->oti_pack;
3203         struct lu_device       *ldev   = obj->oo_dt.do_lu.lo_dev;
3204         struct dentry          *dentry = &info->oti_child_dentry;
3205         struct osd_device      *dev;
3206         struct inode           *inode;
3207         int                    rc;
3208
3209         ENTRY;
3210         dev  = osd_dev(ldev);
3211         id->oii_ino = it->oie_dirent64.d_ino;
3212         id->oii_gen = OSD_OII_NOGEN;
3213         inode = osd_iget(info, dev, id);
3214         if (!IS_ERR(inode)) {
3215                 dentry->d_inode = inode;
3216                 LASSERT(dentry->d_inode->i_sb == osd_sb(dev));
3217         } else {
3218                 CERROR("Error getting inode for ino =%d", id->oii_ino);
3219                 RETURN((struct dt_rec *) PTR_ERR(inode));
3220         }
3221
3222         rc = osd_ea_fid_get(env, dentry, (struct dt_rec*) rec);
3223
3224         iput(inode);
3225         RETURN((struct dt_rec *)rec);
3226
3227 }
3228
3229 /**
3230  * Returns a cookie for current position of the iterator head, so that
3231  * user can use this cookie to load/start the iterator next time.
3232  *
3233  * \param di, struct osd_it_ea, iterator's in memory structure
3234  *
3235  * \retval cookie for current position, on success
3236  */
3237 static __u64 osd_it_ea_store(const struct lu_env *env, const struct dt_it *di)
3238 {
3239         struct osd_it_ea *it = (struct osd_it_ea *)di;
3240         ENTRY;
3241         RETURN(it->oie_curr_pos);
3242 }
3243
3244 /**
3245  * It calls osd_ldiskfs_it_fill() which will use ->readdir()
3246  * to load a directory entry at a time and stored it i inn,
3247  * in iterator's in-memory data structure.
3248  *
3249  * \param di, struct osd_it_ea, iterator's in memory structure
3250  *
3251  * \retval +ve, on success
3252  * \retval -ve, on error
3253  */
3254 static int osd_it_ea_load(const struct lu_env *env,
3255                           const struct dt_it *di, __u64 hash)
3256 {
3257         struct osd_it_ea *it = (struct osd_it_ea *)di;
3258         int rc;
3259
3260         ENTRY;
3261         it->oie_curr_pos = it->oie_next_pos = hash;
3262
3263         rc =  osd_ldiskfs_it_fill(di);
3264         if (rc == 0)
3265                 rc = +1;
3266
3267         RETURN(rc);
3268 }
3269 /**
3270  * Index and Iterator operations for interoperability
3271  * mode (i.e. to run 2.0 mds on 1.8 disk) (b11826)
3272  */
3273 static const struct dt_index_operations osd_index_ea_ops = {
3274         .dio_lookup = osd_index_ea_lookup,
3275         .dio_insert = osd_index_ea_insert,
3276         .dio_delete = osd_index_ea_delete,
3277         .dio_it     = {
3278                 .init     = osd_it_ea_init,
3279                 .fini     = osd_it_ea_fini,
3280                 .get      = osd_it_ea_get,
3281                 .put      = osd_it_ea_put,
3282                 .next     = osd_it_ea_next,
3283                 .key      = osd_it_ea_key,
3284                 .key_size = osd_it_ea_key_size,
3285                 .rec      = osd_it_ea_rec,
3286                 .store    = osd_it_ea_store,
3287                 .load     = osd_it_ea_load
3288         }
3289 };
3290
3291 /**
3292  * Index lookup function for interoperability mode (b11826).
3293  *
3294  * \param key,  key i.e. file name to be searched
3295  *
3296  * \retval +ve, on success
3297  * \retval -ve, on error
3298  */
3299 static int osd_index_ea_lookup(const struct lu_env *env, struct dt_object *dt,
3300                                struct dt_rec *rec, const struct dt_key *key,
3301                                struct lustre_capa *capa)
3302 {
3303         struct osd_object *obj = osd_dt_obj(dt);
3304         int rc = 0;
3305
3306         ENTRY;
3307
3308         LASSERT(S_ISDIR(obj->oo_inode->i_mode));
3309         LINVRNT(osd_invariant(obj));
3310
3311         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_LOOKUP))
3312                 return -EACCES;
3313
3314         rc = osd_ea_lookup_rec(env, obj, rec, key);
3315
3316         if (rc == 0)
3317                 rc = +1;
3318         RETURN(rc);
3319 }
3320
3321 /* type constructor/destructor: osd_type_init, osd_type_fini */
3322 LU_TYPE_INIT_FINI(osd, &osd_key);
3323
3324 static struct lu_context_key osd_key = {
3325         .lct_tags = LCT_DT_THREAD | LCT_MD_THREAD,
3326         .lct_init = osd_key_init,
3327         .lct_fini = osd_key_fini,
3328         .lct_exit = osd_key_exit
3329 };
3330
3331 static void *osd_key_init(const struct lu_context *ctx,
3332                           struct lu_context_key *key)
3333 {
3334         struct osd_thread_info *info;
3335
3336         OBD_ALLOC_PTR(info);
3337         if (info != NULL)
3338                 info->oti_env = container_of(ctx, struct lu_env, le_ctx);
3339         else
3340                 info = ERR_PTR(-ENOMEM);
3341         return info;
3342 }
3343
3344 /* context key destructor: osd_key_fini */
3345 LU_KEY_FINI(osd, struct osd_thread_info);
3346
3347 static void osd_key_exit(const struct lu_context *ctx,
3348                          struct lu_context_key *key, void *data)
3349 {
3350         struct osd_thread_info *info = data;
3351
3352         LASSERT(info->oti_r_locks == 0);
3353         LASSERT(info->oti_w_locks == 0);
3354         LASSERT(info->oti_txns    == 0);
3355 }
3356
3357 static int osd_device_init(const struct lu_env *env, struct lu_device *d,
3358                            const char *name, struct lu_device *next)
3359 {
3360         int rc;
3361         struct lu_context *ctx;
3362
3363         /* context for commit hooks */
3364         ctx = &osd_dev(d)->od_env_for_commit.le_ctx;
3365         rc = lu_context_init(ctx, LCT_MD_THREAD|LCT_REMEMBER|LCT_NOREF);
3366         if (rc == 0) {
3367                 rc = osd_procfs_init(osd_dev(d), name);
3368                 ctx->lc_cookie = 0x3;
3369         }
3370         return rc;
3371 }
3372
3373 static int osd_shutdown(const struct lu_env *env, struct osd_device *o)
3374 {
3375         struct osd_thread_info *info = osd_oti_get(env);
3376         ENTRY;
3377         if (o->od_obj_area != NULL) {
3378                 lu_object_put(env, &o->od_obj_area->do_lu);
3379                 o->od_obj_area = NULL;
3380         }
3381         osd_oi_fini(info, &o->od_oi);
3382
3383         RETURN(0);
3384 }
3385
3386 static int osd_mount(const struct lu_env *env,
3387                      struct osd_device *o, struct lustre_cfg *cfg)
3388 {
3389         struct lustre_mount_info *lmi;
3390         const char               *dev  = lustre_cfg_string(cfg, 0);
3391         struct lustre_disk_data  *ldd;
3392         struct lustre_sb_info    *lsi;
3393
3394         ENTRY;
3395
3396         if (o->od_mount != NULL) {
3397                 CERROR("Already mounted (%s)\n", dev);
3398                 RETURN(-EEXIST);
3399         }
3400
3401         /* get mount */
3402         lmi = server_get_mount(dev);
3403         if (lmi == NULL) {
3404                 CERROR("Cannot get mount info for %s!\n", dev);
3405                 RETURN(-EFAULT);
3406         }
3407
3408         LASSERT(lmi != NULL);
3409         /* save lustre_mount_info in dt_device */
3410         o->od_mount = lmi;
3411
3412         lsi = s2lsi(lmi->lmi_sb);
3413         ldd = lsi->lsi_ldd;
3414
3415         if (ldd->ldd_flags & LDD_F_IAM_DIR) {
3416                 o->od_iop_mode = 0;
3417                 LCONSOLE_WARN("OSD: IAM mode enabled\n");
3418         } else
3419                 o->od_iop_mode = 1;
3420
3421         o->od_obj_area = NULL;
3422         RETURN(0);
3423 }
3424
3425 static struct lu_device *osd_device_fini(const struct lu_env *env,
3426                                          struct lu_device *d)
3427 {
3428         int rc;
3429         ENTRY;
3430
3431         shrink_dcache_sb(osd_sb(osd_dev(d)));
3432         osd_sync(env, lu2dt_dev(d));
3433
3434         rc = osd_procfs_fini(osd_dev(d));
3435         if (rc) {
3436                 CERROR("proc fini error %d \n", rc);
3437                 RETURN (ERR_PTR(rc));
3438         }
3439
3440         if (osd_dev(d)->od_mount)
3441                 server_put_mount(osd_dev(d)->od_mount->lmi_name,
3442                                  osd_dev(d)->od_mount->lmi_mnt);
3443         osd_dev(d)->od_mount = NULL;
3444
3445         lu_context_fini(&osd_dev(d)->od_env_for_commit.le_ctx);
3446         RETURN(NULL);
3447 }
3448
3449 static struct lu_device *osd_device_alloc(const struct lu_env *env,
3450                                           struct lu_device_type *t,
3451                                           struct lustre_cfg *cfg)
3452 {
3453         struct lu_device  *l;
3454         struct osd_device *o;
3455
3456         OBD_ALLOC_PTR(o);
3457         if (o != NULL) {
3458                 int result;
3459
3460                 result = dt_device_init(&o->od_dt_dev, t);
3461                 if (result == 0) {
3462                         l = osd2lu_dev(o);
3463                         l->ld_ops = &osd_lu_ops;
3464                         o->od_dt_dev.dd_ops = &osd_dt_ops;
3465                         spin_lock_init(&o->od_osfs_lock);
3466                         o->od_osfs_age = cfs_time_shift_64(-1000);
3467                         o->od_capa_hash = init_capa_hash();
3468                         if (o->od_capa_hash == NULL) {
3469                                 dt_device_fini(&o->od_dt_dev);
3470                                 l = ERR_PTR(-ENOMEM);
3471                         }
3472                 } else
3473                         l = ERR_PTR(result);
3474
3475                 if (IS_ERR(l))
3476                         OBD_FREE_PTR(o);
3477         } else
3478                 l = ERR_PTR(-ENOMEM);
3479         return l;
3480 }
3481
3482 static struct lu_device *osd_device_free(const struct lu_env *env,
3483                                          struct lu_device *d)
3484 {
3485         struct osd_device *o = osd_dev(d);
3486         ENTRY;
3487
3488         cleanup_capa_hash(o->od_capa_hash);
3489         dt_device_fini(&o->od_dt_dev);
3490         OBD_FREE_PTR(o);
3491         RETURN(NULL);
3492 }
3493
3494 static int osd_process_config(const struct lu_env *env,
3495                               struct lu_device *d, struct lustre_cfg *cfg)
3496 {
3497         struct osd_device *o = osd_dev(d);
3498         int err;
3499         ENTRY;
3500
3501         switch(cfg->lcfg_command) {
3502         case LCFG_SETUP:
3503                 err = osd_mount(env, o, cfg);
3504                 break;
3505         case LCFG_CLEANUP:
3506                 err = osd_shutdown(env, o);
3507                 break;
3508         default:
3509                 err = -ENOSYS;
3510         }
3511
3512         RETURN(err);
3513 }
3514
3515 extern void ldiskfs_orphan_cleanup (struct super_block * sb,
3516                                     struct ldiskfs_super_block * es);
3517
3518 static int osd_recovery_complete(const struct lu_env *env,
3519                                  struct lu_device *d)
3520 {
3521         struct osd_device *o = osd_dev(d);
3522         ENTRY;
3523         /* TODO: orphans handling */
3524         ldiskfs_orphan_cleanup(osd_sb(o), LDISKFS_SB(osd_sb(o))->s_es);
3525         RETURN(0);
3526 }
3527
3528 static int osd_prepare(const struct lu_env *env,
3529                        struct lu_device *pdev,
3530                        struct lu_device *dev)
3531 {
3532         struct osd_device *osd = osd_dev(dev);
3533         struct lustre_sb_info *lsi;
3534         struct lustre_disk_data *ldd;
3535         struct lustre_mount_info  *lmi;
3536         struct osd_thread_info *oti = osd_oti_get(env);
3537         struct dt_object *d;
3538         int result;
3539
3540         ENTRY;
3541         /* 1. initialize oi before any file create or file open */
3542         result = osd_oi_init(oti, &osd->od_oi,
3543                              &osd->od_dt_dev, lu2md_dev(pdev));
3544         if (result != 0)
3545                 RETURN(result);
3546
3547         lmi = osd->od_mount;
3548         lsi = s2lsi(lmi->lmi_sb);
3549         ldd = lsi->lsi_ldd;
3550
3551         /* 2. setup local objects */
3552         result = llo_local_objects_setup(env, lu2md_dev(pdev), lu2dt_dev(dev));
3553         if (result)
3554                 goto out;
3555
3556         /* 3. open remote object dir */
3557         d = dt_store_open(env, lu2dt_dev(dev), "",
3558                           remote_obj_dir, &oti->oti_fid);
3559         if (!IS_ERR(d)) {
3560                 osd->od_obj_area = d;
3561                 result = 0;
3562         } else {
3563                 result = PTR_ERR(d);
3564                 osd->od_obj_area = NULL;
3565         }
3566
3567 out:
3568         RETURN(result);
3569 }
3570
3571 static struct inode *osd_iget(struct osd_thread_info *info,
3572                               struct osd_device *dev,
3573                               const struct osd_inode_id *id)
3574 {
3575         struct inode *inode;
3576
3577         inode = iget(osd_sb(dev), id->oii_ino);
3578         if (inode == NULL) {
3579                 CERROR("no inode\n");
3580                 inode = ERR_PTR(-EACCES);
3581         } else if (is_bad_inode(inode)) {
3582                 CERROR("bad inode\n");
3583                 iput(inode);
3584                 inode = ERR_PTR(-ENOENT);
3585         } else if (id->oii_gen != OSD_OII_NOGEN &&
3586                    inode->i_generation != id->oii_gen) {
3587                 CERROR("stale inode\n");
3588                 iput(inode);
3589                 inode = ERR_PTR(-ESTALE);
3590         }
3591
3592         return inode;
3593
3594 }
3595
3596 static int osd_fid_lookup(const struct lu_env *env,
3597                           struct osd_object *obj, const struct lu_fid *fid)
3598 {
3599         struct osd_thread_info *info;
3600         struct lu_device       *ldev = obj->oo_dt.do_lu.lo_dev;
3601         struct osd_device      *dev;
3602         struct osd_inode_id    *id;
3603         struct osd_oi          *oi;
3604         struct inode           *inode;
3605         int                     result;
3606
3607         LINVRNT(osd_invariant(obj));
3608         LASSERT(obj->oo_inode == NULL);
3609         LASSERT(fid_is_sane(fid));
3610         /*
3611          * This assertion checks that osd layer sees only local
3612          * fids. Unfortunately it is somewhat expensive (does a
3613          * cache-lookup). Disabling it for production/acceptance-testing.
3614          */
3615         LASSERT(1 || fid_is_local(env, ldev->ld_site, fid));
3616
3617         ENTRY;
3618
3619         info = osd_oti_get(env);
3620         dev  = osd_dev(ldev);
3621         id   = &info->oti_id;
3622         oi   = &dev->od_oi;
3623
3624         if (OBD_FAIL_CHECK(OBD_FAIL_OST_ENOENT))
3625                 RETURN(-ENOENT);
3626
3627         result = osd_oi_lookup(info, oi, fid, id);
3628         if (result == 0) {
3629                 inode = osd_iget(info, dev, id);
3630                 if (!IS_ERR(inode)) {
3631                         obj->oo_inode = inode;
3632                         LASSERT(obj->oo_inode->i_sb == osd_sb(dev));
3633                         if (dev->od_iop_mode) {
3634                                 obj->oo_compat_dot_created = 1;
3635                                 obj->oo_compat_dotdot_created = 1;
3636                         }
3637                         result = 0;
3638                 } else
3639                         /*
3640                          * If fid wasn't found in oi, inode-less object is
3641                          * created, for which lu_object_exists() returns
3642                          * false. This is used in a (frequent) case when
3643                          * objects are created as locking anchors or
3644                          * place holders for objects yet to be created.
3645                          */
3646                         result = PTR_ERR(inode);
3647         } else if (result == -ENOENT)
3648                 result = 0;
3649         LINVRNT(osd_invariant(obj));
3650
3651         RETURN(result);
3652 }
3653
3654 static void osd_inode_getattr(const struct lu_env *env,
3655                               struct inode *inode, struct lu_attr *attr)
3656 {
3657         attr->la_valid      |= LA_ATIME | LA_MTIME | LA_CTIME | LA_MODE |
3658                                LA_SIZE | LA_BLOCKS | LA_UID | LA_GID |
3659                                LA_FLAGS | LA_NLINK | LA_RDEV | LA_BLKSIZE;
3660
3661         attr->la_atime      = LTIME_S(inode->i_atime);
3662         attr->la_mtime      = LTIME_S(inode->i_mtime);
3663         attr->la_ctime      = LTIME_S(inode->i_ctime);
3664         attr->la_mode       = inode->i_mode;
3665         attr->la_size       = i_size_read(inode);
3666         attr->la_blocks     = inode->i_blocks;
3667         attr->la_uid        = inode->i_uid;
3668         attr->la_gid        = inode->i_gid;
3669         attr->la_flags      = LDISKFS_I(inode)->i_flags;
3670         attr->la_nlink      = inode->i_nlink;
3671         attr->la_rdev       = inode->i_rdev;
3672         attr->la_blksize    = ll_inode_blksize(inode);
3673         attr->la_blkbits    = inode->i_blkbits;
3674 }
3675
3676 /*
3677  * Helpers.
3678  */
3679
3680 static int lu_device_is_osd(const struct lu_device *d)
3681 {
3682         return ergo(d != NULL && d->ld_ops != NULL, d->ld_ops == &osd_lu_ops);
3683 }
3684
3685 static struct osd_object *osd_obj(const struct lu_object *o)
3686 {
3687         LASSERT(lu_device_is_osd(o->lo_dev));
3688         return container_of0(o, struct osd_object, oo_dt.do_lu);
3689 }
3690
3691 static struct osd_device *osd_dt_dev(const struct dt_device *d)
3692 {
3693         LASSERT(lu_device_is_osd(&d->dd_lu_dev));
3694         return container_of0(d, struct osd_device, od_dt_dev);
3695 }
3696
3697 static struct osd_device *osd_dev(const struct lu_device *d)
3698 {
3699         LASSERT(lu_device_is_osd(d));
3700         return osd_dt_dev(container_of0(d, struct dt_device, dd_lu_dev));
3701 }
3702
3703 static struct osd_object *osd_dt_obj(const struct dt_object *d)
3704 {
3705         return osd_obj(&d->do_lu);
3706 }
3707
3708 static struct osd_device *osd_obj2dev(const struct osd_object *o)
3709 {
3710         return osd_dev(o->oo_dt.do_lu.lo_dev);
3711 }
3712
3713 static struct lu_device *osd2lu_dev(struct osd_device *osd)
3714 {
3715         return &osd->od_dt_dev.dd_lu_dev;
3716 }
3717
3718 static struct super_block *osd_sb(const struct osd_device *dev)
3719 {
3720         return dev->od_mount->lmi_mnt->mnt_sb;
3721 }
3722
3723 static journal_t *osd_journal(const struct osd_device *dev)
3724 {
3725         return LDISKFS_SB(osd_sb(dev))->s_journal;
3726 }
3727
3728 static int osd_has_index(const struct osd_object *obj)
3729 {
3730         return obj->oo_dt.do_index_ops != NULL;
3731 }
3732
3733 static int osd_object_invariant(const struct lu_object *l)
3734 {
3735         return osd_invariant(osd_obj(l));
3736 }
3737
3738 static const struct lu_object_operations osd_lu_obj_ops = {
3739         .loo_object_init      = osd_object_init,
3740         .loo_object_delete    = osd_object_delete,
3741         .loo_object_release   = osd_object_release,
3742         .loo_object_free      = osd_object_free,
3743         .loo_object_print     = osd_object_print,
3744         .loo_object_invariant = osd_object_invariant
3745 };
3746
3747 static const struct lu_device_operations osd_lu_ops = {
3748         .ldo_object_alloc      = osd_object_alloc,
3749         .ldo_process_config    = osd_process_config,
3750         .ldo_recovery_complete = osd_recovery_complete,
3751         .ldo_prepare           = osd_prepare,
3752 };
3753
3754 static const struct lu_device_type_operations osd_device_type_ops = {
3755         .ldto_init = osd_type_init,
3756         .ldto_fini = osd_type_fini,
3757
3758         .ldto_start = osd_type_start,
3759         .ldto_stop  = osd_type_stop,
3760
3761         .ldto_device_alloc = osd_device_alloc,
3762         .ldto_device_free  = osd_device_free,
3763
3764         .ldto_device_init    = osd_device_init,
3765         .ldto_device_fini    = osd_device_fini
3766 };
3767
3768 static struct lu_device_type osd_device_type = {
3769         .ldt_tags     = LU_DEVICE_DT,
3770         .ldt_name     = LUSTRE_OSD_NAME,
3771         .ldt_ops      = &osd_device_type_ops,
3772         .ldt_ctx_tags = LCT_MD_THREAD|LCT_DT_THREAD
3773 };
3774
3775 /*
3776  * lprocfs legacy support.
3777  */
3778 static struct obd_ops osd_obd_device_ops = {
3779         .o_owner = THIS_MODULE
3780 };
3781
3782 static struct lu_local_obj_desc llod_osd_rem_obj_dir = {
3783         .llod_name      = remote_obj_dir,
3784         .llod_oid       = OSD_REM_OBJ_DIR_OID,
3785         .llod_is_index  = 1,
3786         .llod_feat      = &dt_directory_features,
3787 };
3788
3789 static int __init osd_mod_init(void)
3790 {
3791         struct lprocfs_static_vars lvars;
3792
3793         osd_oi_mod_init();
3794         llo_local_obj_register(&llod_osd_rem_obj_dir);
3795         lprocfs_osd_init_vars(&lvars);
3796         return class_register_type(&osd_obd_device_ops, NULL, lvars.module_vars,
3797                                    LUSTRE_OSD_NAME, &osd_device_type);
3798 }
3799
3800 static void __exit osd_mod_exit(void)
3801 {
3802         llo_local_obj_unregister(&llod_osd_rem_obj_dir);
3803         class_unregister_type(LUSTRE_OSD_NAME);
3804 }
3805
3806 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
3807 MODULE_DESCRIPTION("Lustre Object Storage Device ("LUSTRE_OSD_NAME")");
3808 MODULE_LICENSE("GPL");
3809
3810 cfs_module(osd, "0.0.2", osd_mod_init, osd_mod_exit);