Whamcloud - gitweb
LU-6434 ofd: object reference leaks in ofd_preprw_write
[fs/lustre-release.git] / lustre / osp / osp_object.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2014, Intel Corporation.
31  */
32 /*
33  * lustre/osp/osp_object.c
34  *
35  * Lustre OST Proxy Device (OSP) is the agent on the local MDT for the OST
36  * or remote MDT.
37  *
38  * OSP object attributes cache
39  * ---------------------------
40  * OSP object is the stub of the remote OST-object or MDT-object. Both the
41  * attribute and the extended attributes are stored on the peer side remotely.
42  * It is inefficient to send RPC to peer to fetch those attributes when every
43  * get_attr()/get_xattr() called. For a large system, the LFSCK synchronous
44  * mode scanning is prohibitively inefficient.
45  *
46  * So the OSP maintains the OSP object attributes cache to cache some
47  * attributes on the local MDT. The cache is organized against the OSP
48  * object as follows:
49  *
50  * struct osp_xattr_entry {
51  *      struct list_head         oxe_list;
52  *      atomic_t                 oxe_ref;
53  *      void                    *oxe_value;
54  *      int                      oxe_buflen;
55  *      int                      oxe_namelen;
56  *      int                      oxe_vallen;
57  *      unsigned int             oxe_exist:1,
58  *                               oxe_ready:1;
59  *      char                     oxe_buf[0];
60  * };
61  *
62  * struct osp_object_attr {
63  *      struct lu_attr          ooa_attr;
64  *      struct list_head        ooa_xattr_list;
65  * };
66  *
67  * struct osp_object {
68  *      ...
69  *      struct osp_object_attr *opo_ooa;
70  *      spinlock_t              opo_lock;
71  *      ...
72  * };
73  *
74  * The basic attributes, such as owner/mode/flags, are stored in the
75  * osp_object_attr::ooa_attr. The extended attributes will be stored
76  * as osp_xattr_entry. Every extended attribute has an independent
77  * osp_xattr_entry, and all the osp_xattr_entry are linked into the
78  * osp_object_attr::ooa_xattr_list. The OSP object attributes cache
79  * is protected by the osp_object::opo_lock.
80  *
81  * Not all OSP objects have an attributes cache because maintaining
82  * the cache requires some resources. Currently, the OSP object
83  * attributes cache will be initialized when the attributes or the
84  * extended attributes are pre-fetched via osp_declare_attr_get()
85  * or osp_declare_xattr_get(). That is usually for LFSCK purpose,
86  * but it also can be shared by others.
87  *
88  *
89  * XXX: NOT prepare out RPC for remote transaction. ((please refer to the
90  *      comment of osp_trans_create() for remote transaction)
91  *
92  * According to our current transaction/dt_object_lock framework (to make
93  * the cross-MDTs modification for DNE1 to be workable), the transaction
94  * sponsor will start the transaction firstly, then try to acquire related
95  * dt_object_lock if needed. Under such rules, if we want to prepare the
96  * OUT RPC in the transaction declare phase, then related attr/xattr
97  * should be known without dt_object_lock. But such condition maybe not
98  * true for some remote transaction case. For example:
99  *
100  * For linkEA repairing (by LFSCK) case, before the LFSCK thread obtained
101  * the dt_object_lock on the target MDT-object, it cannot know whether
102  * the MDT-object has linkEA or not, neither invalid or not.
103  *
104  * Since the LFSCK thread cannot hold dt_object_lock before the remote
105  * transaction start (otherwise there will be some potential deadlock),
106  * it cannot prepare related OUT RPC for repairing during the declare
107  * phase as other normal transactions do.
108  *
109  * To resolve the trouble, we will make OSP to prepare related OUT RPC
110  * after remote transaction started, and trigger the remote updating
111  * (send RPC) when trans_stop. Then the up layer users, such as LFSCK,
112  * can follow the general rule to handle trans_start/dt_object_lock
113  * for repairing linkEA inconsistency without distinguishing remote
114  * MDT-object.
115  *
116  * In fact, above solution for remote transaction should be the normal
117  * model without considering DNE1. The trouble brought by DNE1 will be
118  * resolved in DNE2. At that time, this patch can be removed.
119  *
120  *
121  * Author: Alex Zhuravlev <alexey.zhuravlev@intel.com>
122  * Author: Mikhail Pershin <mike.tappro@intel.com>
123  */
124
125 #define DEBUG_SUBSYSTEM S_MDS
126
127 #include "osp_internal.h"
128
129 static inline __u32 osp_dev2node(struct osp_device *osp)
130 {
131         return osp->opd_storage->dd_lu_dev.ld_site->ld_seq_site->ss_node_id;
132 }
133
134 static inline bool is_ost_obj(struct lu_object *lo)
135 {
136         return !lu2osp_dev(lo->lo_dev)->opd_connect_mdt;
137 }
138
139 /**
140  * Assign FID to the OST object.
141  *
142  * This function will assign the FID to the OST object of a striped file.
143  *
144  * \param[in] env       pointer to the thread context
145  * \param[in] d         pointer to the OSP device
146  * \param[in] o         pointer to the OSP object that the FID will be
147  *                      assigned to
148  */
149 static void osp_object_assign_fid(const struct lu_env *env,
150                                   struct osp_device *d, struct osp_object *o)
151 {
152         struct osp_thread_info *osi = osp_env_info(env);
153
154         LASSERT(fid_is_zero(lu_object_fid(&o->opo_obj.do_lu)));
155         LASSERT(o->opo_reserved);
156         o->opo_reserved = 0;
157
158         osp_precreate_get_fid(env, d, &osi->osi_fid);
159
160         lu_object_assign_fid(env, &o->opo_obj.do_lu, &osi->osi_fid);
161 }
162
163 /**
164  * Initialize the OSP object attributes cache.
165  *
166  * \param[in] obj       pointer to the OSP object
167  *
168  * \retval              0 for success
169  * \retval              negative error number on failure
170  */
171 static int osp_oac_init(struct osp_object *obj)
172 {
173         struct osp_object_attr *ooa;
174
175         OBD_ALLOC_PTR(ooa);
176         if (ooa == NULL)
177                 return -ENOMEM;
178
179         INIT_LIST_HEAD(&ooa->ooa_xattr_list);
180         spin_lock(&obj->opo_lock);
181         if (likely(obj->opo_ooa == NULL)) {
182                 obj->opo_ooa = ooa;
183                 spin_unlock(&obj->opo_lock);
184         } else {
185                 spin_unlock(&obj->opo_lock);
186                 OBD_FREE_PTR(ooa);
187         }
188
189         return 0;
190 }
191
192 /**
193  * Find the named extended attribute in the OSP object attributes cache.
194  *
195  * The caller should take the osp_object::opo_lock before calling
196  * this function.
197  *
198  * \param[in] ooa       pointer to the OSP object attributes cache
199  * \param[in] name      the name of the extended attribute
200  * \param[in] namelen   the name length of the extended attribute
201  *
202  * \retval              pointer to the found extended attribute entry
203  * \retval              NULL if the specified extended attribute is not
204  *                      in the cache
205  */
206 static struct osp_xattr_entry *
207 osp_oac_xattr_find_locked(struct osp_object_attr *ooa,
208                           const char *name, size_t namelen)
209 {
210         struct osp_xattr_entry *oxe;
211
212         list_for_each_entry(oxe, &ooa->ooa_xattr_list, oxe_list) {
213                 if (namelen == oxe->oxe_namelen &&
214                     strncmp(name, oxe->oxe_buf, namelen) == 0)
215                         return oxe;
216         }
217
218         return NULL;
219 }
220
221 /**
222  * Find the named extended attribute in the OSP object attributes cache.
223  *
224  * Call osp_oac_xattr_find_locked() with the osp_object::opo_lock held.
225  *
226  * \param[in] obj       pointer to the OSP object
227  * \param[in] name      the name of the extended attribute
228  * \param[in] unlink    true if the extended attribute entry is to be removed
229  *                      from the cache
230  *
231  * \retval              pointer to the found extended attribute entry
232  * \retval              NULL if the specified extended attribute is not
233  *                      in the cache
234  */
235 static struct osp_xattr_entry *osp_oac_xattr_find(struct osp_object *obj,
236                                                   const char *name, bool unlink)
237 {
238         struct osp_xattr_entry *oxe = NULL;
239
240         spin_lock(&obj->opo_lock);
241         if (obj->opo_ooa != NULL) {
242                 oxe = osp_oac_xattr_find_locked(obj->opo_ooa, name,
243                                                 strlen(name));
244                 if (oxe != NULL) {
245                         if (unlink)
246                                 list_del_init(&oxe->oxe_list);
247                         else
248                                 atomic_inc(&oxe->oxe_ref);
249                 }
250         }
251         spin_unlock(&obj->opo_lock);
252
253         return oxe;
254 }
255
256 /**
257  * Find the named extended attribute in the OSP object attributes cache.
258  *
259  * If it is not in the cache, then add an empty entry (that will be
260  * filled later) to cache with the given name.
261  *
262  * \param[in] obj       pointer to the OSP object
263  * \param[in] name      the name of the extended attribute
264  * \param[in] len       the length of the extended attribute value
265  *
266  * \retval              pointer to the found or new-created extended
267  *                      attribute entry
268  * \retval              NULL if the specified extended attribute is not in the
269  *                      cache or fail to add new empty entry to the cache.
270  */
271 static struct osp_xattr_entry *
272 osp_oac_xattr_find_or_add(struct osp_object *obj, const char *name, size_t len)
273 {
274         struct osp_object_attr *ooa     = obj->opo_ooa;
275         struct osp_xattr_entry *oxe;
276         struct osp_xattr_entry *tmp     = NULL;
277         size_t                  namelen = strlen(name);
278         size_t                  size    = sizeof(*oxe) + namelen + 1 + len;
279
280         LASSERT(ooa != NULL);
281
282         oxe = osp_oac_xattr_find(obj, name, false);
283         if (oxe != NULL)
284                 return oxe;
285
286         OBD_ALLOC(oxe, size);
287         if (unlikely(oxe == NULL))
288                 return NULL;
289
290         INIT_LIST_HEAD(&oxe->oxe_list);
291         oxe->oxe_buflen = size;
292         oxe->oxe_namelen = namelen;
293         memcpy(oxe->oxe_buf, name, namelen);
294         oxe->oxe_value = oxe->oxe_buf + namelen + 1;
295         /* One ref is for the caller, the other is for the entry on the list. */
296         atomic_set(&oxe->oxe_ref, 2);
297
298         spin_lock(&obj->opo_lock);
299         tmp = osp_oac_xattr_find_locked(ooa, name, namelen);
300         if (tmp == NULL)
301                 list_add_tail(&oxe->oxe_list, &ooa->ooa_xattr_list);
302         else
303                 atomic_inc(&tmp->oxe_ref);
304         spin_unlock(&obj->opo_lock);
305
306         if (tmp != NULL) {
307                 OBD_FREE(oxe, size);
308                 oxe = tmp;
309         }
310
311         return oxe;
312 }
313
314 /**
315  * Add the given extended attribute to the OSP object attributes cache.
316  *
317  * If there is an old extended attributed entry with the same name,
318  * remove it from the cache and return it via the parameter \a poxe.
319  *
320  * \param[in] obj       pointer to the OSP object
321  * \param[in,out] poxe  double pointer to the OSP object extended attribute
322  *                      entry: the new extended attribute entry is transfered
323  *                      via such pointer target, and if old the extended
324  *                      attribute entry exists, then it will be returned back
325  *                      via such pointer target.
326  * \param[in] len       the length of the (new) extended attribute value
327  *
328  * \retval              pointer to the new extended attribute entry
329  * \retval              NULL for failure cases.
330  */
331 static struct osp_xattr_entry *
332 osp_oac_xattr_replace(struct osp_object *obj,
333                       struct osp_xattr_entry **poxe, size_t len)
334 {
335         struct osp_object_attr *ooa     = obj->opo_ooa;
336         struct osp_xattr_entry *oxe;
337         size_t                  namelen = (*poxe)->oxe_namelen;
338         size_t                  size    = sizeof(*oxe) + namelen + 1 + len;
339
340         LASSERT(ooa != NULL);
341
342         OBD_ALLOC(oxe, size);
343         if (unlikely(oxe == NULL))
344                 return NULL;
345
346         INIT_LIST_HEAD(&oxe->oxe_list);
347         oxe->oxe_buflen = size;
348         oxe->oxe_namelen = namelen;
349         memcpy(oxe->oxe_buf, (*poxe)->oxe_buf, namelen);
350         oxe->oxe_value = oxe->oxe_buf + namelen + 1;
351         /* One ref is for the caller, the other is for the entry on the list. */
352         atomic_set(&oxe->oxe_ref, 2);
353
354         spin_lock(&obj->opo_lock);
355         *poxe = osp_oac_xattr_find_locked(ooa, oxe->oxe_buf, namelen);
356         LASSERT(*poxe != NULL);
357
358         list_del_init(&(*poxe)->oxe_list);
359         list_add_tail(&oxe->oxe_list, &ooa->ooa_xattr_list);
360         spin_unlock(&obj->opo_lock);
361
362         return oxe;
363 }
364
365 /**
366  * Release reference from the OSP object extended attribute entry.
367  *
368  * If it is the last reference, then free the entry.
369  *
370  * \param[in] oxe       pointer to the OSP object extended attribute entry.
371  */
372 static inline void osp_oac_xattr_put(struct osp_xattr_entry *oxe)
373 {
374         if (atomic_dec_and_test(&oxe->oxe_ref)) {
375                 LASSERT(list_empty(&oxe->oxe_list));
376
377                 OBD_FREE(oxe, oxe->oxe_buflen);
378         }
379 }
380
381 /**
382  * Parse the OSP object attribute from the RPC reply.
383  *
384  * If the attribute is valid, then it will be added to the OSP object
385  * attributes cache.
386  *
387  * \param[in] env       pointer to the thread context
388  * \param[in] reply     pointer to the RPC reply
389  * \param[in] req       pointer to the RPC request
390  * \param[out] attr     pointer to buffer to hold the output attribute
391  * \param[in] obj       pointer to the OSP object
392  * \param[in] index     the index of the attribute buffer in the reply
393  *
394  * \retval              0 for success
395  * \retval              negative error number on failure
396  */
397 static int osp_get_attr_from_reply(const struct lu_env *env,
398                                    struct object_update_reply *reply,
399                                    struct ptlrpc_request *req,
400                                    struct lu_attr *attr,
401                                    struct osp_object *obj, int index)
402 {
403         struct osp_thread_info  *osi    = osp_env_info(env);
404         struct lu_buf           *rbuf   = &osi->osi_lb2;
405         struct obdo             *lobdo  = &osi->osi_obdo;
406         struct obdo             *wobdo;
407         int                     rc;
408
409         rc = object_update_result_data_get(reply, rbuf, index);
410         if (rc < 0)
411                 return rc;
412
413         wobdo = rbuf->lb_buf;
414         if (rbuf->lb_len != sizeof(*wobdo))
415                 return -EPROTO;
416
417         LASSERT(req != NULL);
418         if (ptlrpc_req_need_swab(req))
419                 lustre_swab_obdo(wobdo);
420
421         lustre_get_wire_obdo(NULL, lobdo, wobdo);
422         spin_lock(&obj->opo_lock);
423         if (obj->opo_ooa != NULL) {
424                 la_from_obdo(&obj->opo_ooa->ooa_attr, lobdo, lobdo->o_valid);
425                 if (attr != NULL)
426                         *attr = obj->opo_ooa->ooa_attr;
427         } else {
428                 LASSERT(attr != NULL);
429
430                 la_from_obdo(attr, lobdo, lobdo->o_valid);
431         }
432         spin_unlock(&obj->opo_lock);
433
434         return 0;
435 }
436
437 /**
438  * Interpreter function for getting OSP object attribute asynchronously.
439  *
440  * Called to interpret the result of an async mode RPC for getting the
441  * OSP object attribute.
442  *
443  * \param[in] env       pointer to the thread context
444  * \param[in] reply     pointer to the RPC reply
445  * \param[in] req       pointer to the RPC request
446  * \param[in] obj       pointer to the OSP object
447  * \param[out] data     pointer to buffer to hold the output attribute
448  * \param[in] index     the index of the attribute buffer in the reply
449  * \param[in] rc        the result for handling the RPC
450  *
451  * \retval              0 for success
452  * \retval              negative error number on failure
453  */
454 static int osp_attr_get_interpterer(const struct lu_env *env,
455                                     struct object_update_reply *reply,
456                                     struct ptlrpc_request *req,
457                                     struct osp_object *obj,
458                                     void *data, int index, int rc)
459 {
460         struct lu_attr *attr = data;
461
462         LASSERT(obj->opo_ooa != NULL);
463
464         if (rc == 0) {
465                 osp2lu_obj(obj)->lo_header->loh_attr |= LOHA_EXISTS;
466                 obj->opo_non_exist = 0;
467
468                 return osp_get_attr_from_reply(env, reply, req, NULL, obj,
469                                                index);
470         } else {
471                 if (rc == -ENOENT) {
472                         osp2lu_obj(obj)->lo_header->loh_attr &= ~LOHA_EXISTS;
473                         obj->opo_non_exist = 1;
474                 }
475
476                 spin_lock(&obj->opo_lock);
477                 attr->la_valid = 0;
478                 spin_unlock(&obj->opo_lock);
479         }
480
481         return 0;
482 }
483
484 /**
485  * Implement OSP layer dt_object_operations::do_declare_attr_get() interface.
486  *
487  * Declare that the caller will get attribute from the specified OST object.
488  *
489  * This function adds an Object Unified Target (OUT) sub-request to the per-OSP
490  * based shared asynchronous request queue. The osp_attr_get_interpterer()
491  * is registered as the interpreter function to handle the result of this
492  * sub-request.
493  *
494  * \param[in] env       pointer to the thread context
495  * \param[in] dt        pointer to the OSP layer dt_object
496  *
497  * \retval              0 for success
498  * \retval              negative error number on failure
499  */
500 static int osp_declare_attr_get(const struct lu_env *env, struct dt_object *dt)
501 {
502         struct osp_object       *obj    = dt2osp_obj(dt);
503         struct osp_device       *osp    = lu2osp_dev(dt->do_lu.lo_dev);
504         int                      rc     = 0;
505
506         if (obj->opo_ooa == NULL) {
507                 rc = osp_oac_init(obj);
508                 if (rc != 0)
509                         return rc;
510         }
511
512         mutex_lock(&osp->opd_async_requests_mutex);
513         rc = osp_insert_async_request(env, OUT_ATTR_GET, obj, 0, NULL, NULL,
514                                       &obj->opo_ooa->ooa_attr,
515                                       osp_attr_get_interpterer);
516         mutex_unlock(&osp->opd_async_requests_mutex);
517
518         return rc;
519 }
520
521 /**
522  * Implement OSP layer dt_object_operations::do_attr_get() interface.
523  *
524  * Get attribute from the specified MDT/OST object.
525  *
526  * If the attribute is in the OSP object attributes cache, then return
527  * the cached attribute directly. Otherwise it will trigger an OUT RPC
528  * to the peer to get the attribute synchronously, if successful, add it
529  * to the OSP attributes cache. (\see lustre/osp/osp_trans.c for OUT RPC.)
530  *
531  * \param[in] env       pointer to the thread context
532  * \param[in] dt        pointer to the OSP layer dt_object
533  * \param[out] attr     pointer to the buffer to hold the output attribute
534  *
535  * \retval              0 for success
536  * \retval              negative error number on failure
537  */
538 int osp_attr_get(const struct lu_env *env, struct dt_object *dt,
539                  struct lu_attr *attr)
540 {
541         struct osp_device               *osp = lu2osp_dev(dt->do_lu.lo_dev);
542         struct osp_object               *obj = dt2osp_obj(dt);
543         struct dt_device                *dev = &osp->opd_dt_dev;
544         struct dt_update_request        *update;
545         struct object_update_reply      *reply;
546         struct ptlrpc_request           *req = NULL;
547         int                             rc = 0;
548         ENTRY;
549
550         if (is_ost_obj(&dt->do_lu) && obj->opo_non_exist)
551                 RETURN(-ENOENT);
552
553         if (obj->opo_ooa != NULL) {
554                 spin_lock(&obj->opo_lock);
555                 if (obj->opo_ooa->ooa_attr.la_valid != 0) {
556                         *attr = obj->opo_ooa->ooa_attr;
557                         spin_unlock(&obj->opo_lock);
558
559                         RETURN(0);
560                 }
561                 spin_unlock(&obj->opo_lock);
562         }
563
564         update = dt_update_request_create(dev);
565         if (IS_ERR(update))
566                 RETURN(PTR_ERR(update));
567
568         rc = out_attr_get_pack(env, &update->dur_buf,
569                                lu_object_fid(&dt->do_lu));
570         if (rc != 0) {
571                 CERROR("%s: Insert update error "DFID": rc = %d\n",
572                        dev->dd_lu_dev.ld_obd->obd_name,
573                        PFID(lu_object_fid(&dt->do_lu)), rc);
574
575                 GOTO(out, rc);
576         }
577
578         rc = osp_remote_sync(env, osp, update, &req);
579         if (rc != 0) {
580                 if (rc == -ENOENT) {
581                         osp2lu_obj(obj)->lo_header->loh_attr &= ~LOHA_EXISTS;
582                         obj->opo_non_exist = 1;
583                 } else {
584                         CERROR("%s:osp_attr_get update error "DFID": rc = %d\n",
585                                dev->dd_lu_dev.ld_obd->obd_name,
586                                PFID(lu_object_fid(&dt->do_lu)), rc);
587                 }
588
589                 GOTO(out, rc);
590         }
591
592         osp2lu_obj(obj)->lo_header->loh_attr |= LOHA_EXISTS;
593         obj->opo_non_exist = 0;
594         reply = req_capsule_server_sized_get(&req->rq_pill,
595                                              &RMF_OUT_UPDATE_REPLY,
596                                              OUT_UPDATE_REPLY_SIZE);
597         if (reply == NULL || reply->ourp_magic != UPDATE_REPLY_MAGIC)
598                 GOTO(out, rc = -EPROTO);
599
600         rc = osp_get_attr_from_reply(env, reply, req, attr, obj, 0);
601         if (rc != 0)
602                 GOTO(out, rc);
603
604         GOTO(out, rc = 0);
605
606 out:
607         if (req != NULL)
608                 ptlrpc_req_finished(req);
609
610         dt_update_request_destroy(update);
611
612         return rc;
613 }
614
615 /**
616  * Implement OSP layer dt_object_operations::do_declare_attr_set() interface.
617  *
618  * If the transaction is not remote one, then declare the credits that will
619  * be used for the subsequent llog record for the object's attributes.
620  *
621  * \param[in] env       pointer to the thread context
622  * \param[in] dt        pointer to the OSP layer dt_object
623  * \param[in] attr      pointer to the attribute to be set
624  * \param[in] th        pointer to the transaction handler
625  *
626  * \retval              0 for success
627  * \retval              negative error number on failure
628  */
629 static int osp_declare_attr_set(const struct lu_env *env, struct dt_object *dt,
630                                 const struct lu_attr *attr, struct thandle *th)
631 {
632         struct osp_device       *d = lu2osp_dev(dt->do_lu.lo_dev);
633         struct osp_object       *o = dt2osp_obj(dt);
634         int                     rc;
635
636         if (is_only_remote_trans(th))
637                 return osp_md_declare_attr_set(env, dt, attr, th);
638         /*
639          * Usually we don't allow server stack to manipulate size
640          * but there is a special case when striping is created
641          * late, after stripeless file got truncated to non-zero.
642          *
643          * In this case we do the following:
644          *
645          * 1) grab id in declare - this can lead to leaked OST objects
646          *    but we don't currently have proper mechanism and the only
647          *    options we have are to do truncate RPC holding transaction
648          *    open (very bad) or to grab id in declare at cost of leaked
649          *    OST object in same very rare unfortunate case (just bad)
650          *    notice 1.6-2.0 do assignment outside of running transaction
651          *    all the time, meaning many more chances for leaked objects.
652          *
653          * 2) send synchronous truncate RPC with just assigned id
654          */
655
656         /* there are few places in MDD code still passing NULL
657          * XXX: to be fixed soon */
658         if (attr == NULL)
659                 RETURN(0);
660
661         if (attr->la_valid & LA_SIZE && attr->la_size > 0 &&
662             fid_is_zero(lu_object_fid(&o->opo_obj.do_lu))) {
663                 LASSERT(!dt_object_exists(dt));
664                 osp_object_assign_fid(env, d, o);
665                 rc = osp_object_truncate(env, dt, attr->la_size);
666                 if (rc != 0)
667                         RETURN(rc);
668         }
669
670         if (!(attr->la_valid & (LA_UID | LA_GID)))
671                 RETURN(0);
672
673         /* track all UID/GID changes via llog */
674         rc = osp_sync_declare_add(env, o, MDS_SETATTR64_REC, th);
675
676         return 0;
677 }
678
679 /**
680  * Implement OSP layer dt_object_operations::do_attr_set() interface.
681  *
682  * Set attribute to the specified OST object.
683  *
684  * If the transaction is a remote one, then add OUT_ATTR_SET sub-request
685  * in the OUT RPC that will be flushed when the remote transaction stop.
686  * Otherwise, it will generate a MDS_SETATTR64_REC record in the llog that
687  * will be handled by a dedicated thread asynchronously.
688  *
689  * If the attribute entry exists in the OSP object attributes cache,
690  * then update the cached attribute according to given attribute.
691  *
692  * \param[in] env       pointer to the thread context
693  * \param[in] dt        pointer to the OSP layer dt_object
694  * \param[in] attr      pointer to the attribute to be set
695  * \param[in] th        pointer to the transaction handler
696  *
697  * \retval              0 for success
698  * \retval              negative error number on failure
699  */
700 static int osp_attr_set(const struct lu_env *env, struct dt_object *dt,
701                         const struct lu_attr *attr, struct thandle *th)
702 {
703         struct osp_object       *o = dt2osp_obj(dt);
704         int                      rc = 0;
705         ENTRY;
706
707         /* we're interested in uid/gid changes only */
708         if (!(attr->la_valid & (LA_UID | LA_GID)))
709                 RETURN(0);
710
711         if (!is_only_remote_trans(th)) {
712                 rc = osp_sync_add(env, o, MDS_SETATTR64_REC, th, attr);
713                 /* XXX: send new uid/gid to OST ASAP? */
714         } else {
715                 struct lu_attr  *la;
716
717                 /* It is for OST-object attr_set directly without updating
718                  * local MDT-object attribute. It is usually used by LFSCK. */
719                 rc = osp_md_attr_set(env, dt, attr, th);
720                 CDEBUG(D_INFO, "(1) set attr "DFID": rc = %d\n",
721                        PFID(&dt->do_lu.lo_header->loh_fid), rc);
722
723                 if (rc != 0 || o->opo_ooa == NULL)
724                         RETURN(rc);
725
726                 /* Update the OSP object attributes cache. */
727                 la = &o->opo_ooa->ooa_attr;
728                 spin_lock(&o->opo_lock);
729                 if (attr->la_valid & LA_UID) {
730                         la->la_uid = attr->la_uid;
731                         la->la_valid |= LA_UID;
732                 }
733
734                 if (attr->la_valid & LA_GID) {
735                         la->la_gid = attr->la_gid;
736                         la->la_valid |= LA_GID;
737                 }
738                 spin_unlock(&o->opo_lock);
739         }
740
741         RETURN(rc);
742 }
743
744 /**
745  * Interpreter function for getting OSP object extended attribute asynchronously
746  *
747  * Called to interpret the result of an async mode RPC for getting the
748  * OSP object extended attribute.
749  *
750  * \param[in] env       pointer to the thread context
751  * \param[in] reply     pointer to the RPC reply
752  * \param[in] req       pointer to the RPC request
753  * \param[in] obj       pointer to the OSP object
754  * \param[out] data     pointer to OSP object attributes cache
755  * \param[in] index     the index of the attribute buffer in the reply
756  * \param[in] rc        the result for handling the RPC
757  *
758  * \retval              0 for success
759  * \retval              negative error number on failure
760  */
761 static int osp_xattr_get_interpterer(const struct lu_env *env,
762                                      struct object_update_reply *reply,
763                                      struct ptlrpc_request *req,
764                                      struct osp_object *obj,
765                                      void *data, int index, int rc)
766 {
767         struct osp_object_attr  *ooa  = obj->opo_ooa;
768         struct osp_xattr_entry  *oxe  = data;
769         struct lu_buf           *rbuf = &osp_env_info(env)->osi_lb2;
770
771         LASSERT(ooa != NULL);
772
773         if (rc == 0) {
774                 size_t len = sizeof(*oxe) + oxe->oxe_namelen + 1;
775
776                 rc = object_update_result_data_get(reply, rbuf, index);
777                 if (rc < 0 || rbuf->lb_len > (oxe->oxe_buflen - len)) {
778                         spin_lock(&obj->opo_lock);
779                         oxe->oxe_ready = 0;
780                         spin_unlock(&obj->opo_lock);
781                         osp_oac_xattr_put(oxe);
782
783                         return rc < 0 ? rc : -ERANGE;
784                 }
785
786                 spin_lock(&obj->opo_lock);
787                 oxe->oxe_vallen = rbuf->lb_len;
788                 memcpy(oxe->oxe_value, rbuf->lb_buf, rbuf->lb_len);
789                 oxe->oxe_exist = 1;
790                 oxe->oxe_ready = 1;
791                 spin_unlock(&obj->opo_lock);
792         } else if (rc == -ENOENT || rc == -ENODATA) {
793                 spin_lock(&obj->opo_lock);
794                 oxe->oxe_exist = 0;
795                 oxe->oxe_ready = 1;
796                 spin_unlock(&obj->opo_lock);
797         } else {
798                 spin_lock(&obj->opo_lock);
799                 oxe->oxe_ready = 0;
800                 spin_unlock(&obj->opo_lock);
801         }
802
803         osp_oac_xattr_put(oxe);
804
805         return 0;
806 }
807
808 /**
809  * Implement OSP dt_object_operations::do_declare_xattr_get() interface.
810  *
811  * Declare that the caller will get extended attribute from the specified
812  * OST object.
813  *
814  * This function will add an OUT_XATTR_GET sub-request to the per OSP
815  * based shared asynchronous request queue with the interpreter function:
816  * osp_xattr_get_interpterer().
817  *
818  * \param[in] env       pointer to the thread context
819  * \param[in] dt        pointer to the OSP layer dt_object
820  * \param[out] buf      pointer to the lu_buf to hold the extended attribute
821  * \param[in] name      the name for the expected extended attribute
822  *
823  * \retval              0 for success
824  * \retval              negative error number on failure
825  */
826 static int osp_declare_xattr_get(const struct lu_env *env, struct dt_object *dt,
827                                  struct lu_buf *buf, const char *name)
828 {
829         struct osp_object       *obj     = dt2osp_obj(dt);
830         struct osp_device       *osp     = lu2osp_dev(dt->do_lu.lo_dev);
831         struct osp_xattr_entry  *oxe;
832         __u16                    namelen = strlen(name);
833         int                      rc      = 0;
834
835         LASSERT(buf != NULL);
836         LASSERT(name != NULL);
837
838         /* If only for xattr size, return directly. */
839         if (unlikely(buf->lb_len == 0))
840                 return 0;
841
842         if (obj->opo_ooa == NULL) {
843                 rc = osp_oac_init(obj);
844                 if (rc != 0)
845                         return rc;
846         }
847
848         oxe = osp_oac_xattr_find_or_add(obj, name, buf->lb_len);
849         if (oxe == NULL)
850                 return -ENOMEM;
851
852         mutex_lock(&osp->opd_async_requests_mutex);
853         rc = osp_insert_async_request(env, OUT_XATTR_GET, obj, 1,
854                                       &namelen, (const void **)&name, oxe,
855                                       osp_xattr_get_interpterer);
856         if (rc != 0) {
857                 mutex_unlock(&osp->opd_async_requests_mutex);
858                 osp_oac_xattr_put(oxe);
859         } else {
860                 struct dt_update_request *update;
861
862                 /* XXX: Currently, we trigger the batched async OUT
863                  *      RPC via dt_declare_xattr_get(). It is not
864                  *      perfect solution, but works well now.
865                  *
866                  *      We will improve it in the future. */
867                 update = osp->opd_async_requests;
868                 if (update != NULL && update->dur_buf.ub_req != NULL &&
869                     update->dur_buf.ub_req->ourq_count > 0) {
870                         osp->opd_async_requests = NULL;
871                         mutex_unlock(&osp->opd_async_requests_mutex);
872                         rc = osp_unplug_async_request(env, osp, update);
873                 } else {
874                         mutex_unlock(&osp->opd_async_requests_mutex);
875                 }
876         }
877
878         return rc;
879 }
880
881 /**
882  * Implement OSP layer dt_object_operations::do_xattr_get() interface.
883  *
884  * Get extended attribute from the specified MDT/OST object.
885  *
886  * If the extended attribute is in the OSP object attributes cache, then
887  * return the cached extended attribute directly. Otherwise it will get
888  * the extended attribute synchronously, if successful, add it to the OSP
889  * attributes cache. (\see lustre/osp/osp_trans.c for OUT RPC.)
890  *
891  * There is a race condition: some other thread has added the named extended
892  * attributed entry to the OSP object attributes cache during the current
893  * OUT_XATTR_GET handling. If such case happens, the OSP will replace the
894  * (just) existing extended attribute entry with the new replied one.
895  *
896  * \param[in] env       pointer to the thread context
897  * \param[in] dt        pointer to the OSP layer dt_object
898  * \param[out] buf      pointer to the lu_buf to hold the extended attribute
899  * \param[in] name      the name for the expected extended attribute
900  *
901  * \retval              0 for success
902  * \retval              negative error number on failure
903  */
904 int osp_xattr_get(const struct lu_env *env, struct dt_object *dt,
905                   struct lu_buf *buf, const char *name)
906 {
907         struct osp_device       *osp    = lu2osp_dev(dt->do_lu.lo_dev);
908         struct osp_object       *obj    = dt2osp_obj(dt);
909         struct dt_device        *dev    = &osp->opd_dt_dev;
910         struct lu_buf           *rbuf   = &osp_env_info(env)->osi_lb2;
911         struct dt_update_request *update = NULL;
912         struct ptlrpc_request   *req    = NULL;
913         struct object_update_reply *reply;
914         struct osp_xattr_entry  *oxe    = NULL;
915         const char              *dname  = dt->do_lu.lo_dev->ld_obd->obd_name;
916         int                      rc     = 0;
917         ENTRY;
918
919         LASSERT(buf != NULL);
920         LASSERT(name != NULL);
921
922         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_NETWORK) &&
923             osp->opd_index == cfs_fail_val) {
924                 if (is_ost_obj(&dt->do_lu)) {
925                         if (osp_dev2node(osp) == cfs_fail_val)
926                                 RETURN(-ENOTCONN);
927                 } else {
928                         if (strcmp(name, XATTR_NAME_LINK) == 0)
929                                 RETURN(-ENOTCONN);
930                 }
931         }
932
933         if (unlikely(obj->opo_non_exist))
934                 RETURN(-ENOENT);
935
936         oxe = osp_oac_xattr_find(obj, name, false);
937         if (oxe != NULL) {
938                 spin_lock(&obj->opo_lock);
939                 if (oxe->oxe_ready) {
940                         if (!oxe->oxe_exist)
941                                 GOTO(unlock, rc = -ENODATA);
942
943                         if (buf->lb_buf == NULL)
944                                 GOTO(unlock, rc = oxe->oxe_vallen);
945
946                         if (buf->lb_len < oxe->oxe_vallen)
947                                 GOTO(unlock, rc = -ERANGE);
948
949                         memcpy(buf->lb_buf, oxe->oxe_value, oxe->oxe_vallen);
950
951                         GOTO(unlock, rc = oxe->oxe_vallen);
952
953 unlock:
954                         spin_unlock(&obj->opo_lock);
955                         osp_oac_xattr_put(oxe);
956
957                         return rc;
958                 }
959                 spin_unlock(&obj->opo_lock);
960         }
961
962         update = dt_update_request_create(dev);
963         if (IS_ERR(update))
964                 GOTO(out, rc = PTR_ERR(update));
965
966         rc = out_xattr_get_pack(env, &update->dur_buf,
967                                 lu_object_fid(&dt->do_lu), name);
968         if (rc != 0) {
969                 CERROR("%s: Insert update error "DFID": rc = %d\n",
970                        dname, PFID(lu_object_fid(&dt->do_lu)), rc);
971                 GOTO(out, rc);
972         }
973
974         rc = osp_remote_sync(env, osp, update, &req);
975         if (rc != 0) {
976                 if (rc == -ENOENT) {
977                         dt->do_lu.lo_header->loh_attr &= ~LOHA_EXISTS;
978                         obj->opo_non_exist = 1;
979                 }
980
981                 if (obj->opo_ooa == NULL)
982                         GOTO(out, rc);
983
984                 if (oxe == NULL)
985                         oxe = osp_oac_xattr_find_or_add(obj, name, buf->lb_len);
986
987                 if (oxe == NULL) {
988                         CWARN("%s: Fail to add xattr (%s) to cache for "
989                               DFID" (1): rc = %d\n", dname, name,
990                               PFID(lu_object_fid(&dt->do_lu)), rc);
991
992                         GOTO(out, rc);
993                 }
994
995                 spin_lock(&obj->opo_lock);
996                 if (rc == -ENOENT || rc == -ENODATA) {
997                         oxe->oxe_exist = 0;
998                         oxe->oxe_ready = 1;
999                 } else {
1000                         oxe->oxe_ready = 0;
1001                 }
1002                 spin_unlock(&obj->opo_lock);
1003
1004                 GOTO(out, rc);
1005         }
1006
1007         reply = req_capsule_server_sized_get(&req->rq_pill,
1008                                              &RMF_OUT_UPDATE_REPLY,
1009                                              OUT_UPDATE_REPLY_SIZE);
1010         if (reply->ourp_magic != UPDATE_REPLY_MAGIC) {
1011                 CERROR("%s: Wrong version %x expected %x "DFID": rc = %d\n",
1012                        dname, reply->ourp_magic, UPDATE_REPLY_MAGIC,
1013                        PFID(lu_object_fid(&dt->do_lu)), -EPROTO);
1014
1015                 GOTO(out, rc = -EPROTO);
1016         }
1017
1018         rc = object_update_result_data_get(reply, rbuf, 0);
1019         if (rc < 0)
1020                 GOTO(out, rc);
1021
1022         if (buf->lb_buf == NULL)
1023                 GOTO(out, rc = rbuf->lb_len);
1024
1025         if (unlikely(buf->lb_len < rbuf->lb_len))
1026                 GOTO(out, rc = -ERANGE);
1027
1028         memcpy(buf->lb_buf, rbuf->lb_buf, rbuf->lb_len);
1029         rc = rbuf->lb_len;
1030         if (obj->opo_ooa == NULL)
1031                 GOTO(out, rc);
1032
1033         if (oxe == NULL) {
1034                 oxe = osp_oac_xattr_find_or_add(obj, name, rbuf->lb_len);
1035                 if (oxe == NULL) {
1036                         CWARN("%s: Fail to add xattr (%s) to "
1037                               "cache for "DFID" (2): rc = %d\n",
1038                               dname, name, PFID(lu_object_fid(&dt->do_lu)), rc);
1039
1040                         GOTO(out, rc);
1041                 }
1042         }
1043
1044         if (oxe->oxe_buflen - oxe->oxe_namelen - 1 < rbuf->lb_len) {
1045                 struct osp_xattr_entry *old = oxe;
1046                 struct osp_xattr_entry *tmp;
1047
1048                 tmp = osp_oac_xattr_replace(obj, &old, rbuf->lb_len);
1049                 osp_oac_xattr_put(oxe);
1050                 oxe = tmp;
1051                 if (tmp == NULL) {
1052                         CWARN("%s: Fail to update xattr (%s) to "
1053                               "cache for "DFID": rc = %d\n",
1054                               dname, name, PFID(lu_object_fid(&dt->do_lu)), rc);
1055                         spin_lock(&obj->opo_lock);
1056                         old->oxe_ready = 0;
1057                         spin_unlock(&obj->opo_lock);
1058
1059                         GOTO(out, rc);
1060                 }
1061
1062                 /* Drop the ref for entry on list. */
1063                 osp_oac_xattr_put(old);
1064         }
1065
1066         spin_lock(&obj->opo_lock);
1067         oxe->oxe_vallen = rbuf->lb_len;
1068         memcpy(oxe->oxe_value, rbuf->lb_buf, rbuf->lb_len);
1069         oxe->oxe_exist = 1;
1070         oxe->oxe_ready = 1;
1071         spin_unlock(&obj->opo_lock);
1072
1073         GOTO(out, rc);
1074
1075 out:
1076         if (req != NULL)
1077                 ptlrpc_req_finished(req);
1078
1079         if (update != NULL && !IS_ERR(update))
1080                 dt_update_request_destroy(update);
1081
1082         if (oxe != NULL)
1083                 osp_oac_xattr_put(oxe);
1084
1085         return rc;
1086 }
1087
1088 /**
1089  * Implement OSP layer dt_object_operations::do_declare_xattr_set() interface.
1090  *
1091  * Declare that the caller will set extended attribute to the specified
1092  * MDT/OST object.
1093  *
1094  * If it is non-remote transaction, it will add an OUT_XATTR_SET sub-request
1095  * to the OUT RPC that will be flushed when the transaction start. And if the
1096  * OSP attributes cache is initialized, then check whether the name extended
1097  * attribute entry exists in the cache or not. If yes, replace it; otherwise,
1098  * add the extended attribute to the cache.
1099  *
1100  * \param[in] env       pointer to the thread context
1101  * \param[in] dt        pointer to the OSP layer dt_object
1102  * \param[in] buf       pointer to the lu_buf to hold the extended attribute
1103  * \param[in] name      the name of the extended attribute to be set
1104  * \param[in] flag      to indicate the detailed set operation: LU_XATTR_CREATE
1105  *                      or LU_XATTR_REPLACE or others
1106  * \param[in] th        pointer to the transaction handler
1107  *
1108  * \retval              0 for success
1109  * \retval              negative error number on failure
1110  */
1111 int osp_declare_xattr_set(const struct lu_env *env, struct dt_object *dt,
1112                           const struct lu_buf *buf, const char *name,
1113                           int flag, struct thandle *th)
1114 {
1115         return osp_trans_update_request_create(th);
1116 }
1117
1118 /**
1119  * Implement OSP layer dt_object_operations::do_xattr_set() interface.
1120  *
1121  * Set extended attribute to the specified MDT/OST object.
1122  *
1123  * Add an OUT_XATTR_SET sub-request into the OUT RPC that will be flushed in
1124  * the transaction stop. And if the OSP attributes cache is initialized, then
1125  * check whether the name extended attribute entry exists in the cache or not.
1126  * If yes, replace it; otherwise, add the extended attribute to the cache.
1127  *
1128  * \param[in] env       pointer to the thread context
1129  * \param[in] dt        pointer to the OSP layer dt_object
1130  * \param[in] buf       pointer to the lu_buf to hold the extended attribute
1131  * \param[in] name      the name of the extended attribute to be set
1132  * \param[in] fl        to indicate the detailed set operation: LU_XATTR_CREATE
1133  *                      or LU_XATTR_REPLACE or others
1134  * \param[in] th        pointer to the transaction handler
1135  *
1136  * \retval              0 for success
1137  * \retval              negative error number on failure
1138  */
1139 int osp_xattr_set(const struct lu_env *env, struct dt_object *dt,
1140                   const struct lu_buf *buf, const char *name, int fl,
1141                   struct thandle *th)
1142 {
1143         struct osp_object       *o = dt2osp_obj(dt);
1144         struct dt_update_request *update;
1145         struct osp_xattr_entry  *oxe;
1146         int                     rc;
1147         ENTRY;
1148
1149         LASSERT(buf->lb_len > 0 && buf->lb_buf != NULL);
1150         update = thandle_to_dt_update_request(th);
1151         LASSERT(update != NULL);
1152
1153         CDEBUG(D_INODE, DFID" set xattr '%s' with size %zd\n",
1154                PFID(lu_object_fid(&dt->do_lu)), name, buf->lb_len);
1155
1156         rc = out_xattr_set_pack(env, &update->dur_buf,
1157                                 lu_object_fid(&dt->do_lu),
1158                                 buf, name, fl, update->dur_batchid);
1159         if (rc != 0 || o->opo_ooa == NULL)
1160                 return rc;
1161
1162         oxe = osp_oac_xattr_find_or_add(o, name, buf->lb_len);
1163         if (oxe == NULL) {
1164                 CWARN("%s: cannot cache xattr '%s' of "DFID"\n",
1165                       dt->do_lu.lo_dev->ld_obd->obd_name,
1166                       name, PFID(lu_object_fid(&dt->do_lu)));
1167
1168                 RETURN(0);
1169         }
1170
1171         if (oxe->oxe_buflen - oxe->oxe_namelen - 1 < buf->lb_len) {
1172                 struct osp_xattr_entry *old = oxe;
1173                 struct osp_xattr_entry *tmp;
1174
1175                 tmp = osp_oac_xattr_replace(o, &old, buf->lb_len);
1176                 osp_oac_xattr_put(oxe);
1177                 oxe = tmp;
1178                 if (tmp == NULL) {
1179                         CWARN("%s: cannot update cached xattr '%s' of "DFID"\n",
1180                               dt->do_lu.lo_dev->ld_obd->obd_name,
1181                               name, PFID(lu_object_fid(&dt->do_lu)));
1182                         spin_lock(&o->opo_lock);
1183                         old->oxe_ready = 0;
1184                         spin_unlock(&o->opo_lock);
1185
1186                         RETURN(0);
1187                 }
1188
1189                 /* Drop the ref for entry on list. */
1190                 osp_oac_xattr_put(old);
1191         }
1192
1193         spin_lock(&o->opo_lock);
1194         oxe->oxe_vallen = buf->lb_len;
1195         memcpy(oxe->oxe_value, buf->lb_buf, buf->lb_len);
1196         oxe->oxe_exist = 1;
1197         oxe->oxe_ready = 1;
1198         spin_unlock(&o->opo_lock);
1199         osp_oac_xattr_put(oxe);
1200
1201         RETURN(0);
1202 }
1203
1204 /**
1205  * Implement OSP layer dt_object_operations::do_declare_xattr_del() interface.
1206  *
1207  * Declare that the caller will delete extended attribute on the specified
1208  * MDT/OST object.
1209  *
1210  * If it is non-remote transaction, it will add an OUT_XATTR_DEL sub-request
1211  * to the OUT RPC that will be flushed when the transaction start. And if the
1212  * name extended attribute entry exists in the OSP attributes cache, then remove
1213  * it from the cache.
1214  *
1215  * \param[in] env       pointer to the thread context
1216  * \param[in] dt        pointer to the OSP layer dt_object
1217  * \param[in] name      the name of the extended attribute to be set
1218  * \param[in] th        pointer to the transaction handler
1219  *
1220  * \retval              0 for success
1221  * \retval              negative error number on failure
1222  */
1223 int osp_declare_xattr_del(const struct lu_env *env, struct dt_object *dt,
1224                           const char *name, struct thandle *th)
1225 {
1226         return osp_trans_update_request_create(th);
1227 }
1228
1229 /**
1230  * Implement OSP layer dt_object_operations::do_xattr_del() interface.
1231  *
1232  * Delete extended attribute on the specified MDT/OST object.
1233  *
1234  * If it is remote transaction, it will add an OUT_XATTR_DEL sub-request into
1235  * the OUT RPC that will be flushed when the transaction stop. And if the name
1236  * extended attribute entry exists in the OSP attributes cache, then remove it
1237  * from the cache.
1238  *
1239  * \param[in] env       pointer to the thread context
1240  * \param[in] dt        pointer to the OSP layer dt_object
1241  * \param[in] name      the name of the extended attribute to be set
1242  * \param[in] th        pointer to the transaction handler
1243  *
1244  * \retval              0 for success
1245  * \retval              negative error number on failure
1246  */
1247 int osp_xattr_del(const struct lu_env *env, struct dt_object *dt,
1248                   const char *name, struct thandle *th)
1249 {
1250         struct dt_update_request *update;
1251         const struct lu_fid      *fid = lu_object_fid(&dt->do_lu);
1252         struct osp_object        *o = dt2osp_obj(dt);
1253         struct osp_xattr_entry   *oxe;
1254         int                       rc;
1255
1256         update = thandle_to_dt_update_request(th);
1257         LASSERT(update != NULL);
1258
1259         rc = out_xattr_del_pack(env, &update->dur_buf, fid, name,
1260                                 update->dur_batchid);
1261         if (rc != 0 || o->opo_ooa == NULL)
1262                 return rc;
1263
1264         oxe = osp_oac_xattr_find(o, name, true);
1265         if (oxe != NULL)
1266                 /* Drop the ref for entry on list. */
1267                 osp_oac_xattr_put(oxe);
1268
1269         return 0;
1270 }
1271
1272 /**
1273  * Implement OSP layer dt_object_operations::do_declare_create() interface.
1274  *
1275  * Declare that the caller will create the OST object.
1276  *
1277  * If the transaction is a remote transaction and the FID for the OST-object
1278  * has been assigned already, then handle it as creating (remote) MDT object
1279  * via osp_md_declare_object_create(). This function is usually used for LFSCK
1280  * to re-create the lost OST object. Otherwise, if it is not replay case, the
1281  * OSP will reserve pre-created object for the subsequent create operation;
1282  * if the MDT side cached pre-created objects are less than some threshold,
1283  * then it will wakeup the pre-create thread.
1284  *
1285  * \param[in] env       pointer to the thread context
1286  * \param[in] dt        pointer to the OSP layer dt_object
1287  * \param[in] attr      the attribute for the object to be created
1288  * \param[in] hint      pointer to the hint for creating the object, such as
1289  *                      the parent object
1290  * \param[in] dof       pointer to the dt_object_format for help the creation
1291  * \param[in] th        pointer to the transaction handler
1292  *
1293  * \retval              0 for success
1294  * \retval              negative error number on failure
1295  */
1296 static int osp_declare_object_create(const struct lu_env *env,
1297                                      struct dt_object *dt,
1298                                      struct lu_attr *attr,
1299                                      struct dt_allocation_hint *hint,
1300                                      struct dt_object_format *dof,
1301                                      struct thandle *th)
1302 {
1303         struct osp_thread_info  *osi = osp_env_info(env);
1304         struct osp_device       *d = lu2osp_dev(dt->do_lu.lo_dev);
1305         struct osp_object       *o = dt2osp_obj(dt);
1306         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
1307         struct thandle          *local_th;
1308         int                      rc = 0;
1309
1310         ENTRY;
1311
1312         if (is_only_remote_trans(th) && !fid_is_zero(fid)) {
1313                 LASSERT(fid_is_sane(fid));
1314
1315                 rc = osp_md_declare_object_create(env, dt, attr, hint, dof, th);
1316
1317                 RETURN(rc);
1318         }
1319
1320         /* should happen to non-0 OSP only so that at least one object
1321          * has been already declared in the scenario and LOD should
1322          * cleanup that */
1323         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_OSC_CREATE_FAIL) && d->opd_index == 1)
1324                 RETURN(-ENOSPC);
1325
1326         LASSERT(d->opd_last_used_oid_file);
1327
1328         /*
1329          * There can be gaps in precreated ids and record to unlink llog
1330          * XXX: we do not handle gaps yet, implemented before solution
1331          *      was found to be racy, so we disabled that. there is no
1332          *      point in making useless but expensive llog declaration.
1333          */
1334         /* rc = osp_sync_declare_add(env, o, MDS_UNLINK64_REC, th); */
1335
1336         local_th = osp_get_storage_thandle(env, th, d);
1337         if (IS_ERR(local_th))
1338                 RETURN(PTR_ERR(local_th));
1339
1340         if (unlikely(!fid_is_zero(fid))) {
1341                 /* replay case: caller knows fid */
1342                 osi->osi_off = sizeof(osi->osi_id) * d->opd_index;
1343                 osi->osi_lb.lb_len = sizeof(osi->osi_id);
1344                 osi->osi_lb.lb_buf = NULL;
1345
1346                 rc = dt_declare_record_write(env, d->opd_last_used_oid_file,
1347                                              &osi->osi_lb, osi->osi_off,
1348                                              local_th);
1349                 RETURN(rc);
1350         }
1351
1352         /*
1353          * in declaration we need to reserve object so that we don't block
1354          * awaiting precreation RPC to complete
1355          */
1356         rc = osp_precreate_reserve(env, d);
1357         /*
1358          * we also need to declare update to local "last used id" file for
1359          * recovery if object isn't used for a reason, we need to release
1360          * reservation, this can be made in osd_object_release()
1361          */
1362         if (rc == 0) {
1363                 /* mark id is reserved: in create we don't want to talk
1364                  * to OST */
1365                 LASSERT(o->opo_reserved == 0);
1366                 o->opo_reserved = 1;
1367
1368                 /* common for all OSPs file hystorically */
1369                 osi->osi_off = sizeof(osi->osi_id) * d->opd_index;
1370                 osi->osi_lb.lb_len = sizeof(osi->osi_id);
1371                 osi->osi_lb.lb_buf = NULL;
1372                 rc = dt_declare_record_write(env, d->opd_last_used_oid_file,
1373                                              &osi->osi_lb, osi->osi_off,
1374                                              local_th);
1375         } else {
1376                 /* not needed in the cache anymore */
1377                 set_bit(LU_OBJECT_HEARD_BANSHEE,
1378                             &dt->do_lu.lo_header->loh_flags);
1379         }
1380         RETURN(rc);
1381 }
1382
1383 /**
1384  * Implement OSP layer dt_object_operations::do_create() interface.
1385  *
1386  * Create the OST object.
1387  *
1388  * If the transaction is a remote transaction and the FID for the OST-object
1389  * has been assigned already, then handle it as handling MDT object via the
1390  * osp_md_object_create(). For other cases, the OSP will assign FID to the
1391  * object to be created, and update last_used Object ID (OID) file.
1392  *
1393  * \param[in] env       pointer to the thread context
1394  * \param[in] dt        pointer to the OSP layer dt_object
1395  * \param[in] attr      the attribute for the object to be created
1396  * \param[in] hint      pointer to the hint for creating the object, such as
1397  *                      the parent object
1398  * \param[in] dof       pointer to the dt_object_format for help the creation
1399  * \param[in] th        pointer to the transaction handler
1400  *
1401  * \retval              0 for success
1402  * \retval              negative error number on failure
1403  */
1404 static int osp_object_create(const struct lu_env *env, struct dt_object *dt,
1405                              struct lu_attr *attr,
1406                              struct dt_allocation_hint *hint,
1407                              struct dt_object_format *dof, struct thandle *th)
1408 {
1409         struct osp_thread_info  *osi = osp_env_info(env);
1410         struct osp_device       *d = lu2osp_dev(dt->do_lu.lo_dev);
1411         struct osp_object       *o = dt2osp_obj(dt);
1412         int                     rc = 0;
1413         struct lu_fid           *fid = &osi->osi_fid;
1414         struct thandle          *local_th;
1415         ENTRY;
1416
1417         if (is_only_remote_trans(th) &&
1418             !fid_is_zero(lu_object_fid(&dt->do_lu))) {
1419                 LASSERT(fid_is_sane(lu_object_fid(&dt->do_lu)));
1420
1421                 rc = osp_md_object_create(env, dt, attr, hint, dof, th);
1422                 if (rc == 0)
1423                         o->opo_non_exist = 0;
1424
1425                 RETURN(rc);
1426         }
1427
1428         o->opo_non_exist = 0;
1429         if (o->opo_reserved) {
1430                 /* regular case, fid is assigned holding transaction open */
1431                  osp_object_assign_fid(env, d, o);
1432         }
1433
1434         memcpy(fid, lu_object_fid(&dt->do_lu), sizeof(*fid));
1435
1436         LASSERTF(fid_is_sane(fid), "fid for osp_object %p is insane"DFID"!\n",
1437                  o, PFID(fid));
1438
1439         if (!o->opo_reserved) {
1440                 /* special case, id was assigned outside of transaction
1441                  * see comments in osp_declare_attr_set */
1442                 LASSERT(d->opd_pre != NULL);
1443                 spin_lock(&d->opd_pre_lock);
1444                 osp_update_last_fid(d, fid);
1445                 spin_unlock(&d->opd_pre_lock);
1446         }
1447
1448         CDEBUG(D_INODE, "fid for osp_object %p is "DFID"\n", o, PFID(fid));
1449
1450         /* If the precreate ends, it means it will be ready to rollover to
1451          * the new sequence soon, all the creation should be synchronized,
1452          * otherwise during replay, the replay fid will be inconsistent with
1453          * last_used/create fid */
1454         if (osp_precreate_end_seq(env, d) && osp_is_fid_client(d))
1455                 th->th_sync = 1;
1456
1457         local_th = osp_get_storage_thandle(env, th, d);
1458         if (IS_ERR(local_th))
1459                 RETURN(PTR_ERR(local_th));
1460         /*
1461          * it's OK if the import is inactive by this moment - id was created
1462          * by OST earlier, we just need to maintain it consistently on the disk
1463          * once import is reconnected, OSP will claim this and other objects
1464          * used and OST either keep them, if they exist or recreate
1465          */
1466
1467         /* we might have lost precreated objects */
1468         if (unlikely(d->opd_gap_count) > 0) {
1469                 LASSERT(d->opd_pre != NULL);
1470                 spin_lock(&d->opd_pre_lock);
1471                 if (d->opd_gap_count > 0) {
1472                         int count = d->opd_gap_count;
1473
1474                         ostid_set_id(&osi->osi_oi,
1475                                      fid_oid(&d->opd_gap_start_fid));
1476                         d->opd_gap_count = 0;
1477                         spin_unlock(&d->opd_pre_lock);
1478
1479                         CDEBUG(D_HA, "Writing gap "DFID"+%d in llog\n",
1480                                PFID(&d->opd_gap_start_fid), count);
1481                         /* real gap handling is disabled intil ORI-692 will be
1482                          * fixed, now we only report gaps */
1483                 } else {
1484                         spin_unlock(&d->opd_pre_lock);
1485                 }
1486         }
1487
1488         /* Only need update last_used oid file, seq file will only be update
1489          * during seq rollover */
1490         osp_objid_buf_prep(&osi->osi_lb, &osi->osi_off,
1491                            &d->opd_last_used_fid.f_oid, d->opd_index);
1492
1493         rc = dt_record_write(env, d->opd_last_used_oid_file, &osi->osi_lb,
1494                              &osi->osi_off, local_th);
1495
1496         CDEBUG(D_HA, "%s: Wrote last used FID: "DFID", index %d: %d\n",
1497                d->opd_obd->obd_name, PFID(fid), d->opd_index, rc);
1498
1499         RETURN(rc);
1500 }
1501
1502 /**
1503  * Implement OSP layer dt_object_operations::do_declare_destroy() interface.
1504  *
1505  * Declare that the caller will destroy the specified OST object.
1506  *
1507  * The OST object destroy will be handled via llog asynchronously. This
1508  * function will declare the credits for generating MDS_UNLINK64_REC llog.
1509  *
1510  * \param[in] env       pointer to the thread context
1511  * \param[in] dt        pointer to the OSP layer dt_object to be destroyed
1512  * \param[in] th        pointer to the transaction handler
1513  *
1514  * \retval              0 for success
1515  * \retval              negative error number on failure
1516  */
1517 int osp_declare_object_destroy(const struct lu_env *env,
1518                                struct dt_object *dt, struct thandle *th)
1519 {
1520         struct osp_object       *o = dt2osp_obj(dt);
1521         struct osp_device       *osp = lu2osp_dev(dt->do_lu.lo_dev);
1522         int                      rc = 0;
1523
1524         ENTRY;
1525
1526         LASSERT(!osp->opd_connect_mdt);
1527         rc = osp_sync_declare_add(env, o, MDS_UNLINK64_REC, th);
1528
1529         RETURN(rc);
1530 }
1531
1532 /**
1533  * Implement OSP layer dt_object_operations::do_destroy() interface.
1534  *
1535  * Destroy the specified OST object.
1536  *
1537  * The OSP generates a MDS_UNLINK64_REC record in the llog. There
1538  * will be some dedicated thread to handle the llog asynchronously.
1539  *
1540  * It also marks the object as non-cached.
1541  *
1542  * \param[in] env       pointer to the thread context
1543  * \param[in] dt        pointer to the OSP layer dt_object to be destroyed
1544  * \param[in] th        pointer to the transaction handler
1545  *
1546  * \retval              0 for success
1547  * \retval              negative error number on failure
1548  */
1549 static int osp_object_destroy(const struct lu_env *env, struct dt_object *dt,
1550                               struct thandle *th)
1551 {
1552         struct osp_object       *o = dt2osp_obj(dt);
1553         struct osp_device       *osp = lu2osp_dev(dt->do_lu.lo_dev);
1554         int                      rc = 0;
1555
1556         ENTRY;
1557         o->opo_non_exist = 1;
1558
1559         LASSERT(!osp->opd_connect_mdt);
1560         /* once transaction is committed put proper command on
1561          * the queue going to our OST. */
1562         rc = osp_sync_add(env, o, MDS_UNLINK64_REC, th, NULL);
1563         if (rc < 0)
1564                 RETURN(rc);
1565
1566         /* not needed in cache any more */
1567         set_bit(LU_OBJECT_HEARD_BANSHEE, &dt->do_lu.lo_header->loh_flags);
1568
1569         RETURN(rc);
1570 }
1571
1572 static int osp_orphan_index_lookup(const struct lu_env *env,
1573                                    struct dt_object *dt,
1574                                    struct dt_rec *rec,
1575                                    const struct dt_key *key)
1576 {
1577         return -EOPNOTSUPP;
1578 }
1579
1580 static int osp_orphan_index_declare_insert(const struct lu_env *env,
1581                                            struct dt_object *dt,
1582                                            const struct dt_rec *rec,
1583                                            const struct dt_key *key,
1584                                            struct thandle *handle)
1585 {
1586         return -EOPNOTSUPP;
1587 }
1588
1589 static int osp_orphan_index_insert(const struct lu_env *env,
1590                                    struct dt_object *dt,
1591                                    const struct dt_rec *rec,
1592                                    const struct dt_key *key,
1593                                    struct thandle *handle,
1594                                    int ignore_quota)
1595 {
1596         return -EOPNOTSUPP;
1597 }
1598
1599 static int osp_orphan_index_declare_delete(const struct lu_env *env,
1600                                            struct dt_object *dt,
1601                                            const struct dt_key *key,
1602                                            struct thandle *handle)
1603 {
1604         return -EOPNOTSUPP;
1605 }
1606
1607 static int osp_orphan_index_delete(const struct lu_env *env,
1608                                    struct dt_object *dt,
1609                                    const struct dt_key *key,
1610                                    struct thandle *handle)
1611 {
1612         return -EOPNOTSUPP;
1613 }
1614
1615 /**
1616  * Initialize the OSP layer index iteration.
1617  *
1618  * \param[in] env       pointer to the thread context
1619  * \param[in] dt        pointer to the index object to be iterated
1620  * \param[in] attr      unused
1621  *
1622  * \retval              pointer to the iteration structure
1623  * \retval              negative error number on failure
1624  */
1625 struct dt_it *osp_it_init(const struct lu_env *env, struct dt_object *dt,
1626                           __u32 attr)
1627 {
1628         struct osp_it *it;
1629
1630         OBD_ALLOC_PTR(it);
1631         if (it == NULL)
1632                 return ERR_PTR(-ENOMEM);
1633
1634         it->ooi_pos_ent = -1;
1635         it->ooi_obj = dt;
1636         it->ooi_attr = attr;
1637
1638         return (struct dt_it *)it;
1639 }
1640
1641 /**
1642  * Finalize the OSP layer index iteration.
1643  *
1644  * \param[in] env       pointer to the thread context
1645  * \param[in] di        pointer to the iteration structure
1646  */
1647 void osp_it_fini(const struct lu_env *env, struct dt_it *di)
1648 {
1649         struct osp_it   *it = (struct osp_it *)di;
1650         struct page     **pages = it->ooi_pages;
1651         int             npages = it->ooi_total_npages;
1652         int             i;
1653
1654         if (pages != NULL) {
1655                 for (i = 0; i < npages; i++) {
1656                         if (pages[i] != NULL) {
1657                                 if (pages[i] == it->ooi_cur_page) {
1658                                         kunmap(pages[i]);
1659                                         it->ooi_cur_page = NULL;
1660                                 }
1661                                 __free_page(pages[i]);
1662                         }
1663                 }
1664                 OBD_FREE(pages, npages * sizeof(*pages));
1665         }
1666         OBD_FREE_PTR(it);
1667 }
1668
1669 /**
1670  * Get more records for the iteration from peer.
1671  *
1672  * The new records will be filled in an array of pages. The OSP side
1673  * allows 1MB bulk data to be transfered.
1674  *
1675  * \param[in] env       pointer to the thread context
1676  * \param[in] it        pointer to the iteration structure
1677  *
1678  * \retval              0 for success
1679  * \retval              negative error number on failure
1680  */
1681 static int osp_it_fetch(const struct lu_env *env, struct osp_it *it)
1682 {
1683         struct lu_device         *dev   = it->ooi_obj->do_lu.lo_dev;
1684         struct osp_device        *osp   = lu2osp_dev(dev);
1685         struct page             **pages;
1686         struct ptlrpc_request    *req   = NULL;
1687         struct ptlrpc_bulk_desc  *desc;
1688         struct idx_info          *ii;
1689         int                       npages;
1690         int                       rc;
1691         int                       i;
1692         ENTRY;
1693
1694         /* 1MB bulk */
1695         npages = min_t(unsigned int, OFD_MAX_BRW_SIZE, 1 << 20);
1696         npages /= PAGE_CACHE_SIZE;
1697
1698         OBD_ALLOC(pages, npages * sizeof(*pages));
1699         if (pages == NULL)
1700                 RETURN(-ENOMEM);
1701
1702         it->ooi_pages = pages;
1703         it->ooi_total_npages = npages;
1704         for (i = 0; i < npages; i++) {
1705                 pages[i] = alloc_page(GFP_IOFS);
1706                 if (pages[i] == NULL)
1707                         RETURN(-ENOMEM);
1708         }
1709
1710         req = ptlrpc_request_alloc(osp->opd_obd->u.cli.cl_import,
1711                                    &RQF_OBD_IDX_READ);
1712         if (req == NULL)
1713                 RETURN(-ENOMEM);
1714
1715         rc = ptlrpc_request_pack(req, LUSTRE_OBD_VERSION, OBD_IDX_READ);
1716         if (rc != 0) {
1717                 ptlrpc_request_free(req);
1718                 RETURN(rc);
1719         }
1720
1721         req->rq_request_portal = OUT_PORTAL;
1722         ii = req_capsule_client_get(&req->rq_pill, &RMF_IDX_INFO);
1723         memset(ii, 0, sizeof(*ii));
1724         if (fid_is_last_id(lu_object_fid(&it->ooi_obj->do_lu))) {
1725                 /* LFSCK will iterate orphan object[FID_SEQ_LAYOUT_BTREE,
1726                  * ost_index, 0] with LAST_ID FID, so it needs to replace
1727                  * the FID with orphan FID here */
1728                 ii->ii_fid.f_seq = FID_SEQ_LAYOUT_RBTREE;
1729                 ii->ii_fid.f_oid = osp->opd_index;
1730                 ii->ii_fid.f_ver = 0;
1731                 ii->ii_flags = II_FL_NOHASH;
1732                 ii->ii_attrs = osp_dev2node(osp);
1733         } else {
1734                 ii->ii_fid = *lu_object_fid(&it->ooi_obj->do_lu);
1735                 ii->ii_flags = II_FL_NOHASH | II_FL_NOKEY | II_FL_VARKEY |
1736                                II_FL_VARREC;
1737                 ii->ii_attrs = it->ooi_attr;
1738         }
1739         ii->ii_magic = IDX_INFO_MAGIC;
1740         ii->ii_count = npages * LU_PAGE_COUNT;
1741         ii->ii_hash_start = it->ooi_next;
1742
1743         ptlrpc_at_set_req_timeout(req);
1744
1745         desc = ptlrpc_prep_bulk_imp(req, npages, 1, BULK_PUT_SINK,
1746                                     MDS_BULK_PORTAL);
1747         if (desc == NULL) {
1748                 ptlrpc_request_free(req);
1749                 RETURN(-ENOMEM);
1750         }
1751
1752         for (i = 0; i < npages; i++)
1753                 ptlrpc_prep_bulk_page_pin(desc, pages[i], 0, PAGE_CACHE_SIZE);
1754
1755         ptlrpc_request_set_replen(req);
1756         rc = ptlrpc_queue_wait(req);
1757         if (rc != 0)
1758                 GOTO(out, rc);
1759
1760         rc = sptlrpc_cli_unwrap_bulk_read(req, req->rq_bulk,
1761                                           req->rq_bulk->bd_nob_transferred);
1762         if (rc < 0)
1763                 GOTO(out, rc);
1764         rc = 0;
1765
1766         ii = req_capsule_server_get(&req->rq_pill, &RMF_IDX_INFO);
1767         if (ii->ii_magic != IDX_INFO_MAGIC)
1768                  GOTO(out, rc = -EPROTO);
1769
1770         npages = (ii->ii_count + LU_PAGE_COUNT - 1) >>
1771                  (PAGE_CACHE_SHIFT - LU_PAGE_SHIFT);
1772         if (npages > it->ooi_total_npages) {
1773                 CERROR("%s: returned more pages than expected, %u > %u\n",
1774                        osp->opd_obd->obd_name, npages, it->ooi_total_npages);
1775                 GOTO(out, rc = -EINVAL);
1776         }
1777
1778         it->ooi_valid_npages = npages;
1779         if (ptlrpc_rep_need_swab(req))
1780                 it->ooi_swab = 1;
1781
1782         it->ooi_next = ii->ii_hash_end;
1783
1784 out:
1785         ptlrpc_req_finished(req);
1786
1787         return rc;
1788 }
1789
1790 /**
1791  * Move the iteration cursor to the next lu_page.
1792  *
1793  * One system page (PAGE_SIZE) may contain multiple lu_page (4KB),
1794  * that depends on the LU_PAGE_COUNT. If it is not the last lu_page
1795  * in current system page, then move the iteration cursor to the next
1796  * lu_page in current system page. Otherwise, if there are more system
1797  * pages in the cache, then move the iteration cursor to the next system
1798  * page. If all the cached records (pages) have been iterated, then fetch
1799  * more records via osp_it_fetch().
1800  *
1801  * \param[in] env       pointer to the thread context
1802  * \param[in] di        pointer to the iteration structure
1803  *
1804  * \retval              positive for end of the directory
1805  * \retval              0 for success
1806  * \retval              negative error number on failure
1807  */
1808 int osp_it_next_page(const struct lu_env *env, struct dt_it *di)
1809 {
1810         struct osp_it           *it = (struct osp_it *)di;
1811         struct lu_idxpage       *idxpage;
1812         struct page             **pages;
1813         int                     rc;
1814         int                     i;
1815         ENTRY;
1816
1817 again2:
1818         idxpage = it->ooi_cur_idxpage;
1819         if (idxpage != NULL) {
1820                 if (idxpage->lip_nr == 0)
1821                         RETURN(1);
1822
1823                 if (it->ooi_pos_ent < idxpage->lip_nr) {
1824                         CDEBUG(D_INFO, "ooi_pos %d nr %d\n",
1825                                (int)it->ooi_pos_ent, (int)idxpage->lip_nr);
1826                         RETURN(0);
1827                 }
1828                 it->ooi_cur_idxpage = NULL;
1829                 it->ooi_pos_lu_page++;
1830
1831 again1:
1832                 if (it->ooi_pos_lu_page < LU_PAGE_COUNT) {
1833                         it->ooi_cur_idxpage = (void *)it->ooi_cur_page +
1834                                          LU_PAGE_SIZE * it->ooi_pos_lu_page;
1835                         if (it->ooi_swab)
1836                                 lustre_swab_lip_header(it->ooi_cur_idxpage);
1837                         if (it->ooi_cur_idxpage->lip_magic != LIP_MAGIC) {
1838                                 struct osp_device *osp =
1839                                         lu2osp_dev(it->ooi_obj->do_lu.lo_dev);
1840
1841                                 CERROR("%s: invalid magic (%x != %x) for page "
1842                                        "%d/%d while read layout orphan index\n",
1843                                        osp->opd_obd->obd_name,
1844                                        it->ooi_cur_idxpage->lip_magic,
1845                                        LIP_MAGIC, it->ooi_pos_page,
1846                                        it->ooi_pos_lu_page);
1847                                 /* Skip this lu_page next time. */
1848                                 it->ooi_pos_ent = idxpage->lip_nr - 1;
1849                                 RETURN(-EINVAL);
1850                         }
1851                         it->ooi_pos_ent = -1;
1852                         goto again2;
1853                 }
1854
1855                 kunmap(it->ooi_cur_page);
1856                 it->ooi_cur_page = NULL;
1857                 it->ooi_pos_page++;
1858
1859 again0:
1860                 pages = it->ooi_pages;
1861                 if (it->ooi_pos_page < it->ooi_valid_npages) {
1862                         it->ooi_cur_page = kmap(pages[it->ooi_pos_page]);
1863                         it->ooi_pos_lu_page = 0;
1864                         goto again1;
1865                 }
1866
1867                 for (i = 0; i < it->ooi_total_npages; i++) {
1868                         if (pages[i] != NULL)
1869                                 __free_page(pages[i]);
1870                 }
1871                 OBD_FREE(pages, it->ooi_total_npages * sizeof(*pages));
1872
1873                 it->ooi_pos_page = 0;
1874                 it->ooi_total_npages = 0;
1875                 it->ooi_valid_npages = 0;
1876                 it->ooi_swab = 0;
1877                 it->ooi_ent = NULL;
1878                 it->ooi_cur_page = NULL;
1879                 it->ooi_cur_idxpage = NULL;
1880                 it->ooi_pages = NULL;
1881         }
1882
1883         if (it->ooi_next == II_END_OFF)
1884                 RETURN(1);
1885
1886         rc = osp_it_fetch(env, it);
1887         if (rc == 0)
1888                 goto again0;
1889
1890         RETURN(rc);
1891 }
1892
1893 /**
1894  * Move the iteration cursor to the next record.
1895  *
1896  * If there are more records in the lu_page, then move the iteration
1897  * cursor to the next record directly. Otherwise, move the iteration
1898  * cursor to the record in the next lu_page via osp_it_next_page()
1899  *
1900  * \param[in] env       pointer to the thread context
1901  * \param[in] di        pointer to the iteration structure
1902  *
1903  * \retval              positive for end of the directory
1904  * \retval              0 for success
1905  * \retval              negative error number on failure
1906  */
1907 static int osp_orphan_it_next(const struct lu_env *env, struct dt_it *di)
1908 {
1909         struct osp_it           *it = (struct osp_it *)di;
1910         struct lu_idxpage       *idxpage;
1911         int                     rc;
1912         ENTRY;
1913
1914 again:
1915         idxpage = it->ooi_cur_idxpage;
1916         if (idxpage != NULL) {
1917                 if (idxpage->lip_nr == 0)
1918                         RETURN(1);
1919
1920                 it->ooi_pos_ent++;
1921                 if (it->ooi_pos_ent < idxpage->lip_nr) {
1922                         it->ooi_ent =
1923                                 (struct lu_orphan_ent *)idxpage->lip_entries +
1924                                                         it->ooi_pos_ent;
1925                         if (it->ooi_swab)
1926                                 lustre_swab_orphan_ent(it->ooi_ent);
1927                         RETURN(0);
1928                 }
1929         }
1930
1931         rc = osp_it_next_page(env, di);
1932         if (rc == 0)
1933                 goto again;
1934
1935         RETURN(rc);
1936 }
1937
1938 int osp_it_get(const struct lu_env *env, struct dt_it *di,
1939                const struct dt_key *key)
1940 {
1941         return 1;
1942 }
1943
1944 void osp_it_put(const struct lu_env *env, struct dt_it *di)
1945 {
1946 }
1947
1948 static struct dt_key *osp_orphan_it_key(const struct lu_env *env,
1949                                         const struct dt_it *di)
1950 {
1951         struct osp_it   *it  = (struct osp_it *)di;
1952         struct lu_orphan_ent    *ent = (struct lu_orphan_ent *)it->ooi_ent;
1953
1954         if (likely(ent != NULL))
1955                 return (struct dt_key *)(&ent->loe_key);
1956
1957         return NULL;
1958 }
1959
1960 static int osp_orphan_it_key_size(const struct lu_env *env,
1961                                   const struct dt_it *di)
1962 {
1963         return sizeof(struct lu_fid);
1964 }
1965
1966 static int osp_orphan_it_rec(const struct lu_env *env, const struct dt_it *di,
1967                              struct dt_rec *rec, __u32 attr)
1968 {
1969         struct osp_it   *it  = (struct osp_it *)di;
1970         struct lu_orphan_ent    *ent = (struct lu_orphan_ent *)it->ooi_ent;
1971
1972         if (likely(ent != NULL)) {
1973                 *(struct lu_orphan_rec *)rec = ent->loe_rec;
1974                 return 0;
1975         }
1976
1977         return -EINVAL;
1978 }
1979
1980 __u64 osp_it_store(const struct lu_env *env, const struct dt_it *di)
1981 {
1982         struct osp_it   *it = (struct osp_it *)di;
1983
1984         return it->ooi_next;
1985 }
1986
1987 /**
1988  * Locate the iteration cursor to the specified position (cookie).
1989  *
1990  * \param[in] env       pointer to the thread context
1991  * \param[in] di        pointer to the iteration structure
1992  * \param[in] hash      the specified position
1993  *
1994  * \retval              positive number for locating to the exactly position
1995  *                      or the next
1996  * \retval              0 for arriving at the end of the iteration
1997  * \retval              negative error number on failure
1998  */
1999 int osp_orphan_it_load(const struct lu_env *env, const struct dt_it *di,
2000                        __u64 hash)
2001 {
2002         struct osp_it   *it     = (struct osp_it *)di;
2003         int              rc;
2004
2005         it->ooi_next = hash;
2006         rc = osp_orphan_it_next(env, (struct dt_it *)di);
2007         if (rc == 1)
2008                 return 0;
2009
2010         if (rc == 0)
2011                 return 1;
2012
2013         return rc;
2014 }
2015
2016 int osp_it_key_rec(const struct lu_env *env, const struct dt_it *di,
2017                    void *key_rec)
2018 {
2019         return 0;
2020 }
2021
2022 static const struct dt_index_operations osp_orphan_index_ops = {
2023         .dio_lookup             = osp_orphan_index_lookup,
2024         .dio_declare_insert     = osp_orphan_index_declare_insert,
2025         .dio_insert             = osp_orphan_index_insert,
2026         .dio_declare_delete     = osp_orphan_index_declare_delete,
2027         .dio_delete             = osp_orphan_index_delete,
2028         .dio_it = {
2029                 .init           = osp_it_init,
2030                 .fini           = osp_it_fini,
2031                 .next           = osp_orphan_it_next,
2032                 .get            = osp_it_get,
2033                 .put            = osp_it_put,
2034                 .key            = osp_orphan_it_key,
2035                 .key_size       = osp_orphan_it_key_size,
2036                 .rec            = osp_orphan_it_rec,
2037                 .store          = osp_it_store,
2038                 .load           = osp_orphan_it_load,
2039                 .key_rec        = osp_it_key_rec,
2040         }
2041 };
2042
2043 /**
2044  * Implement OSP layer dt_object_operations::do_index_try() interface.
2045  *
2046  * Negotiate the index type.
2047  *
2048  * If the target index is an IDIF object, then use osp_orphan_index_ops.
2049  * Otherwise, assign osp_md_index_ops to the dt_object::do_index_ops.
2050  * (\see lustre/include/lustre_fid.h for IDIF.)
2051  *
2052  * \param[in] env       pointer to the thread context
2053  * \param[in] dt        pointer to the OSP layer dt_object
2054  * \param[in] feat      unused
2055  *
2056  * \retval              0 for success
2057  */
2058 static int osp_index_try(const struct lu_env *env,
2059                          struct dt_object *dt,
2060                          const struct dt_index_features *feat)
2061 {
2062         const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
2063
2064         if (fid_is_last_id(fid) && fid_is_idif(fid))
2065                 dt->do_index_ops = &osp_orphan_index_ops;
2066         else
2067                 dt->do_index_ops = &osp_md_index_ops;
2068         return 0;
2069 }
2070
2071 static struct dt_object_operations osp_obj_ops = {
2072         .do_declare_attr_get    = osp_declare_attr_get,
2073         .do_attr_get            = osp_attr_get,
2074         .do_declare_attr_set    = osp_declare_attr_set,
2075         .do_attr_set            = osp_attr_set,
2076         .do_declare_xattr_get   = osp_declare_xattr_get,
2077         .do_xattr_get           = osp_xattr_get,
2078         .do_declare_xattr_set   = osp_declare_xattr_set,
2079         .do_xattr_set           = osp_xattr_set,
2080         .do_declare_create      = osp_declare_object_create,
2081         .do_create              = osp_object_create,
2082         .do_declare_destroy     = osp_declare_object_destroy,
2083         .do_destroy             = osp_object_destroy,
2084         .do_index_try           = osp_index_try,
2085 };
2086
2087 /**
2088  * Implement OSP layer lu_object_operations::loo_object_init() interface.
2089  *
2090  * Initialize the object.
2091  *
2092  * If it is a remote MDT object, then call do_attr_get() to fetch
2093  * the attribute from the peer.
2094  *
2095  * \param[in] env       pointer to the thread context
2096  * \param[in] o         pointer to the OSP layer lu_object
2097  * \param[in] conf      unused
2098  *
2099  * \retval              0 for success
2100  * \retval              negative error number on failure
2101  */
2102 static int osp_object_init(const struct lu_env *env, struct lu_object *o,
2103                            const struct lu_object_conf *conf)
2104 {
2105         struct osp_object       *po = lu2osp_obj(o);
2106         int                     rc = 0;
2107         ENTRY;
2108
2109         spin_lock_init(&po->opo_lock);
2110         o->lo_header->loh_attr |= LOHA_REMOTE;
2111
2112         if (is_ost_obj(o)) {
2113                 po->opo_obj.do_ops = &osp_obj_ops;
2114         } else {
2115                 struct lu_attr *la = &osp_env_info(env)->osi_attr;
2116
2117                 po->opo_obj.do_ops = &osp_md_obj_ops;
2118                 po->opo_obj.do_body_ops = &osp_md_body_ops;
2119                 rc = po->opo_obj.do_ops->do_attr_get(env, lu2dt_obj(o), la);
2120                 if (rc == 0)
2121                         o->lo_header->loh_attr |=
2122                                 LOHA_EXISTS | (la->la_mode & S_IFMT);
2123                 if (rc == -ENOENT) {
2124                         po->opo_non_exist = 1;
2125                         rc = 0;
2126                 }
2127                 init_rwsem(&po->opo_sem);
2128         }
2129         RETURN(rc);
2130 }
2131
2132 /**
2133  * Implement OSP layer lu_object_operations::loo_object_free() interface.
2134  *
2135  * Finalize the object.
2136  *
2137  * If the OSP object has attributes cache, then destroy the cache.
2138  * Free the object finally.
2139  *
2140  * \param[in] env       pointer to the thread context
2141  * \param[in] o         pointer to the OSP layer lu_object
2142  */
2143 static void osp_object_free(const struct lu_env *env, struct lu_object *o)
2144 {
2145         struct osp_object       *obj = lu2osp_obj(o);
2146         struct lu_object_header *h = o->lo_header;
2147
2148         dt_object_fini(&obj->opo_obj);
2149         lu_object_header_fini(h);
2150         if (obj->opo_ooa != NULL) {
2151                 struct osp_xattr_entry *oxe;
2152                 struct osp_xattr_entry *tmp;
2153                 int                     count;
2154
2155                 list_for_each_entry_safe(oxe, tmp,
2156                                          &obj->opo_ooa->ooa_xattr_list,
2157                                          oxe_list) {
2158                         list_del(&oxe->oxe_list);
2159                         count = atomic_read(&oxe->oxe_ref);
2160                         LASSERTF(count == 1,
2161                                  "Still has %d users on the xattr entry %.*s\n",
2162                                  count-1, (int)oxe->oxe_namelen, oxe->oxe_buf);
2163
2164                         OBD_FREE(oxe, oxe->oxe_buflen);
2165                 }
2166                 OBD_FREE_PTR(obj->opo_ooa);
2167         }
2168         OBD_SLAB_FREE_PTR(obj, osp_object_kmem);
2169 }
2170
2171 /**
2172  * Implement OSP layer lu_object_operations::loo_object_release() interface.
2173  *
2174  * Cleanup (not free) the object.
2175  *
2176  * If it is a reserved object but failed to be created, or it is an OST
2177  * object, then mark the object as non-cached.
2178  *
2179  * \param[in] env       pointer to the thread context
2180  * \param[in] o         pointer to the OSP layer lu_object
2181  */
2182 static void osp_object_release(const struct lu_env *env, struct lu_object *o)
2183 {
2184         struct osp_object       *po = lu2osp_obj(o);
2185         struct osp_device       *d  = lu2osp_dev(o->lo_dev);
2186
2187         ENTRY;
2188
2189         /*
2190          * release reservation if object was declared but not created
2191          * this may require lu_object_put() in LOD
2192          */
2193         if (unlikely(po->opo_reserved)) {
2194                 LASSERT(d->opd_pre != NULL);
2195                 LASSERT(d->opd_pre_reserved > 0);
2196                 spin_lock(&d->opd_pre_lock);
2197                 d->opd_pre_reserved--;
2198                 spin_unlock(&d->opd_pre_lock);
2199
2200                 /* not needed in cache any more */
2201                 set_bit(LU_OBJECT_HEARD_BANSHEE, &o->lo_header->loh_flags);
2202         }
2203
2204         if (is_ost_obj(o))
2205                 /* XXX: Currently, NOT cache OST-object on MDT because:
2206                  *      1. it is not often accessed on MDT.
2207                  *      2. avoid up layer (such as LFSCK) to load too many
2208                  *         once-used OST-objects. */
2209                 set_bit(LU_OBJECT_HEARD_BANSHEE, &o->lo_header->loh_flags);
2210
2211         EXIT;
2212 }
2213
2214 static int osp_object_print(const struct lu_env *env, void *cookie,
2215                             lu_printer_t p, const struct lu_object *l)
2216 {
2217         const struct osp_object *o = lu2osp_obj((struct lu_object *)l);
2218
2219         return (*p)(env, cookie, LUSTRE_OSP_NAME"-object@%p", o);
2220 }
2221
2222 static int osp_object_invariant(const struct lu_object *o)
2223 {
2224         LBUG();
2225 }
2226
2227 struct lu_object_operations osp_lu_obj_ops = {
2228         .loo_object_init        = osp_object_init,
2229         .loo_object_free        = osp_object_free,
2230         .loo_object_release     = osp_object_release,
2231         .loo_object_print       = osp_object_print,
2232         .loo_object_invariant   = osp_object_invariant
2233 };