Whamcloud - gitweb
129e170c32061120e4f64020a36bebce8e312484
[fs/lustre-release.git] / lustre / mdt / mdt_open.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  *  linux/mdt/mdt_open.c
5  *  Lustre Metadata Target (mdt) open/close file handling
6  *
7  *  Copyright (C) 2002-2006 Cluster File Systems, Inc.
8  *   Author: Huang Hua <huanghua@clusterfs.com>
9  *
10  *   This file is part of the Lustre file system, http://www.lustre.org
11  *   Lustre is a trademark of Cluster File Systems, Inc.
12  *
13  *   You may have signed or agreed to another license before downloading
14  *   this software.  If so, you are bound by the terms and conditions
15  *   of that agreement, and the following does not apply to you.  See the
16  *   LICENSE file included with this distribution for more information.
17  *
18  *   If you did not agree to a different license, then this copy of Lustre
19  *   is open source software; you can redistribute it and/or modify it
20  *   under the terms of version 2 of the GNU General Public License as
21  *   published by the Free Software Foundation.
22  *
23  *   In either case, Lustre is distributed in the hope that it will be
24  *   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
25  *   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
26  *   license text for more details.
27  */
28
29 #ifndef EXPORT_SYMTAB
30 # define EXPORT_SYMTAB
31 #endif
32 #define DEBUG_SUBSYSTEM S_MDS
33
34 #include <linux/lustre_acl.h>
35 #include <lustre_mds.h>
36 #include "mdt_internal.h"
37
38 /* we do nothing because we do not have refcount now */
39 static void mdt_mfd_get(void *mfdp)
40 {
41 }
42
43 /* Create a new mdt_file_data struct, initialize it,
44  * and insert it to global hash table */
45 struct mdt_file_data *mdt_mfd_new(void)
46 {
47         struct mdt_file_data *mfd;
48         ENTRY;
49
50         OBD_ALLOC_PTR(mfd);
51         if (mfd != NULL) {
52                 INIT_LIST_HEAD(&mfd->mfd_handle.h_link);
53                 INIT_LIST_HEAD(&mfd->mfd_list);
54                 class_handle_hash(&mfd->mfd_handle, mdt_mfd_get);
55         }
56         RETURN(mfd);
57 }
58
59 /* Find the mfd pointed to by handle in global hash table. */
60 struct mdt_file_data *mdt_handle2mfd(const struct lustre_handle *handle)
61 {
62         ENTRY;
63         LASSERT(handle != NULL);
64         RETURN(class_handle2object(handle->cookie));
65 }
66
67 /* free mfd */
68 void mdt_mfd_free(struct mdt_file_data *mfd)
69 {
70         LASSERT(list_empty(&mfd->mfd_handle.h_link));
71         LASSERT(list_empty(&mfd->mfd_list));
72         OBD_FREE_PTR(mfd);
73 }
74
75 static int mdt_create_data(struct mdt_thread_info *info,
76                            struct mdt_object *p, struct mdt_object *o)
77 {
78         struct md_op_spec     *spec = &info->mti_spec;
79         struct md_attr        *ma = &info->mti_attr;
80         int rc;
81         ENTRY;
82
83         if ((spec->sp_cr_flags & MDS_OPEN_DELAY_CREATE) ||
84             !(spec->sp_cr_flags & FMODE_WRITE))
85                 RETURN(0);
86
87         ma->ma_need = MA_INODE | MA_LOV;
88         ma->ma_valid = 0;
89         rc = mdo_create_data(info->mti_env,
90                              p ? mdt_object_child(p) : NULL,
91                              mdt_object_child(o), spec, ma);
92         RETURN(rc);
93 }
94
95 static int mdt_epoch_opened(struct mdt_object *mo)
96 {
97         return mo->mot_epochcount;
98 }
99
100 int mdt_sizeonmds_enabled(struct mdt_object *mo)
101 {
102         return !mo->mot_ioepoch;
103 }
104
105 /* Re-enable Size-on-MDS. */
106 void mdt_sizeonmds_enable(struct mdt_thread_info *info,
107                           struct mdt_object *mo)
108 {
109        spin_lock(&info->mti_mdt->mdt_ioepoch_lock);
110        if (info->mti_epoch->ioepoch == mo->mot_ioepoch) {
111                 mo->mot_ioepoch = 0;
112                 mo->mot_flags = 0;
113        }
114        spin_unlock(&info->mti_mdt->mdt_ioepoch_lock);
115 }
116
117 /* Open the epoch. Epoch open is allowed if @writecount is not negative.
118  * The epoch and writecount handling is performed under the mdt_ioepoch_lock. */
119 int mdt_epoch_open(struct mdt_thread_info *info, struct mdt_object *o)
120 {
121         struct mdt_device *mdt = info->mti_mdt;
122         int cancel = 0;
123         int rc = 0;
124         ENTRY;
125
126         if (!S_ISREG(lu_object_attr(&o->mot_obj.mo_lu)))
127                 RETURN(0);
128
129         spin_lock(&mdt->mdt_ioepoch_lock);
130         if (mdt_epoch_opened(o)) {
131                 /* Epoch continues even if there is no writers yet. */
132                 CDEBUG(D_INODE, "continue epoch "LPU64" for "DFID"\n",
133                        o->mot_ioepoch, PFID(mdt_object_fid(o)));
134         } else {
135                 if (info->mti_replayepoch > mdt->mdt_ioepoch)
136                         mdt->mdt_ioepoch = info->mti_replayepoch;
137                 else
138                         mdt->mdt_ioepoch++;
139                 o->mot_ioepoch = info->mti_replayepoch ? 
140                         info->mti_replayepoch : mdt->mdt_ioepoch;
141                 CDEBUG(D_INODE, "starting epoch "LPU64" for "DFID"\n",
142                        mdt->mdt_ioepoch, PFID(mdt_object_fid(o)));
143                 cancel = 1;
144         }
145         o->mot_epochcount++;
146         spin_unlock(&mdt->mdt_ioepoch_lock);
147
148         /* Cancel Size-on-MDS attributes on clients if not truncate.
149          * In the later case, mdt_reint_setattr will do it. */
150         if (cancel && (info->mti_rr.rr_fid1 != NULL)) {
151                 struct mdt_lock_handle  *lh = &info->mti_lh[MDT_LH_CHILD];
152                 mdt_lock_reg_init(lh, LCK_EX);
153                 rc = mdt_object_lock(info, o, lh, MDS_INODELOCK_UPDATE,
154                                      MDT_LOCAL_LOCK);
155                 if (rc == 0)
156                         mdt_object_unlock(info, o, lh, 1);
157         }
158         RETURN(rc);
159 }
160
161 /* Update the on-disk attributes if needed and re-enable Size-on-MDS caching. */
162 static int mdt_sizeonmds_update(struct mdt_thread_info *info,
163                                 struct mdt_object *o)
164 {
165         ENTRY;
166
167         CDEBUG(D_INODE, "Closing epoch "LPU64" on "DFID". Count %d\n",
168                o->mot_ioepoch, PFID(mdt_object_fid(o)), o->mot_epochcount);
169
170         if (info->mti_attr.ma_attr.la_valid & LA_SIZE)
171                 /* Do Size-on-MDS attribute update.
172                  * Size-on-MDS is re-enabled inside. */
173                 RETURN(mdt_attr_set(info, o, 0));
174         else
175                 mdt_sizeonmds_enable(info, o);
176         RETURN(0);
177 }
178
179 /* Epoch closes.
180  * Returns 1 if epoch does not close.
181  * Returns 0 if epoch closes.
182  * Returns -EAGAIN if epoch closes but an Size-on-MDS Update is still needed
183  * from the client. */
184 static int mdt_epoch_close(struct mdt_thread_info *info, struct mdt_object *o)
185 {
186         int eviction = (mdt_info_req(info) == NULL ? 1 : 0);
187         struct lu_attr *la = &info->mti_attr.ma_attr;
188         int achange = 0;
189         int opened;
190         int rc = 1;
191         ENTRY;
192
193         if (!S_ISREG(lu_object_attr(&o->mot_obj.mo_lu)))
194                 RETURN(0);
195
196         spin_lock(&info->mti_mdt->mdt_ioepoch_lock);
197
198         /* Epoch closes only if client tells about it or eviction occures. */
199         if (eviction || (info->mti_epoch->flags & MF_EPOCH_CLOSE)) {
200                 LASSERT(o->mot_epochcount);
201                 o->mot_epochcount--;
202
203                 CDEBUG(D_INODE, "Closing epoch "LPU64" on "DFID". Count %d\n",
204                        o->mot_ioepoch, PFID(mdt_object_fid(o)),
205                        o->mot_epochcount);
206
207                 if (!eviction)
208                         achange = (info->mti_epoch->flags & MF_SOM_CHANGE);
209
210                 rc = 0;
211                 if (!eviction && !mdt_epoch_opened(o)) {
212                         /* Epoch ends. Is an Size-on-MDS update needed? */
213                         if (o->mot_flags & MF_SOM_CHANGE) {
214                                 /* Some previous writer changed the attribute.
215                                  * Do not believe to the current Size-on-MDS
216                                  * update, re-ask client. */
217                                 rc = -EAGAIN;
218                         } else if (!(la->la_valid & LA_SIZE) && achange) {
219                                 /* Attributes were changed by the last writer
220                                  * only but no Size-on-MDS update is received.*/
221                                 rc = -EAGAIN;
222                         }
223                 }
224
225                 if (achange || eviction)
226                         o->mot_flags |= MF_SOM_CHANGE;
227         }
228
229         opened = mdt_epoch_opened(o);
230         spin_unlock(&info->mti_mdt->mdt_ioepoch_lock);
231
232         /* XXX: if eviction occured, do nothing yet. */
233         if ((rc == 0) && !opened && !eviction) {
234                 /* Epoch ends and wanted Size-on-MDS update is obtained. */
235                 rc = mdt_sizeonmds_update(info, o);
236         }
237         RETURN(rc);
238 }
239
240 int mdt_write_get(struct mdt_device *mdt, struct mdt_object *o)
241 {
242         int rc = 0;
243         ENTRY;
244         spin_lock(&mdt->mdt_ioepoch_lock);
245         if (o->mot_writecount < 0)
246                 rc = -ETXTBSY;
247         else
248                 o->mot_writecount++;
249         spin_unlock(&mdt->mdt_ioepoch_lock);
250         RETURN(rc);
251 }
252
253 static void mdt_write_put(struct mdt_device *mdt, struct mdt_object *o)
254 {
255         ENTRY;
256         spin_lock(&mdt->mdt_ioepoch_lock);
257         o->mot_writecount--;
258         spin_unlock(&mdt->mdt_ioepoch_lock);
259         EXIT;
260 }
261
262 static int mdt_write_deny(struct mdt_device *mdt, struct mdt_object *o)
263 {
264         int rc = 0;
265         ENTRY;
266         spin_lock(&mdt->mdt_ioepoch_lock);
267         if (o->mot_writecount > 0)
268                 rc = -ETXTBSY;
269         else
270                 o->mot_writecount--;
271         spin_unlock(&mdt->mdt_ioepoch_lock);
272         RETURN(rc);
273 }
274
275 static void mdt_write_allow(struct mdt_device *mdt, struct mdt_object *o)
276 {
277         ENTRY;
278         spin_lock(&mdt->mdt_ioepoch_lock);
279         o->mot_writecount++;
280         spin_unlock(&mdt->mdt_ioepoch_lock);
281         EXIT;
282 }
283
284 /* there can be no real transaction so prepare the fake one */
285 static void mdt_empty_transno(struct mdt_thread_info* info)
286 {
287         struct mdt_device *mdt = info->mti_mdt;
288         struct ptlrpc_request *req = mdt_info_req(info);
289
290         /* transaction is occured already */
291         if (lustre_msg_get_transno(req->rq_repmsg) != 0)
292                 return;
293
294         spin_lock(&mdt->mdt_transno_lock);
295         if (info->mti_transno == 0) {
296                 info->mti_transno = ++ mdt->mdt_last_transno;
297         } else {
298                 /* should be replay */
299                 if (info->mti_transno > mdt->mdt_last_transno)
300                         mdt->mdt_last_transno = info->mti_transno;
301         }
302         spin_unlock(&mdt->mdt_transno_lock);
303
304         CDEBUG(D_INODE, "transno = %llu, last_committed = %llu\n",
305                         info->mti_transno,
306                         req->rq_export->exp_obd->obd_last_committed);
307
308         req->rq_transno = info->mti_transno;
309         lustre_msg_set_transno(req->rq_repmsg, info->mti_transno);
310         lustre_msg_set_last_xid(req->rq_repmsg, req->rq_xid);
311 }
312
313 static int mdt_mfd_open(struct mdt_thread_info *info,
314                         struct mdt_object *p,
315                         struct mdt_object *o,
316                         int flags,
317                         int created,
318                         struct ldlm_reply *rep)
319 {
320         struct ptlrpc_request   *req = mdt_info_req(info);
321         struct mdt_export_data  *med = &req->rq_export->exp_mdt_data;
322         struct mdt_device       *mdt = info->mti_mdt;
323         struct md_attr          *ma  = &info->mti_attr;
324         struct lu_attr          *la  = &ma->ma_attr;
325         struct mdt_file_data    *mfd;
326         struct mdt_body         *repbody;
327         int                      rc = 0;
328         int                      isreg, isdir, islnk;
329         struct list_head         *t;
330         ENTRY;
331
332         LASSERT(ma->ma_valid & MA_INODE);
333
334         repbody = req_capsule_server_get(&info->mti_pill, &RMF_MDT_BODY);
335
336         isreg = S_ISREG(la->la_mode);
337         isdir = S_ISDIR(la->la_mode);
338         islnk = S_ISLNK(la->la_mode);
339         mdt_pack_attr2body(info, repbody, la, mdt_object_fid(o));
340
341         if (med->med_rmtclient) {
342                 void *buf = req_capsule_server_get(&info->mti_pill, &RMF_ACL);
343
344                 rc = mdt_pack_remote_perm(info, o, buf);
345                 if (rc) {
346                         repbody->valid &= ~OBD_MD_FLRMTPERM;
347                         repbody->aclsize = 0;
348                 } else {
349                         repbody->valid |= OBD_MD_FLRMTPERM;
350                         repbody->aclsize = sizeof(struct mdt_remote_perm);
351                 }
352         }
353 #ifdef CONFIG_FS_POSIX_ACL
354         else if (req->rq_export->exp_connect_flags & OBD_CONNECT_ACL) {
355                 const struct lu_env *env = info->mti_env;
356                 struct md_object *next = mdt_object_child(o);
357                 struct lu_buf *buf = &info->mti_buf;
358
359                 buf->lb_buf = req_capsule_server_get(&info->mti_pill, &RMF_ACL);
360                 buf->lb_len = req_capsule_get_size(&info->mti_pill, &RMF_ACL,
361                                                    RCL_SERVER);
362                 if (buf->lb_len > 0) {
363                         rc = mo_xattr_get(env, next, buf,
364                                           XATTR_NAME_ACL_ACCESS);
365                         if (rc < 0) {
366                                 if (rc == -ENODATA) {
367                                         repbody->aclsize = 0;
368                                         repbody->valid |= OBD_MD_FLACL;
369                                         rc = 0;
370                                 } else if (rc == -EOPNOTSUPP) {
371                                         rc = 0;
372                                 } else {
373                                         CERROR("got acl size: %d\n", rc);
374                                 }
375                         } else {
376                                 repbody->aclsize = rc;
377                                 repbody->valid |= OBD_MD_FLACL;
378                                 rc = 0;
379                         }
380                 }
381         }
382 #endif
383
384         if (mdt->mdt_opts.mo_mds_capa) {
385                 struct lustre_capa *capa;
386
387                 capa = req_capsule_server_get(&info->mti_pill, &RMF_CAPA1);
388                 LASSERT(capa);
389                 capa->lc_opc = CAPA_OPC_MDS_DEFAULT;
390                 rc = mo_capa_get(info->mti_env, mdt_object_child(o), capa, 0);
391                 if (rc)
392                         RETURN(rc);
393                 repbody->valid |= OBD_MD_FLMDSCAPA;
394         }
395         if (mdt->mdt_opts.mo_oss_capa &&
396             S_ISREG(lu_object_attr(&o->mot_obj.mo_lu))) {
397                 struct lustre_capa *capa;
398
399                 capa = req_capsule_server_get(&info->mti_pill, &RMF_CAPA2);
400                 LASSERT(capa);
401                 capa->lc_opc = CAPA_OPC_OSS_DEFAULT | capa_open_opc(flags);
402                 rc = mo_capa_get(info->mti_env, mdt_object_child(o), capa, 0);
403                 if (rc)
404                         RETURN(rc);
405                 repbody->valid |= OBD_MD_FLOSSCAPA;
406         }
407
408         /*
409          * If we are following a symlink, don't open; and do not return open
410          * handle for special nodes as client required.
411          */
412         if (islnk || (!isreg && !isdir &&
413             (req->rq_export->exp_connect_flags & OBD_CONNECT_NODEVOH))) {
414                 lustre_msg_set_transno(req->rq_repmsg, 0);
415                 RETURN(0);
416         }
417
418         mdt_set_disposition(info, rep, DISP_OPEN_OPEN);
419
420         /*
421          * We need to return the existing object's fid back, so it is done here,
422          * after preparing the reply.
423          */
424         if (!created && (flags & MDS_OPEN_EXCL) && (flags & MDS_OPEN_CREAT))
425                 RETURN(-EEXIST);
426
427         /* This can't be done earlier, we need to return reply body */
428         if (isdir) {
429                 if (flags & (MDS_OPEN_CREAT | FMODE_WRITE)) {
430                         /* We are trying to create or write an existing dir. */
431                         RETURN(-EISDIR);
432                 }
433         } else if (flags & MDS_OPEN_DIRECTORY)
434                 RETURN(-ENOTDIR);
435
436         if (MDT_FAIL_CHECK(OBD_FAIL_MDS_OPEN_CREATE)) {
437                 obd_fail_loc = OBD_FAIL_LDLM_REPLY | OBD_FAIL_ONCE;
438                 RETURN(-EAGAIN);
439         }
440
441         if (isreg && !(ma->ma_valid & MA_LOV)) {
442                 /*
443                  * No EA, check whether it is will set regEA and dirEA since in
444                  * above attr get, these size might be zero, so reset it, to
445                  * retrieve the MD after create obj.
446                  */
447                 ma->ma_lmm_size = req_capsule_get_size(&info->mti_pill,
448                                                        &RMF_MDT_MD,
449                                                        RCL_SERVER);
450                 /* in replay case, p == NULL */
451                 rc = mdt_create_data(info, p, o);
452                 if (rc)
453                         RETURN(rc);
454         }
455
456         CDEBUG(D_INODE, "after open, ma_valid bit = "LPX64" lmm_size = %d\n",
457                ma->ma_valid, ma->ma_lmm_size);
458
459         if (ma->ma_valid & MA_LOV) {
460                 LASSERT(ma->ma_lmm_size != 0);
461                 repbody->eadatasize = ma->ma_lmm_size;
462                 if (isdir)
463                         repbody->valid |= OBD_MD_FLDIREA;
464                 else
465                         repbody->valid |= OBD_MD_FLEASIZE;
466         }
467
468         mfd = NULL;
469         if (lustre_msg_get_flags(req->rq_reqmsg) & MSG_RESENT) {
470                 spin_lock(&med->med_open_lock);
471                 list_for_each(t, &med->med_open_head) {
472                         mfd = list_entry(t, struct mdt_file_data, mfd_list);
473                         if (mfd->mfd_xid == req->rq_xid) {
474                                 break;
475                         }
476                         mfd = NULL;
477                 }
478                 spin_unlock(&med->med_open_lock);
479
480                 if (mfd != NULL) {
481                         repbody->handle.cookie = mfd->mfd_handle.h_cookie;
482                         RETURN(0);
483                 }
484         }
485
486         if (flags & FMODE_WRITE) {
487                 rc = mdt_write_get(info->mti_mdt, o);
488                 if (rc == 0) {
489                         mdt_epoch_open(info, o);
490                         repbody->ioepoch = o->mot_ioepoch;
491                 }
492         } else if (flags & MDS_FMODE_EXEC) {
493                 rc = mdt_write_deny(info->mti_mdt, o);
494         }
495         if (rc)
496                 RETURN(rc);
497
498         rc = mo_open(info->mti_env, mdt_object_child(o),
499                      created ? flags | MDS_OPEN_CREATED : flags);
500         if (rc)
501                 RETURN(rc);
502
503         mfd = mdt_mfd_new();
504         if (mfd != NULL) {
505                 /*
506                  * Keep a reference on this object for this open, and is
507                  * released by mdt_mfd_close().
508                  */
509                 mdt_object_get(info->mti_env, o);
510
511                 /* Open handling. */
512                 mfd->mfd_mode = flags;
513                 mfd->mfd_object = o;
514                 mfd->mfd_xid = req->rq_xid;
515
516                 spin_lock(&med->med_open_lock);
517                 list_add(&mfd->mfd_list, &med->med_open_head);
518                 spin_unlock(&med->med_open_lock);
519
520                 repbody->handle.cookie = mfd->mfd_handle.h_cookie;
521                 mdt_empty_transno(info);
522         } else
523                 rc = -ENOMEM;
524
525         RETURN(rc);
526 }
527
528 extern void mdt_req_from_mcd(struct ptlrpc_request *req,
529                              struct mdt_client_data *mcd);
530
531 void mdt_reconstruct_open(struct mdt_thread_info *info,
532                           struct mdt_lock_handle *lhc)
533 {
534         const struct lu_env *env = info->mti_env;
535         struct mdt_device       *mdt  = info->mti_mdt;
536         struct req_capsule      *pill = &info->mti_pill;
537         struct ptlrpc_request   *req  = mdt_info_req(info);
538         struct mdt_export_data  *med  = &req->rq_export->exp_mdt_data;
539         struct mdt_client_data  *mcd  = med->med_mcd;
540         struct md_attr          *ma   = &info->mti_attr;
541         struct mdt_reint_record *rr   = &info->mti_rr;
542         __u32                   flags = info->mti_spec.sp_cr_flags;
543         struct ldlm_reply       *ldlm_rep;
544         struct mdt_object       *parent;
545         struct mdt_object       *child;
546         struct mdt_body         *repbody;
547         int                      rc;
548         ENTRY;
549
550         LASSERT(pill->rc_fmt == &RQF_LDLM_INTENT_OPEN);
551         ldlm_rep = req_capsule_server_get(&info->mti_pill, &RMF_DLM_REP);
552         repbody = req_capsule_server_get(&info->mti_pill, &RMF_MDT_BODY);
553
554         ma->ma_lmm = req_capsule_server_get(&info->mti_pill, &RMF_MDT_MD);
555         ma->ma_lmm_size = req_capsule_get_size(&info->mti_pill, &RMF_MDT_MD,
556                                                RCL_SERVER);
557         ma->ma_need = MA_INODE | MA_LOV;
558         ma->ma_valid = 0;
559
560         mdt_req_from_mcd(req, med->med_mcd);
561         mdt_set_disposition(info, ldlm_rep, mcd->mcd_last_data);
562
563         CERROR("This is reconstruct open: disp="LPX64", result=%d\n",
564                 ldlm_rep->lock_policy_res1, req->rq_status);
565
566         if (mdt_get_disposition(ldlm_rep, DISP_OPEN_CREATE) &&
567             req->rq_status != 0) {
568                 /* We did not create successfully, return error to client. */
569                 mdt_shrink_reply(info, DLM_REPLY_REC_OFF + 1, 1, 1);
570                 GOTO(out, rc = req->rq_status);
571         }
572
573         if (mdt_get_disposition(ldlm_rep, DISP_OPEN_CREATE)) {
574                 /*
575                  * We failed after creation, but we do not know in which step
576                  * we failed. So try to check the child object.
577                  */
578                 parent = mdt_object_find(env, mdt, rr->rr_fid1);
579                 LASSERT(!IS_ERR(parent));
580
581                 child = mdt_object_find(env, mdt, rr->rr_fid2);
582                 LASSERT(!IS_ERR(child));
583
584                 rc = mdt_object_exists(child);
585                 if (rc > 0) {
586                         struct md_object *next;
587                         next = mdt_object_child(child);
588                         rc = mo_attr_get(env, next, ma);
589                         if (rc == 0)
590                               rc = mdt_mfd_open(info, parent, child,
591                                                 flags, 1, ldlm_rep);
592                 } else if (rc < 0) {
593                         /* the child object was created on remote server */
594                         repbody->fid1 = *rr->rr_fid2;
595                         repbody->valid |= (OBD_MD_FLID | OBD_MD_MDS);
596                         rc = 0;
597                 } else if (rc == 0) {
598                         /* the child does not exist, we should do regular open */
599                         mdt_object_put(env, parent);
600                         mdt_object_put(env, child);
601                         GOTO(regular_open, 0);
602                 }
603                 mdt_object_put(env, parent);
604                 mdt_object_put(env, child);
605                 mdt_shrink_reply(info, DLM_REPLY_REC_OFF + 1, 1, 1);
606                 GOTO(out, rc);
607         } else {
608 regular_open:
609                 /* We did not try to create, so we are a pure open */
610                 rc = mdt_reint_open(info, lhc);
611         }
612
613         EXIT;
614 out:
615         req->rq_status = rc;
616         lustre_msg_set_status(req->rq_repmsg, req->rq_status);
617 }
618
619 static int mdt_open_by_fid(struct mdt_thread_info* info,
620                            struct ldlm_reply *rep)
621 {
622         const struct lu_env     *env = info->mti_env;
623         struct mdt_device       *mdt = info->mti_mdt;
624         struct md_device        *next = mdt->mdt_child;
625         __u32                    flags = info->mti_spec.sp_cr_flags;
626         struct mdt_reint_record *rr = &info->mti_rr;
627         struct md_attr          *ma = &info->mti_attr;
628         struct mdt_object       *o;
629         int                      rc;
630         ENTRY;
631
632         LASSERT(info->mti_spec.u.sp_ea.no_lov_create);
633         o = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid2);
634         if (IS_ERR(o))
635                 RETURN(rc = PTR_ERR(o));
636
637         /*
638          * XXX: capability in replay open request might have expired, disable
639          * capability check for this kind of request. Security hole?
640          */
641         if (mdt->mdt_opts.mo_mds_capa)
642                 mdt->mdt_child->md_ops->mdo_init_capa_ctxt(env, next, 0, 0,
643                                                            0, 0);
644
645         rc = mdt_object_exists(o);
646         if (rc > 0) {
647                 mdt_set_disposition(info, rep, (DISP_IT_EXECD |
648                                                 DISP_LOOKUP_EXECD |
649                                                 DISP_LOOKUP_POS));
650
651                 rc = mo_attr_get(env, mdt_object_child(o), ma);
652                 if (rc == 0)
653                         rc = mdt_mfd_open(info, NULL, o, flags, 0, rep);
654         } else if (rc == 0) {
655                 rc = -ENOENT;
656         } else  {
657                 /* the child object was created on remote server */
658                 struct mdt_body *repbody;
659                 repbody = req_capsule_server_get(&info->mti_pill, &RMF_MDT_BODY);
660                 repbody->fid1 = *rr->rr_fid2;
661                 repbody->valid |= (OBD_MD_FLID | OBD_MD_MDS);
662                 rc = 0;
663         }
664
665         if (mdt->mdt_opts.mo_mds_capa)
666                 mdt->mdt_child->md_ops->mdo_init_capa_ctxt(env, next,
667                                                 mdt->mdt_opts.mo_mds_capa,
668                                                 mdt->mdt_capa_timeout,
669                                                 mdt->mdt_capa_alg,
670                                                 mdt->mdt_capa_keys);
671
672         mdt_object_put(info->mti_env, o);
673         RETURN(rc);
674 }
675
676 int mdt_pin(struct mdt_thread_info* info)
677 {
678         ENTRY;
679         RETURN(err_serious(-EOPNOTSUPP));
680 }
681
682 /* Cross-ref request. Currently it can only be a pure open (w/o create) */
683 static int mdt_cross_open(struct mdt_thread_info* info,
684                           const struct lu_fid *fid,
685                           struct ldlm_reply *rep, __u32 flags)
686 {
687         struct md_attr    *ma = &info->mti_attr;
688         struct mdt_object *o;
689         int                rc;
690         ENTRY;
691
692         o = mdt_object_find(info->mti_env, info->mti_mdt, fid);
693         if (IS_ERR(o))
694                 RETURN(rc = PTR_ERR(o));
695
696         rc = mdt_object_exists(o);
697         if (rc > 0) {
698                 mdt_set_capainfo(info, 0, fid, BYPASS_CAPA);
699                 rc = mo_attr_get(info->mti_env, mdt_object_child(o), ma);
700                 if (rc == 0)
701                         rc = mdt_mfd_open(info, NULL, o, flags, 0, rep);
702         } else if (rc == 0) {
703                 /*
704                  * XXX: Something wrong here, lookup was positive but there is
705                  * no object!
706                  */
707                 CERROR("Cross-ref object doesn't exist!\n");
708                 rc = -EFAULT;
709         } else  {
710                 /* XXX: Something wrong here, the object is on another MDS! */
711                 CERROR("The object isn't on this server! FLD error?\n");
712                 rc = -EFAULT;
713         }
714         mdt_object_put(info->mti_env, o);
715         RETURN(rc);
716 }
717
718 int mdt_reint_open(struct mdt_thread_info *info, struct mdt_lock_handle *lhc)
719 {
720         struct mdt_device       *mdt = info->mti_mdt;
721         struct ptlrpc_request   *req = mdt_info_req(info);
722         struct mdt_object       *parent;
723         struct mdt_object       *child;
724         struct mdt_lock_handle  *lh;
725         struct ldlm_reply       *ldlm_rep;
726         struct mdt_body         *repbody;
727         struct lu_fid           *child_fid = &info->mti_tmp_fid1;
728         struct md_attr          *ma = &info->mti_attr;
729         struct lu_attr          *la = &ma->ma_attr;
730         __u32                    create_flags = info->mti_spec.sp_cr_flags;
731         struct mdt_reint_record *rr = &info->mti_rr;
732         struct lu_name          *lname;
733         int                      result;
734         int                      created = 0;
735         ENTRY;
736
737         mdt_lprocfs_time_start(info->mti_mdt, &info->mti_time,
738                                LPROC_MDT_REINT_OPEN);
739         
740         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_PAUSE_OPEN | OBD_FAIL_ONCE,
741                          (obd_timeout + 1) / 4);
742
743         repbody = req_capsule_server_get(&info->mti_pill, &RMF_MDT_BODY);
744
745         ma->ma_lmm = req_capsule_server_get(&info->mti_pill, &RMF_MDT_MD);
746         ma->ma_lmm_size = req_capsule_get_size(&info->mti_pill, &RMF_MDT_MD,
747                                                RCL_SERVER);
748         ma->ma_need = MA_INODE | MA_LOV;
749         ma->ma_valid = 0;
750
751         LASSERT(info->mti_pill.rc_fmt == &RQF_LDLM_INTENT_OPEN);
752         ldlm_rep = req_capsule_server_get(&info->mti_pill, &RMF_DLM_REP);
753
754         /* TODO: JOIN file */
755         if (create_flags & MDS_OPEN_JOIN_FILE) {
756                 CERROR("JOIN file will be supported soon\n");
757                 GOTO(out, result = err_serious(-EOPNOTSUPP));
758         }
759
760         CDEBUG(D_INODE, "I am going to open "DFID"/(%s->"DFID") "
761                "cr_flag=0%o mode=0%06o msg_flag=0x%x\n",
762                PFID(rr->rr_fid1), rr->rr_name, 
763                PFID(rr->rr_fid2), create_flags, 
764                la->la_mode, lustre_msg_get_flags(req->rq_reqmsg));
765
766         if (lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY) {
767                 /* This is a replay request. */
768                 result = mdt_open_by_fid(info, ldlm_rep);
769
770                 if (result != -ENOENT)
771                         GOTO(out, result);
772
773                 /*
774                  * We didn't find the correct object, so we need to re-create it
775                  * via a regular replay.
776                  */
777                 if (!(create_flags & MDS_OPEN_CREAT)) {
778                         DEBUG_REQ(D_ERROR, req,"OPEN & CREAT not in open replay.");
779                         GOTO(out, result = -EFAULT);
780                 }
781                 CDEBUG(D_INFO, "Open replay did find object, continue as "
782                        "regular open\n");
783         }
784
785         if (MDT_FAIL_CHECK(OBD_FAIL_MDS_OPEN_PACK))
786                 GOTO(out, result = err_serious(-ENOMEM));
787
788         mdt_set_disposition(info, ldlm_rep,
789                             (DISP_IT_EXECD | DISP_LOOKUP_EXECD));
790
791         if (info->mti_cross_ref) {
792                 /* This is cross-ref open */
793                 mdt_set_disposition(info, ldlm_rep, DISP_LOOKUP_POS);
794                 result = mdt_cross_open(info, rr->rr_fid1, ldlm_rep,
795                                         create_flags);
796                 GOTO(out, result);
797         }
798
799         lh = &info->mti_lh[MDT_LH_PARENT];
800         mdt_lock_pdo_init(lh, (create_flags & MDS_OPEN_CREAT) ?
801                           LCK_PW : LCK_PR, rr->rr_name, rr->rr_namelen);
802         
803         parent = mdt_object_find_lock(info, rr->rr_fid1, lh,
804                                       MDS_INODELOCK_UPDATE);
805         if (IS_ERR(parent))
806                 GOTO(out, result = PTR_ERR(parent));
807
808         fid_zero(child_fid);
809
810         lname = mdt_name(info->mti_env, (char *)rr->rr_name, rr->rr_namelen);
811
812         result = mdo_lookup(info->mti_env, mdt_object_child(parent),
813                             lname, child_fid, &info->mti_spec);
814         LASSERTF(ergo(result == 0, fid_is_sane(child_fid)),
815                  "looking for "DFID"/%s, result fid="DFID"\n", 
816                  PFID(mdt_object_fid(parent)), rr->rr_name, PFID(child_fid));
817
818         if (result != 0 && result != -ENOENT && result != -ESTALE)
819                 GOTO(out_parent, result);
820
821         if (result == -ENOENT || result == -ESTALE) {
822                 mdt_set_disposition(info, ldlm_rep, DISP_LOOKUP_NEG);
823                 if (result == -ESTALE) {
824                         /*
825                          * -ESTALE means the parent is a dead(unlinked) dir, so
826                          * it should return -ENOENT to in accordance with the
827                          * original mds implementaion.
828                          */
829                         GOTO(out_parent, result = -ENOENT);
830                 }
831                 if (!(create_flags & MDS_OPEN_CREAT))
832                         GOTO(out_parent, result);
833                 *child_fid = *info->mti_rr.rr_fid2;
834                 LASSERTF(fid_is_sane(child_fid), "fid="DFID"\n", 
835                          PFID(child_fid));
836         } else {
837                 /*
838                  * Check for O_EXCL is moved to the mdt_mfd_open(), we need to
839                  * return FID back in that case.
840                  */
841                 mdt_set_disposition(info, ldlm_rep, DISP_LOOKUP_POS);
842         }
843
844         child = mdt_object_find(info->mti_env, mdt, child_fid);
845         if (IS_ERR(child))
846                 GOTO(out_parent, result = PTR_ERR(child));
847
848         mdt_set_capainfo(info, 1, child_fid, BYPASS_CAPA);
849         if (result == -ENOENT) {
850                 /* Not found and with MDS_OPEN_CREAT: let's create it. */
851                 mdt_set_disposition(info, ldlm_rep, DISP_OPEN_CREATE);
852
853                 /* Let lower layers know what is lock mode on directory. */
854                 info->mti_spec.sp_cr_mode =
855                         mdt_dlm_mode2mdl_mode(lh->mlh_pdo_mode);
856
857                 /* 
858                  * Do not perform lookup sanity check. We know that name does
859                  * not exist.
860                  */
861                 info->mti_spec.sp_cr_lookup = 0;
862                 
863                 result = mdo_create(info->mti_env,
864                                     mdt_object_child(parent),
865                                     lname,
866                                     mdt_object_child(child),
867                                     &info->mti_spec,
868                                     &info->mti_attr);
869                 if (result == -ERESTART) {
870                         mdt_clear_disposition(info, ldlm_rep, DISP_OPEN_CREATE);
871                         GOTO(out_child, result);
872                 } else {
873                         if (result != 0)
874                                 GOTO(out_child, result);
875                 }
876                 created = 1;
877         } else {
878                 /* We have to get attr & lov ea for this object */
879                 result = mo_attr_get(info->mti_env, mdt_object_child(child),
880                                      ma);
881                 /*
882                  * The object is on remote node, return its FID for remote open.
883                  */
884                 if (result == -EREMOTE) {
885                         int rc;
886
887                         /*
888                          * Check if this lock already was sent to client and
889                          * this is resent case. For resent case do not take lock
890                          * again, use what is already granted.
891                          */
892                         LASSERT(lhc != NULL);
893
894                         if (lustre_handle_is_used(&lhc->mlh_reg_lh)) {
895                                 struct ldlm_lock *lock;
896
897                                 LASSERT(lustre_msg_get_flags(req->rq_reqmsg) &
898                                         MSG_RESENT);
899
900                                 lock = ldlm_handle2lock(&lhc->mlh_reg_lh);
901                                 if (!lock) {
902                                         CERROR("Invalid lock handle "LPX64"\n",
903                                                lhc->mlh_reg_lh.cookie);
904                                         LBUG();
905                                 }
906                                 LASSERT(fid_res_name_eq(mdt_object_fid(child),
907                                                         &lock->l_resource->lr_name));
908                                 LDLM_LOCK_PUT(lock);
909                                 rc = 0;
910                         } else {
911                                 mdt_lock_handle_init(lhc);
912                                 mdt_lock_reg_init(lhc, LCK_PR);
913
914                                 rc = mdt_object_lock(info, child, lhc,
915                                                      MDS_INODELOCK_LOOKUP,
916                                                      MDT_CROSS_LOCK);
917                         }
918                         repbody->fid1 = *mdt_object_fid(child);
919                         repbody->valid |= (OBD_MD_FLID | OBD_MD_MDS);
920                         if (rc != 0)
921                                 result = rc;
922                         GOTO(out_child, result);
923                 }
924         }
925
926         /* Try to open it now. */
927         result = mdt_mfd_open(info, parent, child, create_flags,
928                               created, ldlm_rep);
929
930         if (result != 0 && created) {
931                 int rc2;
932                 ma->ma_need = 0;
933                 ma->ma_valid = 0;
934                 ma->ma_cookie_size = 0;
935                 rc2 = mdo_unlink(info->mti_env,
936                                  mdt_object_child(parent),
937                                  mdt_object_child(child),
938                                  rr->rr_name,
939                                  &info->mti_attr);
940                 if (rc2 != 0)
941                         CERROR("Error in cleanup of open\n");
942         }
943         EXIT;
944 out_child:
945         mdt_object_put(info->mti_env, child);
946 out_parent:
947         mdt_object_unlock_put(info, parent, lh, result);
948 out:
949         mdt_shrink_reply(info, DLM_REPLY_REC_OFF + 1, 1, 1);
950         if (result)
951                 lustre_msg_set_transno(req->rq_repmsg, 0);
952         mdt_lprocfs_time_end(info->mti_mdt, &info->mti_time,
953                              LPROC_MDT_REINT_OPEN);
954         return result;
955 }
956
957 #define MFD_CLOSED(mode) (((mode) & ~(FMODE_EPOCH | FMODE_SOM | \
958                                       FMODE_EPOCHLCK)) == FMODE_CLOSED)
959
960 static int mdt_mfd_closed(struct mdt_file_data *mfd)
961 {
962         return ((mfd == NULL) || MFD_CLOSED(mfd->mfd_mode));
963 }
964
965 int mdt_mfd_close(struct mdt_thread_info *info, struct mdt_file_data *mfd)
966 {
967         struct mdt_object *o = mfd->mfd_object;
968         struct md_object *next = mdt_object_child(o);
969         struct md_attr *ma = &info->mti_attr;
970         int rc = 0, ret = 0;
971         int mode;
972         ENTRY;
973
974         mode = mfd->mfd_mode;
975         mfd->mfd_mode = FMODE_CLOSED;
976
977         if ((mode & FMODE_WRITE) || (mode & FMODE_EPOCHLCK)) {
978                 mdt_write_put(info->mti_mdt, o);
979                 ret = mdt_epoch_close(info, o);
980         } else if (mode & MDS_FMODE_EXEC) {
981                 mdt_write_allow(info->mti_mdt, o);
982         } else if (mode & FMODE_EPOCH) {
983                 ret = mdt_epoch_close(info, o);
984         }
985
986         ma->ma_need |= MA_INODE;
987         ma->ma_valid = 0;
988
989         if (!MFD_CLOSED(mode))
990                 rc = mo_close(info->mti_env, next, ma);
991         else if (ret == -EAGAIN)
992                 rc = mo_attr_get(info->mti_env, next, ma);
993
994         /* If the object is unlinked, do not try to re-enable SIZEONMDS */
995         if ((ret == -EAGAIN) && (ma->ma_valid & MA_INODE) &&
996             (ma->ma_attr.la_nlink == 0))
997         {
998                 ret = 0;
999         }
1000
1001         if ((ret == -EAGAIN) || (ret == 1)) {
1002                 struct mdt_export_data *med;
1003                 /* The epoch has not closed or Size-on-MDS update is needed.
1004                  * Put mfd back into the list. */
1005                 mfd->mfd_mode = (ret == 1 ? FMODE_EPOCH : FMODE_SOM);
1006
1007                 LASSERT(mdt_info_req(info));
1008                 med = &mdt_info_req(info)->rq_export->exp_mdt_data;
1009                 spin_lock(&med->med_open_lock);
1010                 list_add(&mfd->mfd_list, &med->med_open_head);
1011                 class_handle_hash_back(&mfd->mfd_handle);
1012                 spin_unlock(&med->med_open_lock);
1013                 if (ret == 1)
1014                         ret = 0;
1015                 else {
1016                         CDEBUG(D_INODE, "Size-on-MDS attribute update is "
1017                                "needed on "DFID"\n", PFID(mdt_object_fid(o)));
1018                 }
1019         } else {
1020                 mdt_mfd_free(mfd);
1021                 mdt_object_put(info->mti_env, o);
1022         }
1023
1024         RETURN(rc ? rc : ret);
1025 }
1026
1027 int mdt_close(struct mdt_thread_info *info)
1028 {
1029         struct mdt_export_data *med;
1030         struct mdt_file_data   *mfd;
1031         struct mdt_object      *o;
1032         struct md_attr         *ma = &info->mti_attr;
1033         struct mdt_body        *repbody = NULL;
1034         int rc, ret = 0;
1035         ENTRY;
1036
1037         /* Close may come with the Size-on-MDS update. Unpack it. */
1038         rc = mdt_close_unpack(info);
1039         if (rc)
1040                 RETURN(err_serious(rc));
1041
1042         LASSERT(info->mti_epoch);
1043
1044         req_capsule_set_size(&info->mti_pill, &RMF_MDT_MD, RCL_SERVER,
1045                              info->mti_mdt->mdt_max_mdsize);
1046         req_capsule_set_size(&info->mti_pill, &RMF_LOGCOOKIES, RCL_SERVER,
1047                              info->mti_mdt->mdt_max_cookiesize);
1048         rc = req_capsule_pack(&info->mti_pill);
1049         /* Continue to close handle even if we can not pack reply */
1050         if (rc == 0) {
1051                 repbody = req_capsule_server_get(&info->mti_pill,
1052                                                  &RMF_MDT_BODY);
1053                 ma->ma_lmm = req_capsule_server_get(&info->mti_pill,
1054                                                     &RMF_MDT_MD);
1055                 ma->ma_lmm_size = req_capsule_get_size(&info->mti_pill,
1056                                                        &RMF_MDT_MD,
1057                                                        RCL_SERVER);
1058                 ma->ma_cookie = req_capsule_server_get(&info->mti_pill,
1059                                                        &RMF_LOGCOOKIES);
1060                 ma->ma_cookie_size = req_capsule_get_size(&info->mti_pill,
1061                                                           &RMF_LOGCOOKIES,
1062                                                           RCL_SERVER);
1063                 ma->ma_need = MA_INODE | MA_LOV | MA_COOKIE;
1064                 ma->ma_valid = 0;
1065                 repbody->eadatasize = 0;
1066                 repbody->aclsize = 0;
1067         } else
1068                 rc = err_serious(rc);
1069
1070         med = &mdt_info_req(info)->rq_export->exp_mdt_data;
1071
1072         spin_lock(&med->med_open_lock);
1073         mfd = mdt_handle2mfd(&(info->mti_epoch->handle));
1074         if (mdt_mfd_closed(mfd)) {
1075                 spin_unlock(&med->med_open_lock);
1076                 CDEBUG(D_INODE, "no handle for file close: fid = "DFID
1077                        ": cookie = "LPX64"\n", PFID(info->mti_rr.rr_fid1),
1078                        info->mti_epoch->handle.cookie);
1079                 rc = err_serious(-ESTALE);
1080         } else {
1081                 class_handle_unhash(&mfd->mfd_handle);
1082                 list_del_init(&mfd->mfd_list);
1083                 spin_unlock(&med->med_open_lock);
1084
1085                 /* Do not lose object before last unlink. */
1086                 o = mfd->mfd_object;
1087                 mdt_object_get(info->mti_env, o);
1088                 ret = mdt_mfd_close(info, mfd);
1089                 if (repbody != NULL)
1090                         rc = mdt_handle_last_unlink(info, o, ma);
1091                 mdt_empty_transno(info);
1092                 mdt_object_put(info->mti_env, o);
1093         }
1094         if (repbody != NULL)
1095                 mdt_shrink_reply(info, REPLY_REC_OFF + 1, 0, 0);
1096
1097         if (MDT_FAIL_CHECK(OBD_FAIL_MDS_CLOSE_PACK))
1098                 RETURN(err_serious(-ENOMEM));
1099
1100         RETURN(rc ? rc : ret);
1101 }
1102
1103 int mdt_done_writing(struct mdt_thread_info *info)
1104 {
1105         struct mdt_body        *repbody = NULL;
1106         struct mdt_export_data *med;
1107         struct mdt_file_data   *mfd;
1108         int rc;
1109         ENTRY;
1110
1111         rc = req_capsule_pack(&info->mti_pill);
1112         if (rc)
1113                 RETURN(err_serious(rc));
1114
1115         repbody = req_capsule_server_get(&info->mti_pill,
1116                                          &RMF_MDT_BODY);
1117         repbody->eadatasize = 0;
1118         repbody->aclsize = 0;
1119
1120         /* Done Writing may come with the Size-on-MDS update. Unpack it. */
1121         rc = mdt_close_unpack(info);
1122         if (rc)
1123                 RETURN(err_serious(rc));
1124
1125         med = &mdt_info_req(info)->rq_export->exp_mdt_data;
1126         spin_lock(&med->med_open_lock);
1127         mfd = mdt_handle2mfd(&(info->mti_epoch->handle));
1128         if (mfd == NULL) {
1129                 spin_unlock(&med->med_open_lock);
1130                 CDEBUG(D_INODE, "no handle for file close: fid = "DFID
1131                        ": cookie = "LPX64"\n", PFID(info->mti_rr.rr_fid1),
1132                        info->mti_epoch->handle.cookie);
1133                 rc = -ESTALE;
1134         } else {
1135                 LASSERT((mfd->mfd_mode == FMODE_EPOCH) ||
1136                         (mfd->mfd_mode == FMODE_EPOCHLCK));
1137                 class_handle_unhash(&mfd->mfd_handle);
1138                 list_del_init(&mfd->mfd_list);
1139                 spin_unlock(&med->med_open_lock);
1140
1141                 /* Set EPOCH CLOSE flag if not set by client. */
1142                 info->mti_epoch->flags |= MF_EPOCH_CLOSE;
1143                 info->mti_attr.ma_valid = 0;
1144                 rc = mdt_mfd_close(info, mfd);
1145                 mdt_empty_transno(info);
1146         }
1147         RETURN(rc);
1148 }