Whamcloud - gitweb
LU-1881 mdd: cleanup partial modification
[fs/lustre-release.git] / lustre / mdd / mdd_dir.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) 2011, 2012, Whamcloud, Inc.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/mdd/mdd_dir.c
37  *
38  * Lustre Metadata Server (mdd) routines
39  *
40  * Author: Wang Di <wangdi@clusterfs.com>
41  */
42
43 #define DEBUG_SUBSYSTEM S_MDS
44
45 #include <linux/module.h>
46 #include <ldiskfs/ldiskfs_jbd2.h>
47 #include <obd.h>
48 #include <obd_class.h>
49 #include <lustre_ver.h>
50 #include <obd_support.h>
51 #include <lprocfs_status.h>
52 #include <ldiskfs/ldiskfs.h>
53 #include <lustre_mds.h>
54 #include <lustre/lustre_idl.h>
55 #include <lustre_fid.h>
56
57 #include "mdd_internal.h"
58
59 static const char dot[] = ".";
60 static const char dotdot[] = "..";
61
62 static struct lu_name lname_dotdot = {
63         (char *) dotdot,
64         sizeof(dotdot) - 1
65 };
66
67 static int __mdd_lookup(const struct lu_env *env, struct md_object *pobj,
68                         const struct lu_name *lname, struct lu_fid* fid,
69                         int mask);
70 static int mdd_declare_links_add(const struct lu_env *env,
71                                  struct mdd_object *mdd_obj,
72                                  struct thandle *handle);
73 static int mdd_links_add(const struct lu_env *env,
74                          struct mdd_object *mdd_obj,
75                          const struct lu_fid *pfid,
76                          const struct lu_name *lname,
77                          struct thandle *handle, int first);
78 static int mdd_links_rename(const struct lu_env *env,
79                             struct mdd_object *mdd_obj,
80                             const struct lu_fid *oldpfid,
81                             const struct lu_name *oldlname,
82                             const struct lu_fid *newpfid,
83                             const struct lu_name *newlname,
84                             struct thandle *handle);
85
86 static int
87 __mdd_lookup_locked(const struct lu_env *env, struct md_object *pobj,
88                     const struct lu_name *lname, struct lu_fid* fid, int mask)
89 {
90         const char *name = lname->ln_name;
91         struct mdd_object *mdd_obj = md2mdd_obj(pobj);
92         struct dynlock_handle *dlh;
93         int rc;
94
95         dlh = mdd_pdo_read_lock(env, mdd_obj, name, MOR_TGT_PARENT);
96         if (unlikely(dlh == NULL))
97                 return -ENOMEM;
98         rc = __mdd_lookup(env, pobj, lname, fid, mask);
99         mdd_pdo_read_unlock(env, mdd_obj, dlh);
100
101         return rc;
102 }
103
104 int mdd_lookup(const struct lu_env *env,
105                struct md_object *pobj, const struct lu_name *lname,
106                struct lu_fid* fid, struct md_op_spec *spec)
107 {
108         int rc;
109         ENTRY;
110         rc = __mdd_lookup_locked(env, pobj, lname, fid, MAY_EXEC);
111         RETURN(rc);
112 }
113
114 static int mdd_parent_fid(const struct lu_env *env, struct mdd_object *obj,
115                           struct lu_fid *fid)
116 {
117         return __mdd_lookup_locked(env, &obj->mod_obj, &lname_dotdot, fid, 0);
118 }
119
120 /*
121  * For root fid use special function, which does not compare version component
122  * of fid. Version component is different for root fids on all MDTs.
123  */
124 int mdd_is_root(struct mdd_device *mdd, const struct lu_fid *fid)
125 {
126         return fid_seq(&mdd->mdd_root_fid) == fid_seq(fid) &&
127                 fid_oid(&mdd->mdd_root_fid) == fid_oid(fid);
128 }
129
130 /*
131  * return 1: if lf is the fid of the ancestor of p1;
132  * return 0: if not;
133  *
134  * return -EREMOTE: if remote object is found, in this
135  * case fid of remote object is saved to @pf;
136  *
137  * otherwise: values < 0, errors.
138  */
139 static int mdd_is_parent(const struct lu_env *env,
140                          struct mdd_device *mdd,
141                          struct mdd_object *p1,
142                          const struct lu_fid *lf,
143                          struct lu_fid *pf)
144 {
145         struct mdd_object *parent = NULL;
146         struct lu_fid *pfid;
147         int rc;
148         ENTRY;
149
150         LASSERT(!lu_fid_eq(mdo2fid(p1), lf));
151         pfid = &mdd_env_info(env)->mti_fid;
152
153         /* Check for root first. */
154         if (mdd_is_root(mdd, mdo2fid(p1)))
155                 RETURN(0);
156
157         for(;;) {
158                 /* this is done recursively, bypass capa for each obj */
159                 mdd_set_capainfo(env, 4, p1, BYPASS_CAPA);
160                 rc = mdd_parent_fid(env, p1, pfid);
161                 if (rc)
162                         GOTO(out, rc);
163                 if (mdd_is_root(mdd, pfid))
164                         GOTO(out, rc = 0);
165                 if (lu_fid_eq(pfid, lf))
166                         GOTO(out, rc = 1);
167                 if (parent)
168                         mdd_object_put(env, parent);
169                 parent = mdd_object_find(env, mdd, pfid);
170
171                 /* cross-ref parent */
172                 if (parent == NULL) {
173                         if (pf != NULL)
174                                 *pf = *pfid;
175                         GOTO(out, rc = -EREMOTE);
176                 } else if (IS_ERR(parent))
177                         GOTO(out, rc = PTR_ERR(parent));
178                 p1 = parent;
179         }
180         EXIT;
181 out:
182         if (parent && !IS_ERR(parent))
183                 mdd_object_put(env, parent);
184         return rc;
185 }
186
187 /*
188  * No permission check is needed.
189  *
190  * returns 1: if fid is ancestor of @mo;
191  * returns 0: if fid is not a ancestor of @mo;
192  *
193  * returns EREMOTE if remote object is found, fid of remote object is saved to
194  * @fid;
195  *
196  * returns < 0: if error
197  */
198 int mdd_is_subdir(const struct lu_env *env, struct md_object *mo,
199                   const struct lu_fid *fid, struct lu_fid *sfid)
200 {
201         struct mdd_device *mdd = mdo2mdd(mo);
202         int rc;
203         ENTRY;
204
205         if (!S_ISDIR(mdd_object_type(md2mdd_obj(mo))))
206                 RETURN(0);
207
208         rc = mdd_is_parent(env, mdd, md2mdd_obj(mo), fid, sfid);
209         if (rc == 0) {
210                 /* found root */
211                 fid_zero(sfid);
212         } else if (rc == 1) {
213                 /* found @fid is parent */
214                 *sfid = *fid;
215                 rc = 0;
216         }
217         RETURN(rc);
218 }
219
220 /*
221  * Check that @dir contains no entries except (possibly) dot and dotdot.
222  *
223  * Returns:
224  *
225  *             0        empty
226  *      -ENOTDIR        not a directory object
227  *    -ENOTEMPTY        not empty
228  *           -ve        other error
229  *
230  */
231 static int mdd_dir_is_empty(const struct lu_env *env,
232                             struct mdd_object *dir)
233 {
234         struct dt_it     *it;
235         struct dt_object *obj;
236         const struct dt_it_ops *iops;
237         int result;
238         ENTRY;
239
240         obj = mdd_object_child(dir);
241         if (!dt_try_as_dir(env, obj))
242                 RETURN(-ENOTDIR);
243
244         iops = &obj->do_index_ops->dio_it;
245         it = iops->init(env, obj, LUDA_64BITHASH, BYPASS_CAPA);
246         if (!IS_ERR(it)) {
247                 result = iops->get(env, it, (const void *)"");
248                 if (result > 0) {
249                         int i;
250                         for (result = 0, i = 0; result == 0 && i < 3; ++i)
251                                 result = iops->next(env, it);
252                         if (result == 0)
253                                 result = -ENOTEMPTY;
254                         else if (result == +1)
255                                 result = 0;
256                 } else if (result == 0)
257                         /*
258                          * Huh? Index contains no zero key?
259                          */
260                         result = -EIO;
261
262                 iops->put(env, it);
263                 iops->fini(env, it);
264         } else
265                 result = PTR_ERR(it);
266         RETURN(result);
267 }
268
269 static int __mdd_may_link(const struct lu_env *env, struct mdd_object *obj)
270 {
271         struct mdd_device *m = mdd_obj2mdd_dev(obj);
272         struct lu_attr *la = &mdd_env_info(env)->mti_la;
273         int rc;
274         ENTRY;
275
276         rc = mdd_la_get(env, obj, la, BYPASS_CAPA);
277         if (rc)
278                 RETURN(rc);
279
280         /*
281          * Subdir count limitation can be broken through.
282          */
283         if (la->la_nlink >= m->mdd_dt_conf.ddp_max_nlink &&
284             !S_ISDIR(la->la_mode))
285                 RETURN(-EMLINK);
286         else
287                 RETURN(0);
288 }
289
290 /*
291  * Check whether it may create the cobj under the pobj.
292  * cobj maybe NULL
293  */
294 int mdd_may_create(const struct lu_env *env, struct mdd_object *pobj,
295                    struct mdd_object *cobj, int check_perm, int check_nlink)
296 {
297         int rc = 0;
298         ENTRY;
299
300         if (cobj && mdd_object_exists(cobj))
301                 RETURN(-EEXIST);
302
303         if (mdd_is_dead_obj(pobj))
304                 RETURN(-ENOENT);
305
306         if (check_perm)
307                 rc = mdd_permission_internal_locked(env, pobj, NULL,
308                                                     MAY_WRITE | MAY_EXEC,
309                                                     MOR_TGT_PARENT);
310
311         if (!rc && check_nlink)
312                 rc = __mdd_may_link(env, pobj);
313
314         RETURN(rc);
315 }
316
317 /*
318  * Check whether can unlink from the pobj in the case of "cobj == NULL".
319  */
320 int mdd_may_unlink(const struct lu_env *env, struct mdd_object *pobj,
321                    const struct md_attr *ma)
322 {
323         int rc;
324         ENTRY;
325
326         if (mdd_is_dead_obj(pobj))
327                 RETURN(-ENOENT);
328
329         if ((ma->ma_attr.la_valid & LA_FLAGS) &&
330             (ma->ma_attr.la_flags & (LUSTRE_APPEND_FL | LUSTRE_IMMUTABLE_FL)))
331                 RETURN(-EPERM);
332
333         rc = mdd_permission_internal_locked(env, pobj, NULL,
334                                             MAY_WRITE | MAY_EXEC,
335                                             MOR_TGT_PARENT);
336         if (rc)
337                 RETURN(rc);
338
339         if (mdd_is_append(pobj))
340                 RETURN(-EPERM);
341
342         RETURN(rc);
343 }
344
345 /*
346  * pobj == NULL is remote ops case, under such case, pobj's
347  * VTX feature has been checked already, no need check again.
348  */
349 static inline int mdd_is_sticky(const struct lu_env *env,
350                                 struct mdd_object *pobj,
351                                 struct mdd_object *cobj)
352 {
353         struct lu_attr *tmp_la = &mdd_env_info(env)->mti_la;
354         struct md_ucred *uc = md_ucred(env);
355         int rc;
356
357         if (pobj) {
358                 rc = mdd_la_get(env, pobj, tmp_la, BYPASS_CAPA);
359                 if (rc)
360                         return rc;
361
362                 if (!(tmp_la->la_mode & S_ISVTX) ||
363                      (tmp_la->la_uid == uc->mu_fsuid))
364                         return 0;
365         }
366
367         rc = mdd_la_get(env, cobj, tmp_la, BYPASS_CAPA);
368         if (rc)
369                 return rc;
370
371         if (tmp_la->la_uid == uc->mu_fsuid)
372                 return 0;
373
374         return !mdd_capable(uc, CFS_CAP_FOWNER);
375 }
376
377 /*
378  * Check whether it may delete the cobj from the pobj.
379  * pobj maybe NULL
380  */
381 int mdd_may_delete(const struct lu_env *env, struct mdd_object *pobj,
382                    struct mdd_object *cobj, struct md_attr *ma,
383                    int check_perm, int check_empty)
384 {
385         int rc = 0;
386         ENTRY;
387
388         LASSERT(cobj);
389         if (!mdd_object_exists(cobj))
390                 RETURN(-ENOENT);
391
392         if (mdd_is_dead_obj(cobj))
393                 RETURN(-ESTALE);
394
395         if (pobj) {
396                 if (!mdd_object_exists(pobj))
397                         RETURN(-ENOENT);
398
399                 if (mdd_is_dead_obj(pobj))
400                         RETURN(-ENOENT);
401
402                 if (check_perm) {
403                         rc = mdd_permission_internal_locked(env, pobj, NULL,
404                                                     MAY_WRITE | MAY_EXEC,
405                                                     MOR_TGT_PARENT);
406                         if (rc)
407                                 RETURN(rc);
408                 }
409
410                 if (mdd_is_append(pobj))
411                         RETURN(-EPERM);
412         }
413
414         if (!(ma->ma_attr_flags & MDS_VTX_BYPASS) &&
415             mdd_is_sticky(env, pobj, cobj))
416                 RETURN(-EPERM);
417
418         if (mdd_is_immutable(cobj) || mdd_is_append(cobj))
419                 RETURN(-EPERM);
420
421         if ((ma->ma_attr.la_valid & LA_FLAGS) &&
422             (ma->ma_attr.la_flags & (LUSTRE_APPEND_FL | LUSTRE_IMMUTABLE_FL)))
423                 RETURN(-EPERM);
424
425         if (S_ISDIR(ma->ma_attr.la_mode)) {
426                 struct mdd_device *mdd = mdo2mdd(&cobj->mod_obj);
427
428                 if (!S_ISDIR(mdd_object_type(cobj)))
429                         RETURN(-ENOTDIR);
430
431                 if (lu_fid_eq(mdo2fid(cobj), &mdd->mdd_root_fid))
432                         RETURN(-EBUSY);
433         } else if (S_ISDIR(mdd_object_type(cobj)))
434                 RETURN(-EISDIR);
435
436         if (S_ISDIR(ma->ma_attr.la_mode) && check_empty)
437                 rc = mdd_dir_is_empty(env, cobj);
438
439         RETURN(rc);
440 }
441
442 /*
443  * tgt maybe NULL
444  * has mdd_write_lock on src already, but not on tgt yet
445  */
446 int mdd_link_sanity_check(const struct lu_env *env,
447                           struct mdd_object *tgt_obj,
448                           const struct lu_name *lname,
449                           struct mdd_object *src_obj)
450 {
451         struct mdd_device *m = mdd_obj2mdd_dev(src_obj);
452         int rc = 0;
453         ENTRY;
454
455         if (!mdd_object_exists(src_obj))
456                 RETURN(-ENOENT);
457
458         if (mdd_is_dead_obj(src_obj))
459                 RETURN(-ESTALE);
460
461         /* Local ops, no lookup before link, check filename length here. */
462         if (lname && (lname->ln_namelen > m->mdd_dt_conf.ddp_max_name_len))
463                 RETURN(-ENAMETOOLONG);
464
465         if (mdd_is_immutable(src_obj) || mdd_is_append(src_obj))
466                 RETURN(-EPERM);
467
468         if (S_ISDIR(mdd_object_type(src_obj)))
469                 RETURN(-EPERM);
470
471         LASSERT(src_obj != tgt_obj);
472         if (tgt_obj) {
473                 rc = mdd_may_create(env, tgt_obj, NULL, 1, 0);
474                 if (rc)
475                         RETURN(rc);
476         }
477
478         rc = __mdd_may_link(env, src_obj);
479
480         RETURN(rc);
481 }
482
483 static int __mdd_index_delete_only(const struct lu_env *env, struct mdd_object *pobj,
484                                    const char *name, struct thandle *handle,
485                                    struct lustre_capa *capa)
486 {
487         struct dt_object *next = mdd_object_child(pobj);
488         int               rc;
489         ENTRY;
490
491         if (dt_try_as_dir(env, next)) {
492                 rc = next->do_index_ops->dio_delete(env, next,
493                                                     (struct dt_key *)name,
494                                                     handle, capa);
495         } else
496                 rc = -ENOTDIR;
497
498         RETURN(rc);
499 }
500
501 static int __mdd_index_insert_only(const struct lu_env *env,
502                                    struct mdd_object *pobj,
503                                    const struct lu_fid *lf, const char *name,
504                                    struct thandle *handle,
505                                    struct lustre_capa *capa)
506 {
507         struct dt_object *next = mdd_object_child(pobj);
508         int               rc;
509         ENTRY;
510
511         if (dt_try_as_dir(env, next)) {
512                 struct md_ucred  *uc = md_ucred(env);
513
514                 rc = next->do_index_ops->dio_insert(env, next,
515                                                     (struct dt_rec*)lf,
516                                                     (const struct dt_key *)name,
517                                                     handle, capa, uc->mu_cap &
518                                                     CFS_CAP_SYS_RESOURCE_MASK);
519         } else {
520                 rc = -ENOTDIR;
521         }
522         RETURN(rc);
523 }
524
525 /* insert named index, add reference if isdir */
526 static int __mdd_index_insert(const struct lu_env *env, struct mdd_object *pobj,
527                               const struct lu_fid *lf, const char *name, int is_dir,
528                               struct thandle *handle, struct lustre_capa *capa)
529 {
530         int               rc;
531         ENTRY;
532
533         rc = __mdd_index_insert_only(env, pobj, lf, name, handle, capa);
534         if (rc == 0 && is_dir) {
535                 mdd_write_lock(env, pobj, MOR_TGT_PARENT);
536                 mdo_ref_add(env, pobj, handle);
537                 mdd_write_unlock(env, pobj);
538         }
539         RETURN(rc);
540 }
541
542 /* delete named index, drop reference if isdir */
543 static int __mdd_index_delete(const struct lu_env *env, struct mdd_object *pobj,
544                               const char *name, int is_dir, struct thandle *handle,
545                               struct lustre_capa *capa)
546 {
547         int               rc;
548         ENTRY;
549
550         rc = __mdd_index_delete_only(env, pobj, name, handle, capa);
551         if (rc == 0 && is_dir) {
552                 mdd_write_lock(env, pobj, MOR_TGT_PARENT);
553                 mdo_ref_del(env, pobj, handle);
554                 mdd_write_unlock(env, pobj);
555         }
556
557         RETURN(rc);
558 }
559
560 int mdd_declare_llog_record(const struct lu_env *env, struct mdd_device *mdd,
561                             int reclen, struct thandle *handle)
562 {
563         int rc;
564
565         /* XXX: this is a temporary solution to declare llog changes
566          *      will be fixed in 2.3 with new llog implementation */
567
568         LASSERT(mdd->mdd_capa);
569
570         /* XXX: Since we use the 'mdd_capa' as fake llog object here, we
571          *      have to set the parameter 'size' as INT_MAX or 0 to inform
572          *      OSD that this record write is for a llog write or catalog
573          *      header update, and osd declare function will reserve less
574          *      credits for optimization purpose.
575          *
576          *      Reserve 6 blocks for a llog write, since the llog file is
577          *      usually small, reserve 2 blocks for catalog header update,
578          *      because we know for sure that catalog header is already
579          *      allocated.
580          *
581          *      This hack should be removed in 2.3.
582          */
583
584         /* record itself */
585         rc = dt_declare_record_write(env, mdd->mdd_capa,
586                                      DECLARE_LLOG_WRITE, 0, handle);
587         if (rc)
588                 return rc;
589
590         /* header will be updated as well */
591         rc = dt_declare_record_write(env, mdd->mdd_capa,
592                                      DECLARE_LLOG_WRITE, 0, handle);
593         if (rc)
594                 return rc;
595
596         /* also we should be able to create new plain log */
597         rc = dt_declare_create(env, mdd->mdd_capa, NULL, NULL, NULL, handle);
598         if (rc)
599                 return rc;
600
601         /* new record referencing new plain llog */
602         rc = dt_declare_record_write(env, mdd->mdd_capa,
603                                      DECLARE_LLOG_WRITE, 0, handle);
604         if (rc)
605                 return rc;
606
607         /* catalog's header will be updated as well */
608         rc = dt_declare_record_write(env, mdd->mdd_capa,
609                                      DECLARE_LLOG_REWRITE, 0, handle);
610
611         return rc;
612 }
613
614 int mdd_declare_changelog_store(const struct lu_env *env,
615                                 struct mdd_device *mdd,
616                                 const struct lu_name *fname,
617                                 struct thandle *handle)
618 {
619         int reclen;
620
621         /* Not recording */
622         if (!(mdd->mdd_cl.mc_flags & CLM_ON))
623                 return 0;
624
625         /* we'll be writing payload + llog header */
626         reclen = sizeof(struct llog_changelog_rec);
627         if (fname)
628                 reclen += fname->ln_namelen;
629         reclen = llog_data_len(reclen);
630
631         return mdd_declare_llog_record(env, mdd, reclen, handle);
632 }
633
634 static int mdd_declare_changelog_ext_store(const struct lu_env *env,
635                                            struct mdd_device *mdd,
636                                            const struct lu_name *tname,
637                                            const struct lu_name *sname,
638                                            struct thandle *handle)
639 {
640         int reclen;
641
642         /* Not recording */
643         if (!(mdd->mdd_cl.mc_flags & CLM_ON))
644                 return 0;
645
646         /* we'll be writing payload + llog header */
647         reclen = sizeof(struct llog_changelog_ext_rec);
648         if (tname)
649                 reclen += tname->ln_namelen;
650         if (sname)
651                 reclen += 1 + sname->ln_namelen;
652         reclen = llog_data_len(reclen);
653
654         return mdd_declare_llog_record(env, mdd, reclen, handle);
655 }
656
657 /** Store a namespace change changelog record
658  * If this fails, we must fail the whole transaction; we don't
659  * want the change to commit without the log entry.
660  * \param target - mdd_object of change
661  * \param parent - parent dir/object
662  * \param tname - target name string
663  * \param handle - transacion handle
664  */
665 static int mdd_changelog_ns_store(const struct lu_env  *env,
666                                   struct mdd_device    *mdd,
667                                   enum changelog_rec_type type,
668                                   unsigned flags,
669                                   struct mdd_object    *target,
670                                   struct mdd_object    *parent,
671                                   const struct lu_name *tname,
672                                   struct thandle *handle)
673 {
674         struct llog_changelog_rec *rec;
675         struct lu_buf *buf;
676         int reclen;
677         int rc;
678         ENTRY;
679
680         /* Not recording */
681         if (!(mdd->mdd_cl.mc_flags & CLM_ON))
682                 RETURN(0);
683         if ((mdd->mdd_cl.mc_mask & (1 << type)) == 0)
684                 RETURN(0);
685
686         LASSERT(target != NULL);
687         LASSERT(parent != NULL);
688         LASSERT(tname != NULL);
689         LASSERT(handle != NULL);
690
691         reclen = llog_data_len(sizeof(*rec) + tname->ln_namelen);
692         buf = mdd_buf_alloc(env, reclen);
693         if (buf->lb_buf == NULL)
694                 RETURN(-ENOMEM);
695         rec = (struct llog_changelog_rec *)buf->lb_buf;
696
697         rec->cr.cr_flags = CLF_VERSION | (CLF_FLAGMASK & flags);
698         rec->cr.cr_type = (__u32)type;
699         rec->cr.cr_tfid = *mdo2fid(target);
700         rec->cr.cr_pfid = *mdo2fid(parent);
701         rec->cr.cr_namelen = tname->ln_namelen;
702         memcpy(rec->cr.cr_name, tname->ln_name, tname->ln_namelen);
703
704         target->mod_cltime = cfs_time_current_64();
705
706         rc = mdd_changelog_llog_write(mdd, rec, handle);
707         if (rc < 0) {
708                 CERROR("changelog failed: rc=%d, op%d %s c"DFID" p"DFID"\n",
709                         rc, type, tname->ln_name, PFID(&rec->cr.cr_tfid),
710                         PFID(&rec->cr.cr_pfid));
711                 RETURN(-EFAULT);
712         }
713
714         RETURN(0);
715 }
716
717
718 /** Store a namespace change changelog record
719  * If this fails, we must fail the whole transaction; we don't
720  * want the change to commit without the log entry.
721  * \param target - mdd_object of change
722  * \param tpfid - target parent dir/object fid
723  * \param sfid - source object fid
724  * \param spfid - source parent fid
725  * \param tname - target name string
726  * \param sname - source name string
727  * \param handle - transacion handle
728  */
729 static int mdd_changelog_ext_ns_store(const struct lu_env  *env,
730                                       struct mdd_device    *mdd,
731                                       enum changelog_rec_type type,
732                                       unsigned flags,
733                                       struct mdd_object    *target,
734                                       const struct lu_fid  *tpfid,
735                                       const struct lu_fid  *sfid,
736                                       const struct lu_fid  *spfid,
737                                       const struct lu_name *tname,
738                                       const struct lu_name *sname,
739                                       struct thandle *handle)
740 {
741         struct llog_changelog_ext_rec *rec;
742         struct lu_buf *buf;
743         int reclen;
744         int rc;
745         ENTRY;
746
747         /* Not recording */
748         if (!(mdd->mdd_cl.mc_flags & CLM_ON))
749                 RETURN(0);
750         if ((mdd->mdd_cl.mc_mask & (1 << type)) == 0)
751                 RETURN(0);
752
753         LASSERT(sfid != NULL);
754         LASSERT(tpfid != NULL);
755         LASSERT(tname != NULL);
756         LASSERT(handle != NULL);
757
758         reclen = sizeof(*rec) + tname->ln_namelen;
759         if (sname != NULL)
760                 reclen += 1 + sname->ln_namelen;
761         reclen = llog_data_len(reclen);
762         buf = mdd_buf_alloc(env, reclen);
763         if (buf->lb_buf == NULL)
764                 RETURN(-ENOMEM);
765         rec = (struct llog_changelog_ext_rec *)buf->lb_buf;
766
767         rec->cr.cr_flags = CLF_EXT_VERSION | (CLF_FLAGMASK & flags);
768         rec->cr.cr_type = (__u32)type;
769         rec->cr.cr_pfid = *tpfid;
770         rec->cr.cr_sfid = *sfid;
771         rec->cr.cr_spfid = *spfid;
772         rec->cr.cr_namelen = tname->ln_namelen;
773         memcpy(rec->cr.cr_name, tname->ln_name, tname->ln_namelen);
774         if (sname) {
775                 LASSERT(sfid != NULL);
776                 rec->cr.cr_name[tname->ln_namelen] = '\0';
777                 memcpy(rec->cr.cr_name + tname->ln_namelen + 1, sname->ln_name,
778                         sname->ln_namelen);
779                 rec->cr.cr_namelen += 1 + sname->ln_namelen;
780         }
781
782         if (likely(target != NULL)) {
783                 rec->cr.cr_tfid = *mdo2fid(target);
784                 target->mod_cltime = cfs_time_current_64();
785         } else {
786                 fid_zero(&rec->cr.cr_tfid);
787         }
788
789         rc = mdd_changelog_ext_llog_write(mdd, rec, handle);
790         if (rc < 0) {
791                 CERROR("changelog failed: rc=%d, op%d %s c"DFID" p"DFID"\n",
792                         rc, type, tname->ln_name, PFID(sfid), PFID(tpfid));
793                 return -EFAULT;
794         }
795
796         return 0;
797 }
798
799 static int mdd_declare_link(const struct lu_env *env,
800                             struct mdd_device *mdd,
801                             struct mdd_object *p,
802                             struct mdd_object *c,
803                             const struct lu_name *name,
804                             struct thandle *handle)
805 {
806         int rc;
807
808         rc = mdo_declare_index_insert(env, p, mdo2fid(c), name->ln_name,handle);
809         if (rc)
810                 return rc;
811
812         rc = mdo_declare_ref_add(env, c, handle);
813         if (rc)
814                 return rc;
815
816         rc = mdo_declare_attr_set(env, p, NULL, handle);
817         if (rc)
818                 return rc;
819
820         rc = mdo_declare_attr_set(env, c, NULL, handle);
821         if (rc)
822                 return rc;
823
824         rc = mdd_declare_links_add(env, c, handle);
825         if (rc)
826                 return rc;
827
828         rc = mdd_declare_changelog_store(env, mdd, name, handle);
829
830         return rc;
831 }
832
833 static int mdd_link(const struct lu_env *env, struct md_object *tgt_obj,
834                     struct md_object *src_obj, const struct lu_name *lname,
835                     struct md_attr *ma)
836 {
837         const char *name = lname->ln_name;
838         struct lu_attr    *la = &mdd_env_info(env)->mti_la_for_fix;
839         struct mdd_object *mdd_tobj = md2mdd_obj(tgt_obj);
840         struct mdd_object *mdd_sobj = md2mdd_obj(src_obj);
841         struct mdd_device *mdd = mdo2mdd(src_obj);
842         struct dynlock_handle *dlh;
843         struct thandle *handle;
844 #ifdef HAVE_QUOTA_SUPPORT
845         struct obd_device *obd = mdd->mdd_obd_dev;
846         struct obd_export *exp = md_quota(env)->mq_exp;
847         struct mds_obd *mds = &obd->u.mds;
848         unsigned int qids[MAXQUOTAS] = { 0, 0 };
849         int quota_opc = 0, rec_pending[MAXQUOTAS] = { 0, 0 };
850 #endif
851         int rc;
852         ENTRY;
853
854 #ifdef HAVE_QUOTA_SUPPORT
855         if (mds->mds_quota) {
856                 struct lu_attr *la_tmp = &mdd_env_info(env)->mti_la;
857
858                 rc = mdd_la_get(env, mdd_tobj, la_tmp, BYPASS_CAPA);
859                 if (!rc) {
860                         void *data = NULL;
861                         mdd_data_get(env, mdd_tobj, &data);
862                         quota_opc = FSFILT_OP_LINK;
863                         mdd_quota_wrapper(la_tmp, qids);
864                         /* get block quota for parent */
865                         lquota_chkquota(mds_quota_interface_ref, obd, exp,
866                                         qids, rec_pending, 1, NULL,
867                                         LQUOTA_FLAGS_BLK, data, 1);
868                 }
869         }
870 #endif
871
872         handle = mdd_trans_create(env, mdd);
873         if (IS_ERR(handle))
874                 GOTO(out_pending, rc = PTR_ERR(handle));
875
876         rc = mdd_declare_link(env, mdd, mdd_tobj, mdd_sobj, lname, handle);
877         if (rc)
878                 GOTO(stop, rc);
879
880         rc = mdd_trans_start(env, mdd, handle);
881         if (rc)
882                 GOTO(stop, rc);
883
884         dlh = mdd_pdo_write_lock(env, mdd_tobj, name, MOR_TGT_CHILD);
885         if (dlh == NULL)
886                 GOTO(out_trans, rc = -ENOMEM);
887         mdd_write_lock(env, mdd_sobj, MOR_TGT_CHILD);
888
889         rc = mdd_link_sanity_check(env, mdd_tobj, lname, mdd_sobj);
890         if (rc)
891                 GOTO(out_unlock, rc);
892
893         rc = __mdd_index_insert_only(env, mdd_tobj, mdo2fid(mdd_sobj),
894                                      name, handle,
895                                      mdd_object_capa(env, mdd_tobj));
896         if (rc)
897                 GOTO(out_unlock, rc);
898
899         rc = mdo_ref_add(env, mdd_sobj, handle);
900         if (rc != 0) {
901                 __mdd_index_delete_only(env, mdd_tobj, name, handle,
902                                         mdd_object_capa(env, mdd_tobj));
903                 GOTO(out_unlock, rc);
904         }
905
906         LASSERT(ma->ma_attr.la_valid & LA_CTIME);
907         la->la_ctime = la->la_mtime = ma->ma_attr.la_ctime;
908
909         la->la_valid = LA_CTIME | LA_MTIME;
910         rc = mdd_attr_check_set_internal_locked(env, mdd_tobj, la, handle, 0);
911         if (rc)
912                 GOTO(out_unlock, rc);
913
914         la->la_valid = LA_CTIME;
915         rc = mdd_attr_check_set_internal(env, mdd_sobj, la, handle, 0);
916         if (rc == 0) {
917                 mdd_links_add(env, mdd_sobj,
918                               mdo2fid(mdd_tobj), lname, handle, 0);
919         }
920
921         EXIT;
922 out_unlock:
923         mdd_write_unlock(env, mdd_sobj);
924         mdd_pdo_write_unlock(env, mdd_tobj, dlh);
925 out_trans:
926         if (rc == 0)
927                 rc = mdd_changelog_ns_store(env, mdd, CL_HARDLINK, 0, mdd_sobj,
928                                             mdd_tobj, lname, handle);
929 stop:
930         mdd_trans_stop(env, mdd, rc, handle);
931 out_pending:
932 #ifdef HAVE_QUOTA_SUPPORT
933         if (quota_opc) {
934                 lquota_pending_commit(mds_quota_interface_ref, obd,
935                                       qids, rec_pending, 1);
936                 /* Trigger dqacq for the parent owner. If failed,
937                  * the next call for lquota_chkquota will process it. */
938                 lquota_adjust(mds_quota_interface_ref, obd, 0, qids, rc,
939                               quota_opc);
940         }
941 #endif
942         return rc;
943 }
944
945 int mdd_declare_finish_unlink(const struct lu_env *env,
946                               struct mdd_object *obj,
947                               struct md_attr *ma,
948                               struct thandle *handle)
949 {
950         int rc;
951
952         rc = orph_declare_index_insert(env, obj, handle);
953         if (rc)
954                 return rc;
955
956         return mdd_declare_object_kill(env, obj, ma, handle);
957 }
958
959 /* caller should take a lock before calling */
960 int mdd_finish_unlink(const struct lu_env *env,
961                       struct mdd_object *obj, struct md_attr *ma,
962                       struct thandle *th)
963 {
964         int rc;
965         int reset = 1;
966         int is_dir = S_ISDIR(ma->ma_attr.la_mode);
967         ENTRY;
968
969         LASSERT(mdd_write_locked(env, obj) != 0);
970
971         /* read HSM flags, needed to set changelogs flags */
972         ma->ma_need = MA_HSM | MA_INODE;
973         rc = mdd_attr_get_internal(env, obj, ma);
974         if (rc == 0 && (ma->ma_attr.la_nlink == 0 || is_dir)) {
975                 obj->mod_flags |= DEAD_OBJ;
976                 /* add new orphan and the object
977                  * will be deleted during mdd_close() */
978                 if (obj->mod_count) {
979                         rc = __mdd_orphan_add(env, obj, th);
980                         if (rc == 0)
981                                 CDEBUG(D_HA, "Object "DFID" is inserted into "
982                                         "orphan list, open count = %d\n",
983                                         PFID(mdd_object_fid(obj)),
984                                         obj->mod_count);
985                         else
986                                 CERROR("Object "DFID" fail to be an orphan, "
987                                        "open count = %d, maybe cause failed "
988                                        "open replay\n",
989                                         PFID(mdd_object_fid(obj)),
990                                         obj->mod_count);
991                 } else {
992                         rc = mdd_object_kill(env, obj, ma, th);
993                         if (rc == 0)
994                                 reset = 0;
995                 }
996
997                 /* get the i_nlink */
998                 ma->ma_need = MA_INODE;
999                 rc = mdd_attr_get_internal(env, obj, ma);
1000         }
1001         if (reset)
1002                 ma->ma_valid &= ~(MA_LOV | MA_COOKIE);
1003
1004         RETURN(rc);
1005 }
1006
1007 /*
1008  * pobj maybe NULL
1009  * has mdd_write_lock on cobj already, but not on pobj yet
1010  */
1011 int mdd_unlink_sanity_check(const struct lu_env *env, struct mdd_object *pobj,
1012                             struct mdd_object *cobj, struct md_attr *ma)
1013 {
1014         int rc;
1015         ENTRY;
1016
1017         rc = mdd_may_delete(env, pobj, cobj, ma, 1, 1);
1018
1019         RETURN(rc);
1020 }
1021
1022 static int mdd_declare_unlink(const struct lu_env *env, struct mdd_device *mdd,
1023                               struct mdd_object *p, struct mdd_object *c,
1024                               const struct lu_name *name, struct md_attr *ma,
1025                               struct thandle *handle)
1026 {
1027         int rc;
1028
1029         rc = mdo_declare_index_delete(env, p, name->ln_name, handle);
1030         if (rc)
1031                 return rc;
1032
1033         rc = mdo_declare_ref_del(env, p, handle);
1034         if (rc)
1035                 return rc;
1036
1037         rc = mdo_declare_ref_del(env, c, handle);
1038         if (rc)
1039                 return rc;
1040
1041         rc = mdo_declare_ref_del(env, c, handle);
1042         if (rc)
1043                 return rc;
1044
1045         rc = mdo_declare_attr_set(env, p, NULL, handle);
1046         if (rc)
1047                 return rc;
1048
1049         rc = mdo_declare_attr_set(env, c, NULL, handle);
1050         if (rc)
1051                 return rc;
1052
1053         rc = mdd_declare_finish_unlink(env, c, ma, handle);
1054         if (rc)
1055                 return rc;
1056
1057         rc = mdd_declare_links_add(env, c, handle);
1058         if (rc)
1059                 return rc;
1060
1061         rc = mdd_declare_changelog_store(env, mdd, name, handle);
1062
1063         return rc;
1064 }
1065
1066 static int mdd_unlink(const struct lu_env *env, struct md_object *pobj,
1067                       struct md_object *cobj, const struct lu_name *lname,
1068                       struct md_attr *ma)
1069 {
1070         const char *name = lname->ln_name;
1071         struct lu_attr    *la = &mdd_env_info(env)->mti_la_for_fix;
1072         struct mdd_object *mdd_pobj = md2mdd_obj(pobj);
1073         struct mdd_object *mdd_cobj = md2mdd_obj(cobj);
1074         struct mdd_device *mdd = mdo2mdd(pobj);
1075         struct dynlock_handle *dlh;
1076         struct thandle    *handle;
1077 #ifdef HAVE_QUOTA_SUPPORT
1078         struct obd_device *obd = mdd->mdd_obd_dev;
1079         struct mds_obd *mds = &obd->u.mds;
1080         unsigned int qcids[MAXQUOTAS] = { 0, 0 };
1081         unsigned int qpids[MAXQUOTAS] = { 0, 0 };
1082         int quota_opc = 0;
1083 #endif
1084         int is_dir = S_ISDIR(ma->ma_attr.la_mode);
1085         int rc;
1086         ENTRY;
1087
1088         if (mdd_object_exists(mdd_cobj) <= 0)
1089                 RETURN(-ENOENT);
1090
1091         handle = mdd_trans_create(env, mdd);
1092         if (IS_ERR(handle))
1093                 RETURN(PTR_ERR(handle));
1094
1095         rc = mdd_declare_unlink(env, mdd, mdd_pobj, mdd_cobj,
1096                                 lname, ma, handle);
1097         if (rc)
1098                 GOTO(stop, rc);
1099
1100         rc = mdd_trans_start(env, mdd, handle);
1101         if (rc)
1102                 GOTO(stop, rc);
1103
1104         dlh = mdd_pdo_write_lock(env, mdd_pobj, name, MOR_TGT_PARENT);
1105         if (dlh == NULL)
1106                 GOTO(out_trans, rc = -ENOMEM);
1107         mdd_write_lock(env, mdd_cobj, MOR_TGT_CHILD);
1108
1109         rc = mdd_unlink_sanity_check(env, mdd_pobj, mdd_cobj, ma);
1110         if (rc)
1111                 GOTO(cleanup, rc);
1112
1113         rc = __mdd_index_delete(env, mdd_pobj, name, is_dir, handle,
1114                                 mdd_object_capa(env, mdd_pobj));
1115         if (rc)
1116                 GOTO(cleanup, rc);
1117
1118         rc = mdo_ref_del(env, mdd_cobj, handle);
1119         if (rc != 0) {
1120                 __mdd_index_insert_only(env, mdd_pobj, mdo2fid(mdd_cobj),
1121                                         name, handle,
1122                                         mdd_object_capa(env, mdd_pobj));
1123                 GOTO(cleanup, rc);
1124         }
1125
1126         if (is_dir)
1127                 /* unlink dot */
1128                 mdo_ref_del(env, mdd_cobj, handle);
1129
1130         LASSERT(ma->ma_attr.la_valid & LA_CTIME);
1131         la->la_ctime = la->la_mtime = ma->ma_attr.la_ctime;
1132
1133         la->la_valid = LA_CTIME | LA_MTIME;
1134         rc = mdd_attr_check_set_internal_locked(env, mdd_pobj, la, handle, 0);
1135         if (rc)
1136                 GOTO(cleanup, rc);
1137
1138         if (ma->ma_attr.la_nlink > 0 || mdd_cobj->mod_count > 0) {
1139                 /* update ctime of an unlinked file only if it is still
1140                  * opened or a link still exists */
1141                 la->la_valid = LA_CTIME;
1142                 rc = mdd_attr_check_set_internal(env, mdd_cobj, la, handle, 0);
1143                 if (rc)
1144                         GOTO(cleanup, rc);
1145         }
1146
1147         rc = mdd_finish_unlink(env, mdd_cobj, ma, handle);
1148 #ifdef HAVE_QUOTA_SUPPORT
1149         if (mds->mds_quota && ma->ma_valid & MA_INODE &&
1150             ma->ma_attr.la_nlink == 0) {
1151                 struct lu_attr *la_tmp = &mdd_env_info(env)->mti_la;
1152
1153                 rc = mdd_la_get(env, mdd_pobj, la_tmp, BYPASS_CAPA);
1154                 if (!rc) {
1155                         mdd_quota_wrapper(la_tmp, qpids);
1156                         if (mdd_cobj->mod_count == 0) {
1157                                 quota_opc = FSFILT_OP_UNLINK;
1158                                 mdd_quota_wrapper(&ma->ma_attr, qcids);
1159                         } else {
1160                                 quota_opc = FSFILT_OP_UNLINK_PARTIAL_PARENT;
1161                         }
1162                 }
1163         }
1164 #endif
1165         if (!is_dir)
1166                 /* old files may not have link ea; ignore errors */
1167                 mdd_links_rename(env, mdd_cobj, mdo2fid(mdd_pobj),
1168                                  lname, NULL, NULL, handle);
1169
1170         EXIT;
1171 cleanup:
1172         mdd_write_unlock(env, mdd_cobj);
1173         mdd_pdo_write_unlock(env, mdd_pobj, dlh);
1174 out_trans:
1175         if (rc == 0) {
1176                 int cl_flags;
1177
1178                 cl_flags = (ma->ma_attr.la_nlink == 0) ? CLF_UNLINK_LAST : 0;
1179                 if ((ma->ma_valid & MA_HSM) &&
1180                     (ma->ma_hsm.mh_flags & HS_EXISTS))
1181                         cl_flags |= CLF_UNLINK_HSM_EXISTS;
1182
1183                 rc = mdd_changelog_ns_store(env, mdd,
1184                         is_dir ? CL_RMDIR : CL_UNLINK, cl_flags,
1185                         mdd_cobj, mdd_pobj, lname, handle);
1186         }
1187
1188 stop:
1189         mdd_trans_stop(env, mdd, rc, handle);
1190 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 3, 55, 0)
1191         if (rc == 0 && ma->ma_valid & MA_COOKIE && ma->ma_valid & MA_LOV &&
1192             ma->ma_valid & MA_FLAGS && ma->ma_attr_flags & MDS_UNLINK_DESTROY)
1193                 /* Since echo client is incapable of destorying ost object,
1194                  * it will destory the object here. */
1195                 rc = mdd_lovobj_unlink(env, mdd, mdd_cobj, la, ma, 1);
1196 #else
1197 #warning "please remove this after 2.4 (LOD/OSP)."
1198 #endif
1199
1200 #ifdef HAVE_QUOTA_SUPPORT
1201         if (quota_opc)
1202                 /* Trigger dqrel on the owner of child and parent. If failed,
1203                  * the next call for lquota_chkquota will process it. */
1204                 lquota_adjust(mds_quota_interface_ref, obd, qcids, qpids, rc,
1205                               quota_opc);
1206 #endif
1207         return rc;
1208 }
1209
1210 /* has not lock on pobj yet */
1211 static int mdd_ni_sanity_check(const struct lu_env *env,
1212                                struct md_object *pobj,
1213                                const struct md_attr *ma)
1214 {
1215         struct mdd_object *obj = md2mdd_obj(pobj);
1216         int rc;
1217         ENTRY;
1218
1219         if (ma->ma_attr_flags & MDS_PERM_BYPASS)
1220                 RETURN(0);
1221
1222         rc = mdd_may_create(env, obj, NULL, 1, S_ISDIR(ma->ma_attr.la_mode));
1223
1224         RETURN(rc);
1225 }
1226
1227 /*
1228  * Partial operation.
1229  */
1230 static int mdd_name_insert(const struct lu_env *env,
1231                            struct md_object *pobj,
1232                            const struct lu_name *lname,
1233                            const struct lu_fid *fid,
1234                            const struct md_attr *ma)
1235 {
1236         const char *name = lname->ln_name;
1237         struct lu_attr   *la = &mdd_env_info(env)->mti_la_for_fix;
1238         struct mdd_object *mdd_obj = md2mdd_obj(pobj);
1239         struct dynlock_handle *dlh;
1240         struct thandle *handle;
1241         int is_dir = S_ISDIR(ma->ma_attr.la_mode);
1242 #ifdef HAVE_QUOTA_SUPPORT
1243         struct mdd_device *mdd = mdo2mdd(pobj);
1244         struct md_ucred *uc = md_ucred(env);
1245         struct obd_device *obd = mdd->mdd_obd_dev;
1246         struct obd_export *exp = md_quota(env)->mq_exp;
1247         struct mds_obd *mds = &obd->u.mds;
1248         unsigned int qids[MAXQUOTAS] = { 0, 0 };
1249         int quota_opc = 0, rec_pending[MAXQUOTAS] = { 0, 0 };
1250         cfs_cap_t save = uc->mu_cap;
1251 #endif
1252         int rc;
1253         ENTRY;
1254
1255         /* XXX: this code won't be used ever:
1256          * DNE uses slightly different approach */
1257         LBUG();
1258
1259 #ifdef HAVE_QUOTA_SUPPORT
1260         if (mds->mds_quota) {
1261                 if (!(ma->ma_attr_flags & MDS_QUOTA_IGNORE)) {
1262                         struct lu_attr *la_tmp = &mdd_env_info(env)->mti_la;
1263
1264                         rc = mdd_la_get(env, mdd_obj, la_tmp, BYPASS_CAPA);
1265                         if (!rc) {
1266                                 void *data = NULL;
1267                                 mdd_data_get(env, mdd_obj, &data);
1268                                 quota_opc = FSFILT_OP_LINK;
1269                                 mdd_quota_wrapper(la_tmp, qids);
1270                                 /* get block quota for parent */
1271                                 lquota_chkquota(mds_quota_interface_ref, obd,
1272                                                 exp, qids, rec_pending, 1, NULL,
1273                                                 LQUOTA_FLAGS_BLK, data, 1);
1274                         }
1275                 } else {
1276                         uc->mu_cap |= CFS_CAP_SYS_RESOURCE_MASK;
1277                 }
1278         }
1279 #endif
1280         handle = mdd_trans_create(env, mdo2mdd(pobj));
1281         if (IS_ERR(handle))
1282                 GOTO(out_pending, rc = PTR_ERR(handle));
1283
1284         rc = mdd_trans_start(env, mdo2mdd(pobj), handle);
1285
1286         dlh = mdd_pdo_write_lock(env, mdd_obj, name, MOR_TGT_PARENT);
1287         if (dlh == NULL)
1288                 GOTO(out_trans, rc = -ENOMEM);
1289
1290         rc = mdd_ni_sanity_check(env, pobj, ma);
1291         if (rc)
1292                 GOTO(out_unlock, rc);
1293
1294         rc = __mdd_index_insert(env, mdd_obj, fid, name, is_dir,
1295                                 handle, BYPASS_CAPA);
1296         if (rc)
1297                 GOTO(out_unlock, rc);
1298
1299         /*
1300          * For some case, no need update obj's ctime (LA_CTIME is not set),
1301          * e.g. split_dir.
1302          * For other cases, update obj's ctime (LA_CTIME is set),
1303          * e.g. cmr_link.
1304          */
1305         if (ma->ma_attr.la_valid & LA_CTIME) {
1306                 la->la_ctime = la->la_mtime = ma->ma_attr.la_ctime;
1307                 la->la_valid = LA_CTIME | LA_MTIME;
1308                 rc = mdd_attr_check_set_internal_locked(env, mdd_obj, la,
1309                                                         handle, 0);
1310         }
1311         EXIT;
1312 out_unlock:
1313         mdd_pdo_write_unlock(env, mdd_obj, dlh);
1314 out_trans:
1315         mdd_trans_stop(env, mdo2mdd(pobj), rc, handle);
1316 out_pending:
1317 #ifdef HAVE_QUOTA_SUPPORT
1318         if (mds->mds_quota) {
1319                 if (quota_opc) {
1320                         lquota_pending_commit(mds_quota_interface_ref,
1321                                               obd, qids, rec_pending, 1);
1322                         /* Trigger dqacq for the parent owner. If failed,
1323                          * the next call for lquota_chkquota will process it*/
1324                         lquota_adjust(mds_quota_interface_ref, obd, 0, qids,
1325                                       rc, quota_opc);
1326                 } else {
1327                         uc->mu_cap = save;
1328                 }
1329         }
1330 #endif
1331         return rc;
1332 }
1333
1334 /* has not lock on pobj yet */
1335 static int mdd_nr_sanity_check(const struct lu_env *env,
1336                                struct md_object *pobj,
1337                                const struct md_attr *ma)
1338 {
1339         struct mdd_object *obj = md2mdd_obj(pobj);
1340         int rc;
1341         ENTRY;
1342
1343         if (ma->ma_attr_flags & MDS_PERM_BYPASS)
1344                 RETURN(0);
1345
1346         rc = mdd_may_unlink(env, obj, ma);
1347
1348         RETURN(rc);
1349 }
1350
1351 /*
1352  * Partial operation.
1353  */
1354 static int mdd_name_remove(const struct lu_env *env,
1355                            struct md_object *pobj,
1356                            const struct lu_name *lname,
1357                            const struct md_attr *ma)
1358 {
1359         const char *name = lname->ln_name;
1360         struct lu_attr    *la = &mdd_env_info(env)->mti_la_for_fix;
1361         struct mdd_object *mdd_obj = md2mdd_obj(pobj);
1362         struct mdd_device *mdd = mdo2mdd(pobj);
1363         struct dynlock_handle *dlh;
1364         struct thandle *handle;
1365         int is_dir = S_ISDIR(ma->ma_attr.la_mode);
1366 #ifdef HAVE_QUOTA_SUPPORT
1367         struct obd_device *obd = mdd->mdd_obd_dev;
1368         struct mds_obd *mds = &obd->u.mds;
1369         unsigned int qids[MAXQUOTAS] = { 0, 0 };
1370         int quota_opc = 0;
1371 #endif
1372         int rc;
1373         ENTRY;
1374
1375         /* XXX: this code won't be used ever:
1376          * DNE uses slightly different approach */
1377         LBUG();
1378
1379 #ifdef HAVE_QUOTA_SUPPORT
1380         if (mds->mds_quota) {
1381                 struct lu_attr *la_tmp = &mdd_env_info(env)->mti_la;
1382
1383                 rc = mdd_la_get(env, mdd_obj, la_tmp, BYPASS_CAPA);
1384                 if (!rc) {
1385                         quota_opc = FSFILT_OP_UNLINK_PARTIAL_PARENT;
1386                         mdd_quota_wrapper(la_tmp, qids);
1387                 }
1388         }
1389 #endif
1390         handle = mdd_trans_create(env, mdd);
1391         if (IS_ERR(handle))
1392                 GOTO(out_pending, rc = PTR_ERR(handle));
1393
1394         rc = mdd_trans_start(env, mdd, handle);
1395
1396         dlh = mdd_pdo_write_lock(env, mdd_obj, name, MOR_TGT_PARENT);
1397         if (dlh == NULL)
1398                 GOTO(out_trans, rc = -ENOMEM);
1399
1400         rc = mdd_nr_sanity_check(env, pobj, ma);
1401         if (rc)
1402                 GOTO(out_unlock, rc);
1403
1404         rc = __mdd_index_delete(env, mdd_obj, name, is_dir,
1405                                 handle, BYPASS_CAPA);
1406         if (rc)
1407                 GOTO(out_unlock, rc);
1408
1409         /*
1410          * For some case, no need update obj's ctime (LA_CTIME is not set),
1411          * e.g. split_dir.
1412          * For other cases, update obj's ctime (LA_CTIME is set),
1413          * e.g. cmr_unlink.
1414          */
1415         if (ma->ma_attr.la_valid & LA_CTIME) {
1416                 la->la_ctime = la->la_mtime = ma->ma_attr.la_ctime;
1417                 la->la_valid = LA_CTIME | LA_MTIME;
1418                 rc = mdd_attr_check_set_internal_locked(env, mdd_obj, la,
1419                                                         handle, 0);
1420         }
1421         EXIT;
1422 out_unlock:
1423         mdd_pdo_write_unlock(env, mdd_obj, dlh);
1424 out_trans:
1425         mdd_trans_stop(env, mdd, rc, handle);
1426 out_pending:
1427 #ifdef HAVE_QUOTA_SUPPORT
1428         /* Trigger dqrel for the parent owner.
1429          * If failed, the next call for lquota_chkquota will process it. */
1430         if (quota_opc)
1431                 lquota_adjust(mds_quota_interface_ref, obd, 0, qids, rc,
1432                               quota_opc);
1433 #endif
1434         return rc;
1435 }
1436
1437 /*
1438  * tobj maybe NULL
1439  * has mdd_write_lock on tobj alreay, but not on tgt_pobj yet
1440  */
1441 static int mdd_rt_sanity_check(const struct lu_env *env,
1442                                struct mdd_object *tgt_pobj,
1443                                struct mdd_object *tobj,
1444                                struct md_attr *ma)
1445 {
1446         int rc;
1447         ENTRY;
1448
1449         if (unlikely(ma->ma_attr_flags & MDS_PERM_BYPASS))
1450                 RETURN(0);
1451
1452         /* XXX: for mdd_rename_tgt, "tobj == NULL" does not mean tobj not
1453          * exist. In fact, tobj must exist, otherwise the call trace will be:
1454          * mdt_reint_rename_tgt -> mdo_name_insert -> ... -> mdd_name_insert.
1455          * When get here, tobj must be NOT NULL, the other case has been
1456          * processed in cmr_rename_tgt before mdd_rename_tgt and enable
1457          * MDS_PERM_BYPASS.
1458          * So check may_delete, but not check nlink of tgt_pobj. */
1459
1460         rc = mdd_may_delete(env, tgt_pobj, tobj, ma, 1, 1);
1461
1462         RETURN(rc);
1463 }
1464
1465 /* Partial rename op on slave MDD */
1466 static int mdd_rename_tgt(const struct lu_env *env,
1467                           struct md_object *pobj, struct md_object *tobj,
1468                           const struct lu_fid *lf, const struct lu_name *lname,
1469                           struct md_attr *ma)
1470 {
1471         const char *name = lname->ln_name;
1472         struct lu_attr    *la = &mdd_env_info(env)->mti_la_for_fix;
1473         struct mdd_object *mdd_tpobj = md2mdd_obj(pobj);
1474         struct mdd_object *mdd_tobj = md2mdd_obj(tobj);
1475         struct mdd_device *mdd = mdo2mdd(pobj);
1476         struct dynlock_handle *dlh;
1477         struct thandle *handle;
1478 #ifdef HAVE_QUOTA_SUPPORT
1479         struct obd_device *obd = mdd->mdd_obd_dev;
1480         struct obd_export *exp = md_quota(env)->mq_exp;
1481         struct mds_obd *mds = &obd->u.mds;
1482         unsigned int qcids[MAXQUOTAS] = { 0, 0 };
1483         unsigned int qpids[MAXQUOTAS] = { 0, 0 };
1484         int quota_copc = 0, quota_popc = 0;
1485         int rec_pending[MAXQUOTAS] = { 0, 0 };
1486 #endif
1487         int cl_flags = 0;
1488         int rc;
1489         ENTRY;
1490
1491         /* XXX: this code won't be used ever:
1492          * DNE uses slightly different approach */
1493         LBUG();
1494
1495 #ifdef HAVE_QUOTA_SUPPORT
1496         if (mds->mds_quota && !tobj) {
1497                 struct lu_attr *la_tmp = &mdd_env_info(env)->mti_la;
1498
1499                 rc = mdd_la_get(env, mdd_tpobj, la_tmp, BYPASS_CAPA);
1500                 if (!rc) {
1501                         void *data = NULL;
1502                         mdd_data_get(env, mdd_tpobj, &data);
1503                         quota_popc = FSFILT_OP_LINK;
1504                         mdd_quota_wrapper(la_tmp, qpids);
1505                         /* get block quota for target parent */
1506                         lquota_chkquota(mds_quota_interface_ref, obd, exp,
1507                                         qpids, rec_pending, 1, NULL,
1508                                         LQUOTA_FLAGS_BLK, data, 1);
1509                 }
1510         }
1511 #endif
1512         handle = mdd_trans_create(env, mdd);
1513         if (IS_ERR(handle))
1514                 GOTO(out_pending, rc = PTR_ERR(handle));
1515
1516         rc = mdd_trans_start(env, mdd, handle);
1517
1518         dlh = mdd_pdo_write_lock(env, mdd_tpobj, name, MOR_TGT_PARENT);
1519         if (dlh == NULL)
1520                 GOTO(out_trans, rc = -ENOMEM);
1521         if (tobj)
1522                 mdd_write_lock(env, mdd_tobj, MOR_TGT_CHILD);
1523
1524         rc = mdd_rt_sanity_check(env, mdd_tpobj, mdd_tobj, ma);
1525         if (rc)
1526                 GOTO(cleanup, rc);
1527
1528         /*
1529          * If rename_tgt is called then we should just re-insert name with
1530          * correct fid, no need to dec/inc parent nlink if obj is dir.
1531          */
1532         rc = __mdd_index_delete(env, mdd_tpobj, name, 0, handle, BYPASS_CAPA);
1533         if (rc)
1534                 GOTO(cleanup, rc);
1535
1536         rc = __mdd_index_insert_only(env, mdd_tpobj, lf, name, handle,
1537                                      BYPASS_CAPA);
1538         if (rc)
1539                 GOTO(cleanup, rc);
1540
1541         LASSERT(ma->ma_attr.la_valid & LA_CTIME);
1542         la->la_ctime = la->la_mtime = ma->ma_attr.la_ctime;
1543
1544         la->la_valid = LA_CTIME | LA_MTIME;
1545         rc = mdd_attr_check_set_internal_locked(env, mdd_tpobj, la, handle, 0);
1546         if (rc)
1547                 GOTO(cleanup, rc);
1548
1549         /*
1550          * For tobj is remote case cmm layer has processed
1551          * and pass NULL tobj to here. So when tobj is NOT NULL,
1552          * it must be local one.
1553          */
1554         if (tobj && mdd_object_exists(mdd_tobj)) {
1555                 mdo_ref_del(env, mdd_tobj, handle);
1556
1557                 /* Remove dot reference. */
1558                 if (S_ISDIR(ma->ma_attr.la_mode))
1559                         mdo_ref_del(env, mdd_tobj, handle);
1560
1561                 la->la_valid = LA_CTIME;
1562                 rc = mdd_attr_check_set_internal(env, mdd_tobj, la, handle, 0);
1563                 if (rc)
1564                         GOTO(cleanup, rc);
1565
1566                 rc = mdd_finish_unlink(env, mdd_tobj, ma, handle);
1567                 if (rc)
1568                         GOTO(cleanup, rc);
1569
1570                 if (ma->ma_valid & MA_INODE && ma->ma_attr.la_nlink == 0) {
1571                         cl_flags |= CLF_RENAME_LAST;
1572 #ifdef HAVE_QUOTA_SUPPORT
1573                         if (mds->mds_quota && mdd_tobj->mod_count == 0) {
1574                                 quota_copc = FSFILT_OP_UNLINK_PARTIAL_CHILD;
1575                                 mdd_quota_wrapper(&ma->ma_attr, qcids);
1576                         }
1577 #endif
1578                 }
1579         }
1580         EXIT;
1581 cleanup:
1582         if (tobj)
1583                 mdd_write_unlock(env, mdd_tobj);
1584         mdd_pdo_write_unlock(env, mdd_tpobj, dlh);
1585 out_trans:
1586         if (rc == 0)
1587                 /* Bare EXT record with no RENAME in front of it signifies
1588                    a partial slave op */
1589                 rc = mdd_changelog_ns_store(env, mdd, CL_EXT, cl_flags,
1590                                             mdd_tobj, mdd_tpobj, lname, handle);
1591
1592         mdd_trans_stop(env, mdd, rc, handle);
1593 out_pending:
1594 #ifdef HAVE_QUOTA_SUPPORT
1595         if (mds->mds_quota) {
1596                 if (quota_popc)
1597                         lquota_pending_commit(mds_quota_interface_ref, obd,
1598                                               qpids, rec_pending, 1);
1599
1600                 if (quota_copc)
1601                         /* Trigger dqrel on the target owner of child.
1602                          * If failed, the next call for lquota_chkquota
1603                          * will process it. */
1604                         lquota_adjust(mds_quota_interface_ref, obd, qcids, qpids,
1605                                       rc, quota_copc);
1606         }
1607 #endif
1608         return rc;
1609 }
1610
1611 /*
1612  * The permission has been checked when obj created, no need check again.
1613  */
1614 static int mdd_cd_sanity_check(const struct lu_env *env,
1615                                struct mdd_object *obj)
1616 {
1617         ENTRY;
1618
1619         /* EEXIST check */
1620         if (!obj || mdd_is_dead_obj(obj))
1621                 RETURN(-ENOENT);
1622
1623         RETURN(0);
1624
1625 }
1626
1627 static int mdd_declare_create_data(const struct lu_env *env,
1628                                    struct mdd_device *mdd,
1629                                    struct mdd_object *obj,
1630                                    int lmm_size,
1631                                    struct thandle *handle)
1632 {
1633         struct lu_buf *buf = &mdd_env_info(env)->mti_buf;
1634         int            rc;
1635
1636         buf->lb_buf = NULL;
1637         buf->lb_len = lmm_size;
1638         rc = mdo_declare_xattr_set(env, obj, buf, XATTR_NAME_LOV,
1639                                    0, handle);
1640         if (rc)
1641                 return rc;
1642
1643         rc = mdd_declare_lov_objid_update(env, mdd, handle);
1644
1645         return rc;
1646 }
1647
1648 static int mdd_create_data(const struct lu_env *env, struct md_object *pobj,
1649                            struct md_object *cobj, const struct md_op_spec *spec,
1650                            struct md_attr *ma)
1651 {
1652         struct mdd_device *mdd = mdo2mdd(cobj);
1653         struct mdd_object *mdd_pobj = md2mdd_obj(pobj);
1654         struct mdd_object *son = md2mdd_obj(cobj);
1655         struct lov_mds_md *lmm = NULL;
1656         int                lmm_size = 0;
1657         struct thandle    *handle;
1658         int                rc;
1659         ENTRY;
1660
1661         rc = mdd_cd_sanity_check(env, son);
1662         if (rc)
1663                 RETURN(rc);
1664
1665         if (!md_should_create(spec->sp_cr_flags))
1666                 RETURN(0);
1667         lmm_size = ma->ma_lmm_size;
1668
1669         rc = mdd_lov_create(env, mdd, mdd_pobj, son, &lmm, &lmm_size, spec, ma);
1670         if (rc)
1671                 RETURN(rc);
1672
1673         handle = mdd_trans_create(env, mdd);
1674         if (IS_ERR(handle))
1675                 GOTO(out_free, rc = PTR_ERR(handle));
1676
1677         rc = mdd_declare_create_data(env, mdd, son, lmm_size, handle);
1678         if (rc)
1679                 GOTO(stop, rc);
1680
1681         rc = mdd_trans_start(env, mdd, handle);
1682         if (rc)
1683                 GOTO(stop, rc);
1684
1685         /*
1686          * XXX: Setting the lov ea is not locked but setting the attr is locked?
1687          * Should this be fixed?
1688          */
1689
1690         /* Replay creates has objects already */
1691 #if 0
1692         if (spec->no_create) {
1693                 CDEBUG(D_INFO, "we already have lov ea\n");
1694                 rc = mdd_lov_set_md(env, mdd_pobj, son,
1695                                     (struct lov_mds_md *)spec->u.sp_ea.eadata,
1696                                     spec->u.sp_ea.eadatalen, handle, 0);
1697         } else
1698 #endif
1699                 /* No need mdd_lsm_sanity_check here */
1700                 rc = mdd_lov_set_md(env, mdd_pobj, son, lmm,
1701                                     lmm_size, handle, 0);
1702
1703         if (rc == 0)
1704                rc = mdd_attr_get_internal_locked(env, son, ma);
1705
1706         /* update lov_objid data, must be before transaction stop! */
1707         if (rc == 0)
1708                 mdd_lov_objid_update(mdd, lmm);
1709
1710 stop:
1711         mdd_trans_stop(env, mdd, rc, handle);
1712 out_free:
1713         /* Finish mdd_lov_create() stuff. */
1714         /* if no_create == 0 (not replay), we free lmm allocated by
1715          * mdd_lov_create() */
1716         mdd_lov_create_finish(env, mdd, lmm, lmm_size, spec);
1717         RETURN(rc);
1718 }
1719
1720 /* Get fid from name and parent */
1721 static int
1722 __mdd_lookup(const struct lu_env *env, struct md_object *pobj,
1723              const struct lu_name *lname, struct lu_fid* fid, int mask)
1724 {
1725         const char          *name = lname->ln_name;
1726         const struct dt_key *key = (const struct dt_key *)name;
1727         struct mdd_object   *mdd_obj = md2mdd_obj(pobj);
1728         struct mdd_device   *m = mdo2mdd(pobj);
1729         struct dt_object    *dir = mdd_object_child(mdd_obj);
1730         int rc;
1731         ENTRY;
1732
1733         if (unlikely(mdd_is_dead_obj(mdd_obj)))
1734                 RETURN(-ESTALE);
1735
1736         rc = mdd_object_exists(mdd_obj);
1737         if (unlikely(rc == 0))
1738                 RETURN(-ESTALE);
1739         else if (unlikely(rc < 0)) {
1740                 CERROR("Object "DFID" locates on remote server\n",
1741                         PFID(mdo2fid(mdd_obj)));
1742                 RETURN(-EINVAL);
1743         }
1744
1745         /* The common filename length check. */
1746         if (unlikely(lname->ln_namelen > m->mdd_dt_conf.ddp_max_name_len))
1747                 RETURN(-ENAMETOOLONG);
1748
1749         rc = mdd_permission_internal_locked(env, mdd_obj, NULL, mask,
1750                                             MOR_TGT_PARENT);
1751         if (rc)
1752                 RETURN(rc);
1753
1754         if (likely(S_ISDIR(mdd_object_type(mdd_obj)) &&
1755                    dt_try_as_dir(env, dir))) {
1756
1757                 rc = dir->do_index_ops->dio_lookup(env, dir,
1758                                                  (struct dt_rec *)fid, key,
1759                                                  mdd_object_capa(env, mdd_obj));
1760                 if (rc > 0)
1761                         rc = 0;
1762                 else if (rc == 0)
1763                         rc = -ENOENT;
1764         } else
1765                 rc = -ENOTDIR;
1766
1767         RETURN(rc);
1768 }
1769
1770 int mdd_declare_object_initialize(const struct lu_env *env,
1771                                   struct mdd_object *child,
1772                                   struct md_attr *ma,
1773                                   struct thandle *handle)
1774 {
1775         int rc;
1776
1777         rc = mdo_declare_attr_set(env, child, &ma->ma_attr, handle);
1778         if (rc == 0 && S_ISDIR(ma->ma_attr.la_mode)) {
1779                 rc = mdo_declare_index_insert(env, child, mdo2fid(child),
1780                                 dot, handle);
1781                 if (rc == 0)
1782                         rc = mdo_declare_ref_add(env, child, handle);
1783         }
1784         if (rc == 0)
1785                 mdd_declare_links_add(env, child, handle);
1786
1787         return rc;
1788 }
1789
1790 int mdd_object_initialize(const struct lu_env *env, const struct lu_fid *pfid,
1791                           const struct lu_name *lname, struct mdd_object *child,
1792                           struct md_attr *ma, struct thandle *handle,
1793                           const struct md_op_spec *spec)
1794 {
1795         int rc;
1796         ENTRY;
1797
1798         /*
1799          * Update attributes for child.
1800          *
1801          * FIXME:
1802          *  (1) the valid bits should be converted between Lustre and Linux;
1803          *  (2) maybe, the child attributes should be set in OSD when creation.
1804          */
1805
1806         rc = mdd_attr_set_internal(env, child, &ma->ma_attr, handle, 0);
1807         if (rc != 0)
1808                 RETURN(rc);
1809
1810         if (S_ISDIR(ma->ma_attr.la_mode)) {
1811                 /* Add "." and ".." for newly created dir */
1812                 mdo_ref_add(env, child, handle);
1813                 rc = __mdd_index_insert_only(env, child, mdo2fid(child),
1814                                              dot, handle, BYPASS_CAPA);
1815                 if (rc == 0)
1816                         rc = __mdd_index_insert_only(env, child, pfid,
1817                                                      dotdot, handle,
1818                                                      BYPASS_CAPA);
1819                 if (rc != 0)
1820                         mdo_ref_del(env, child, handle);
1821         }
1822         if (rc == 0)
1823                 mdd_links_add(env, child, pfid, lname, handle, 1);
1824
1825         RETURN(rc);
1826 }
1827
1828 /* has not lock on pobj yet */
1829 static int mdd_create_sanity_check(const struct lu_env *env,
1830                                    struct md_object *pobj,
1831                                    const struct lu_name *lname,
1832                                    struct md_attr *ma,
1833                                    struct md_op_spec *spec)
1834 {
1835         struct mdd_thread_info *info = mdd_env_info(env);
1836         struct lu_attr    *la        = &info->mti_la;
1837         struct lu_fid     *fid       = &info->mti_fid;
1838         struct mdd_object *obj       = md2mdd_obj(pobj);
1839         struct mdd_device *m         = mdo2mdd(pobj);
1840         int lookup                   = spec->sp_cr_lookup;
1841         int rc;
1842         ENTRY;
1843
1844         /* EEXIST check */
1845         if (mdd_is_dead_obj(obj))
1846                 RETURN(-ENOENT);
1847
1848         /*
1849          * In some cases this lookup is not needed - we know before if name
1850          * exists or not because MDT performs lookup for it.
1851          * name length check is done in lookup.
1852          */
1853         if (lookup) {
1854                 /*
1855                  * Check if the name already exist, though it will be checked in
1856                  * _index_insert also, for avoiding rolling back if exists
1857                  * _index_insert.
1858                  */
1859                 rc = __mdd_lookup_locked(env, pobj, lname, fid,
1860                                          MAY_WRITE | MAY_EXEC);
1861                 if (rc != -ENOENT)
1862                         RETURN(rc ? : -EEXIST);
1863         } else {
1864                 /*
1865                  * Check WRITE permission for the parent.
1866                  * EXEC permission have been checked
1867                  * when lookup before create already.
1868                  */
1869                 rc = mdd_permission_internal_locked(env, obj, NULL, MAY_WRITE,
1870                                                     MOR_TGT_PARENT);
1871                 if (rc)
1872                         RETURN(rc);
1873         }
1874
1875         /* sgid check */
1876         rc = mdd_la_get(env, obj, la, BYPASS_CAPA);
1877         if (rc != 0)
1878                 RETURN(rc);
1879
1880         if (la->la_mode & S_ISGID) {
1881                 ma->ma_attr.la_gid = la->la_gid;
1882                 if (S_ISDIR(ma->ma_attr.la_mode)) {
1883                         ma->ma_attr.la_mode |= S_ISGID;
1884                         ma->ma_attr.la_valid |= LA_MODE;
1885                 }
1886         }
1887
1888         switch (ma->ma_attr.la_mode & S_IFMT) {
1889         case S_IFLNK: {
1890                 unsigned int symlen = strlen(spec->u.sp_symname) + 1;
1891
1892                 if (symlen > (1 << m->mdd_dt_conf.ddp_block_shift))
1893                         RETURN(-ENAMETOOLONG);
1894                 else
1895                         RETURN(0);
1896         }
1897         case S_IFDIR:
1898         case S_IFREG:
1899         case S_IFCHR:
1900         case S_IFBLK:
1901         case S_IFIFO:
1902         case S_IFSOCK:
1903                 rc = 0;
1904                 break;
1905         default:
1906                 rc = -EINVAL;
1907                 break;
1908         }
1909         RETURN(rc);
1910 }
1911
1912 static int mdd_declare_create(const struct lu_env *env,
1913                               struct mdd_device *mdd,
1914                               struct mdd_object *p,
1915                               struct mdd_object *c,
1916                               const struct lu_name *name,
1917                               struct md_attr *ma,
1918                               int lmm_size,
1919                               struct thandle *handle,
1920                               const struct md_op_spec *spec)
1921 {
1922         struct lu_buf *buf = &mdd_env_info(env)->mti_buf;
1923         int            rc = 0;
1924
1925         rc = mdd_declare_object_create_internal(env, p, c, ma, handle, spec);
1926         if (rc)
1927                 GOTO(out, rc);
1928
1929         /* if dir, then can inherit default ACl */
1930         buf->lb_buf = NULL;
1931         buf->lb_len = lmm_size;
1932         if (S_ISDIR(ma->ma_attr.la_mode)) {
1933                 rc = mdo_declare_xattr_set(env, c, buf, XATTR_NAME_ACL_DEFAULT,
1934                                            0, handle);
1935                 if (rc == 0)
1936                         rc = mdo_declare_ref_add(env, p, handle);
1937         }
1938         if (rc)
1939                 GOTO(out, rc);
1940
1941         rc = mdo_declare_xattr_set(env, c, buf, XATTR_NAME_ACL_ACCESS,
1942                                    0, handle);
1943         if (rc)
1944                 GOTO(out, rc);
1945
1946         rc = mdd_declare_object_initialize(env, c, ma, handle);
1947         if (rc)
1948                 GOTO(out, rc);
1949
1950         rc = mdo_declare_index_insert(env, p, mdo2fid(c),
1951                                       name->ln_name, handle);
1952         if (rc)
1953                 GOTO(out, rc);
1954
1955         rc = mdo_declare_xattr_set(env, c, buf, XATTR_NAME_LOV,
1956                                    0, handle);
1957         if (rc)
1958                 GOTO(out, rc);
1959
1960         if (S_ISLNK(ma->ma_attr.la_mode)) {
1961                 rc = dt_declare_record_write(env, mdd_object_child(c),
1962                                              strlen(spec->u.sp_symname), 0,
1963                                              handle);
1964                 if (rc)
1965                         GOTO(out, rc);
1966         }
1967         rc = mdo_declare_attr_set(env, p, &ma->ma_attr, handle);
1968         if (rc)
1969                 return rc;
1970
1971         rc = mdd_declare_changelog_store(env, mdd, name, handle);
1972         if (rc)
1973                 return rc;
1974
1975         rc = mdd_declare_lov_objid_update(env, mdd, handle);
1976
1977 out:
1978         return rc;
1979 }
1980
1981
1982 /*
1983  * Create object and insert it into namespace.
1984  */
1985 static int mdd_create(const struct lu_env *env,
1986                       struct md_object *pobj,
1987                       const struct lu_name *lname,
1988                       struct md_object *child,
1989                       struct md_op_spec *spec,
1990                       struct md_attr* ma)
1991 {
1992         struct mdd_thread_info *info = mdd_env_info(env);
1993         struct lu_attr         *la = &info->mti_la_for_fix;
1994         struct md_attr         *ma_acl = &info->mti_ma;
1995         struct mdd_object      *mdd_pobj = md2mdd_obj(pobj);
1996         struct mdd_object      *son = md2mdd_obj(child);
1997         struct mdd_device      *mdd = mdo2mdd(pobj);
1998         struct lu_attr         *attr = &ma->ma_attr;
1999         struct lov_mds_md      *lmm = NULL;
2000         struct thandle         *handle;
2001         struct dynlock_handle  *dlh;
2002         const char             *name = lname->ln_name;
2003         int rc, created = 0, initialized = 0, inserted = 0, lmm_size = 0;
2004         int got_def_acl = 0;
2005 #ifdef HAVE_QUOTA_SUPPORT
2006         struct obd_device *obd = mdd->mdd_obd_dev;
2007         struct obd_export *exp = md_quota(env)->mq_exp;
2008         struct mds_obd *mds = &obd->u.mds;
2009         unsigned int qcids[MAXQUOTAS] = { 0, 0 };
2010         unsigned int qpids[MAXQUOTAS] = { 0, 0 };
2011         int quota_opc = 0, block_count = 0;
2012         int inode_pending[MAXQUOTAS] = { 0, 0 };
2013         int block_pending[MAXQUOTAS] = { 0, 0 };
2014         int parent_pending[MAXQUOTAS] = { 0, 0 };
2015 #endif
2016         ENTRY;
2017
2018         /*
2019          * Two operations have to be performed:
2020          *
2021          *  - an allocation of a new object (->do_create()), and
2022          *
2023          *  - an insertion into a parent index (->dio_insert()).
2024          *
2025          * Due to locking, operation order is not important, when both are
2026          * successful, *but* error handling cases are quite different:
2027          *
2028          *  - if insertion is done first, and following object creation fails,
2029          *  insertion has to be rolled back, but this operation might fail
2030          *  also leaving us with dangling index entry.
2031          *
2032          *  - if creation is done first, is has to be undone if insertion
2033          *  fails, leaving us with leaked space, which is neither good, nor
2034          *  fatal.
2035          *
2036          * It seems that creation-first is simplest solution, but it is
2037          * sub-optimal in the frequent
2038          *
2039          *         $ mkdir foo
2040          *         $ mkdir foo
2041          *
2042          * case, because second mkdir is bound to create object, only to
2043          * destroy it immediately.
2044          *
2045          * To avoid this follow local file systems that do double lookup:
2046          *
2047          *     0. lookup -> -EEXIST (mdd_create_sanity_check())
2048          *
2049          *     1. create            (mdd_object_create_internal())
2050          *
2051          *     2. insert            (__mdd_index_insert(), lookup again)
2052          */
2053
2054         /* Sanity checks before big job. */
2055         rc = mdd_create_sanity_check(env, pobj, lname, ma, spec);
2056         if (rc)
2057                 RETURN(rc);
2058
2059 #ifdef HAVE_QUOTA_SUPPORT
2060         if (mds->mds_quota) {
2061                 struct lu_attr *la_tmp = &mdd_env_info(env)->mti_la;
2062
2063                 rc = mdd_la_get(env, mdd_pobj, la_tmp, BYPASS_CAPA);
2064                 if (!rc) {
2065                         int same = 0;
2066
2067                         quota_opc = FSFILT_OP_CREATE;
2068                         mdd_quota_wrapper(&ma->ma_attr, qcids);
2069                         mdd_quota_wrapper(la_tmp, qpids);
2070                         /* get file quota for child */
2071                         lquota_chkquota(mds_quota_interface_ref, obd, exp,
2072                                         qcids, inode_pending, 1, NULL, 0, NULL,
2073                                         0);
2074                         switch (ma->ma_attr.la_mode & S_IFMT) {
2075                         case S_IFLNK:
2076                         case S_IFDIR:
2077                                 block_count = 2;
2078                                 break;
2079                         case S_IFREG:
2080                                 block_count = 1;
2081                                 break;
2082                         }
2083                         if (qcids[USRQUOTA] == qpids[USRQUOTA] &&
2084                             qcids[GRPQUOTA] == qpids[GRPQUOTA]) {
2085                                 block_count += 1;
2086                                 same = 1;
2087                         }
2088                         /* get block quota for child and parent */
2089                         if (block_count)
2090                                 lquota_chkquota(mds_quota_interface_ref, obd,
2091                                                 exp, qcids, block_pending,
2092                                                 block_count, NULL,
2093                                                 LQUOTA_FLAGS_BLK, NULL, 0);
2094                         if (!same)
2095                                 lquota_chkquota(mds_quota_interface_ref, obd,
2096                                                 exp, qpids, parent_pending, 1,
2097                                                 NULL, LQUOTA_FLAGS_BLK, NULL,
2098                                                 0);
2099                 }
2100         }
2101 #endif
2102
2103         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_DQACQ_NET))
2104                 GOTO(out_pending, rc = -EINPROGRESS);
2105
2106         /*
2107          * No RPC inside the transaction, so OST objects should be created at
2108          * first.
2109          */
2110         if (S_ISREG(attr->la_mode)) {
2111                 lmm_size = ma->ma_lmm_size;
2112                 rc = mdd_lov_create(env, mdd, mdd_pobj, son, &lmm, &lmm_size,
2113                                     spec, ma);
2114                 if (rc)
2115                         GOTO(out_pending, rc);
2116         }
2117
2118         if (!S_ISLNK(attr->la_mode)) {
2119                 ma_acl->ma_acl_size = sizeof info->mti_xattr_buf;
2120                 ma_acl->ma_acl = info->mti_xattr_buf;
2121                 ma_acl->ma_need = MA_ACL_DEF;
2122                 ma_acl->ma_valid = 0;
2123
2124                 mdd_read_lock(env, mdd_pobj, MOR_TGT_PARENT);
2125                 rc = mdd_def_acl_get(env, mdd_pobj, ma_acl);
2126                 mdd_read_unlock(env, mdd_pobj);
2127                 if (rc)
2128                         GOTO(out_free, rc);
2129                 else if (ma_acl->ma_valid & MA_ACL_DEF)
2130                         got_def_acl = 1;
2131         }
2132
2133         handle = mdd_trans_create(env, mdd);
2134         if (IS_ERR(handle))
2135                 GOTO(out_free, rc = PTR_ERR(handle));
2136
2137         rc = mdd_declare_create(env, mdd, mdd_pobj, son, lname, ma,
2138                                 lmm_size, handle, spec);
2139         if (rc)
2140                 GOTO(out_stop, rc);
2141
2142         rc = mdd_trans_start(env, mdd, handle);
2143         if (rc)
2144                 GOTO(out_stop, rc);
2145
2146         dlh = mdd_pdo_write_lock(env, mdd_pobj, name, MOR_TGT_PARENT);
2147         if (dlh == NULL)
2148                 GOTO(out_trans, rc = -ENOMEM);
2149
2150         mdd_write_lock(env, son, MOR_TGT_CHILD);
2151         rc = mdd_object_create_internal(env, mdd_pobj, son, ma, handle, spec);
2152         if (rc) {
2153                 mdd_write_unlock(env, son);
2154                 GOTO(cleanup, rc);
2155         }
2156
2157         created = 1;
2158
2159 #ifdef CONFIG_FS_POSIX_ACL
2160         if (got_def_acl) {
2161                 struct lu_buf *acl_buf = &info->mti_buf;
2162                 acl_buf->lb_buf = ma_acl->ma_acl;
2163                 acl_buf->lb_len = ma_acl->ma_acl_size;
2164
2165                 rc = __mdd_acl_init(env, son, acl_buf, &attr->la_mode, handle);
2166                 if (rc) {
2167                         mdd_write_unlock(env, son);
2168                         GOTO(cleanup, rc);
2169                 } else {
2170                         ma->ma_attr.la_valid |= LA_MODE;
2171                 }
2172         }
2173 #endif
2174
2175         rc = mdd_object_initialize(env, mdo2fid(mdd_pobj), lname,
2176                                    son, ma, handle, spec);
2177         mdd_write_unlock(env, son);
2178         if (rc)
2179                 /*
2180                  * Object has no links, so it will be destroyed when last
2181                  * reference is released. (XXX not now.)
2182                  */
2183                 GOTO(cleanup, rc);
2184
2185         initialized = 1;
2186
2187         rc = __mdd_index_insert(env, mdd_pobj, mdo2fid(son),
2188                                 name, S_ISDIR(attr->la_mode), handle,
2189                                 mdd_object_capa(env, mdd_pobj));
2190
2191         if (rc)
2192                 GOTO(cleanup, rc);
2193
2194         inserted = 1;
2195
2196         /* No need mdd_lsm_sanity_check here */
2197         rc = mdd_lov_set_md(env, mdd_pobj, son, lmm, lmm_size, handle, 0);
2198         if (rc) {
2199                 CERROR("error on stripe info copy %d \n", rc);
2200                 GOTO(cleanup, rc);
2201         }
2202         if (lmm && lmm_size > 0) {
2203                 /* Set Lov here, do not get lmm again later */
2204                 if (lmm_size > ma->ma_lmm_size) {
2205                         /* Reply buffer is smaller, need bigger one */
2206                         mdd_max_lmm_buffer(env, lmm_size);
2207                         if (unlikely(info->mti_max_lmm == NULL))
2208                                 GOTO(cleanup, rc = -ENOMEM);
2209                         ma->ma_lmm = info->mti_max_lmm;
2210                         ma->ma_big_lmm_used = 1;
2211                 }
2212                 memcpy(ma->ma_lmm, lmm, lmm_size);
2213                 ma->ma_lmm_size = lmm_size;
2214                 ma->ma_valid |= MA_LOV;
2215         }
2216
2217         if (S_ISLNK(attr->la_mode)) {
2218                 struct md_ucred  *uc = md_ucred(env);
2219                 struct dt_object *dt = mdd_object_child(son);
2220                 const char *target_name = spec->u.sp_symname;
2221                 int sym_len = strlen(target_name);
2222                 const struct lu_buf *buf;
2223                 loff_t pos = 0;
2224
2225                 buf = mdd_buf_get_const(env, target_name, sym_len);
2226                 rc = dt->do_body_ops->dbo_write(env, dt, buf, &pos, handle,
2227                                                 mdd_object_capa(env, son),
2228                                                 uc->mu_cap &
2229                                                 CFS_CAP_SYS_RESOURCE_MASK);
2230
2231                 if (rc == sym_len)
2232                         rc = 0;
2233                 else
2234                         GOTO(cleanup, rc = -EFAULT);
2235         }
2236
2237         *la = ma->ma_attr;
2238         la->la_valid = LA_CTIME | LA_MTIME;
2239         rc = mdd_attr_check_set_internal_locked(env, mdd_pobj, la, handle, 0);
2240         if (rc)
2241                 GOTO(cleanup, rc);
2242
2243         /* Return attr back. */
2244         rc = mdd_attr_get_internal_locked(env, son, ma);
2245         EXIT;
2246 cleanup:
2247         if (rc != 0 && created != 0) {
2248                 int rc2;
2249
2250                 if (inserted != 0) {
2251                         rc2 = __mdd_index_delete(env, mdd_pobj, name,
2252                                                  S_ISDIR(attr->la_mode),
2253                                                  handle, BYPASS_CAPA);
2254                         if (rc2 != 0)
2255                                 goto out_stop;
2256                 }
2257
2258                 mdd_write_lock(env, son, MOR_TGT_CHILD);
2259                 if (initialized != 0 && S_ISDIR(attr->la_mode)) {
2260                         /* Drop the reference, no need to delete "."/"..",
2261                          * because the object to be destroied directly. */
2262                         rc2 = mdo_ref_del(env, son, handle);
2263                         if (rc2 != 0) {
2264                                 mdd_write_unlock(env, son);
2265                                 goto out_stop;
2266                         }
2267                 }
2268
2269                 rc2 = mdo_ref_del(env, son, handle);
2270                 if (rc2 != 0) {
2271                         mdd_write_unlock(env, son);
2272                         goto out_stop;
2273                 }
2274
2275                 mdo_destroy(env, son, handle);
2276                 mdd_write_unlock(env, son);
2277         }
2278
2279         /* update lov_objid data, must be before transaction stop! */
2280         if (rc == 0)
2281                 mdd_lov_objid_update(mdd, lmm);
2282
2283         mdd_pdo_write_unlock(env, mdd_pobj, dlh);
2284 out_trans:
2285         if (rc == 0)
2286                 rc = mdd_changelog_ns_store(env, mdd,
2287                         S_ISDIR(attr->la_mode) ? CL_MKDIR :
2288                         S_ISREG(attr->la_mode) ? CL_CREATE :
2289                         S_ISLNK(attr->la_mode) ? CL_SOFTLINK : CL_MKNOD,
2290                         0, son, mdd_pobj, lname, handle);
2291 out_stop:
2292         mdd_trans_stop(env, mdd, rc, handle);
2293 out_free:
2294         /* finish lov_create stuff, free all temporary data */
2295         mdd_lov_create_finish(env, mdd, lmm, lmm_size, spec);
2296 out_pending:
2297 #ifdef HAVE_QUOTA_SUPPORT
2298         if (quota_opc) {
2299                 lquota_pending_commit(mds_quota_interface_ref, obd, qcids,
2300                                       inode_pending, 0);
2301                 lquota_pending_commit(mds_quota_interface_ref, obd, qcids,
2302                                       block_pending, 1);
2303                 lquota_pending_commit(mds_quota_interface_ref, obd, qpids,
2304                                       parent_pending, 1);
2305                 /* Trigger dqacq on the owner of child and parent. If failed,
2306                  * the next call for lquota_chkquota will process it. */
2307                 lquota_adjust(mds_quota_interface_ref, obd, qcids, qpids, rc,
2308                               quota_opc);
2309         }
2310 #endif
2311         /* The child object shouldn't be cached anymore */
2312         if (rc)
2313                 cfs_set_bit(LU_OBJECT_HEARD_BANSHEE,
2314                             &child->mo_lu.lo_header->loh_flags);
2315         return rc;
2316 }
2317
2318 /*
2319  * Get locks on parents in proper order
2320  * RETURN: < 0 - error, rename_order if successful
2321  */
2322 enum rename_order {
2323         MDD_RN_SAME,
2324         MDD_RN_SRCTGT,
2325         MDD_RN_TGTSRC
2326 };
2327
2328 static int mdd_rename_order(const struct lu_env *env,
2329                             struct mdd_device *mdd,
2330                             struct mdd_object *src_pobj,
2331                             struct mdd_object *tgt_pobj)
2332 {
2333         /* order of locking, 1 - tgt-src, 0 - src-tgt*/
2334         int rc;
2335         ENTRY;
2336
2337         if (src_pobj == tgt_pobj)
2338                 RETURN(MDD_RN_SAME);
2339
2340         /* compared the parent child relationship of src_p&tgt_p */
2341         if (lu_fid_eq(&mdd->mdd_root_fid, mdo2fid(src_pobj))){
2342                 rc = MDD_RN_SRCTGT;
2343         } else if (lu_fid_eq(&mdd->mdd_root_fid, mdo2fid(tgt_pobj))) {
2344                 rc = MDD_RN_TGTSRC;
2345         } else {
2346                 rc = mdd_is_parent(env, mdd, src_pobj, mdo2fid(tgt_pobj), NULL);
2347                 if (rc == -EREMOTE)
2348                         rc = 0;
2349
2350                 if (rc == 1)
2351                         rc = MDD_RN_TGTSRC;
2352                 else if (rc == 0)
2353                         rc = MDD_RN_SRCTGT;
2354         }
2355
2356         RETURN(rc);
2357 }
2358
2359 /* has not mdd_write{read}_lock on any obj yet. */
2360 static int mdd_rename_sanity_check(const struct lu_env *env,
2361                                    struct mdd_object *src_pobj,
2362                                    struct mdd_object *tgt_pobj,
2363                                    struct mdd_object *sobj,
2364                                    struct mdd_object *tobj,
2365                                    struct md_attr *ma)
2366 {
2367         int rc = 0;
2368         ENTRY;
2369
2370         if (unlikely(ma->ma_attr_flags & MDS_PERM_BYPASS))
2371                 RETURN(0);
2372
2373         /* XXX: when get here, sobj must NOT be NULL,
2374          * the other case has been processed in cml_rename
2375          * before mdd_rename and enable MDS_PERM_BYPASS. */
2376         LASSERT(sobj);
2377
2378         rc = mdd_may_delete(env, src_pobj, sobj, ma, 1, 0);
2379         if (rc)
2380                 RETURN(rc);
2381
2382         /* XXX: when get here, "tobj == NULL" means tobj must
2383          * NOT exist (neither on remote MDS, such case has been
2384          * processed in cml_rename before mdd_rename and enable
2385          * MDS_PERM_BYPASS).
2386          * So check may_create, but not check may_unlink. */
2387         if (!tobj)
2388                 rc = mdd_may_create(env, tgt_pobj, NULL,
2389                                     (src_pobj != tgt_pobj), 0);
2390         else
2391                 rc = mdd_may_delete(env, tgt_pobj, tobj, ma,
2392                                     (src_pobj != tgt_pobj), 1);
2393
2394         if (!rc && !tobj && (src_pobj != tgt_pobj) &&
2395             S_ISDIR(ma->ma_attr.la_mode))
2396                 rc = __mdd_may_link(env, tgt_pobj);
2397
2398         RETURN(rc);
2399 }
2400
2401 static int mdd_declare_rename(const struct lu_env *env,
2402                               struct mdd_device *mdd,
2403                               struct mdd_object *mdd_spobj,
2404                               struct mdd_object *mdd_tpobj,
2405                               struct mdd_object *mdd_sobj,
2406                               struct mdd_object *mdd_tobj,
2407                               const struct lu_name *tname,
2408                               const struct lu_name *sname,
2409                               struct md_attr *ma,
2410                               struct thandle *handle)
2411 {
2412         int rc;
2413
2414         LASSERT(mdd_spobj);
2415         LASSERT(mdd_tpobj);
2416         LASSERT(mdd_sobj);
2417
2418         /* name from source dir */
2419         rc = mdo_declare_index_delete(env, mdd_spobj, sname->ln_name, handle);
2420         if (rc)
2421                 return rc;
2422
2423         /* .. from source child */
2424         if (S_ISDIR(mdd_object_type(mdd_sobj))) {
2425                 /* source child can be directory,
2426                  * counted by source dir's nlink */
2427                 rc = mdo_declare_ref_del(env, mdd_spobj, handle);
2428                 if (rc)
2429                         return rc;
2430
2431                 rc = mdo_declare_index_delete(env, mdd_sobj, dotdot, handle);
2432                 if (rc)
2433                         return rc;
2434
2435                 rc = mdo_declare_index_insert(env, mdd_sobj, mdo2fid(mdd_tpobj),
2436                                               dotdot, handle);
2437                 if (rc)
2438                         return rc;
2439
2440                 /* new target child can be directory,
2441                  * counted by target dir's nlink */
2442                 rc = mdo_declare_ref_add(env, mdd_tpobj, handle);
2443                 if (rc)
2444                         return rc;
2445
2446         }
2447
2448         rc = mdo_declare_attr_set(env, mdd_spobj, NULL, handle);
2449         if (rc)
2450                 return rc;
2451
2452         rc = mdo_declare_attr_set(env, mdd_sobj, NULL, handle);
2453         if (rc)
2454                 return rc;
2455         mdd_declare_links_add(env, mdd_sobj, handle);
2456         if (rc)
2457                 return rc;
2458
2459         rc = mdo_declare_attr_set(env, mdd_tpobj, NULL, handle);
2460         if (rc)
2461                 return rc;
2462
2463         /* new name */
2464         rc = mdo_declare_index_insert(env, mdd_tpobj, mdo2fid(mdd_sobj),
2465                         tname->ln_name, handle);
2466         if (rc)
2467                 return rc;
2468
2469         /* name from target dir (old name), we declare it unconditionally
2470          * as mdd_rename() calls delete unconditionally as well. so just
2471          * to balance declarations vs calls to change ... */
2472         rc = mdo_declare_index_delete(env, mdd_tpobj, tname->ln_name, handle);
2473         if (rc)
2474                 return rc;
2475
2476         if (mdd_tobj && mdd_object_exists(mdd_tobj)) {
2477                 /* delete target child in target parent directory */
2478                 rc = mdo_declare_ref_del(env, mdd_tobj, handle);
2479                 if (rc)
2480                         return rc;
2481
2482                 if (S_ISDIR(mdd_object_type(mdd_tobj))) {
2483                         /* target child can be directory,
2484                          * delete "." reference in target child directory */
2485                         rc = mdo_declare_ref_del(env, mdd_tobj, handle);
2486                         if (rc)
2487                                 return rc;
2488
2489                         /* delete ".." reference in target parent directory */
2490                         rc = mdo_declare_ref_del(env, mdd_tpobj, handle);
2491                         if (rc)
2492                                 return rc;
2493                 }
2494
2495                 rc = mdo_declare_attr_set(env, mdd_tobj, NULL, handle);
2496                 if (rc)
2497                         return rc;
2498
2499                 mdd_declare_links_add(env, mdd_tobj, handle);
2500                 if (rc)
2501                         return rc;
2502
2503                 rc = mdd_declare_finish_unlink(env, mdd_tobj, ma, handle);
2504                 if (rc)
2505                         return rc;
2506         }
2507
2508         rc = mdd_declare_changelog_ext_store(env, mdd, tname, sname, handle);
2509         if (rc)
2510                 return rc;
2511
2512         return rc;
2513 }
2514
2515 /* src object can be remote that is why we use only fid and type of object */
2516 static int mdd_rename(const struct lu_env *env,
2517                       struct md_object *src_pobj, struct md_object *tgt_pobj,
2518                       const struct lu_fid *lf, const struct lu_name *lsname,
2519                       struct md_object *tobj, const struct lu_name *ltname,
2520                       struct md_attr *ma)
2521 {
2522         const char *sname = lsname->ln_name;
2523         const char *tname = ltname->ln_name;
2524         struct lu_attr    *la = &mdd_env_info(env)->mti_la_for_fix;
2525         struct mdd_object *mdd_spobj = md2mdd_obj(src_pobj); /* source parent */
2526         struct mdd_object *mdd_tpobj = md2mdd_obj(tgt_pobj);
2527         struct mdd_device *mdd = mdo2mdd(src_pobj);
2528         struct mdd_object *mdd_sobj = NULL;                  /* source object */
2529         struct mdd_object *mdd_tobj = NULL;
2530         struct dynlock_handle *sdlh, *tdlh;
2531         struct thandle *handle;
2532         const struct lu_fid *tpobj_fid = mdo2fid(mdd_tpobj);
2533         const struct lu_fid *spobj_fid = mdo2fid(mdd_spobj);
2534         int is_dir;
2535         unsigned cl_flags = 0;
2536         int rc, rc2;
2537
2538 #ifdef HAVE_QUOTA_SUPPORT
2539         struct obd_device *obd = mdd->mdd_obd_dev;
2540         struct obd_export *exp = md_quota(env)->mq_exp;
2541         struct mds_obd *mds = &obd->u.mds;
2542         unsigned int qspids[MAXQUOTAS] = { 0, 0 };
2543         unsigned int qtcids[MAXQUOTAS] = { 0, 0 };
2544         unsigned int qtpids[MAXQUOTAS] = { 0, 0 };
2545         int quota_copc = 0, quota_popc = 0;
2546         int rec_pending[MAXQUOTAS] = { 0, 0 };
2547 #endif
2548         ENTRY;
2549
2550         LASSERT(ma->ma_attr.la_mode & S_IFMT);
2551         is_dir = S_ISDIR(ma->ma_attr.la_mode);
2552
2553         if (tobj)
2554                 mdd_tobj = md2mdd_obj(tobj);
2555
2556 #ifdef HAVE_QUOTA_SUPPORT
2557         if (mds->mds_quota) {
2558                 struct lu_attr *la_tmp = &mdd_env_info(env)->mti_la;
2559
2560                 rc = mdd_la_get(env, mdd_spobj, la_tmp, BYPASS_CAPA);
2561                 if (!rc) {
2562                         mdd_quota_wrapper(la_tmp, qspids);
2563                         if (!tobj) {
2564                                 rc = mdd_la_get(env, mdd_tpobj, la_tmp,
2565                                                 BYPASS_CAPA);
2566                                 if (!rc) {
2567                                         void *data = NULL;
2568                                         mdd_data_get(env, mdd_tpobj, &data);
2569                                         quota_popc = FSFILT_OP_LINK;
2570                                         mdd_quota_wrapper(la_tmp, qtpids);
2571                                         /* get block quota for target parent */
2572                                         lquota_chkquota(mds_quota_interface_ref,
2573                                                         obd, exp, qtpids,
2574                                                         rec_pending, 1, NULL,
2575                                                         LQUOTA_FLAGS_BLK,
2576                                                         data, 1);
2577                                 }
2578                         }
2579                 }
2580         }
2581 #endif
2582         mdd_sobj = mdd_object_find(env, mdd, lf);
2583
2584         handle = mdd_trans_create(env, mdd);
2585         if (IS_ERR(handle))
2586                 GOTO(out_pending, rc = PTR_ERR(handle));
2587
2588         rc = mdd_declare_rename(env, mdd, mdd_spobj, mdd_tpobj, mdd_sobj,
2589                                 mdd_tobj, lsname, ltname, ma, handle);
2590         if (rc)
2591                 GOTO(stop, rc);
2592
2593         rc = mdd_trans_start(env, mdd, handle);
2594         if (rc)
2595                 GOTO(stop, rc);
2596
2597         /* FIXME: Should consider tobj and sobj too in rename_lock. */
2598         rc = mdd_rename_order(env, mdd, mdd_spobj, mdd_tpobj);
2599         if (rc < 0)
2600                 GOTO(cleanup_unlocked, rc);
2601
2602         /* Get locks in determined order */
2603         if (rc == MDD_RN_SAME) {
2604                 sdlh = mdd_pdo_write_lock(env, mdd_spobj,
2605                                           sname, MOR_SRC_PARENT);
2606                 /* check hashes to determine do we need one lock or two */
2607                 if (mdd_name2hash(sname) != mdd_name2hash(tname))
2608                         tdlh = mdd_pdo_write_lock(env, mdd_tpobj, tname,
2609                                 MOR_TGT_PARENT);
2610                 else
2611                         tdlh = sdlh;
2612         } else if (rc == MDD_RN_SRCTGT) {
2613                 sdlh = mdd_pdo_write_lock(env, mdd_spobj, sname,MOR_SRC_PARENT);
2614                 tdlh = mdd_pdo_write_lock(env, mdd_tpobj, tname,MOR_TGT_PARENT);
2615         } else {
2616                 tdlh = mdd_pdo_write_lock(env, mdd_tpobj, tname,MOR_SRC_PARENT);
2617                 sdlh = mdd_pdo_write_lock(env, mdd_spobj, sname,MOR_TGT_PARENT);
2618         }
2619         if (sdlh == NULL || tdlh == NULL)
2620                 GOTO(cleanup, rc = -ENOMEM);
2621
2622         rc = mdd_rename_sanity_check(env, mdd_spobj, mdd_tpobj,
2623                                      mdd_sobj, mdd_tobj, ma);
2624         if (rc)
2625                 GOTO(cleanup, rc);
2626
2627         /* Remove source name from source directory */
2628         rc = __mdd_index_delete(env, mdd_spobj, sname, is_dir, handle,
2629                                 mdd_object_capa(env, mdd_spobj));
2630         if (rc)
2631                 GOTO(cleanup, rc);
2632
2633         /* "mv dir1 dir2" needs "dir1/.." link update */
2634         if (is_dir && mdd_sobj && !lu_fid_eq(spobj_fid, tpobj_fid)) {
2635                 rc = __mdd_index_delete_only(env, mdd_sobj, dotdot, handle,
2636                                         mdd_object_capa(env, mdd_sobj));
2637                 if (rc)
2638                         GOTO(fixup_spobj2, rc);
2639
2640                 rc = __mdd_index_insert_only(env, mdd_sobj, tpobj_fid, dotdot,
2641                                       handle, mdd_object_capa(env, mdd_sobj));
2642                 if (rc)
2643                         GOTO(fixup_spobj, rc);
2644         }
2645
2646         /* Remove target name from target directory
2647          * Here tobj can be remote one, so we do index_delete unconditionally
2648          * and -ENOENT is allowed.
2649          */
2650         rc = __mdd_index_delete(env, mdd_tpobj, tname, is_dir, handle,
2651                                 mdd_object_capa(env, mdd_tpobj));
2652         if (rc != 0) {
2653                 if (mdd_tobj) {
2654                         /* tname might been renamed to something else */
2655                         GOTO(fixup_spobj, rc);
2656                 }
2657                 if (rc != -ENOENT)
2658                         GOTO(fixup_spobj, rc);
2659         }
2660
2661         /* Insert new fid with target name into target dir */
2662         rc = __mdd_index_insert(env, mdd_tpobj, lf, tname, is_dir, handle,
2663                                 mdd_object_capa(env, mdd_tpobj));
2664         if (rc)
2665                 GOTO(fixup_tpobj, rc);
2666
2667         LASSERT(ma->ma_attr.la_valid & LA_CTIME);
2668         la->la_ctime = la->la_mtime = ma->ma_attr.la_ctime;
2669
2670         /* XXX: mdd_sobj must be local one if it is NOT NULL. */
2671         if (mdd_sobj) {
2672                 la->la_valid = LA_CTIME;
2673                 rc = mdd_attr_check_set_internal_locked(env, mdd_sobj, la,
2674                                                         handle, 0);
2675                 if (rc)
2676                         GOTO(fixup_tpobj, rc);
2677         }
2678
2679         /* Remove old target object
2680          * For tobj is remote case cmm layer has processed
2681          * and set tobj to NULL then. So when tobj is NOT NULL,
2682          * it must be local one.
2683          */
2684         if (tobj && mdd_object_exists(mdd_tobj)) {
2685                 mdd_write_lock(env, mdd_tobj, MOR_TGT_CHILD);
2686                 if (mdd_is_dead_obj(mdd_tobj)) {
2687                         mdd_write_unlock(env, mdd_tobj);
2688                         /* shld not be dead, something is wrong */
2689                         CERROR("tobj is dead, something is wrong\n");
2690                         rc = -EINVAL;
2691                         goto cleanup;
2692                 }
2693                 mdo_ref_del(env, mdd_tobj, handle);
2694
2695                 /* Remove dot reference. */
2696                 if (is_dir)
2697                         mdo_ref_del(env, mdd_tobj, handle);
2698
2699                 la->la_valid = LA_CTIME;
2700                 rc = mdd_attr_check_set_internal(env, mdd_tobj, la, handle, 0);
2701                 if (rc)
2702                         GOTO(fixup_tpobj, rc);
2703
2704                 rc = mdd_finish_unlink(env, mdd_tobj, ma, handle);
2705                 mdd_write_unlock(env, mdd_tobj);
2706                 if (rc)
2707                         GOTO(fixup_tpobj, rc);
2708
2709                 if (ma->ma_valid & MA_INODE && ma->ma_attr.la_nlink == 0) {
2710                         cl_flags |= CLF_RENAME_LAST;
2711 #ifdef HAVE_QUOTA_SUPPORT
2712                         if (mds->mds_quota && mdd_tobj->mod_count == 0) {
2713                                 quota_copc = FSFILT_OP_UNLINK_PARTIAL_CHILD;
2714                                 mdd_quota_wrapper(&ma->ma_attr, qtcids);
2715                         }
2716 #endif
2717                 }
2718         }
2719
2720         la->la_valid = LA_CTIME | LA_MTIME;
2721         rc = mdd_attr_check_set_internal_locked(env, mdd_spobj, la, handle, 0);
2722         if (rc)
2723                 GOTO(fixup_tpobj, rc);
2724
2725         if (mdd_spobj != mdd_tpobj) {
2726                 la->la_valid = LA_CTIME | LA_MTIME;
2727                 rc = mdd_attr_check_set_internal_locked(env, mdd_tpobj, la,
2728                                                   handle, 0);
2729         }
2730
2731         if (rc == 0 && mdd_sobj) {
2732                 mdd_write_lock(env, mdd_sobj, MOR_SRC_CHILD);
2733                 rc = mdd_links_rename(env, mdd_sobj, mdo2fid(mdd_spobj), lsname,
2734                                       mdo2fid(mdd_tpobj), ltname, handle);
2735                 if (rc == -ENOENT)
2736                         /* Old files might not have EA entry */
2737                         mdd_links_add(env, mdd_sobj, mdo2fid(mdd_spobj),
2738                                       lsname, handle, 0);
2739                 mdd_write_unlock(env, mdd_sobj);
2740                 /* We don't fail the transaction if the link ea can't be
2741                    updated -- fid2path will use alternate lookup method. */
2742                 rc = 0;
2743         }
2744
2745         EXIT;
2746
2747 fixup_tpobj:
2748         if (rc) {
2749                 rc2 = __mdd_index_delete(env, mdd_tpobj, tname, is_dir, handle,
2750                                          BYPASS_CAPA);
2751                 if (rc2)
2752                         CWARN("tp obj fix error %d\n",rc2);
2753
2754                 if (mdd_tobj && mdd_object_exists(mdd_tobj) &&
2755                     !mdd_is_dead_obj(mdd_tobj)) {
2756                         rc2 = __mdd_index_insert(env, mdd_tpobj,
2757                                          mdo2fid(mdd_tobj), tname,
2758                                          is_dir, handle,
2759                                          BYPASS_CAPA);
2760
2761                         if (rc2)
2762                                 CWARN("tp obj fix error %d\n",rc2);
2763                 }
2764         }
2765
2766 fixup_spobj:
2767         if (rc && is_dir && mdd_sobj) {
2768                 rc2 = __mdd_index_delete_only(env, mdd_sobj, dotdot, handle,
2769                                               BYPASS_CAPA);
2770
2771                 if (rc2)
2772                         CWARN("sp obj dotdot delete error %d\n",rc2);
2773
2774
2775                 rc2 = __mdd_index_insert_only(env, mdd_sobj, spobj_fid,
2776                                               dotdot, handle, BYPASS_CAPA);
2777                 if (rc2)
2778                         CWARN("sp obj dotdot insert error %d\n",rc2);
2779         }
2780
2781 fixup_spobj2:
2782         if (rc) {
2783                 rc2 = __mdd_index_insert(env, mdd_spobj,
2784                                          lf, sname, is_dir, handle, BYPASS_CAPA);
2785                 if (rc2)
2786                         CWARN("sp obj fix error %d\n",rc2);
2787         }
2788 cleanup:
2789         if (likely(tdlh) && sdlh != tdlh)
2790                 mdd_pdo_write_unlock(env, mdd_tpobj, tdlh);
2791         if (likely(sdlh))
2792                 mdd_pdo_write_unlock(env, mdd_spobj, sdlh);
2793 cleanup_unlocked:
2794         if (rc == 0)
2795                 rc = mdd_changelog_ext_ns_store(env, mdd, CL_RENAME, cl_flags,
2796                                                 mdd_tobj, tpobj_fid, lf,
2797                                                 spobj_fid, ltname, lsname,
2798                                                 handle);
2799
2800 stop:
2801         mdd_trans_stop(env, mdd, rc, handle);
2802         if (mdd_sobj)
2803                 mdd_object_put(env, mdd_sobj);
2804 out_pending:
2805 #ifdef HAVE_QUOTA_SUPPORT
2806         if (mds->mds_quota) {
2807                 if (quota_popc)
2808                         lquota_pending_commit(mds_quota_interface_ref, obd,
2809                                               qtpids, rec_pending, 1);
2810
2811                 if (quota_copc) {
2812                         /* Trigger dqrel on the source owner of parent.
2813                          * If failed, the next call for lquota_chkquota will
2814                          * process it. */
2815                         lquota_adjust(mds_quota_interface_ref, obd, 0, qspids, rc,
2816                                       FSFILT_OP_UNLINK_PARTIAL_PARENT);
2817
2818                         /* Trigger dqrel on the target owner of child.
2819                          * If failed, the next call for lquota_chkquota
2820                          * will process it. */
2821                         lquota_adjust(mds_quota_interface_ref, obd, qtcids,
2822                                       qtpids, rc, quota_copc);
2823                 }
2824         }
2825 #endif
2826         return rc;
2827 }
2828
2829 /** enable/disable storing of hardlink info */
2830 int mdd_linkea_enable = 1;
2831 CFS_MODULE_PARM(mdd_linkea_enable, "d", int, 0644,
2832                 "record hardlink info in EAs");
2833
2834 /** Read the link EA into a temp buffer.
2835  * Uses the name_buf since it is generally large.
2836  * \retval IS_ERR err
2837  * \retval ptr to \a lu_buf (always \a mti_big_buf)
2838  */
2839 struct lu_buf *mdd_links_get(const struct lu_env *env,
2840                              struct mdd_object *mdd_obj)
2841 {
2842         struct lu_buf *buf;
2843         struct lustre_capa *capa;
2844         struct link_ea_header *leh;
2845         int rc;
2846
2847         /* First try a small buf */
2848         buf = mdd_buf_alloc(env, CFS_PAGE_SIZE);
2849         if (buf->lb_buf == NULL)
2850                 return ERR_PTR(-ENOMEM);
2851
2852         capa = mdd_object_capa(env, mdd_obj);
2853         rc = mdo_xattr_get(env, mdd_obj, buf, XATTR_NAME_LINK, capa);
2854         if (rc == -ERANGE) {
2855                 /* Buf was too small, figure out what we need. */
2856                 mdd_buf_put(buf);
2857                 rc = mdo_xattr_get(env, mdd_obj, buf, XATTR_NAME_LINK, capa);
2858                 if (rc < 0)
2859                         return ERR_PTR(rc);
2860                 buf = mdd_buf_alloc(env, rc);
2861                 if (buf->lb_buf == NULL)
2862                         return ERR_PTR(-ENOMEM);
2863                 rc = mdo_xattr_get(env, mdd_obj, buf, XATTR_NAME_LINK, capa);
2864         }
2865         if (rc < 0)
2866                 return ERR_PTR(rc);
2867
2868         leh = buf->lb_buf;
2869         if (leh->leh_magic == __swab32(LINK_EA_MAGIC)) {
2870                 leh->leh_magic = LINK_EA_MAGIC;
2871                 leh->leh_reccount = __swab32(leh->leh_reccount);
2872                 leh->leh_len = __swab64(leh->leh_len);
2873                 /* entries are swabbed by mdd_lee_unpack */
2874         }
2875         if (leh->leh_magic != LINK_EA_MAGIC)
2876                 return ERR_PTR(-EINVAL);
2877         if (leh->leh_reccount == 0)
2878                 return ERR_PTR(-ENODATA);
2879
2880         return buf;
2881 }
2882
2883 /** Pack a link_ea_entry.
2884  * All elements are stored as chars to avoid alignment issues.
2885  * Numbers are always big-endian
2886  * \retval record length
2887  */
2888 static int mdd_lee_pack(struct link_ea_entry *lee, const struct lu_name *lname,
2889                         const struct lu_fid *pfid)
2890 {
2891         struct lu_fid   tmpfid;
2892         int             reclen;
2893
2894         fid_cpu_to_be(&tmpfid, pfid);
2895         memcpy(&lee->lee_parent_fid, &tmpfid, sizeof(tmpfid));
2896         memcpy(lee->lee_name, lname->ln_name, lname->ln_namelen);
2897         reclen = sizeof(struct link_ea_entry) + lname->ln_namelen;
2898
2899         lee->lee_reclen[0] = (reclen >> 8) & 0xff;
2900         lee->lee_reclen[1] = reclen & 0xff;
2901         return reclen;
2902 }
2903
2904 void mdd_lee_unpack(const struct link_ea_entry *lee, int *reclen,
2905                     struct lu_name *lname, struct lu_fid *pfid)
2906 {
2907         *reclen = (lee->lee_reclen[0] << 8) | lee->lee_reclen[1];
2908         memcpy(pfid, &lee->lee_parent_fid, sizeof(*pfid));
2909         fid_be_to_cpu(pfid, pfid);
2910         lname->ln_name = lee->lee_name;
2911         lname->ln_namelen = *reclen - sizeof(struct link_ea_entry);
2912 }
2913
2914 /** Add a record to the end of link ea buf */
2915 static int __mdd_links_add(const struct lu_env *env, struct lu_buf *buf,
2916                            const struct lu_fid *pfid,
2917                            const struct lu_name *lname)
2918 {
2919         struct link_ea_header *leh;
2920         struct link_ea_entry *lee;
2921         int reclen;
2922
2923         if (lname == NULL || pfid == NULL)
2924                 return -EINVAL;
2925
2926         /* Make sure our buf is big enough for the new one */
2927         leh = buf->lb_buf;
2928         reclen = lname->ln_namelen + sizeof(struct link_ea_entry);
2929         if (leh->leh_len + reclen > buf->lb_len) {
2930                 if (mdd_buf_grow(env, leh->leh_len + reclen) < 0)
2931                         return -ENOMEM;
2932         }
2933
2934         leh = buf->lb_buf;
2935         lee = buf->lb_buf + leh->leh_len;
2936         reclen = mdd_lee_pack(lee, lname, pfid);
2937         leh->leh_len += reclen;
2938         leh->leh_reccount++;
2939         return 0;
2940 }
2941
2942 static int mdd_declare_links_add(const struct lu_env *env,
2943                                  struct mdd_object *mdd_obj,
2944                                  struct thandle *handle)
2945 {
2946         int rc;
2947
2948         /* XXX: max size? */
2949         rc = mdo_declare_xattr_set(env, mdd_obj,
2950                              mdd_buf_get_const(env, NULL, 4096),
2951                              XATTR_NAME_LINK, 0, handle);
2952
2953         return rc;
2954 }
2955
2956 /* For pathologic linkers, we don't want to spend lots of time scanning the
2957  * link ea.  Limit ourseleves to something reasonable; links not in the EA
2958  * can be looked up via (slower) parent lookup.
2959  */
2960 #define LINKEA_MAX_COUNT 128
2961
2962 static int mdd_links_add(const struct lu_env *env,
2963                          struct mdd_object *mdd_obj,
2964                          const struct lu_fid *pfid,
2965                          const struct lu_name *lname,
2966                          struct thandle *handle, int first)
2967 {
2968         struct lu_buf *buf;
2969         struct link_ea_header *leh;
2970         int rc;
2971         ENTRY;
2972
2973         if (!mdd_linkea_enable)
2974                 RETURN(0);
2975
2976         buf = first ? ERR_PTR(-ENODATA) : mdd_links_get(env, mdd_obj);
2977         if (IS_ERR(buf)) {
2978                 rc = PTR_ERR(buf);
2979                 if (rc != -ENODATA) {
2980                         CERROR("link_ea read failed %d "DFID"\n", rc,
2981                                PFID(mdd_object_fid(mdd_obj)));
2982                         RETURN (rc);
2983                 }
2984                 /* empty EA; start one */
2985                 buf = mdd_buf_alloc(env, CFS_PAGE_SIZE);
2986                 if (buf->lb_buf == NULL)
2987                         RETURN(-ENOMEM);
2988                 leh = buf->lb_buf;
2989                 leh->leh_magic = LINK_EA_MAGIC;
2990                 leh->leh_len = sizeof(struct link_ea_header);
2991                 leh->leh_reccount = 0;
2992         }
2993
2994         leh = buf->lb_buf;
2995         if (leh->leh_reccount > LINKEA_MAX_COUNT)
2996                 RETURN(-EOVERFLOW);
2997
2998         rc = __mdd_links_add(env, buf, pfid, lname);
2999         if (rc)
3000                 RETURN(rc);
3001
3002         leh = buf->lb_buf;
3003         rc = __mdd_xattr_set(env, mdd_obj,
3004                              mdd_buf_get_const(env, buf->lb_buf, leh->leh_len),
3005                              XATTR_NAME_LINK, 0, handle);
3006         if (rc) {
3007                 if (rc == -ENOSPC)
3008                         CDEBUG(D_INODE, "link_ea add failed %d "DFID"\n", rc,
3009                                PFID(mdd_object_fid(mdd_obj)));
3010                 else
3011                         CERROR("link_ea add failed %d "DFID"\n", rc,
3012                                PFID(mdd_object_fid(mdd_obj)));
3013         }
3014
3015         if (buf->lb_len > OBD_ALLOC_BIG)
3016                 /* if we vmalloced a large buffer drop it */
3017                 mdd_buf_put(buf);
3018
3019         RETURN (rc);
3020 }
3021
3022 static int mdd_links_rename(const struct lu_env *env,
3023                             struct mdd_object *mdd_obj,
3024                             const struct lu_fid *oldpfid,
3025                             const struct lu_name *oldlname,
3026                             const struct lu_fid *newpfid,
3027                             const struct lu_name *newlname,
3028                             struct thandle *handle)
3029 {
3030         struct lu_buf  *buf;
3031         struct link_ea_header *leh;
3032         struct link_ea_entry  *lee;
3033         struct lu_name *tmpname = &mdd_env_info(env)->mti_name;
3034         struct lu_fid  *tmpfid = &mdd_env_info(env)->mti_fid;
3035         int reclen = 0;
3036         int count;
3037         int rc, rc2 = 0;
3038         ENTRY;
3039
3040         if (!mdd_linkea_enable)
3041                 RETURN(0);
3042
3043         if (mdd_obj->mod_flags & DEAD_OBJ)
3044                 /* No more links, don't bother */
3045                 RETURN(0);
3046
3047         buf = mdd_links_get(env, mdd_obj);
3048         if (IS_ERR(buf)) {
3049                 rc = PTR_ERR(buf);
3050                 if (rc == -ENODATA)
3051                         CDEBUG(D_INODE, "link_ea read failed %d "DFID"\n",
3052                                rc, PFID(mdd_object_fid(mdd_obj)));
3053                 else
3054                         CERROR("link_ea read failed %d "DFID"\n",
3055                                rc, PFID(mdd_object_fid(mdd_obj)));
3056                 RETURN(rc);
3057         }
3058         leh = buf->lb_buf;
3059         lee = (struct link_ea_entry *)(leh + 1); /* link #0 */
3060
3061         /* Find the old record */
3062         for(count = 0; count < leh->leh_reccount; count++) {
3063                 mdd_lee_unpack(lee, &reclen, tmpname, tmpfid);
3064                 if (tmpname->ln_namelen == oldlname->ln_namelen &&
3065                     lu_fid_eq(tmpfid, oldpfid) &&
3066                     (strncmp(tmpname->ln_name, oldlname->ln_name,
3067                              tmpname->ln_namelen) == 0))
3068                         break;
3069                 lee = (struct link_ea_entry *)((char *)lee + reclen);
3070         }
3071         if ((count + 1) > leh->leh_reccount) {
3072                 CDEBUG(D_INODE, "Old link_ea name '%.*s' not found\n",
3073                        oldlname->ln_namelen, oldlname->ln_name);
3074                 GOTO(out, rc = -ENOENT);
3075         }
3076
3077         /* Remove the old record */
3078         leh->leh_reccount--;
3079         leh->leh_len -= reclen;
3080         memmove(lee, (char *)lee + reclen, (char *)leh + leh->leh_len -
3081                 (char *)lee);
3082
3083         /* If renaming, add the new record */
3084         if (newpfid != NULL) {
3085                 /* if the add fails, we still delete the out-of-date old link */
3086                 rc2 = __mdd_links_add(env, buf, newpfid, newlname);
3087                 leh = buf->lb_buf;
3088         }
3089
3090         rc = __mdd_xattr_set(env, mdd_obj,
3091                              mdd_buf_get_const(env, buf->lb_buf, leh->leh_len),
3092                              XATTR_NAME_LINK, 0, handle);
3093
3094 out:
3095         if (rc == 0)
3096                 rc = rc2;
3097         if (rc)
3098                 CDEBUG(D_INODE, "link_ea mv/unlink '%.*s' failed %d "DFID"\n",
3099                        oldlname->ln_namelen, oldlname->ln_name, rc,
3100                        PFID(mdd_object_fid(mdd_obj)));
3101
3102         if (buf->lb_len > OBD_ALLOC_BIG)
3103                 /* if we vmalloced a large buffer drop it */
3104                 mdd_buf_put(buf);
3105
3106         RETURN (rc);
3107 }
3108
3109 const struct md_dir_operations mdd_dir_ops = {
3110         .mdo_is_subdir     = mdd_is_subdir,
3111         .mdo_lookup        = mdd_lookup,
3112         .mdo_create        = mdd_create,
3113         .mdo_rename        = mdd_rename,
3114         .mdo_link          = mdd_link,
3115         .mdo_unlink        = mdd_unlink,
3116         .mdo_lum_lmm_cmp   = mdd_lum_lmm_cmp,
3117         .mdo_name_insert   = mdd_name_insert,
3118         .mdo_name_remove   = mdd_name_remove,
3119         .mdo_rename_tgt    = mdd_rename_tgt,
3120         .mdo_create_data   = mdd_create_data,
3121 };