Whamcloud - gitweb
Brach HEAD
[fs/lustre-release.git] / lustre / mds / handler.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  *  lustre/mds/handler.c
5  *  Lustre Metadata Server (mds) request handler
6  *
7  *  Copyright (c) 2001-2003 Cluster File Systems, Inc.
8  *   Author: Peter Braam <braam@clusterfs.com>
9  *   Author: Andreas Dilger <adilger@clusterfs.com>
10  *   Author: Phil Schwan <phil@clusterfs.com>
11  *   Author: Mike Shaver <shaver@clusterfs.com>
12  *
13  *   This file is part of Lustre, http://www.lustre.org.
14  *
15  *   Lustre is free software; you can redistribute it and/or
16  *   modify it under the terms of version 2 of the GNU General Public
17  *   License as published by the Free Software Foundation.
18  *
19  *   Lustre is distributed in the hope that it will be useful,
20  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
21  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  *   GNU General Public License for more details.
23  *
24  *   You should have received a copy of the GNU General Public License
25  *   along with Lustre; if not, write to the Free Software
26  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27  */
28
29 #ifndef EXPORT_SYMTAB
30 # define EXPORT_SYMTAB
31 #endif
32 #define DEBUG_SUBSYSTEM S_MDS
33
34 #include <linux/module.h>
35 #include <linux/lustre_mds.h>
36 #include <linux/lustre_dlm.h>
37 #include <linux/init.h>
38 #include <linux/obd_class.h>
39 #include <linux/random.h>
40 #include <linux/fs.h>
41 #include <linux/jbd.h>
42 #include <linux/namei.h>
43 #include <linux/ext3_fs.h>
44 #if (LINUX_VERSION_CODE >= KERNEL_VERSION(2,5,0))
45 # include <linux/smp_lock.h>
46 # include <linux/buffer_head.h>
47 # include <linux/workqueue.h>
48 # include <linux/mount.h>
49 #else
50 # include <linux/locks.h>
51 #endif
52 #include <linux/obd_lov.h>
53 #include <linux/obd_ost.h>
54 #include <linux/lustre_mds.h>
55 #include <linux/lustre_fsfilt.h>
56 #include <linux/lprocfs_status.h>
57 #include <linux/lustre_commit_confd.h>
58 #include <linux/lustre_acl.h>
59 #include "mds_internal.h"
60
61 static int mds_intent_policy(struct ldlm_namespace *ns,
62                              struct ldlm_lock **lockp, void *req_cookie,
63                              ldlm_mode_t mode, int flags, void *data);
64 static int mds_postsetup(struct obd_device *obd);
65 static int mds_cleanup(struct obd_device *obd, int flags);
66
67
68 /* Assumes caller has already pushed into the kernel filesystem context */
69 static int mds_sendpage(struct ptlrpc_request *req, struct file *file,
70                         loff_t offset, int count)
71 {
72         struct ptlrpc_bulk_desc *desc;
73         struct l_wait_info lwi;
74         struct page **pages;
75         int rc = 0, npages, i, tmpcount, tmpsize = 0;
76         ENTRY;
77
78         LASSERT((offset & (PAGE_SIZE - 1)) == 0); /* I'm dubious about this */
79
80         npages = (count + PAGE_SIZE - 1) >> PAGE_SHIFT;
81         OBD_ALLOC(pages, sizeof(*pages) * npages);
82         if (!pages)
83                 GOTO(out, rc = -ENOMEM);
84
85         desc = ptlrpc_prep_bulk_exp(req, npages, BULK_PUT_SOURCE,
86                                     MDS_BULK_PORTAL);
87         if (desc == NULL)
88                 GOTO(out_free, rc = -ENOMEM);
89
90         for (i = 0, tmpcount = count; i < npages; i++, tmpcount -= tmpsize) {
91                 tmpsize = tmpcount > PAGE_SIZE ? PAGE_SIZE : tmpcount;
92
93                 pages[i] = alloc_pages(GFP_KERNEL, 0);
94                 if (pages[i] == NULL)
95                         GOTO(cleanup_buf, rc = -ENOMEM);
96
97                 ptlrpc_prep_bulk_page(desc, pages[i], 0, tmpsize);
98         }
99
100         for (i = 0, tmpcount = count; i < npages; i++, tmpcount -= tmpsize) {
101                 tmpsize = tmpcount > PAGE_SIZE ? PAGE_SIZE : tmpcount;
102                 CDEBUG(D_EXT2, "reading %u@%llu from dir %lu (size %llu)\n",
103                        tmpsize, offset, file->f_dentry->d_inode->i_ino,
104                        file->f_dentry->d_inode->i_size);
105
106                 rc = fsfilt_readpage(req->rq_export->exp_obd, file,
107                                      kmap(pages[i]), tmpsize, &offset);
108                 kunmap(pages[i]);
109
110                 if (rc != tmpsize)
111                         GOTO(cleanup_buf, rc = -EIO);
112         }
113
114         LASSERT(desc->bd_nob == count);
115
116         rc = ptlrpc_start_bulk_transfer(desc);
117         if (rc)
118                 GOTO(cleanup_buf, rc);
119
120         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_SENDPAGE)) {
121                 CERROR("obd_fail_loc=%x, fail operation rc=%d\n",
122                        OBD_FAIL_MDS_SENDPAGE, rc = -EIO);
123                 GOTO(abort_bulk, rc);
124         }
125
126         lwi = LWI_TIMEOUT(obd_timeout * HZ / 4, NULL, NULL);
127         rc = l_wait_event(desc->bd_waitq, !ptlrpc_bulk_active(desc), &lwi);
128         LASSERT (rc == 0 || rc == -ETIMEDOUT);
129
130         if (rc == 0) {
131                 if (desc->bd_success &&
132                     desc->bd_nob_transferred == count)
133                         GOTO(cleanup_buf, rc);
134
135                 rc = -ETIMEDOUT; /* XXX should this be a different errno? */
136         }
137
138         DEBUG_REQ(D_ERROR, req, "bulk failed: %s %d(%d), evicting %s@%s\n",
139                   (rc == -ETIMEDOUT) ? "timeout" : "network error",
140                   desc->bd_nob_transferred, count,
141                   req->rq_export->exp_client_uuid.uuid,
142                   req->rq_export->exp_connection->c_remote_uuid.uuid);
143
144         ptlrpc_fail_export(req->rq_export);
145
146         EXIT;
147  abort_bulk:
148         ptlrpc_abort_bulk (desc);
149  cleanup_buf:
150         for (i = 0; i < npages; i++)
151                 if (pages[i])
152                         __free_pages(pages[i], 0);
153
154         ptlrpc_free_bulk(desc);
155  out_free:
156         OBD_FREE(pages, sizeof(*pages) * npages);
157  out:
158         return rc;
159 }
160
161 extern char *ldlm_lockname[];
162
163 int mds_lock_mode_for_dir(struct obd_device *obd,
164                           struct dentry *dentry, int mode)
165 {
166         int ret_mode = 0, split;
167
168         /* any dir access needs couple locks:
169          * 1) on part of dir we gonna lookup/modify in
170          * 2) on a whole dir to protect it from concurrent splitting
171          *    and to flush client's cache for readdir()
172          * so, for a given mode and dentry this routine decides what
173          * lock mode to use for lock #2:
174          * 1) if caller's gonna lookup in dir then we need to protect
175          *    dir from being splitted only - LCK_CR
176          * 2) if caller's gonna modify dir then we need to protect
177          *    dir from being splitted and to flush cache - LCK_CW
178          * 3) if caller's gonna modify dir and that dir seems ready
179          *    for splitting then we need to protect it from any
180          *    type of access (lookup/modify/split) - LCK_EX -bzzz */
181
182         split = mds_splitting_expected(obd, dentry);
183         
184         /*
185          * it is important to check here only for MDS_NO_SPLITTABLE. The reason
186          * is that MDS_NO_SPLITTABLE means dir is not splittable in principle
187          * and another thread will not split it on the quiet. But if we have
188          * MDS_NO_SPLIT_EXPECTED, this means, that dir may be splitted anytime,
189          * but not now (for current thread) and we should consider that it can
190          * happen soon and go that branch which can yield LCK_EX to protect from
191          * possible splitting.
192          */
193         if (split == MDS_NO_SPLITTABLE) {
194                 /*
195                  * this inode won't be splitted. so we need not to protect from
196                  * just flush client's cache on modification.
197                  */
198                 if (mode == LCK_PW)
199                         ret_mode = LCK_CW;
200                 else
201                         ret_mode = 0;
202         } else {
203                 if (mode == LCK_EX) {
204                         ret_mode = LCK_EX;
205                 } else if (mode == LCK_PR) {
206                         ret_mode = LCK_CR;
207                 } else if (mode == LCK_PW) {
208                         /*
209                          * caller gonna modify directory. We use concurrent
210                          * write lock here to retract client's cache for
211                          * readdir.
212                          */
213                         if (split == MDS_EXPECT_SPLIT) {
214                                 /*
215                                  * splitting possible. serialize any access the
216                                  * idea is that first one seen dir is splittable
217                                  * is given exclusive lock and split
218                                  * directory. caller passes lock mode to
219                                  * mds_try_to_split_dir() and splitting would be
220                                  * done with exclusive lock only -bzzz.
221                                  */
222                                 CDEBUG(D_OTHER, "%s: gonna split %lu/%lu\n",
223                                        obd->obd_name,
224                                        (unsigned long)dentry->d_inode->i_ino,
225                                        (unsigned long)dentry->d_inode->i_generation);
226                                 ret_mode = LCK_EX;
227                         } else {
228                                 ret_mode = LCK_CW;
229                         }
230                 }
231         }
232
233         return ret_mode;        
234 }
235
236 /* only valid locked dentries or errors should be returned */
237 struct dentry *mds_id2locked_dentry(struct obd_device *obd, struct lustre_id *id,
238                                     struct vfsmount **mnt, int lock_mode,
239                                     struct lustre_handle *lockh, int *mode,
240                                     char *name, int namelen, __u64 lockpart)
241 {
242         struct dentry *de = mds_id2dentry(obd, id, mnt), *retval = de;
243         ldlm_policy_data_t policy = { .l_inodebits = { lockpart } };
244         struct ldlm_res_id res_id = { .name = {0} };
245         int flags = 0, rc;
246         ENTRY;
247
248         if (IS_ERR(de))
249                 RETURN(de);
250
251         lockh[1].cookie = 0;
252         res_id.name[0] = id_fid(id);
253         res_id.name[1] = id_group(id);
254         
255 #ifdef S_PDIROPS
256         if (name && IS_PDIROPS(de->d_inode)) {
257                 ldlm_policy_data_t cpolicy =
258                         { .l_inodebits = { MDS_INODELOCK_UPDATE } };
259                 LASSERT(mode != NULL);
260                 *mode = mds_lock_mode_for_dir(obd, de, lock_mode);
261                 if (*mode) {
262                         rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace,
263                                               res_id, LDLM_IBITS,
264                                               &cpolicy, *mode, &flags,
265                                               mds_blocking_ast,
266                                               ldlm_completion_ast, NULL, NULL,
267                                               NULL, 0, NULL, lockh + 1);
268                         if (rc != ELDLM_OK) {
269                                 l_dput(de);
270                                 RETURN(ERR_PTR(-ENOLCK));
271                         }
272                 }
273                 flags = 0;
274
275                 res_id.name[2] = full_name_hash((unsigned char *)name, namelen);
276
277                 CDEBUG(D_INFO, "take lock on "DLID4":"LPX64"\n",
278                        OLID4(id), res_id.name[2]);
279         }
280 #else
281 #warning "No PDIROPS support in the kernel"
282 #endif
283         rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace, res_id,
284                               LDLM_IBITS, &policy, lock_mode, &flags,
285                               mds_blocking_ast, ldlm_completion_ast,
286                               NULL, NULL, NULL, 0, NULL, lockh);
287         if (rc != ELDLM_OK) {
288                 l_dput(de);
289                 retval = ERR_PTR(-EIO); /* XXX translate ldlm code */
290 #ifdef S_PDIROPS
291                 if (lockh[1].cookie)
292                         ldlm_lock_decref(lockh + 1, *mode);
293 #endif
294         }
295
296         RETURN(retval);
297 }
298
299 #ifndef DCACHE_DISCONNECTED
300 #define DCACHE_DISCONNECTED DCACHE_NFSD_DISCONNECTED
301 #endif
302
303 /* Look up an entry by inode number. This function ONLY returns valid dget'd
304  * dentries with an initialized inode or errors */
305 struct dentry *mds_id2dentry(struct obd_device *obd, struct lustre_id *id,
306                              struct vfsmount **mnt)
307 {
308         unsigned long ino = (unsigned long)id_ino(id);
309         __u32 generation = (__u32)id_gen(id);
310         struct mds_obd *mds = &obd->u.mds;
311         struct dentry *result;
312         struct inode *inode;
313         char idname[32];
314
315         if (ino == 0)
316                 RETURN(ERR_PTR(-ESTALE));
317
318         snprintf(idname, sizeof(idname), "0x%lx", ino);
319
320         CDEBUG(D_DENTRY, "--> mds_id2dentry: ino/gen %lu/%u, sb %p\n",
321                ino, generation, mds->mds_sb);
322
323         /* under ext3 this is neither supposed to return bad inodes nor NULL
324            inodes. */
325         result = ll_lookup_one_len(idname, mds->mds_id_de, 
326                                    strlen(idname));
327         if (IS_ERR(result))
328                 RETURN(result);
329
330         inode = result->d_inode;
331         if (!inode)
332                 RETURN(ERR_PTR(-ENOENT));
333
334         if (is_bad_inode(inode)) {
335                 CERROR("bad inode returned %lu/%u\n",
336                        inode->i_ino, inode->i_generation);
337                 dput(result);
338                 RETURN(ERR_PTR(-ENOENT));
339         }
340
341         /* here we disabled generation check, as root inode i_generation
342          * of cache mds and real mds are different. */
343         if (inode->i_ino != id_ino(&mds->mds_rootid) && generation &&
344             inode->i_generation != generation) {
345                 /* we didn't find the right inode.. */
346                 CERROR("bad inode %lu, link: %lu, ct: %d, generation %u/%u\n",
347                        inode->i_ino, (unsigned long)inode->i_nlink,
348                        atomic_read(&inode->i_count), inode->i_generation,
349                        generation);
350                 dput(result);
351                 RETURN(ERR_PTR(-ENOENT));
352         }
353
354         if (mnt) {
355                 *mnt = mds->mds_vfsmnt;
356                 mntget(*mnt);
357         }
358
359         RETURN(result);
360 }
361
362 static
363 int mds_req_add_idmapping(struct ptlrpc_request *req,
364                           struct mds_export_data *med)
365 {
366         struct mds_req_sec_desc *rsd;
367         struct lustre_sec_desc  *lsd;
368         int rc;
369
370         if (!med->med_remote)
371                 return 0;
372
373         /* maybe we should do it more completely: invalidate the gss ctxt? */
374         if (req->rq_mapped_uid == MDS_IDMAP_NOTFOUND) {
375                 CWARN("didn't find mapped uid\n");
376                 return -EPERM;
377         }
378
379         rsd = lustre_swab_mds_secdesc(req, MDS_REQ_SECDESC_OFF);
380         if (!rsd) {
381                 CERROR("Can't unpack security desc\n");
382                 return -EPROTO;
383         }
384
385         lsd = mds_get_lsd(req->rq_mapped_uid);
386         if (!lsd) {
387                 CERROR("can't get LSD(%u), no mapping added\n",
388                        req->rq_mapped_uid);
389                 return -EPERM;
390         }
391
392         rc = mds_idmap_add(med->med_idmap, rsd->rsd_uid, lsd->lsd_uid,
393                            rsd->rsd_gid, lsd->lsd_gid);
394         mds_put_lsd(lsd);
395         return rc;
396 }
397
398 static
399 int mds_req_del_idmapping(struct ptlrpc_request *req,
400                           struct mds_export_data *med)
401 {
402         struct mds_req_sec_desc *rsd;
403         struct lustre_sec_desc  *lsd;
404         int rc;
405
406         if (!med->med_remote)
407                 return 0;
408
409         rsd = lustre_swab_mds_secdesc(req, MDS_REQ_SECDESC_OFF);
410         if (!rsd) {
411                 CERROR("Can't unpack security desc\n");
412                 return -EPROTO;
413         }
414
415         LASSERT(req->rq_mapped_uid != -1);
416         lsd = mds_get_lsd(req->rq_mapped_uid);
417         if (!lsd) {
418                 CERROR("can't get LSD(%u), no idmapping deleted\n",
419                        req->rq_mapped_uid);
420                 return -EPERM;
421         }
422
423         rc = mds_idmap_del(med->med_idmap, rsd->rsd_uid, lsd->lsd_uid,
424                            rsd->rsd_gid, lsd->lsd_gid);
425         mds_put_lsd(lsd);
426         return rc;
427 }
428
429 static int mds_init_export_data(struct ptlrpc_request *req,
430                                 struct mds_export_data *med)
431 {
432         struct obd_connect_data *data, *reply;
433         int ask_remote, ask_local;
434         ENTRY;
435
436         data = lustre_msg_buf(req->rq_reqmsg, 5, sizeof(*data));
437         reply = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*data));
438         LASSERT(data && reply);
439
440         if (med->med_initialized) {
441                 CDEBUG(D_SEC, "med already initialized, reconnect?\n");
442                 goto reply;
443         }
444
445         ask_remote = data->ocd_connect_flags & OBD_CONNECT_REMOTE;
446         ask_local = data->ocd_connect_flags & OBD_CONNECT_LOCAL;
447
448         /* currently the policy is simple: satisfy client as possible
449          * as we can.
450          */
451         if (req->rq_auth_uid == -1) {
452                 if (ask_remote)
453                         CWARN("null sec is used, force to be local\n");
454                 med->med_remote = 0;
455         } else {
456                 if (ask_remote) {
457                         if (!req->rq_remote_realm)
458                                 CWARN("local realm asked to be remote\n");
459                         med->med_remote = 1;
460                 } else if (ask_local) {
461                         if (req->rq_remote_realm)
462                                 CWARN("remote realm asked to be local\n");
463                         med->med_remote = 0;
464                 } else
465                         med->med_remote = (req->rq_remote_realm != 0);
466         }
467
468         med->med_nllu = data->ocd_nllu[0];
469         med->med_nllg = data->ocd_nllu[1];
470
471         med->med_initialized = 1;
472 reply:
473         reply->ocd_connect_flags &= ~(OBD_CONNECT_REMOTE | OBD_CONNECT_LOCAL);
474         if (med->med_remote) {
475                 if (!med->med_idmap)
476                         med->med_idmap = mds_idmap_alloc();
477
478                 if (!med->med_idmap)
479                         CERROR("Failed to alloc idmap, following request from "
480                                "this client will be refused\n");
481
482                 reply->ocd_connect_flags |= OBD_CONNECT_REMOTE;
483                 CDEBUG(D_SEC, "set client as remote\n");
484         } else {
485                 reply->ocd_connect_flags |= OBD_CONNECT_LOCAL;
486                 CDEBUG(D_SEC, "set client as local\n");
487         }
488
489         RETURN(0);
490 }
491
492 static void mds_free_export_data(struct mds_export_data *med)
493 {
494         if (!med->med_idmap)
495                 return;
496
497         LASSERT(med->med_remote);
498         mds_idmap_free(med->med_idmap);
499         med->med_idmap = NULL;
500 }
501
502 /* Establish a connection to the MDS.
503  *
504  * This will set up an export structure for the client to hold state data about
505  * that client, like open files, the last operation number it did on the server,
506  * etc.
507  */
508 static int mds_connect(struct lustre_handle *conn, struct obd_device *obd,
509                        struct obd_uuid *cluuid, struct obd_connect_data *data,
510                        unsigned long flags)
511 {
512         struct mds_export_data *med;
513         struct mds_client_data *mcd;
514         struct obd_export *exp;
515         int rc;
516         ENTRY;
517
518         if (!conn || !obd || !cluuid)
519                 RETURN(-EINVAL);
520
521         /* XXX There is a small race between checking the list and adding a new
522          * connection for the same UUID, but the real threat (list corruption
523          * when multiple different clients connect) is solved.
524          *
525          * There is a second race between adding the export to the list, and
526          * filling in the client data below.  Hence skipping the case of NULL
527          * mcd above.  We should already be controlling multiple connects at the
528          * client, and we can't hold the spinlock over memory allocations
529          * without risk of deadlocking.
530          */
531         rc = class_connect(conn, obd, cluuid);
532         if (rc)
533                 RETURN(rc);
534         exp = class_conn2export(conn);
535         
536         LASSERT(exp != NULL);
537         med = &exp->exp_mds_data;
538
539         OBD_ALLOC(mcd, sizeof(*mcd));
540         if (!mcd) {
541                 CERROR("%s: out of memory for client data.\n",
542                         obd->obd_name);
543                 GOTO(out, rc = -ENOMEM);
544         }
545
546         memcpy(mcd->mcd_uuid, cluuid, sizeof(mcd->mcd_uuid));
547         med->med_mcd = mcd;
548
549         rc = mds_client_add(obd, &obd->u.mds, med, -1);
550         if (rc)
551                 GOTO(out, rc);
552        
553         EXIT;
554 out:
555         if (rc) {
556                 if (mcd)
557                         OBD_FREE(mcd, sizeof(*mcd));
558                 class_disconnect(exp, 0);
559         } else {
560                 class_export_put(exp);
561         }
562         return rc;
563 }
564
565 static int mds_connect_post(struct obd_export *exp, unsigned initial,
566                             unsigned long flags)
567 {
568         struct obd_device *obd = exp->exp_obd;
569         struct mds_obd *mds = &obd->u.mds;
570         struct mds_export_data *med;
571         struct mds_client_data *mcd;
572         int rc = 0;
573         ENTRY;
574
575         med = &exp->exp_mds_data;
576         mcd = med->med_mcd;
577
578         if (initial) {
579                 /* some one reconnect initially, we have to reset
580                  * data existing export can have. bug 6102 */
581                 if (mcd->mcd_last_xid != 0)
582                         CDEBUG(D_HA, "initial reconnect to existing export\n");
583                 mcd->mcd_last_transno = 0;
584                 mcd->mcd_last_xid = 0;
585                 mcd->mcd_last_result = 0;
586                 mcd->mcd_last_data = 0;
587         }
588
589         if (!(flags & OBD_OPT_MDS_CONNECTION)) {
590                 if (!(exp->exp_flags & OBD_OPT_REAL_CLIENT)) {
591                         atomic_inc(&mds->mds_real_clients);
592                         CDEBUG(D_OTHER,"%s: peer from %s is real client (%d)\n",
593                                obd->obd_name, exp->exp_client_uuid.uuid,
594                                atomic_read(&mds->mds_real_clients));
595                         exp->exp_flags |= OBD_OPT_REAL_CLIENT;
596                 }
597                 if (mds->mds_md_name)
598                         rc = mds_md_connect(obd, mds->mds_md_name);
599         }
600         RETURN(rc);
601 }
602
603 static int mds_init_export(struct obd_export *exp)
604 {
605         struct mds_export_data *med = &exp->exp_mds_data;
606
607         INIT_LIST_HEAD(&med->med_open_head);
608         spin_lock_init(&med->med_open_lock);
609         return 0;
610 }
611
612 static int mds_destroy_export(struct obd_export *export)
613 {
614         struct obd_device *obd = export->exp_obd;
615         struct mds_export_data *med = &export->exp_mds_data;
616         struct lvfs_run_ctxt saved;
617         int rc = 0;
618         ENTRY;
619
620         mds_free_export_data(med);
621         target_destroy_export(export);
622
623         if (obd_uuid_equals(&export->exp_client_uuid, &obd->obd_uuid))
624                 GOTO(out, 0);
625
626         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
627
628         /* Close any open files (which may also cause orphan unlinking). */
629         spin_lock(&med->med_open_lock);
630         while (!list_empty(&med->med_open_head)) {
631                 struct list_head *tmp = med->med_open_head.next;
632                 struct mds_file_data *mfd =
633                         list_entry(tmp, struct mds_file_data, mfd_list);
634                 struct lustre_id sid;
635                 
636                 BDEVNAME_DECLARE_STORAGE(btmp);
637
638                 /* bug 1579: fix force-closing for 2.5 */
639                 struct dentry *dentry = mfd->mfd_dentry;
640
641                 list_del(&mfd->mfd_list);
642                 spin_unlock(&med->med_open_lock);
643
644                 down(&dentry->d_inode->i_sem);
645                 rc = mds_read_inode_sid(obd, dentry->d_inode, &sid);
646                 up(&dentry->d_inode->i_sem);
647                 if (rc) {
648                         CERROR("Can't read inode self id, inode %lu, "
649                                "rc %d\n", dentry->d_inode->i_ino, rc);
650                         memset(&sid, 0, sizeof(sid));
651                 }
652
653                 /* If you change this message, be sure to update
654                  * replay_single:test_46 */
655                 CERROR("force closing client file handle for %.*s (%s:"
656                        DLID4")\n", dentry->d_name.len, dentry->d_name.name,
657                        ll_bdevname(dentry->d_inode->i_sb, btmp),
658                        OLID4(&sid));
659                 
660                 /* child inode->i_alloc_sem protects orphan_dec_test and
661                  * is_orphan race, mds_mfd_close drops it */
662                 DOWN_WRITE_I_ALLOC_SEM(dentry->d_inode);
663                 rc = mds_mfd_close(NULL, 0, obd, mfd,
664                                    !(export->exp_flags & OBD_OPT_FAILOVER));
665                 if (rc)
666                         CDEBUG(D_INODE, "Error closing file: %d\n", rc);
667                 spin_lock(&med->med_open_lock);
668         }
669         spin_unlock(&med->med_open_lock);
670         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
671
672         EXIT;
673 out:
674         mds_client_free(export, !(export->exp_flags & OBD_OPT_FAILOVER));
675         return rc;
676 }
677
678 static int mds_disconnect(struct obd_export *exp, unsigned long flags)
679 {
680         unsigned long irqflags;
681         struct obd_device *obd;
682         struct mds_obd *mds;
683         int rc;
684         ENTRY;
685
686         LASSERT(exp != NULL);
687         obd = class_exp2obd(exp);
688         if (obd == NULL) {
689                 CDEBUG(D_IOCTL, "invalid client cookie "LPX64"\n",
690                        exp->exp_handle.h_cookie);
691                 RETURN(-EINVAL);
692         }
693         mds = &obd->u.mds;
694
695         /*
696          * suppress any inter-mds requests durring disconnecting lmv if this is
697          * detected --force mode. This is needed to avoid endless recovery.
698          */
699         if (atomic_read(&mds->mds_real_clients) > 0 &&
700             !(exp->exp_flags & OBD_OPT_REAL_CLIENT))
701                 flags |= OBD_OPT_FORCE;
702                                                                                               
703         if (!(exp->exp_flags & OBD_OPT_REAL_CLIENT)
704             && !atomic_read(&mds->mds_real_clients)) {
705                 /* there was no client at all */
706                 mds_md_disconnect(obd, flags);
707         }
708
709         if ((exp->exp_flags & OBD_OPT_REAL_CLIENT)
710             && atomic_dec_and_test(&mds->mds_real_clients)) {
711                 /* time to drop LMV connections */
712                 CDEBUG(D_OTHER, "%s: last real client %s disconnected.  "
713                        "Disconnnect from LMV now\n",
714                        obd->obd_name, exp->exp_client_uuid.uuid);
715                 mds_md_disconnect(obd, flags);
716         }
717
718         spin_lock_irqsave(&exp->exp_lock, irqflags);
719         exp->exp_flags = flags;
720         spin_unlock_irqrestore(&exp->exp_lock, irqflags);
721
722         /* disconnect early so that clients can't keep using export */
723         rc = class_disconnect(exp, flags);
724         ldlm_cancel_locks_for_export(exp);
725
726         /* complete all outstanding replies */
727         spin_lock_irqsave(&exp->exp_lock, irqflags);
728         while (!list_empty(&exp->exp_outstanding_replies)) {
729                 struct ptlrpc_reply_state *rs =
730                         list_entry(exp->exp_outstanding_replies.next,
731                                    struct ptlrpc_reply_state, rs_exp_list);
732                 struct ptlrpc_service *svc = rs->rs_srv_ni->sni_service;
733
734                 spin_lock(&svc->srv_lock);
735                 list_del_init(&rs->rs_exp_list);
736                 ptlrpc_schedule_difficult_reply(rs);
737                 spin_unlock(&svc->srv_lock);
738         }
739         spin_unlock_irqrestore(&exp->exp_lock, irqflags);
740         RETURN(rc);
741 }
742
743 static int mds_getstatus(struct ptlrpc_request *req)
744 {
745         struct mds_obd *mds = mds_req2mds(req);
746         struct mds_body *body;
747         int rc, size;
748         ENTRY;
749
750         size = sizeof(*body);
751         
752         rc = lustre_pack_reply(req, 1, &size, NULL);
753         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_GETSTATUS_PACK)) {
754                 CERROR("mds: out of memory for message: size=%d\n", size);
755                 req->rq_status = -ENOMEM;       /* superfluous? */
756                 RETURN(-ENOMEM);
757         }
758
759         body = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*body));
760         body->valid |= OBD_MD_FID;
761         
762         memcpy(&body->id1, &mds->mds_rootid, sizeof(body->id1));
763
764         /*
765          * the last_committed and last_xid fields are filled in for all replies
766          * already - no need to do so here also.
767          */
768         RETURN(0);
769 }
770
771 int mds_blocking_ast(struct ldlm_lock *lock, struct ldlm_lock_desc *desc,
772                      void *data, int flag)
773 {
774         int do_ast;
775         ENTRY;
776
777         if (flag == LDLM_CB_CANCELING) {
778                 /* Don't need to do anything here. */
779                 RETURN(0);
780         }
781
782         /* XXX layering violation!  -phil */
783         l_lock(&lock->l_resource->lr_namespace->ns_lock);
784         
785         /*
786          * get this: if mds_blocking_ast is racing with mds_intent_policy, such
787          * that mds_blocking_ast is called just before l_i_p takes the ns_lock,
788          * then by the time we get the lock, we might not be the correct
789          * blocking function anymore.  So check, and return early, if so.
790          */
791         if (lock->l_blocking_ast != mds_blocking_ast) {
792                 l_unlock(&lock->l_resource->lr_namespace->ns_lock);
793                 RETURN(0);
794         }
795
796         lock->l_flags |= LDLM_FL_CBPENDING;
797         do_ast = (!lock->l_readers && !lock->l_writers);
798         l_unlock(&lock->l_resource->lr_namespace->ns_lock);
799
800         if (do_ast) {
801                 struct lustre_handle lockh;
802                 int rc;
803
804                 LDLM_DEBUG(lock, "already unused, calling ldlm_cli_cancel");
805                 ldlm_lock2handle(lock, &lockh);
806                 rc = ldlm_cli_cancel(&lockh);
807                 if (rc < 0)
808                         CERROR("ldlm_cli_cancel: %d\n", rc);
809         } else {
810                 LDLM_DEBUG(lock, "Lock still has references, will be "
811                            "cancelled later");
812         }
813         RETURN(0);
814 }
815
816 static int mds_convert_md(struct obd_device *obd, struct inode *inode,
817                           void *md, int size, int mea)
818 {
819         int rc = size;
820         
821         if (S_ISREG(inode->i_mode)) {
822                 rc = mds_convert_lov_ea(obd, inode, md, size);
823         } else if (S_ISDIR(inode->i_mode)) {
824                 if (mea) {
825                         rc = mds_convert_mea_ea(obd, inode, md, size);
826                 } else {
827                         rc = mds_convert_lov_ea(obd, inode, md, size);
828                 }
829                 if (rc == -EINVAL) {
830                         CERROR("Invalid EA format (nor LOV or MEA) "
831                                "is detected. Inode %lu/%u\n",
832                                inode->i_ino, inode->i_generation);
833                 }
834         }
835         return rc;
836 }
837
838 int mds_get_md(struct obd_device *obd, struct inode *inode,
839                void *md, int *size, int lock, int mea)
840 {
841         int lmm_size;
842         int rc = 0;
843         ENTRY;
844
845         if (lock)
846                 down(&inode->i_sem);
847
848         rc = fsfilt_get_md(obd, inode, md, *size,
849                            (mea ? EA_MEA : EA_LOV));
850         if (rc < 0) {
851                 CERROR("Error %d reading eadata for ino %lu\n",
852                        rc, inode->i_ino);
853         } else if (rc > 0) {
854                 lmm_size = rc;
855                 rc = mds_convert_md(obd, inode, md,
856                                     lmm_size, mea);
857                 if (rc == 0) {
858                         *size = lmm_size;
859                         rc = lmm_size;
860                 } else if (rc > 0) {
861                         *size = rc;
862                 }
863         }
864         if (lock)
865                 up(&inode->i_sem);
866
867         RETURN(rc);
868 }
869
870
871 /* Call with lock=1 if you want mds_pack_md to take the i_sem.
872  * Call with lock=0 if the caller has already taken the i_sem. */
873 int mds_pack_md(struct obd_device *obd, struct lustre_msg *msg, int offset,
874                 struct mds_body *body, struct inode *inode, int lock, int mea)
875 {
876         struct mds_obd *mds = &obd->u.mds;
877         void *lmm;
878         int lmm_size;
879         int rc;
880         ENTRY;
881
882         lmm = lustre_msg_buf(msg, offset, 0);
883         if (lmm == NULL) {
884                 /* Some problem with getting eadata when I sized the reply
885                  * buffer... */
886                 CDEBUG(D_INFO, "no space reserved for inode %lu MD\n",
887                        inode->i_ino);
888                 RETURN(0);
889         }
890         lmm_size = msg->buflens[offset];
891
892         /* I don't really like this, but it is a sanity check on the client
893          * MD request.  However, if the client doesn't know how much space
894          * to reserve for the MD, it shouldn't be bad to have too much space.
895          */
896         if (lmm_size > mds->mds_max_mdsize) {
897                 CWARN("Reading MD for inode %lu of %d bytes > max %d\n",
898                        inode->i_ino, lmm_size, mds->mds_max_mdsize);
899                 // RETURN(-EINVAL);
900         }
901
902         rc = mds_get_md(obd, inode, lmm, &lmm_size, lock, mea);
903         if (rc > 0) {
904                 if (S_ISDIR(inode->i_mode))
905                         body->valid |= OBD_MD_FLDIREA;
906                 else
907                         body->valid |= OBD_MD_FLEASIZE;
908
909                 if (mea)
910                         body->valid |= OBD_MD_MEA;
911                 
912                 body->eadatasize = lmm_size;
913                 rc = 0;
914         }
915
916         RETURN(rc);
917 }
918 int mds_pack_link(struct dentry *dentry, struct ptlrpc_request *req,
919                   struct mds_body *repbody, int reply_off)
920 {
921         struct inode *inode = dentry->d_inode;
922         char *symname;
923         int len, rc;
924         ENTRY;
925
926         symname = lustre_msg_buf(req->rq_repmsg, reply_off + 1,0);
927         LASSERT(symname != NULL);
928         len = req->rq_repmsg->buflens[reply_off + 1];
929         
930         rc = inode->i_op->readlink(dentry, symname, len);
931         if (rc < 0) {
932                 CERROR("readlink failed: %d\n", rc);
933         } else if (rc != len - 1) {
934                 CERROR ("Unexpected readlink rc %d: expecting %d\n",
935                         rc, len - 1);
936                 rc = -EINVAL;
937         } else {
938                 CDEBUG(D_INODE, "read symlink dest %s\n", symname);
939                 repbody->valid |= OBD_MD_LINKNAME;
940                 repbody->eadatasize = rc + 1;
941                 symname[rc] = 0;        /* NULL terminate */
942                 rc = 0;
943         }
944
945         RETURN(rc);
946 }
947
948 int mds_pack_ea(struct dentry *dentry, struct ptlrpc_request *req,
949                 struct mds_body *repbody, int req_off, int reply_off)
950 {
951         struct inode *inode = dentry->d_inode;
952         char *ea_name;
953         void *value = NULL;
954         int len, rc;
955         ENTRY;
956
957         ea_name = lustre_msg_string(req->rq_reqmsg, req_off + 1, 0);
958         len = req->rq_repmsg->buflens[reply_off + 1];
959         if (len != 0)
960                 value = lustre_msg_buf(req->rq_repmsg, reply_off + 1, len);
961
962         rc = -EOPNOTSUPP;
963         if (inode->i_op && inode->i_op->getxattr) 
964                 rc = inode->i_op->getxattr(dentry, ea_name, value, len);
965
966         if (rc < 0) {
967                 if (rc != -ENODATA && rc != -EOPNOTSUPP)
968                         CERROR("getxattr failed: %d", rc);
969         } else {
970                 repbody->valid |= OBD_MD_FLEA;
971                 repbody->eadatasize = rc;
972                 rc = 0;
973         }
974
975         RETURN(rc);        
976 }
977
978 int mds_pack_ealist(struct dentry *dentry, struct ptlrpc_request *req,
979                     struct mds_body *repbody, int reply_off)
980 {
981         struct inode *inode = dentry->d_inode;        
982         void *value = NULL;
983         int len, rc;
984         ENTRY;
985
986         len = req->rq_repmsg->buflens[reply_off + 1];
987         if (len != 0)
988                 value = lustre_msg_buf(req->rq_repmsg, reply_off + 1, len);
989
990         rc = -EOPNOTSUPP;
991         if (inode->i_op && inode->i_op->getxattr) 
992                 rc = inode->i_op->listxattr(dentry, value, len);
993
994         if (rc < 0) {
995                 CERROR("listxattr failed: %d", rc);
996         } else {
997                 repbody->valid |= OBD_MD_FLEALIST;
998                 repbody->eadatasize = rc;
999                 rc = 0;
1000         }
1001         RETURN(rc);
1002 }
1003
1004 int mds_pack_acl(struct obd_device *obd, struct lustre_msg *repmsg, int offset,
1005                  struct mds_body *body, struct inode *inode)
1006 {
1007         struct dentry de = { .d_inode = inode };
1008         __u32 buflen, *sizep;
1009         void *buf;
1010         int size;
1011         ENTRY;
1012
1013         if (!inode->i_op->getxattr)
1014                 RETURN(0);
1015
1016         buflen = repmsg->buflens[offset + 1];
1017         buf = lustre_msg_buf(repmsg, offset + 1, buflen);
1018
1019         size = inode->i_op->getxattr(&de, XATTR_NAME_ACL_ACCESS, buf, buflen);
1020         if (size == -ENODATA || size == -EOPNOTSUPP)
1021                 RETURN(0);
1022         if (size < 0)
1023                 RETURN(size);
1024         LASSERT(size);
1025
1026         sizep = lustre_msg_buf(repmsg, offset, 4);
1027         if (!sizep) {
1028                 CERROR("can't locate returned acl size buf\n");
1029                 RETURN(-EPROTO);
1030         }
1031
1032         *sizep = cpu_to_le32(size);
1033         body->valid |= OBD_MD_FLACL_ACCESS;
1034
1035         RETURN(0);
1036 }
1037
1038 /* 
1039  * here we take simple rule: once uid/fsuid is root, we also squash
1040  * the gid/fsgid, don't care setuid/setgid attributes.
1041  */
1042 int mds_squash_root(struct mds_obd *mds, struct mds_req_sec_desc *rsd,
1043                     ptl_nid_t *peernid)
1044 {
1045         if (!mds->mds_squash_uid || *peernid == mds->mds_nosquash_nid)
1046                 return 0;
1047
1048         if (rsd->rsd_uid && rsd->rsd_fsuid)
1049                 return 0;
1050
1051         CDEBUG(D_SEC, "squash req from "LPX64":"
1052                "(%u:%u-%u:%u/%x)=>(%u:%u-%u:%u/%x)\n", *peernid,
1053                 rsd->rsd_uid, rsd->rsd_gid,
1054                 rsd->rsd_fsuid, rsd->rsd_fsgid, rsd->rsd_cap,
1055                 rsd->rsd_uid ? rsd->rsd_uid : mds->mds_squash_uid,
1056                 rsd->rsd_uid ? rsd->rsd_gid : mds->mds_squash_gid,
1057                 rsd->rsd_fsuid ? rsd->rsd_fsuid : mds->mds_squash_uid,
1058                 rsd->rsd_fsuid ? rsd->rsd_fsgid : mds->mds_squash_gid,
1059                 rsd->rsd_cap & ~CAP_FS_MASK);
1060
1061         if (rsd->rsd_uid == 0) {
1062                 rsd->rsd_uid = mds->mds_squash_uid;
1063                 rsd->rsd_gid = mds->mds_squash_gid;
1064         }
1065         if (rsd->rsd_fsuid == 0) {
1066                 rsd->rsd_fsuid = mds->mds_squash_uid;
1067                 rsd->rsd_fsgid = mds->mds_squash_gid;
1068         }
1069         rsd->rsd_cap &= ~CAP_FS_MASK;
1070
1071         return 1;
1072 }
1073
1074 static int mds_getattr_internal(struct obd_device *obd, struct dentry *dentry,
1075                                 struct ptlrpc_request *req, int req_off,
1076                                 struct mds_body *reqbody, int reply_off)
1077 {
1078         struct mds_export_data *med = &req->rq_export->u.eu_mds_data;
1079         struct inode *inode = dentry->d_inode;
1080         struct mds_body *body;
1081         int rc = 0;
1082         ENTRY;
1083
1084         if (inode == NULL && !(dentry->d_flags & DCACHE_CROSS_REF))
1085                 RETURN(-ENOENT);
1086
1087         body = lustre_msg_buf(req->rq_repmsg, reply_off, sizeof(*body));
1088         LASSERT(body != NULL);                 /* caller prepped reply */
1089
1090         if (dentry->d_flags & DCACHE_CROSS_REF) {
1091                 mds_pack_dentry2body(obd, body, dentry,
1092                                      (reqbody->valid & OBD_MD_FID) ? 1 : 0);
1093                 CDEBUG(D_OTHER, "cross reference: "DLID4"\n",
1094                        OLID4(&body->id1));
1095                 RETURN(0);
1096         }
1097         
1098         mds_pack_inode2body(obd, body, inode,
1099                             (reqbody->valid & OBD_MD_FID) ? 1 : 0);
1100
1101         if ((S_ISREG(inode->i_mode) && (reqbody->valid & OBD_MD_FLEASIZE)) ||
1102             (S_ISDIR(inode->i_mode) && (reqbody->valid & OBD_MD_FLDIREA))) {
1103             
1104                 /* guessing what kind og attribute do we need. */
1105                 int is_mea = (S_ISDIR(inode->i_mode) && 
1106                     (reqbody->valid & OBD_MD_MEA) != 0);
1107                 
1108                 rc = mds_pack_md(obd, req->rq_repmsg, reply_off + 1, 
1109                                  body, inode, 1, is_mea);
1110
1111                 /* if we have LOV EA data, the OST holds size, atime, mtime. */
1112                 if (!(body->valid & OBD_MD_FLEASIZE) &&
1113                     !(body->valid & OBD_MD_FLDIREA))
1114                         body->valid |= (OBD_MD_FLSIZE | OBD_MD_FLBLOCKS |
1115                                         OBD_MD_FLATIME | OBD_MD_FLMTIME);
1116         } else if (S_ISLNK(inode->i_mode) &&
1117                    (reqbody->valid & OBD_MD_LINKNAME) != 0) {
1118                 rc = mds_pack_link(dentry, req, body, reply_off);
1119         } else if (reqbody->valid & OBD_MD_FLEA) {
1120                 rc = mds_pack_ea(dentry, req, body, req_off, reply_off);
1121         } else if (reqbody->valid & OBD_MD_FLEALIST) {
1122                 rc = mds_pack_ealist(dentry, req, body, reply_off);
1123         }
1124         
1125         if (reqbody->valid & OBD_MD_FLACL_ACCESS) {
1126                 int inc = (reqbody->valid & OBD_MD_FLEASIZE) ? 2 : 1;
1127                 rc = mds_pack_acl(obd, req->rq_repmsg, reply_off + inc, 
1128                                   body, inode);
1129         }                
1130
1131         if (rc == 0)
1132                 mds_body_do_reverse_map(med, body);
1133
1134         RETURN(rc);
1135 }
1136
1137 static int mds_getattr_pack_msg_cf(struct ptlrpc_request *req,
1138                                    struct dentry *dentry,
1139                                    int offset)
1140 {
1141         int rc = 0, size[1] = {sizeof(struct mds_body)};
1142         ENTRY;
1143
1144         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_GETATTR_PACK)) {
1145                 CERROR("failed MDS_GETATTR_PACK test\n");
1146                 req->rq_status = -ENOMEM;
1147                 RETURN(-ENOMEM);
1148         }
1149
1150         rc = lustre_pack_reply(req, 1, size, NULL);
1151         if (rc) {
1152                 CERROR("lustre_pack_reply failed: rc %d\n", rc);
1153                 GOTO(out, req->rq_status = rc);
1154         }
1155
1156         EXIT;
1157 out:
1158         return rc;
1159 }
1160
1161 static int mds_getattr_pack_msg(struct ptlrpc_request *req, struct dentry *de,
1162                                 int offset)
1163 {
1164         struct inode *inode = de->d_inode;
1165         struct mds_obd *mds = mds_req2mds(req);
1166         struct mds_body *body;
1167         int rc = 0, size[4] = {sizeof(*body)}, bufcount = 1;
1168         ENTRY;
1169
1170         body = lustre_msg_buf(req->rq_reqmsg, offset, sizeof(*body));
1171         LASSERT(body != NULL);                 /* checked by caller */
1172         LASSERT_REQSWABBED(req, offset);       /* swabbed by caller */
1173
1174         if ((S_ISREG(inode->i_mode) && (body->valid & OBD_MD_FLEASIZE)) ||
1175             (S_ISDIR(inode->i_mode) && (body->valid & OBD_MD_FLDIREA))) {
1176                 int rc;
1177                 
1178                 down(&inode->i_sem);
1179                 rc = fsfilt_get_md(req->rq_export->exp_obd, inode, NULL, 0,
1180                                    ((body->valid & OBD_MD_MEA) ? EA_MEA : EA_LOV));
1181                 up(&inode->i_sem);
1182                 if (rc < 0) {
1183                         if (rc != -ENODATA && rc != -EOPNOTSUPP)
1184                                 CERROR("error getting inode %lu MD: rc = %d\n",
1185                                        inode->i_ino, rc);
1186                         size[bufcount] = 0;
1187                 } else if (rc > mds->mds_max_mdsize) {
1188                         size[bufcount] = 0;
1189                         CERROR("MD size %d larger than maximum possible %u\n",
1190                                rc, mds->mds_max_mdsize);
1191                 } else {
1192                         size[bufcount] = rc;
1193                 }
1194                 bufcount++;
1195         } else if (S_ISLNK(inode->i_mode) && (body->valid & OBD_MD_LINKNAME)) {
1196                 if (inode->i_size + 1 != body->eadatasize)
1197                         CERROR("symlink size: %Lu, reply space: %d\n",
1198                                inode->i_size + 1, body->eadatasize);
1199                 size[bufcount] = min_t(int, inode->i_size+1, body->eadatasize);
1200                 bufcount++;
1201                 CDEBUG(D_INODE, "symlink size: %Lu, reply space: %d\n",
1202                        inode->i_size + 1, body->eadatasize);
1203         } else if ((body->valid & OBD_MD_FLEA)) {
1204                 char *ea_name = lustre_msg_string(req->rq_reqmsg, 
1205                                                   offset + 1, 0);
1206                 rc = -EOPNOTSUPP;
1207                 if (inode->i_op && inode->i_op->getxattr) 
1208                         rc = inode->i_op->getxattr(de, ea_name, NULL, 0);
1209                 
1210                 if (rc < 0) {
1211                         if (rc != -ENODATA && rc != -EOPNOTSUPP)
1212                                 CERROR("error getting inode %lu EA: rc = %d\n",
1213                                        inode->i_ino, rc);
1214                         size[bufcount] = 0;
1215                 } else {
1216                         size[bufcount] = min_t(int, body->eadatasize, rc);
1217                 }
1218                 bufcount++;
1219         } else if (body->valid & OBD_MD_FLEALIST) {
1220                 rc = -EOPNOTSUPP;
1221                 if (inode->i_op && inode->i_op->getxattr) 
1222                         rc = inode->i_op->listxattr(de, NULL, 0);
1223
1224                 if (rc < 0) {
1225                         if (rc != -ENODATA && rc != -EOPNOTSUPP)
1226                                 CERROR("error getting inode %lu EA: rc = %d\n",
1227                                        inode->i_ino, rc);
1228                         size[bufcount] = 0;
1229                 } else {
1230                         size[bufcount] = min_t(int, body->eadatasize, rc);
1231                 }
1232                 bufcount++;
1233         }
1234         
1235         /* may co-exist with OBD_MD_FLEASIZE */
1236         if (body->valid & OBD_MD_FLACL_ACCESS) {
1237                 size[bufcount++] = 4;
1238                 size[bufcount++] = xattr_acl_size(LL_ACL_MAX_ENTRIES);
1239         }
1240
1241         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_GETATTR_PACK)) {
1242                 CERROR("failed MDS_GETATTR_PACK test\n");
1243                 req->rq_status = -ENOMEM;
1244                 GOTO(out, rc = -ENOMEM);
1245         }
1246
1247         rc = lustre_pack_reply(req, bufcount, size, NULL);
1248         if (rc) {
1249                 CERROR("out of memory\n");
1250                 GOTO(out, req->rq_status = rc);
1251         }
1252
1253         EXIT;
1254  out:
1255         return rc;
1256 }
1257
1258 int mds_check_mds_num(struct obd_device *obd, struct inode *inode,
1259                       char *name, int namelen)
1260 {
1261         struct mea *mea = NULL;
1262         int mea_size, rc = 0;
1263         ENTRY;
1264         
1265         rc = mds_md_get_attr(obd, inode, &mea, &mea_size);
1266         if (rc)
1267                 RETURN(rc);
1268         if (mea != NULL) {
1269                 /*
1270                  * dir is already splitted, check if requested filename should
1271                  * live at this MDS or at another one.
1272                  */
1273                 int i = mea_name2idx(mea, name, namelen - 1);
1274                 if (mea->mea_master != id_group(&mea->mea_ids[i])) {
1275                         CDEBUG(D_OTHER,
1276                                "inapropriate MDS(%d) for %s. should be "
1277                                "%lu(%d)\n", mea->mea_master, name, 
1278                                (unsigned long)id_group(&mea->mea_ids[i]), i);
1279                         rc = -ERESTART;
1280                 }
1281         }
1282
1283         if (mea)
1284                 OBD_FREE(mea, mea_size);
1285         RETURN(rc);
1286 }
1287
1288 static int mds_getattr_lock(struct ptlrpc_request *req, int offset,
1289                             struct lustre_handle *child_lockh, int child_part)
1290 {
1291         struct obd_device *obd = req->rq_export->exp_obd;
1292         struct mds_obd *mds = &obd->u.mds;
1293         struct ldlm_reply *rep = NULL;
1294         struct lvfs_run_ctxt saved;
1295         struct mds_req_sec_desc *rsd;
1296         struct mds_body *body;
1297         struct dentry *dparent = NULL, *dchild = NULL;
1298         struct lvfs_ucred uc = {NULL, NULL,};
1299         struct lustre_handle parent_lockh[2] = {{0}, {0}};
1300         unsigned int namesize;
1301         int rc = 0, cleanup_phase = 0, resent_req = 0, update_mode, reply_offset;
1302         char *name = NULL;
1303         ENTRY;
1304
1305         LASSERT(!strcmp(obd->obd_type->typ_name, LUSTRE_MDS_NAME));
1306         MD_COUNTER_INCREMENT(obd, getattr_lock);
1307
1308         rsd = lustre_swab_mds_secdesc(req, MDS_REQ_SECDESC_OFF);
1309         if (!rsd) {
1310                 CERROR("Can't unpack security desc\n");
1311                 RETURN(-EFAULT);
1312         }
1313
1314         /* swab now, before anyone looks inside the request. */
1315         body = lustre_swab_reqbuf(req, offset, sizeof(*body),
1316                                   lustre_swab_mds_body);
1317         if (body == NULL) {
1318                 CERROR("Can't swab mds_body\n");
1319                 GOTO(cleanup, rc = -EFAULT);
1320         }
1321
1322         LASSERT_REQSWAB(req, offset + 1);
1323         name = lustre_msg_string(req->rq_reqmsg, offset + 1, 0);
1324         if (name == NULL) {
1325                 CERROR("Can't unpack name\n");
1326                 GOTO(cleanup, rc = -EFAULT);
1327         }
1328         namesize = req->rq_reqmsg->buflens[offset + 1];
1329
1330         /* namesize less than 2 means we have empty name, probably came from
1331            revalidate by cfid, so no point in having name to be set */
1332         if (namesize <= 1)
1333                 name = NULL;
1334
1335         LASSERT (offset == 1 || offset == 3);
1336         if (offset == 3) {
1337                 rep = lustre_msg_buf(req->rq_repmsg, 0, sizeof (*rep));
1338                 reply_offset = 1;
1339         } else {
1340                 reply_offset = 0;
1341         }
1342
1343         rc = mds_init_ucred(&uc, req, rsd);
1344         if (rc) {
1345                 GOTO(cleanup, rc);
1346         }
1347
1348         push_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
1349         cleanup_phase = 1; /* kernel context */
1350         intent_set_disposition(rep, DISP_LOOKUP_EXECD);
1351
1352         LASSERT(namesize > 0);
1353         if (child_lockh->cookie != 0) {
1354                 LASSERT(lustre_msg_get_flags(req->rq_reqmsg) & MSG_RESENT);
1355                 resent_req = 1;
1356         }
1357 #if HAVE_LOOKUP_RAW
1358         if (body->valid == OBD_MD_FLID) {
1359                 struct mds_body *mds_reply;
1360                 int size = sizeof(*mds_reply);
1361                 struct inode *dir;
1362                 ino_t inum;
1363
1364                 dparent = mds_id2dentry(obd, &body->id1, NULL);
1365                 if (IS_ERR(dparent)) {
1366                         rc = PTR_ERR(dparent);
1367                         GOTO(cleanup, rc);
1368                 }
1369                 /*
1370                  * the user requested ONLY the inode number, so do a raw lookup.
1371                  */
1372                 rc = lustre_pack_reply(req, 1, &size, NULL);
1373                 if (rc) {
1374                         CERROR("out of memory\n");
1375                         l_dput(dparent);
1376                         GOTO(cleanup, rc);
1377                 }
1378                 dir  = dparent->d_inode;
1379                 LASSERT(dir->i_op->lookup_raw != NULL);
1380                 rc = dir->i_op->lookup_raw(dir, name, namesize - 1, &inum);
1381                 l_dput(dparent);
1382                 mds_reply = lustre_msg_buf(req->rq_repmsg, 0,
1383                                            sizeof(*mds_reply));
1384
1385                 id_ino(&mds_reply->id1) = inum;
1386                 mds_reply->valid = OBD_MD_FLID;
1387                 GOTO(cleanup, rc);
1388         }
1389 #endif
1390         if (resent_req == 0) {
1391                 LASSERT(id_fid(&body->id1) != 0);
1392                 if (name) {
1393                         rc = mds_get_parent_child_locked(obd, mds, &body->id1,
1394                                                          parent_lockh, &dparent,
1395                                                          LCK_PR, 
1396                                                          MDS_INODELOCK_UPDATE,
1397                                                          &update_mode, 
1398                                                          name, namesize,
1399                                                          child_lockh, &dchild, 
1400                                                          LCK_PR, child_part);
1401                         if (rc)
1402                                 GOTO(cleanup, rc);
1403                 
1404                         cleanup_phase = 2; /* dchild, dparent, locks */
1405                         
1406                         /*
1407                          * let's make sure this name should leave on this mds
1408                          * node.
1409                          */
1410                         rc = mds_check_mds_num(obd, dparent->d_inode, name, namesize);
1411                         if (rc)
1412                                 GOTO(cleanup, rc);
1413                 } else {
1414                         /* we have no dentry here, drop LOOKUP bit */
1415                         /* FIXME: we need MDS_INODELOCK_LOOKUP or not. */
1416                         child_part &= ~MDS_INODELOCK_LOOKUP;
1417                         CDEBUG(D_OTHER, "%s: retrieve attrs for "DLID4"\n",
1418                                obd->obd_name, OLID4(&body->id1));
1419
1420                         dchild = mds_id2locked_dentry(obd, &body->id1, NULL,
1421                                                       LCK_PR, parent_lockh,
1422                                                       &update_mode,
1423                                                       NULL, 0, 
1424                                                       MDS_INODELOCK_UPDATE);
1425                         if (IS_ERR(dchild)) {
1426                                 CERROR("can't find inode with id "DLID4", err = %d\n", 
1427                                        OLID4(&body->id1), (int)PTR_ERR(dchild));
1428                                 GOTO(cleanup, rc = PTR_ERR(dchild));
1429                         }
1430                         memcpy(child_lockh, parent_lockh, sizeof(parent_lockh[0]));
1431                 }
1432         } else {
1433                 struct ldlm_lock *granted_lock;
1434
1435                 DEBUG_REQ(D_DLMTRACE, req, "resent, not enqueuing new locks");
1436                 granted_lock = ldlm_handle2lock(child_lockh);
1437
1438                 LASSERTF(granted_lock != NULL, LPU64"/%lu lockh "LPX64"\n",
1439                          id_fid(&body->id1), (unsigned long)id_group(&body->id1),
1440                          child_lockh->cookie);
1441
1442                 if (name) {
1443                         /* usual named request */
1444                         dparent = mds_id2dentry(obd, &body->id1, NULL);
1445                         LASSERT(!IS_ERR(dparent));
1446                         dchild = ll_lookup_one_len(name, dparent, namesize - 1);
1447                         LASSERT(!IS_ERR(dchild));
1448                 } else {
1449                         /* client wants to get attr. by id */
1450                         dchild = mds_id2dentry(obd, &body->id1, NULL);
1451                         LASSERT(!IS_ERR(dchild));
1452                 }
1453                 LDLM_LOCK_PUT(granted_lock);
1454         }
1455
1456         cleanup_phase = 2; /* dchild, dparent, locks */
1457
1458         if (!DENTRY_VALID(dchild)) {
1459                 intent_set_disposition(rep, DISP_LOOKUP_NEG);
1460                 /*
1461                  * in the intent case, the policy clears this error: the
1462                  * disposition is enough.
1463                  */
1464                 rc = -ENOENT;
1465                 GOTO(cleanup, rc);
1466         } else {
1467                 intent_set_disposition(rep, DISP_LOOKUP_POS);
1468         }
1469
1470         if (req->rq_repmsg == NULL) {
1471                 if (dchild->d_flags & DCACHE_CROSS_REF)
1472                         rc = mds_getattr_pack_msg_cf(req, dchild, offset);
1473                 else
1474                         rc = mds_getattr_pack_msg(req, dchild, offset);
1475                 if (rc != 0) {
1476                         CERROR ("mds_getattr_pack_msg: %d\n", rc);
1477                         GOTO (cleanup, rc);
1478                 }
1479         }
1480
1481         rc = mds_getattr_internal(obd, dchild, req, offset, body, reply_offset);        
1482         GOTO(cleanup, rc); /* returns the lock to the client */
1483
1484  cleanup:
1485         switch (cleanup_phase) {
1486         case 2:
1487                 if (resent_req == 0) {
1488                         if (rc && DENTRY_VALID(dchild))
1489                                 ldlm_lock_decref(child_lockh, LCK_PR);
1490                         if (name)
1491                                 ldlm_lock_decref(parent_lockh, LCK_PR);
1492 #ifdef S_PDIROPS
1493                         if (parent_lockh[1].cookie != 0)
1494                                 ldlm_lock_decref(parent_lockh + 1, update_mode);
1495 #endif
1496                         if (dparent)
1497                                 l_dput(dparent);
1498                 }
1499                 l_dput(dchild);
1500         case 1:
1501                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
1502         default:
1503                 mds_exit_ucred(&uc);
1504         }
1505         return rc;
1506 }
1507
1508 static int mds_getattr(struct ptlrpc_request *req, int offset)
1509 {
1510         struct obd_device *obd = req->rq_export->exp_obd;
1511         struct lvfs_run_ctxt saved;
1512         struct dentry *de;
1513         struct mds_req_sec_desc *rsd;
1514         struct mds_body *body;
1515         struct lvfs_ucred uc = {NULL, NULL,};
1516         int rc = 0;
1517         ENTRY;
1518
1519         MD_COUNTER_INCREMENT(obd, getattr);
1520
1521         rsd = lustre_swab_mds_secdesc(req, MDS_REQ_SECDESC_OFF);
1522         if (!rsd) {
1523                 CERROR("Can't unpack security desc\n");
1524                 RETURN(-EFAULT);
1525         }
1526
1527         body = lustre_swab_reqbuf(req, offset, sizeof(*body),
1528                                   lustre_swab_mds_body);
1529         if (body == NULL) {
1530                 CERROR ("Can't unpack body\n");
1531                 RETURN (-EFAULT);
1532         }
1533
1534         rc = mds_init_ucred(&uc, req, rsd);
1535         if (rc) {
1536                 mds_exit_ucred(&uc);
1537                 RETURN(rc);
1538         }
1539
1540         push_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
1541         de = mds_id2dentry(obd, &body->id1, NULL);
1542         if (IS_ERR(de)) {
1543                 rc = req->rq_status = PTR_ERR(de);
1544                 GOTO(out_pop, rc);
1545         }
1546
1547         rc = mds_getattr_pack_msg(req, de, offset);
1548         if (rc != 0) {
1549                 CERROR("mds_getattr_pack_msg: %d\n", rc);
1550                 GOTO(out_pop, rc);
1551         }
1552
1553         req->rq_status = mds_getattr_internal(obd, de, req, offset, body, 0);
1554         l_dput(de);
1555
1556         EXIT;
1557 out_pop:
1558         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
1559         mds_exit_ucred(&uc);
1560         return rc;
1561 }
1562
1563 static int mds_obd_statfs(struct obd_device *obd, struct obd_statfs *osfs,
1564                           unsigned long max_age)
1565 {
1566         int rc;
1567         ENTRY;
1568
1569         spin_lock(&obd->obd_osfs_lock);
1570         rc = fsfilt_statfs(obd, obd->u.mds.mds_sb, max_age);
1571         if (rc == 0)
1572                 memcpy(osfs, &obd->obd_osfs, sizeof(*osfs));
1573         spin_unlock(&obd->obd_osfs_lock);
1574
1575         RETURN(rc);
1576 }
1577
1578 static int mds_statfs(struct ptlrpc_request *req)
1579 {
1580         struct obd_device *obd = req->rq_export->exp_obd;
1581         int rc, size = sizeof(struct obd_statfs);
1582         ENTRY;
1583
1584         /* This will trigger a watchdog timeout */
1585         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_STATFS_LCW_SLEEP,
1586                          (MDS_SERVICE_WATCHDOG_TIMEOUT / 1000) + 1);
1587
1588         rc = lustre_pack_reply(req, 1, &size, NULL);
1589         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_STATFS_PACK)) {
1590                 CERROR("mds: statfs lustre_pack_reply failed: rc = %d\n", rc);
1591                 GOTO(out, rc);
1592         }
1593
1594         OBD_COUNTER_INCREMENT(obd, statfs);
1595
1596         /* We call this so that we can cache a bit - 1 jiffie worth */
1597         rc = mds_obd_statfs(obd, lustre_msg_buf(req->rq_repmsg, 0, size),
1598                             jiffies - HZ);
1599         if (rc) {
1600                 CERROR("mds_obd_statfs failed: rc %d\n", rc);
1601                 GOTO(out, rc);
1602         }
1603
1604         EXIT;
1605 out:
1606         req->rq_status = rc;
1607         return rc;
1608 }
1609
1610 static int mds_sync(struct ptlrpc_request *req, int offset)
1611 {
1612         struct obd_device *obd = req->rq_export->exp_obd;
1613         struct mds_obd *mds = &obd->u.mds;
1614         struct mds_body *body;
1615         int rc, size = sizeof(*body);
1616         ENTRY;
1617
1618         body = lustre_swab_reqbuf(req, offset, sizeof(*body),
1619                                   lustre_swab_mds_body);
1620         if (body == NULL)
1621                 GOTO(out, rc = -EPROTO);
1622
1623         rc = lustre_pack_reply(req, 1, &size, NULL);
1624         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_SYNC_PACK)) {
1625                 CERROR("fsync lustre_pack_reply failed: rc = %d\n", rc);
1626                 GOTO(out, rc);
1627         }
1628
1629         if (id_ino(&body->id1) == 0) {
1630                 /* an id of zero is taken to mean "sync whole filesystem" */
1631                 rc = fsfilt_sync(obd, mds->mds_sb);
1632                 if (rc)
1633                         GOTO(out, rc);
1634         } else {
1635                 /* just any file to grab fsync method - "file" arg unused */
1636                 struct file *file = mds->mds_rcvd_filp;
1637                 struct mds_body *rep_body;
1638                 struct dentry *de;
1639
1640                 de = mds_id2dentry(obd, &body->id1, NULL);
1641                 if (IS_ERR(de))
1642                         GOTO(out, rc = PTR_ERR(de));
1643
1644                 rc = file->f_op->fsync(NULL, de, 1);
1645                 if (rc)
1646                         GOTO(out, rc);
1647
1648                 rep_body = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*rep_body));
1649                 mds_pack_inode2body(obd, rep_body, de->d_inode,
1650                                     (body->valid & OBD_MD_FID) ? 1 : 0);
1651                 l_dput(de);
1652         }
1653
1654         EXIT;
1655 out:
1656         req->rq_status = rc;
1657         return rc;
1658 }
1659
1660 /* mds_readpage does not take a DLM lock on the inode, because the client must
1661  * already have a PR lock.
1662  *
1663  * If we were to take another one here, a deadlock will result, if another
1664  * thread is already waiting for a PW lock. */
1665 static int mds_readpage(struct ptlrpc_request *req, int offset)
1666 {
1667         struct obd_device *obd = req->rq_export->exp_obd;
1668         struct vfsmount *mnt;
1669         struct dentry *de;
1670         struct file *file;
1671         struct mds_req_sec_desc *rsd;
1672         struct mds_body *body, *repbody;
1673         struct lvfs_run_ctxt saved;
1674         int rc, size = sizeof(*repbody);
1675         struct lvfs_ucred uc = {NULL, NULL,};
1676         ENTRY;
1677
1678         rc = lustre_pack_reply(req, 1, &size, NULL);
1679         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_READPAGE_PACK)) {
1680                 CERROR("mds: out of memory\n");
1681                 GOTO(out, rc = -ENOMEM);
1682         }
1683
1684         rsd = lustre_swab_mds_secdesc(req, MDS_REQ_SECDESC_OFF);
1685         if (!rsd) {
1686                 CERROR("Can't unpack security desc\n");
1687                 GOTO (out, rc = -EFAULT);
1688         }
1689
1690         body = lustre_swab_reqbuf(req, offset, sizeof(*body),
1691                                   lustre_swab_mds_body);
1692         if (body == NULL) {
1693                 CERROR("Can't unpack body\n");
1694                 GOTO (out, rc = -EFAULT);
1695         }
1696
1697         rc = mds_init_ucred(&uc, req, rsd);
1698         if (rc) {
1699                 GOTO(out, rc);
1700         }
1701
1702         push_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
1703         de = mds_id2dentry(obd, &body->id1, &mnt);
1704         if (IS_ERR(de))
1705                 GOTO(out_pop, rc = PTR_ERR(de));
1706
1707         CDEBUG(D_INODE, "ino %lu\n", de->d_inode->i_ino);
1708
1709         file = dentry_open(de, mnt, O_RDONLY | O_LARGEFILE);
1710         /* note: in case of an error, dentry_open puts dentry */
1711         if (IS_ERR(file))
1712                 GOTO(out_pop, rc = PTR_ERR(file));
1713
1714         /* body->size is actually the offset -eeb */
1715         if ((body->size & (de->d_inode->i_blksize - 1)) != 0) {
1716                 CERROR("offset "LPU64" not on a block boundary of %lu\n",
1717                        body->size, de->d_inode->i_blksize);
1718                 GOTO(out_file, rc = -EFAULT);
1719         }
1720
1721         /* body->nlink is actually the #bytes to read -eeb */
1722         if (body->nlink & (de->d_inode->i_blksize - 1)) {
1723                 CERROR("size %u is not multiple of blocksize %lu\n",
1724                        body->nlink, de->d_inode->i_blksize);
1725                 GOTO(out_file, rc = -EFAULT);
1726         }
1727
1728         repbody = lustre_msg_buf(req->rq_repmsg, 0, sizeof (*repbody));
1729         repbody->size = file->f_dentry->d_inode->i_size;
1730         repbody->valid = OBD_MD_FLSIZE;
1731
1732         /* to make this asynchronous make sure that the handling function
1733            doesn't send a reply when this function completes. Instead a
1734            callback function would send the reply */
1735         /* body->size is actually the offset -eeb */
1736         rc = mds_sendpage(req, file, body->size, body->nlink);
1737
1738         EXIT;
1739 out_file:
1740         filp_close(file, 0);
1741 out_pop:
1742         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
1743 out:
1744         mds_exit_ucred(&uc);
1745         req->rq_status = rc;
1746         return 0;
1747 }
1748
1749 /* update master MDS ID, which is stored in local inode EA. */
1750 int mds_update_mid(struct obd_device *obd, struct lustre_id *id,
1751                    void *data, int data_len)
1752 {
1753         struct mds_obd *mds = &obd->u.mds;
1754         struct dentry *dentry;
1755         void *handle;
1756         int rc = 0;
1757         ENTRY;
1758
1759         LASSERT(id);
1760         LASSERT(obd);
1761         
1762         dentry = mds_id2dentry(obd, id, NULL);
1763         if (IS_ERR(dentry))
1764                 GOTO(out, rc = PTR_ERR(dentry));
1765
1766         if (!dentry->d_inode) {
1767                 CERROR("Can't find object "DLID4".\n",
1768                        OLID4(id));
1769                 GOTO(out_dentry, rc = -EINVAL);
1770         }
1771
1772         handle = fsfilt_start(obd, dentry->d_inode,
1773                               FSFILT_OP_SETATTR, NULL);
1774         if (IS_ERR(handle))
1775                 GOTO(out_dentry, rc = PTR_ERR(handle));
1776
1777         rc = mds_update_inode_mid(obd, dentry->d_inode, handle,
1778                                   (struct lustre_id *)data);
1779         if (rc) {
1780                 CERROR("Can't update inode "DLID4" master id, "
1781                        "error = %d.\n", OLID4(id), rc);
1782                 GOTO(out_commit, rc);
1783         }
1784
1785         EXIT;
1786 out_commit:
1787         fsfilt_commit(obd, mds->mds_sb, dentry->d_inode,
1788                       handle, 0);
1789 out_dentry:
1790         l_dput(dentry);
1791 out:
1792         return rc;
1793 }
1794 EXPORT_SYMBOL(mds_update_mid);
1795
1796 /* read master MDS ID, which is stored in local inode EA. */
1797 int mds_read_mid(struct obd_device *obd, struct lustre_id *id,
1798                  void *data, int data_len)
1799 {
1800         struct dentry *dentry;
1801         int rc = 0;
1802         ENTRY;
1803
1804         LASSERT(id);
1805         LASSERT(obd);
1806         
1807         dentry = mds_id2dentry(obd, id, NULL);
1808         if (IS_ERR(dentry))
1809                 GOTO(out, rc = PTR_ERR(dentry));
1810
1811         if (!dentry->d_inode) {
1812                 CERROR("Can't find object "DLID4".\n",
1813                        OLID4(id));
1814                 GOTO(out_dentry, rc = -EINVAL);
1815         }
1816
1817         down(&dentry->d_inode->i_sem);
1818         rc = mds_read_inode_mid(obd, dentry->d_inode,
1819                                 (struct lustre_id *)data);
1820         up(&dentry->d_inode->i_sem);
1821         if (rc) {
1822                 CERROR("Can't read inode "DLID4" master id, "
1823                        "error = %d.\n", OLID4(id), rc);
1824                 GOTO(out_dentry, rc);
1825         }
1826
1827         EXIT;
1828 out_dentry:
1829         l_dput(dentry);
1830 out:
1831         return rc;
1832 }
1833 EXPORT_SYMBOL(mds_read_mid);
1834
1835 int mds_reint(struct ptlrpc_request *req, int offset,
1836               struct lustre_handle *lockh)
1837 {
1838         struct mds_update_record *rec;
1839         struct mds_req_sec_desc *rsd;
1840         int rc;
1841         ENTRY;
1842
1843         OBD_ALLOC(rec, sizeof(*rec));
1844         if (rec == NULL)
1845                 RETURN(-ENOMEM);
1846
1847         rsd = lustre_swab_mds_secdesc(req, MDS_REQ_SECDESC_OFF);
1848         if (!rsd) {
1849                 CERROR("Can't unpack security desc\n");
1850                 GOTO(out, rc = -EFAULT);
1851         }
1852
1853         rc = mds_update_unpack(req, offset, rec);
1854         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_UNPACK)) {
1855                 CERROR("invalid record\n");
1856                 GOTO(out, req->rq_status = -EINVAL);
1857         }
1858
1859         rc = mds_init_ucred(&rec->ur_uc, req, rsd);
1860         if (rc) {
1861                 GOTO(out, rc);
1862         }
1863
1864         /* rc will be used to interrupt a for loop over multiple records */
1865         rc = mds_reint_rec(rec, offset, req, lockh);
1866
1867  out:
1868         mds_exit_ucred(&rec->ur_uc);
1869         OBD_FREE(rec, sizeof(*rec));
1870         RETURN(rc);
1871 }
1872
1873 static int mds_filter_recovery_request(struct ptlrpc_request *req,
1874                                        struct obd_device *obd, int *process)
1875 {
1876         switch (req->rq_reqmsg->opc) {
1877         case MDS_CONNECT: /* This will never get here, but for completeness. */
1878         case OST_CONNECT: /* This will never get here, but for completeness. */
1879         case MDS_DISCONNECT:
1880         case OST_DISCONNECT:
1881                *process = 1;
1882                RETURN(0);
1883
1884         case MDS_CLOSE:
1885         case MDS_SYNC: /* used in unmounting */
1886         case OBD_PING:
1887         case MDS_REINT:
1888         case LDLM_ENQUEUE:
1889         case OST_CREATE:
1890                 *process = target_queue_recovery_request(req, obd);
1891                 RETURN(0);
1892
1893         default:
1894                 DEBUG_REQ(D_ERROR, req, "not permitted during recovery");
1895                 *process = 0;
1896                 /* XXX what should we set rq_status to here? */
1897                 req->rq_status = -EAGAIN;
1898                 RETURN(ptlrpc_error(req));
1899         }
1900 }
1901
1902 static char *reint_names[] = {
1903         [REINT_SETATTR] "setattr",
1904         [REINT_CREATE]  "create",
1905         [REINT_LINK]    "link",
1906         [REINT_UNLINK]  "unlink",
1907         [REINT_RENAME]  "rename",
1908         [REINT_OPEN]    "open",
1909 };
1910
1911 #define FILTER_VALID_FLAGS (OBD_MD_FLTYPE | OBD_MD_FLMODE | OBD_MD_FLGENER  | \
1912                             OBD_MD_FLSIZE | OBD_MD_FLBLOCKS | OBD_MD_FLBLKSZ| \
1913                             OBD_MD_FLATIME | OBD_MD_FLMTIME | OBD_MD_FLCTIME| \
1914                             OBD_MD_FLID) 
1915
1916 static void reconstruct_create(struct ptlrpc_request *req)
1917 {
1918         struct mds_export_data *med = &req->rq_export->exp_mds_data;
1919         struct mds_client_data *mcd = med->med_mcd;
1920         struct dentry *dentry;
1921         struct ost_body *body;
1922         struct lustre_id id;
1923         int rc;
1924         ENTRY;
1925
1926         /* copy rc, transno and disp; steal locks */
1927         mds_req_from_mcd(req, mcd);
1928         if (req->rq_status) {
1929                 EXIT;
1930                 return;
1931         }
1932
1933         id_gen(&id) = 0;
1934         id_group(&id) = 0;
1935
1936         id_ino(&id) = mcd->mcd_last_data;
1937         LASSERT(id_ino(&id) != 0);
1938
1939         dentry = mds_id2dentry(req2obd(req), &id, NULL);
1940         if (IS_ERR(dentry)) {
1941                 CERROR("can't find inode "LPU64"\n", id_ino(&id));
1942                 req->rq_status = PTR_ERR(dentry);
1943                 EXIT;
1944                 return;
1945         }
1946
1947         CWARN("reconstruct reply for x"LPU64" (remote ino) "LPU64" -> %lu/%u\n",
1948               req->rq_xid, id_ino(&id), dentry->d_inode->i_ino,
1949               dentry->d_inode->i_generation);
1950
1951         body = lustre_msg_buf(req->rq_repmsg, 0, sizeof (*body));
1952         obdo_from_inode(&body->oa, dentry->d_inode, FILTER_VALID_FLAGS);
1953         body->oa.o_id = dentry->d_inode->i_ino;
1954         body->oa.o_generation = dentry->d_inode->i_generation;
1955         body->oa.o_valid |= OBD_MD_FLID | OBD_MD_FLGENER;
1956
1957         down(&dentry->d_inode->i_sem);
1958         rc = mds_read_inode_sid(req2obd(req), dentry->d_inode, &id);
1959         up(&dentry->d_inode->i_sem);
1960         if (rc) {
1961                 CERROR("Can't read inode self id, inode %lu, "
1962                        "rc %d\n", dentry->d_inode->i_ino, rc);
1963                 id_fid(&id) = 0;
1964         }
1965
1966         body->oa.o_fid = id_fid(&id);
1967         body->oa.o_mds = id_group(&id);
1968         l_dput(dentry);
1969
1970         EXIT;
1971 }
1972
1973 static int mds_inode_init_acl(struct obd_device *obd, void *handle,
1974                               struct dentry *de, void *xattr, int xattr_size)
1975 {
1976         struct inode *inode = de->d_inode;
1977         struct posix_acl *acl;
1978         mode_t mode;
1979         int rc = 0;
1980
1981         LASSERT(handle);
1982         LASSERT(inode);
1983         LASSERT(xattr);
1984         LASSERT(xattr_size > 0);
1985
1986         if (!inode->i_op->getxattr || !inode->i_op->setxattr) {
1987                 CERROR("backend fs dosen't support xattr\n");
1988                 return -EOPNOTSUPP;
1989         }
1990
1991         /* set default acl */
1992         if (S_ISDIR(inode->i_mode)) {
1993                 rc = inode->i_op->setxattr(de, XATTR_NAME_ACL_DEFAULT,
1994                                            xattr, xattr_size, 0);
1995                 if (rc) {
1996                         CERROR("set default acl err: %d\n", rc);
1997                         return rc;
1998                 }
1999         }
2000
2001         /* set access acl */
2002         acl = posix_acl_from_xattr(xattr, xattr_size);
2003         if (acl == NULL || IS_ERR(acl)) {
2004                 CERROR("insane attr data\n");
2005                 return PTR_ERR(acl);
2006         }
2007
2008         if (posix_acl_valid(acl)) {
2009                 CERROR("default acl not valid: %d\n", rc);
2010                 rc = -EFAULT;
2011                 goto out;
2012         }
2013
2014         mode = inode->i_mode;
2015         rc = posix_acl_create_masq(acl, &mode);
2016         if (rc < 0) {
2017                 CERROR("create masq err %d\n", rc);
2018                 goto out;
2019         }
2020
2021         if (inode->i_mode != mode) {
2022                 struct iattr iattr = { .ia_valid = ATTR_MODE,
2023                                        .ia_mode = mode };
2024                 int rc2;
2025
2026                 rc2 = fsfilt_setattr(obd, de, handle, &iattr, 0);
2027                 if (rc2) {
2028                         CERROR("setattr mode err: %d\n", rc2);
2029                         rc = rc2;
2030                         goto out;
2031                 }
2032         }
2033
2034         if (rc > 0) {
2035                 /* we didn't change acl except mode bits of some
2036                  * entries, so should be fit into original size.
2037                  */
2038                 rc = posix_acl_to_xattr(acl, xattr, xattr_size);
2039                 LASSERT(rc > 0);
2040
2041                 rc = inode->i_op->setxattr(de, XATTR_NAME_ACL_ACCESS,
2042                                            xattr, xattr_size, 0);
2043                 if (rc)
2044                         CERROR("set access acl err: %d\n", rc);
2045         }
2046 out:
2047         posix_acl_release(acl);
2048         return rc;
2049 }
2050
2051 static int mdt_obj_create(struct ptlrpc_request *req)
2052 {
2053         struct obd_device *obd = req->rq_export->exp_obd;
2054         struct mds_obd *mds = &obd->u.mds;
2055         struct ost_body *body, *repbody;
2056         void *acl = NULL;
2057         int acl_size;
2058         char idname[LL_ID_NAMELEN];
2059         int size = sizeof(*repbody);
2060         struct inode *parent_inode;
2061         struct lvfs_run_ctxt saved;
2062         int rc, cleanup_phase = 0;
2063         struct dentry *new = NULL;
2064         struct dentry_params dp;
2065         int mealen, flags = 0;
2066         struct lvfs_ucred uc;
2067         struct lustre_id id;
2068         struct mea *mea;
2069         void *handle = NULL;
2070         unsigned long cr_inum = 0;
2071         ENTRY;
2072        
2073         DEBUG_REQ(D_HA, req, "create remote object");
2074         parent_inode = mds->mds_unnamed_dir->d_inode;
2075
2076         body = lustre_swab_reqbuf(req, 0, sizeof(*body),
2077                                   lustre_swab_ost_body);
2078         if (body == NULL)
2079                 RETURN(-EFAULT);
2080
2081         /* acl data is packed transparently, no swab here */
2082         LASSERT(req->rq_reqmsg->bufcount >= 2);
2083         acl_size = req->rq_reqmsg->buflens[1];
2084         if (acl_size) {
2085                 acl = lustre_msg_buf(req->rq_reqmsg, 1, acl_size);
2086                 if (!acl) {
2087                         CERROR("No default acl buf?\n");
2088                         RETURN(-EFAULT);
2089                 }
2090         }
2091
2092         rc = lustre_pack_reply(req, 1, &size, NULL);
2093         if (rc)
2094                 RETURN(rc);
2095
2096         MDS_CHECK_RESENT(req, reconstruct_create(req));
2097
2098         uc.luc_lsd = NULL;
2099         uc.luc_ginfo = NULL;
2100         uc.luc_uid = body->oa.o_uid;
2101         uc.luc_gid = body->oa.o_gid;
2102         uc.luc_fsuid = body->oa.o_uid;
2103         uc.luc_fsgid = body->oa.o_gid;
2104
2105         push_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
2106         repbody = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*repbody));
2107
2108         /* in REPLAY case inum should be given (client or other MDS fills it) */
2109         if (body->oa.o_id && ((body->oa.o_flags & OBD_FL_RECREATE_OBJS) ||
2110             (lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY))) {
2111                 /*
2112                  * this is re-create request from MDS holding directory name.
2113                  * we have to lookup given ino/gen first. if it exists (good
2114                  * case) then there is nothing to do. if it does not then we
2115                  * have to recreate it.
2116                  */
2117                 id_ino(&id) = body->oa.o_id;
2118                 id_gen(&id) = body->oa.o_generation;
2119  
2120                 new = mds_id2dentry(obd, &id, NULL);
2121                 if (!IS_ERR(new) && new->d_inode) {
2122                         struct lustre_id sid;
2123                                 
2124                         CWARN("mkdir() repairing is on its way: %lu/%lu\n",
2125                               (unsigned long)id_ino(&id), (unsigned long)id_gen(&id));
2126                         
2127                         obdo_from_inode(&repbody->oa, new->d_inode,
2128                                         FILTER_VALID_FLAGS);
2129                         
2130                         repbody->oa.o_id = new->d_inode->i_ino;
2131                         repbody->oa.o_generation = new->d_inode->i_generation;
2132                         repbody->oa.o_valid |= OBD_MD_FLID | OBD_MD_FLGENER;
2133                         cleanup_phase = 1;
2134
2135                         down(&new->d_inode->i_sem);
2136                         rc = mds_read_inode_sid(obd, new->d_inode, &sid);
2137                         up(&new->d_inode->i_sem);
2138                         if (rc) {
2139                                 CERROR("Can't read inode self id "
2140                                        "inode %lu, rc %d.\n",
2141                                        new->d_inode->i_ino, rc);
2142                                 GOTO(cleanup, rc);
2143                         }
2144
2145                         repbody->oa.o_fid = id_fid(&sid);
2146                         repbody->oa.o_mds = id_group(&sid);
2147                         LASSERT(id_fid(&sid) != 0);
2148
2149                         /* 
2150                          * here we could use fid passed in body->oa.o_fid and
2151                          * thus avoid mds_read_inode_sid().
2152                          */
2153                         cr_inum = new->d_inode->i_ino;
2154                         GOTO(cleanup, rc = 0);
2155                 }
2156         }
2157         
2158         down(&parent_inode->i_sem);
2159         handle = fsfilt_start(obd, parent_inode, FSFILT_OP_MKDIR, NULL);
2160         if (IS_ERR(handle)) {
2161                 up(&parent_inode->i_sem);
2162                 CERROR("fsfilt_start() failed, rc = %d\n",
2163                        (int)PTR_ERR(handle));
2164                 GOTO(cleanup, rc = PTR_ERR(handle));
2165         }
2166         cleanup_phase = 1; /* transaction */
2167
2168 repeat:
2169         rc = sprintf(idname, "%u.%u", ll_insecure_random_int(), current->pid);
2170         new = lookup_one_len(idname, mds->mds_unnamed_dir, rc);
2171         if (IS_ERR(new)) {
2172                 CERROR("%s: can't lookup new inode (%s) for mkdir: %d\n",
2173                        obd->obd_name, idname, (int) PTR_ERR(new));
2174                 fsfilt_commit(obd, mds->mds_sb, new->d_inode, handle, 0);
2175                 up(&parent_inode->i_sem);
2176                 RETURN(PTR_ERR(new));
2177         } else if (new->d_inode) {
2178                 CERROR("%s: name exists. repeat\n", obd->obd_name);
2179                 goto repeat;
2180         }
2181
2182         new->d_fsdata = (void *)&dp;
2183         dp.p_inum = 0;
2184         dp.p_ptr = req;
2185
2186         if ((lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY) ||
2187             (body->oa.o_flags & OBD_FL_RECREATE_OBJS)) {
2188                 LASSERT(body->oa.o_id != 0);
2189                 dp.p_inum = body->oa.o_id;
2190                 DEBUG_REQ(D_HA, req, "replay create obj %lu/%lu",
2191                           (unsigned long)body->oa.o_id,
2192                           (unsigned long)body->oa.o_generation);
2193         }
2194
2195         rc = vfs_mkdir(parent_inode, new, body->oa.o_mode);
2196         if (rc == 0) {
2197                 if (acl) {
2198                         rc = mds_inode_init_acl(obd, handle, new,
2199                                                 acl, acl_size);
2200                         if (rc) {
2201                                 up(&parent_inode->i_sem);
2202                                 GOTO(cleanup, rc);
2203                         }
2204                 }
2205                 if ((body->oa.o_flags & OBD_FL_RECREATE_OBJS) ||
2206                     lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY) {
2207                         new->d_inode->i_generation = body->oa.o_generation;
2208                         mark_inode_dirty(new->d_inode);
2209                         
2210                         /*
2211                          * avoiding asserts in cache flush case, as
2212                          * @body->oa.o_id should be zero.
2213                          */
2214                         if (body->oa.o_id) {
2215                                 LASSERTF(body->oa.o_id == new->d_inode->i_ino, 
2216                                          "BUG 3550: failed to recreate obj "
2217                                          LPU64" -> %lu\n", body->oa.o_id,
2218                                          new->d_inode->i_ino);
2219                                 
2220                                 LASSERTF(body->oa.o_generation == 
2221                                          new->d_inode->i_generation,
2222                                          "BUG 3550: failed to recreate obj/gen "
2223                                          LPU64"/%u -> %lu/%u\n", body->oa.o_id,
2224                                          body->oa.o_generation,
2225                                          new->d_inode->i_ino, 
2226                                          new->d_inode->i_generation);
2227                         }
2228                 }
2229                 
2230                 obdo_from_inode(&repbody->oa, new->d_inode, FILTER_VALID_FLAGS);
2231                 repbody->oa.o_id = new->d_inode->i_ino;
2232                 repbody->oa.o_generation = new->d_inode->i_generation;
2233                 repbody->oa.o_valid |= OBD_MD_FLID | OBD_MD_FLGENER | OBD_MD_FID;
2234
2235                 if ((body->oa.o_flags & OBD_FL_RECREATE_OBJS) ||
2236                     lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY) {
2237                         id_group(&id) = mds->mds_num;
2238                 
2239                         LASSERT(body->oa.o_fid != 0);
2240                         id_fid(&id) = body->oa.o_fid;
2241
2242                         LASSERT(body->oa.o_id != 0);
2243                         id_ino(&id) = repbody->oa.o_id;
2244                         id_gen(&id) = repbody->oa.o_generation;
2245                 
2246                         down(&new->d_inode->i_sem);
2247                         rc = mds_update_inode_sid(obd, new->d_inode, handle, &id);
2248                         up(&new->d_inode->i_sem);
2249
2250                         /* 
2251                          * make sure, that fid is up-to-date.
2252                          */
2253                         mds_set_last_fid(obd, id_fid(&id));
2254                 } else {
2255                         /*
2256                          * allocate new sid, as object is created from scratch
2257                          * and this is not replay.
2258                          */
2259                         down(&new->d_inode->i_sem);
2260                         rc = mds_alloc_inode_sid(obd, new->d_inode, handle, &id);
2261                         up(&new->d_inode->i_sem);
2262                 }
2263                 if (rc) {
2264                         CERROR("Can't update lustre ID for inode %lu, "
2265                                "error = %d\n", new->d_inode->i_ino, rc);
2266                         GOTO(cleanup, rc);
2267                 }
2268
2269                 /* initializing o_fid after it is allocated. */
2270                 repbody->oa.o_fid = id_fid(&id);
2271                 repbody->oa.o_mds = id_group(&id);
2272
2273                 rc = fsfilt_del_dir_entry(obd, new);
2274                 up(&parent_inode->i_sem);
2275                 if (rc) {
2276                         CERROR("can't remove name for object: %d\n", rc);
2277                         GOTO(cleanup, rc);
2278                 }
2279                 
2280                 cleanup_phase = 2; /* created directory object */
2281
2282                 CDEBUG(D_OTHER, "created dirobj: %lu/%lu mode %o\n",
2283                        (unsigned long)new->d_inode->i_ino,
2284                        (unsigned long)new->d_inode->i_generation,
2285                        (unsigned)new->d_inode->i_mode);
2286                 cr_inum = new->d_inode->i_ino;
2287         } else {
2288                 up(&parent_inode->i_sem);
2289                 CERROR("%s: can't create dirobj: %d\n", obd->obd_name, rc);
2290                 GOTO(cleanup, rc);
2291         }
2292
2293         if (body->oa.o_valid & OBD_MD_FLID) {
2294                 /* this is new object for splitted dir. We have to prevent
2295                  * recursive splitting on it -bzzz */
2296                 mealen = obd_size_diskmd(mds->mds_md_exp, NULL);
2297
2298                 OBD_ALLOC(mea, mealen);
2299                 if (mea == NULL)
2300                         GOTO(cleanup, rc = -ENOMEM);
2301
2302                 mea->mea_magic = MEA_MAGIC_ALL_CHARS;
2303                 mea->mea_master = 0;
2304                 mea->mea_count = 0;
2305
2306                 down(&new->d_inode->i_sem);
2307                 rc = fsfilt_set_md(obd, new->d_inode, handle,
2308                                    mea, mealen, EA_MEA);
2309                 up(&new->d_inode->i_sem);
2310                 if (rc)
2311                         CERROR("fsfilt_set_md() failed, "
2312                                "rc = %d\n", rc);
2313
2314                 OBD_FREE(mea, mealen);
2315                 
2316                 CDEBUG(D_OTHER, "%s: mark non-splittable %lu/%u - %d\n",
2317                        obd->obd_name, new->d_inode->i_ino,
2318                        new->d_inode->i_generation, flags);
2319         } else if (body->oa.o_easize) {
2320                 /* we pass LCK_EX to split routine to signal that we have
2321                  * exclusive access to the directory. simple because nobody
2322                  * knows it already exists -bzzz */
2323                 rc = mds_try_to_split_dir(obd, new, NULL,
2324                                           body->oa.o_easize, LCK_EX);
2325                 if (rc < 0) {
2326                         CERROR("Can't split directory %lu, error = %d.\n",
2327                                new->d_inode->i_ino, rc);
2328                 } else {
2329                         rc = 0;
2330                 }
2331         }
2332
2333         EXIT;
2334 cleanup:
2335         switch (cleanup_phase) {
2336         case 2: /* object has been created, but we'll may want to replay it later */
2337                 if (rc == 0)
2338                         ptlrpc_require_repack(req);
2339         case 1: /* transaction */
2340                 rc = mds_finish_transno(mds, parent_inode, handle,
2341                                         req, rc, cr_inum);
2342         }
2343
2344         l_dput(new);
2345         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, &uc);
2346         return rc;
2347 }
2348
2349 static int mdt_get_info(struct ptlrpc_request *req)
2350 {
2351         struct obd_export *exp = req->rq_export;
2352         int keylen, rc = 0;
2353         char *key;
2354         ENTRY;
2355
2356         key = lustre_msg_buf(req->rq_reqmsg, 0, 1);
2357         if (key == NULL) {
2358                 DEBUG_REQ(D_HA, req, "no get_info key");
2359                 RETURN(-EFAULT);
2360         }
2361         keylen = req->rq_reqmsg->buflens[0];
2362
2363         if ((keylen < strlen("mdsize") || strcmp(key, "mdsize") != 0) &&
2364             (keylen < strlen("mdsnum") || strcmp(key, "mdsnum") != 0) &&
2365             (keylen < strlen("rootid") || strcmp(key, "rootid") != 0))
2366                 RETURN(-EPROTO);
2367
2368         if (keylen >= strlen("rootid") && !strcmp(key, "rootid")) {
2369                 struct lustre_id *reply;
2370                 int size = sizeof(*reply);
2371                 
2372                 rc = lustre_pack_reply(req, 1, &size, NULL);
2373                 if (rc)
2374                         RETURN(rc);
2375
2376                 reply = lustre_msg_buf(req->rq_repmsg, 0, size);
2377                 rc = obd_get_info(exp, keylen, key, (__u32 *)&size, reply);
2378         } else {
2379                 obd_id *reply;
2380                 int size = sizeof(*reply);
2381                 
2382                 rc = lustre_pack_reply(req, 1, &size, NULL);
2383                 if (rc)
2384                         RETURN(rc);
2385
2386                 reply = lustre_msg_buf(req->rq_repmsg, 0, size);
2387                 rc = obd_get_info(exp, keylen, key, (__u32 *)&size, reply);
2388         }
2389
2390         req->rq_repmsg->status = 0;
2391         RETURN(rc);
2392 }
2393
2394 static int mds_set_info(struct obd_export *exp, __u32 keylen,
2395                         void *key, __u32 vallen, void *val)
2396 {
2397         struct obd_device *obd;
2398         struct mds_obd *mds;
2399         int rc = 0;
2400         ENTRY;
2401
2402         obd = class_exp2obd(exp);
2403         if (obd == NULL) {
2404                 CDEBUG(D_IOCTL, "invalid client cookie "LPX64"\n",
2405                        exp->exp_handle.h_cookie);
2406                 RETURN(-EINVAL);
2407         }
2408
2409         mds = &obd->u.mds;
2410         if (keylen >= strlen("mds_type") &&
2411              memcmp(key, "mds_type", keylen) == 0) {
2412                 int valsize;
2413                 __u32 group;
2414                 
2415                 CDEBUG(D_IOCTL, "set mds type to %x\n", *(int*)val);
2416                 
2417                 mds->mds_obd_type = *(int*)val;
2418                 group = FILTER_GROUP_FIRST_MDS + mds->mds_obd_type;
2419                 valsize = sizeof(group);
2420                 
2421                 /* mds number has been changed, so the corresponding obdfilter
2422                  * exp need to be changed too. */
2423                 rc = obd_set_info(mds->mds_dt_exp, strlen("mds_conn"),
2424                                   "mds_conn", valsize, &group);
2425                 RETURN(rc);
2426         }
2427         CDEBUG(D_IOCTL, "invalid key\n");
2428         RETURN(-EINVAL);
2429 }
2430
2431 static int mdt_set_info(struct ptlrpc_request *req)
2432 {
2433         char *key, *val;
2434         struct obd_export *exp = req->rq_export;
2435         int keylen, rc = 0, vallen;
2436         ENTRY;
2437
2438         key = lustre_msg_buf(req->rq_reqmsg, 0, 1);
2439         if (key == NULL) {
2440                 DEBUG_REQ(D_HA, req, "no set_info key");
2441                 RETURN(-EFAULT);
2442         }
2443         keylen = req->rq_reqmsg->buflens[0];
2444
2445         if (keylen == strlen("mds_type") &&
2446             memcmp(key, "mds_type", keylen) == 0) {
2447                 rc = lustre_pack_reply(req, 0, NULL, NULL);
2448                 if (rc)
2449                         RETURN(rc);
2450                 
2451                 val = lustre_msg_buf(req->rq_reqmsg, 1, 0);
2452                 vallen = req->rq_reqmsg->buflens[1];
2453
2454                 rc = obd_set_info(exp, keylen, key, vallen, val);
2455                 req->rq_repmsg->status = 0;
2456                 RETURN(rc);
2457         }
2458         CDEBUG(D_IOCTL, "invalid key\n");
2459         RETURN(-EINVAL);
2460 }
2461
2462 static void mds_revoke_export_locks(struct obd_export *exp)
2463 {
2464         struct ldlm_namespace *ns = exp->exp_obd->obd_namespace;
2465         struct list_head *locklist = &exp->exp_ldlm_data.led_held_locks;
2466         struct ldlm_lock *lock, *next;
2467         struct ldlm_lock_desc desc;
2468
2469         if (!exp->u.eu_mds_data.med_remote)
2470                 return;
2471
2472         ENTRY;
2473         l_lock(&ns->ns_lock);
2474         list_for_each_entry_safe(lock, next, locklist, l_export_chain) {
2475                 if (lock->l_req_mode != lock->l_granted_mode)
2476                         continue;
2477
2478                 LASSERT(lock->l_resource);
2479                 if (lock->l_resource->lr_type != LDLM_IBITS &&
2480                     lock->l_resource->lr_type != LDLM_PLAIN)
2481                         continue;
2482
2483                 if (lock->l_flags & LDLM_FL_AST_SENT)
2484                         continue;
2485
2486                 lock->l_flags |= LDLM_FL_AST_SENT;
2487
2488                 /* the desc just pretend to exclusive */
2489                 ldlm_lock2desc(lock, &desc);
2490                 desc.l_req_mode = LCK_EX;
2491                 desc.l_granted_mode = 0;
2492
2493                 lock->l_blocking_ast(lock, &desc, NULL, LDLM_CB_BLOCKING);
2494         }
2495         l_unlock(&ns->ns_lock);
2496         EXIT;
2497 }
2498
2499 static int mds_msg_check_version(struct lustre_msg *msg)
2500 {
2501         int rc;
2502
2503         switch (msg->opc) {
2504         case MDS_CONNECT:
2505         case MDS_DISCONNECT:
2506         case OBD_PING:
2507                 rc = lustre_msg_check_version(msg, LUSTRE_OBD_VERSION);
2508                 if (rc)
2509                         CERROR("bad opc %u version %08x, expecting %08x\n",
2510                                msg->opc, msg->version, LUSTRE_OBD_VERSION);
2511                 break;
2512         case MDS_STATFS:
2513         case MDS_GETSTATUS:
2514         case MDS_GETATTR:
2515         case MDS_GETATTR_LOCK:
2516         case MDS_READPAGE:
2517         case MDS_REINT:
2518         case MDS_CLOSE:
2519         case MDS_DONE_WRITING:
2520         case MDS_PIN:
2521         case MDS_SYNC:
2522                 rc = lustre_msg_check_version(msg, LUSTRE_MDS_VERSION);
2523                 if (rc)
2524                         CERROR("bad opc %u version %08x, expecting %08x\n",
2525                                msg->opc, msg->version, LUSTRE_MDS_VERSION);
2526                 break;
2527         case LDLM_ENQUEUE:
2528         case LDLM_CONVERT:
2529         case LDLM_BL_CALLBACK:
2530         case LDLM_CP_CALLBACK:
2531                 rc = lustre_msg_check_version(msg, LUSTRE_DLM_VERSION);
2532                 if (rc)
2533                         CERROR("bad opc %u version %08x, expecting %08x\n",
2534                                msg->opc, msg->version, LUSTRE_DLM_VERSION);
2535                 break;
2536         case OBD_LOG_CANCEL:
2537         case LLOG_ORIGIN_HANDLE_OPEN:
2538         case LLOG_ORIGIN_HANDLE_NEXT_BLOCK:
2539         case LLOG_ORIGIN_HANDLE_PREV_BLOCK:
2540         case LLOG_ORIGIN_HANDLE_READ_HEADER:
2541         case LLOG_ORIGIN_HANDLE_CLOSE:
2542         case LLOG_CATINFO:
2543                 rc = lustre_msg_check_version(msg, LUSTRE_LOG_VERSION);
2544                 if (rc)
2545                         CERROR("bad opc %u version %08x, expecting %08x\n",
2546                                msg->opc, msg->version, LUSTRE_LOG_VERSION);
2547                 break;
2548         case OST_CREATE:
2549         case OST_WRITE:
2550         case OST_GET_INFO:
2551         case OST_SET_INFO:
2552                 rc = lustre_msg_check_version(msg, LUSTRE_OBD_VERSION);
2553                 if (rc)
2554                         CERROR("bad opc %u version %08x, expecting %08x\n",
2555                                msg->opc, msg->version, LUSTRE_OBD_VERSION);
2556                 break;
2557         case SEC_INIT:
2558         case SEC_INIT_CONTINUE:
2559         case SEC_FINI:
2560                 rc = 0;
2561                 break;
2562         default:
2563                 CERROR("MDS unknown opcode %d\n", msg->opc);
2564                 rc = -ENOTSUPP;
2565                 break;
2566         }
2567
2568         return rc;
2569 }
2570
2571 int mds_handle(struct ptlrpc_request *req)
2572 {
2573         int should_process, fail = OBD_FAIL_MDS_ALL_REPLY_NET;
2574         struct obd_device *obd = NULL;
2575         struct mds_obd *mds = NULL; /* quell gcc overwarning */
2576         int rc = 0;
2577         ENTRY;
2578
2579         OBD_FAIL_RETURN(OBD_FAIL_MDS_ALL_REQUEST_NET | OBD_FAIL_ONCE, 0);
2580
2581         rc = mds_msg_check_version(req->rq_reqmsg);
2582         if (rc) {
2583                 CERROR("MDS drop mal-formed request\n");
2584                 RETURN(rc);
2585         }
2586
2587         /* Security opc should NOT trigger any recovery events */
2588         if (req->rq_reqmsg->opc == SEC_INIT ||
2589             req->rq_reqmsg->opc == SEC_INIT_CONTINUE) {
2590                 if (!req->rq_export)
2591                         GOTO(out, rc = 0);
2592
2593                 mds_req_add_idmapping(req, &req->rq_export->exp_mds_data);
2594                 mds_revoke_export_locks(req->rq_export);
2595                 GOTO(out, rc = 0);
2596         } else if (req->rq_reqmsg->opc == SEC_FINI) {
2597                 if (!req->rq_export)
2598                         GOTO(out, rc = 0);
2599
2600                 mds_req_del_idmapping(req, &req->rq_export->exp_mds_data);
2601                 mds_revoke_export_locks(req->rq_export);
2602                 GOTO(out, rc = 0);
2603         }
2604
2605         LASSERT(current->journal_info == NULL);
2606         /* XXX identical to OST */
2607         if (req->rq_reqmsg->opc != MDS_CONNECT) {
2608                 struct mds_export_data *med;
2609                 int recovering;
2610
2611                 if (req->rq_export == NULL) {
2612                         CERROR("operation %d on unconnected MDS from %s\n",
2613                                req->rq_reqmsg->opc,
2614                                req->rq_peerstr);
2615                         req->rq_status = -ENOTCONN;
2616                         GOTO(out, rc = -ENOTCONN);
2617                 }
2618
2619                 med = &req->rq_export->exp_mds_data;
2620                 obd = req->rq_export->exp_obd;
2621                 mds = &obd->u.mds;
2622
2623                 /* sanity check: if the xid matches, the request must
2624                  * be marked as a resent or replayed */
2625                 if (req->rq_xid == le64_to_cpu(med->med_mcd->mcd_last_xid) ||
2626                    req->rq_xid == le64_to_cpu(med->med_mcd->mcd_last_close_xid)) {
2627                         LASSERTF(lustre_msg_get_flags(req->rq_reqmsg) &
2628                                  (MSG_RESENT | MSG_REPLAY),
2629                                  "rq_xid "LPU64" matches last_xid, "
2630                                  "expected RESENT flag\n",
2631                                  req->rq_xid);
2632                 }
2633                 /* else: note the opposite is not always true; a
2634                  * RESENT req after a failover will usually not match
2635                  * the last_xid, since it was likely never
2636                  * committed. A REPLAYed request will almost never
2637                  * match the last xid, however it could for a
2638                  * committed, but still retained, open. */
2639
2640                 spin_lock_bh(&obd->obd_processing_task_lock);
2641                 recovering = obd->obd_recovering;
2642                 spin_unlock_bh(&obd->obd_processing_task_lock);
2643                 if (recovering) {
2644                         rc = mds_filter_recovery_request(req, obd,
2645                                                          &should_process);
2646                         if (rc || should_process == 0) {
2647                                 RETURN(rc);
2648                         } else if (should_process < 0) {
2649                                 req->rq_status = should_process;
2650                                 rc = ptlrpc_error(req);
2651                                 RETURN(rc);
2652                         }
2653                 }
2654         }
2655
2656         switch (req->rq_reqmsg->opc) {
2657         case MDS_CONNECT:
2658                 DEBUG_REQ(D_INODE, req, "connect");
2659                 OBD_FAIL_RETURN(OBD_FAIL_MDS_CONNECT_NET, 0);
2660                 rc = target_handle_connect(req);
2661                 if (!rc) {
2662                         struct mds_export_data *med;
2663
2664                         LASSERT(req->rq_export);
2665                         med = &req->rq_export->u.eu_mds_data;
2666                         mds_init_export_data(req, med);
2667                         mds_req_add_idmapping(req, med);
2668
2669                         /* Now that we have an export, set mds. */
2670                         obd = req->rq_export->exp_obd;
2671                         mds = mds_req2mds(req);
2672                 }
2673                 break;
2674
2675         case MDS_DISCONNECT:
2676                 DEBUG_REQ(D_INODE, req, "disconnect");
2677                 OBD_FAIL_RETURN(OBD_FAIL_MDS_DISCONNECT_NET, 0);
2678                 rc = target_handle_disconnect(req);
2679                 req->rq_status = rc;            /* superfluous? */
2680                 break;
2681
2682         case MDS_GETSTATUS:
2683                 DEBUG_REQ(D_INODE, req, "getstatus");
2684                 OBD_FAIL_RETURN(OBD_FAIL_MDS_GETSTATUS_NET, 0);
2685                 rc = mds_getstatus(req);
2686                 break;
2687
2688         case MDS_GETATTR:
2689                 DEBUG_REQ(D_INODE, req, "getattr");
2690                 OBD_FAIL_RETURN(OBD_FAIL_MDS_GETATTR_NET, 0);
2691                 rc = mds_getattr(req, MDS_REQ_REC_OFF);
2692                 break;
2693
2694         case MDS_GETATTR_LOCK: {
2695                 struct lustre_handle lockh;
2696                 DEBUG_REQ(D_INODE, req, "getattr_lock");
2697                 OBD_FAIL_RETURN(OBD_FAIL_MDS_GETATTR_LOCK_NET, 0);
2698
2699                 /* If this request gets a reconstructed reply, we won't be
2700                  * acquiring any new locks in mds_getattr_lock, so we don't
2701                  * want to cancel.
2702                  */
2703                 lockh.cookie = 0;
2704                 rc = mds_getattr_lock(req, MDS_REQ_REC_OFF, &lockh,
2705                                       MDS_INODELOCK_UPDATE);
2706                 /* this non-intent call (from an ioctl) is special */
2707                 req->rq_status = rc;
2708                 if (rc == 0 && lockh.cookie)
2709                         ldlm_lock_decref(&lockh, LCK_PR);
2710                 break;
2711         }
2712         case MDS_STATFS:
2713                 DEBUG_REQ(D_INODE, req, "statfs");
2714                 OBD_FAIL_RETURN(OBD_FAIL_MDS_STATFS_NET, 0);
2715                 rc = mds_statfs(req);
2716                 break;
2717
2718         case MDS_READPAGE:
2719                 DEBUG_REQ(D_INODE, req, "readpage");
2720                 OBD_FAIL_RETURN(OBD_FAIL_MDS_READPAGE_NET, 0);
2721                 rc = mds_readpage(req, MDS_REQ_REC_OFF);
2722
2723                 if (OBD_FAIL_CHECK_ONCE(OBD_FAIL_MDS_SENDPAGE)) {
2724                         if (req->rq_reply_state) {
2725                                 lustre_free_reply_state (req->rq_reply_state);
2726                                 req->rq_reply_state = NULL;
2727                         }
2728                         RETURN(0);
2729                 }
2730
2731                 break;
2732         case MDS_REINT: {
2733                 __u32 *opcp = lustre_msg_buf(req->rq_reqmsg, MDS_REQ_REC_OFF,
2734                                              sizeof (*opcp));
2735                 __u32  opc;
2736                 int size[3] = {sizeof(struct mds_body), mds->mds_max_mdsize,
2737                                mds->mds_max_cookiesize};
2738                 int bufcount;
2739
2740                 /* NB only peek inside req now; mds_reint() will swab it */
2741                 if (opcp == NULL) {
2742                         CERROR ("Can't inspect opcode\n");
2743                         rc = -EINVAL;
2744                         break;
2745                 }
2746                 opc = *opcp;
2747                 if (lustre_msg_swabbed (req->rq_reqmsg))
2748                         __swab32s(&opc);
2749
2750                 DEBUG_REQ(D_INODE, req, "reint %d (%s)", opc,
2751                           (opc < sizeof(reint_names) / sizeof(reint_names[0]) ||
2752                            reint_names[opc] == NULL) ? reint_names[opc] :
2753                                                        "unknown opcode");
2754
2755                 OBD_FAIL_RETURN(OBD_FAIL_MDS_REINT_NET, 0);
2756
2757                 if (opc == REINT_UNLINK || opc == REINT_RENAME)
2758                         bufcount = 3;
2759                 else if (opc == REINT_OPEN)
2760                         bufcount = 2;
2761                 else
2762                         bufcount = 1;
2763
2764                 rc = lustre_pack_reply(req, bufcount, size, NULL);
2765                 if (rc)
2766                         break;
2767
2768                 rc = mds_reint(req, MDS_REQ_REC_OFF, NULL);
2769                 fail = OBD_FAIL_MDS_REINT_NET_REP;
2770                 break;
2771         }
2772
2773         case MDS_CLOSE:
2774                 DEBUG_REQ(D_INODE, req, "close");
2775                 OBD_FAIL_RETURN(OBD_FAIL_MDS_CLOSE_NET, 0);
2776                 rc = mds_close(req, MDS_REQ_REC_OFF);
2777                 break;
2778
2779         case MDS_DONE_WRITING:
2780                 DEBUG_REQ(D_INODE, req, "done_writing");
2781                 OBD_FAIL_RETURN(OBD_FAIL_MDS_DONE_WRITING_NET, 0);
2782                 rc = mds_done_writing(req, MDS_REQ_REC_OFF);
2783                 break;
2784
2785         case MDS_PIN:
2786                 DEBUG_REQ(D_INODE, req, "pin");
2787                 OBD_FAIL_RETURN(OBD_FAIL_MDS_PIN_NET, 0);
2788                 rc = mds_pin(req, MDS_REQ_REC_OFF);
2789                 break;
2790
2791         case MDS_SYNC:
2792                 DEBUG_REQ(D_INODE, req, "sync");
2793                 OBD_FAIL_RETURN(OBD_FAIL_MDS_SYNC_NET, 0);
2794                 rc = mds_sync(req, MDS_REQ_REC_OFF);
2795                 break;
2796
2797         case OBD_PING:
2798                 DEBUG_REQ(D_INODE, req, "ping");
2799                 rc = target_handle_ping(req);
2800                 break;
2801
2802         case OBD_LOG_CANCEL:
2803                 CDEBUG(D_INODE, "log cancel\n");
2804                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOG_CANCEL_NET, 0);
2805                 rc = -ENOTSUPP; /* la la la */
2806                 break;
2807
2808         case LDLM_ENQUEUE:
2809                 DEBUG_REQ(D_INODE, req, "enqueue");
2810                 OBD_FAIL_RETURN(OBD_FAIL_LDLM_ENQUEUE, 0);
2811                 rc = ldlm_handle_enqueue(req, ldlm_server_completion_ast,
2812                                          ldlm_server_blocking_ast, NULL);
2813                 fail = OBD_FAIL_LDLM_REPLY;
2814                 break;
2815         case LDLM_CONVERT:
2816                 DEBUG_REQ(D_INODE, req, "convert");
2817                 OBD_FAIL_RETURN(OBD_FAIL_LDLM_CONVERT, 0);
2818                 rc = ldlm_handle_convert(req);
2819                 break;
2820         case LDLM_BL_CALLBACK:
2821         case LDLM_CP_CALLBACK:
2822                 DEBUG_REQ(D_INODE, req, "callback");
2823                 CERROR("callbacks should not happen on MDS\n");
2824                 LBUG();
2825                 OBD_FAIL_RETURN(OBD_FAIL_LDLM_BL_CALLBACK, 0);
2826                 break;
2827         case LLOG_ORIGIN_HANDLE_OPEN:
2828                 DEBUG_REQ(D_INODE, req, "llog_init");
2829                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
2830                 rc = llog_origin_handle_open(req);
2831                 break;
2832         case LLOG_ORIGIN_HANDLE_NEXT_BLOCK:
2833                 DEBUG_REQ(D_INODE, req, "llog next block");
2834                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
2835                 rc = llog_origin_handle_next_block(req);
2836                 break;
2837         case LLOG_ORIGIN_HANDLE_PREV_BLOCK:
2838                 DEBUG_REQ(D_INODE, req, "llog prev block");
2839                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
2840                 rc = llog_origin_handle_prev_block(req);
2841                 break;
2842         case LLOG_ORIGIN_HANDLE_READ_HEADER:
2843                 DEBUG_REQ(D_INODE, req, "llog read header");
2844                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
2845                 rc = llog_origin_handle_read_header(req);
2846                 break;
2847         case LLOG_ORIGIN_HANDLE_CLOSE:
2848                 DEBUG_REQ(D_INODE, req, "llog close");
2849                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
2850                 rc = llog_origin_handle_close(req);
2851                 break;
2852         case OST_CREATE:
2853                 DEBUG_REQ(D_INODE, req, "ost_create");
2854                 rc = mdt_obj_create(req);
2855                 break;
2856         case OST_GET_INFO:
2857                 DEBUG_REQ(D_INODE, req, "get_info");
2858                 rc = mdt_get_info(req);
2859                 break;
2860         case OST_SET_INFO:
2861                 DEBUG_REQ(D_INODE, req, "set_info");
2862                 rc = mdt_set_info(req);
2863                 break;
2864         case OST_WRITE:
2865                 CDEBUG(D_INODE, "write\n");
2866                 OBD_FAIL_RETURN(OBD_FAIL_OST_BRW_NET, 0);
2867                 rc = ost_brw_write(req, NULL);
2868                 LASSERT(current->journal_info == NULL);
2869                 /* mdt_brw sends its own replies */
2870                 RETURN(rc);
2871                 break;
2872         case LLOG_CATINFO:
2873                 DEBUG_REQ(D_INODE, req, "llog catinfo");
2874                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
2875                 rc = llog_catinfo(req);
2876                 break;
2877         default:
2878                 req->rq_status = -ENOTSUPP;
2879                 rc = ptlrpc_error(req);
2880                 RETURN(rc);
2881         }
2882
2883         LASSERT(current->journal_info == NULL);
2884
2885         EXIT;
2886
2887         /* If we're DISCONNECTing, the mds_export_data is already freed */
2888         if (!rc && req->rq_reqmsg->opc != MDS_DISCONNECT) {
2889                 struct mds_export_data *med = &req->rq_export->exp_mds_data;
2890                 struct obd_device *obd = list_entry(mds, struct obd_device,
2891                                                     u.mds);
2892                 req->rq_repmsg->last_xid =
2893                         le64_to_cpu(med->med_mcd->mcd_last_xid);
2894
2895                 if (!obd->obd_no_transno) {
2896                         req->rq_repmsg->last_committed =
2897                                 obd->obd_last_committed;
2898                 } else {
2899                         DEBUG_REQ(D_IOCTL, req,
2900                                   "not sending last_committed update");
2901                 }
2902                 CDEBUG(D_INFO, "last_transno "LPU64", last_committed "LPU64
2903                        ", xid "LPU64"\n",
2904                        mds->mds_last_transno, obd->obd_last_committed,
2905                        req->rq_xid);
2906         }
2907  out:
2908
2909
2910         target_send_reply(req, rc, fail);
2911         return 0;
2912 }
2913
2914 /* Update the server data on disk.  This stores the new mount_count and also the
2915  * last_rcvd value to disk.  If we don't have a clean shutdown, then the server
2916  * last_rcvd value may be less than that of the clients.  This will alert us
2917  * that we may need to do client recovery.
2918  *
2919  * Also assumes for mds_last_transno that we are not modifying it (no locking).
2920  */
2921 int mds_update_server_data(struct obd_device *obd, int force_sync)
2922 {
2923         struct mds_obd *mds = &obd->u.mds;
2924         struct mds_server_data *msd = mds->mds_server_data;
2925         struct file *filp = mds->mds_rcvd_filp;
2926         struct lvfs_run_ctxt saved;
2927         loff_t off = 0;
2928         int rc;
2929         ENTRY;
2930
2931         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2932         msd->msd_last_transno = cpu_to_le64(mds->mds_last_transno);
2933
2934         CDEBUG(D_SUPER, "MDS mount_count is "LPU64", last_transno is "LPU64"\n",
2935                mds->mds_mount_count, mds->mds_last_transno);
2936         rc = fsfilt_write_record(obd, filp, msd, sizeof(*msd), &off, force_sync);
2937         if (rc)
2938                 CERROR("error writing MDS server data: rc = %d\n", rc);
2939         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2940
2941         RETURN(rc);
2942 }
2943
2944 /* saves last allocated fid counter to file. */
2945 int mds_update_last_fid(struct obd_device *obd, void *handle,
2946                         int force_sync)
2947 {
2948         struct mds_obd *mds = &obd->u.mds;
2949         struct file *filp = mds->mds_fid_filp;
2950         struct lvfs_run_ctxt saved;
2951         loff_t off = 0;
2952         __u64 last_fid;
2953         int rc = 0;
2954         ENTRY;
2955
2956         spin_lock(&mds->mds_last_fid_lock);
2957         last_fid = mds->mds_last_fid;
2958         spin_unlock(&mds->mds_last_fid_lock);
2959
2960         CDEBUG(D_SUPER, "MDS last_fid is #"LPU64"\n",
2961                last_fid);
2962
2963         if (handle) {
2964                 fsfilt_add_journal_cb(obd, mds->mds_sb, last_fid,
2965                                       handle, mds_commit_last_fid_cb,
2966                                       NULL);
2967         }
2968                 
2969         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2970         rc = fsfilt_write_record(obd, filp, &last_fid, sizeof(last_fid),
2971                                  &off, force_sync);
2972         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2973
2974         if (rc) {
2975                 CERROR("error writing MDS last_fid #"LPU64
2976                        ", err = %d\n", last_fid, rc);
2977                 RETURN(rc);
2978         }
2979                 
2980         CDEBUG(D_SUPER, "wrote fid #"LPU64" at idx "
2981                "%llu: err = %d\n", last_fid, off, rc);
2982
2983         RETURN(rc);
2984 }
2985
2986 void mds_set_last_fid(struct obd_device *obd, __u64 fid)
2987 {
2988         struct mds_obd *mds = &obd->u.mds;
2989
2990         spin_lock(&mds->mds_last_fid_lock);
2991         if (fid > mds->mds_last_fid)
2992                 mds->mds_last_fid = fid;
2993         spin_unlock(&mds->mds_last_fid_lock);
2994 }
2995
2996 void mds_commit_last_transno_cb(struct obd_device *obd,
2997                                 __u64 transno, void *data,
2998                                 int error)
2999 {
3000         obd_transno_commit_cb(obd, transno, error);
3001 }
3002
3003 void mds_commit_last_fid_cb(struct obd_device *obd,
3004                             __u64 fid, void *data,
3005                             int error)
3006 {
3007         if (error) {
3008                 CERROR("%s: fid "LPD64" commit error: %d\n",
3009                        obd->obd_name, fid, error);
3010                 return;
3011         }
3012         
3013         CDEBUG(D_HA, "%s: fid "LPD64" committed\n",
3014                obd->obd_name, fid);
3015 }
3016
3017 __u64 mds_alloc_fid(struct obd_device *obd)
3018 {
3019         struct mds_obd *mds = &obd->u.mds;
3020         __u64 fid;
3021         
3022         spin_lock(&mds->mds_last_fid_lock);
3023         fid = ++mds->mds_last_fid;
3024         spin_unlock(&mds->mds_last_fid_lock);
3025
3026         return fid;
3027 }
3028
3029 /*
3030  * allocates new lustre_id on passed @inode and saves it to inode EA.
3031  */
3032 int mds_alloc_inode_sid(struct obd_device *obd, struct inode *inode,
3033                         void *handle, struct lustre_id *id)
3034 {
3035         struct mds_obd *mds = &obd->u.mds;
3036         int alloc = 0, rc = 0;
3037         ENTRY;
3038
3039         LASSERT(obd != NULL);
3040         LASSERT(inode != NULL);
3041
3042         if (id == NULL) {
3043                 OBD_ALLOC(id, sizeof(*id));
3044                 if (id == NULL)
3045                         RETURN(-ENOMEM);
3046                 alloc = 1;
3047         }
3048
3049         id_group(id) = mds->mds_num;
3050         id_fid(id) = mds_alloc_fid(obd);
3051         id_ino(id) = inode->i_ino;
3052         id_gen(id) = inode->i_generation;
3053         id_type(id) = (S_IFMT & inode->i_mode);
3054
3055         rc = mds_update_inode_sid(obd, inode, handle, id);
3056         if (rc) {
3057                 CERROR("Can't update inode FID EA, "
3058                        "rc = %d\n", rc);
3059         }
3060
3061         if (alloc)
3062                 OBD_FREE(id, sizeof(*id));
3063         RETURN(rc);
3064 }
3065
3066 /*
3067  * reads inode self id from inode EA. Probably later this should be replaced by
3068  * caching inode self id to avoid raeding it every time it is needed.
3069  */
3070 int mds_read_inode_sid(struct obd_device *obd, struct inode *inode,
3071                        struct lustre_id *id)
3072 {
3073         int rc;
3074         ENTRY;
3075
3076         LASSERT(id != NULL);
3077         LASSERT(obd != NULL);
3078         LASSERT(inode != NULL);
3079
3080         rc = fsfilt_get_md(obd, inode, &id->li_fid,
3081                            sizeof(id->li_fid), EA_SID);
3082         if (rc < 0) {
3083                 CERROR("fsfilt_get_md() failed, "
3084                        "rc = %d\n", rc);
3085                 RETURN(rc);
3086         } else if (!rc) {
3087                 rc = -ENODATA;
3088                 RETURN(rc);
3089         } else {
3090                 rc = 0;
3091         }
3092
3093         RETURN(rc);
3094 }
3095
3096 /* updates inode self id in EA. */
3097 int mds_update_inode_sid(struct obd_device *obd, struct inode *inode,
3098                          void *handle, struct lustre_id *id)
3099 {
3100         int rc = 0;
3101         ENTRY;
3102
3103         LASSERT(id != NULL);
3104         LASSERT(obd != NULL);
3105         LASSERT(inode != NULL);
3106         
3107         rc = fsfilt_set_md(obd, inode, handle, &id->li_fid,
3108                            sizeof(id->li_fid), EA_SID);
3109         if (rc) {
3110                 CERROR("fsfilt_set_md() failed, rc = %d\n", rc);
3111                 RETURN(rc);
3112         }
3113
3114         RETURN(rc);
3115 }
3116
3117 /* 
3118  * reads inode id on master MDS. This is usualy done by CMOBD to update requests
3119  * to master MDS by correct store cookie, needed to find inode on master MDS
3120  * quickly.
3121  */
3122 int mds_read_inode_mid(struct obd_device *obd, struct inode *inode,
3123                        struct lustre_id *id)
3124 {
3125         int rc;
3126         ENTRY;
3127
3128         LASSERT(id != NULL);
3129         LASSERT(obd != NULL);
3130         LASSERT(inode != NULL);
3131
3132         rc = fsfilt_get_md(obd, inode, id, sizeof(*id), EA_MID);
3133         if (rc < 0) {
3134                 CERROR("fsfilt_get_md() failed, rc = %d\n", rc);
3135                 RETURN(rc);
3136         } else if (!rc) {
3137                 rc = -ENODATA;
3138                 RETURN(rc);
3139         } else {
3140                 rc = 0;
3141         }
3142
3143         RETURN(rc);
3144 }
3145
3146 /*
3147  * updates master inode id. Usualy this is done by CMOBD after an inode is
3148  * created and relationship between cache MDS and master one should be
3149  * established.
3150  */
3151 int mds_update_inode_mid(struct obd_device *obd, struct inode *inode,
3152                          void *handle, struct lustre_id *id)
3153 {
3154         int rc = 0;
3155         ENTRY;
3156
3157         LASSERT(id != NULL);
3158         LASSERT(obd != NULL);
3159         LASSERT(inode != NULL);
3160         
3161         rc = fsfilt_set_md(obd, inode, handle, id,
3162                            sizeof(*id), EA_MID);
3163         if (rc) {
3164                 CERROR("fsfilt_set_md() failed, "
3165                        "rc = %d\n", rc);
3166                 RETURN(rc);
3167         }
3168
3169         RETURN(rc);
3170 }
3171
3172 /* mount the file system (secretly) */
3173 static int mds_setup(struct obd_device *obd, obd_count len, void *buf)
3174 {
3175         struct lustre_cfg* lcfg = buf;
3176         struct mds_obd *mds = &obd->u.mds;
3177         struct lvfs_obd_ctxt *lvfs_ctxt = NULL;
3178         char *options = NULL;
3179         struct vfsmount *mnt;
3180         char ns_name[48];
3181         unsigned long page;
3182         int rc = 0;
3183         ENTRY;
3184
3185         if (lcfg->lcfg_bufcount < 3)
3186                 RETURN(rc = -EINVAL);
3187
3188         if (LUSTRE_CFG_BUFLEN(lcfg, 1) == 0 || LUSTRE_CFG_BUFLEN(lcfg, 2) == 0)
3189                 RETURN(rc = -EINVAL);
3190
3191         obd->obd_fsops = fsfilt_get_ops(lustre_cfg_string(lcfg, 2));
3192         if (IS_ERR(obd->obd_fsops))
3193                 RETURN(rc = PTR_ERR(obd->obd_fsops));
3194
3195         mds->mds_max_mdsize = sizeof(struct lov_mds_md);
3196
3197         page = __get_free_page(GFP_KERNEL);
3198         if (!page)
3199                 RETURN(-ENOMEM);
3200
3201         options = (char *)page;
3202         memset(options, 0, PAGE_SIZE);
3203
3204         /*
3205          * here we use "iopen_nopriv" hardcoded, because it affects MDS utility
3206          * and the rest of options are passed by mount options. Probably this
3207          * should be moved to somewhere else like startup scripts or lconf. */
3208         sprintf(options, "iopen_nopriv");
3209         
3210         if (LUSTRE_CFG_BUFLEN(lcfg, 4) > 0 && lustre_cfg_buf(lcfg, 4))
3211                 sprintf(options + strlen(options), ",%s",
3212                         lustre_cfg_string(lcfg, 4));
3213
3214         /* we have to know mdsnum before touching underlying fs -bzzz */
3215         atomic_set(&mds->mds_open_count, 0);
3216         sema_init(&mds->mds_md_sem, 1);
3217         mds->mds_md_connected = 0;
3218         mds->mds_md_name = NULL;
3219         
3220         if (LUSTRE_CFG_BUFLEN(lcfg, 5) > 0 && lustre_cfg_buf(lcfg, 5) &&
3221             strncmp(lustre_cfg_string(lcfg, 5), "dumb", LUSTRE_CFG_BUFLEN(lcfg, 5))) {
3222                 class_uuid_t uuid;
3223
3224                 generate_random_uuid(uuid);
3225                 class_uuid_unparse(uuid, &mds->mds_md_uuid);
3226
3227                 OBD_ALLOC(mds->mds_md_name, LUSTRE_CFG_BUFLEN(lcfg, 5));
3228                 if (mds->mds_md_name == NULL) 
3229                         RETURN(rc = -ENOMEM);
3230
3231                 memcpy(mds->mds_md_name, lustre_cfg_buf(lcfg, 5),
3232                        LUSTRE_CFG_BUFLEN(lcfg, 5));
3233                 
3234                 CDEBUG(D_OTHER, "MDS: %s is master for %s\n",
3235                        obd->obd_name, mds->mds_md_name);
3236
3237                 rc = mds_md_connect(obd, mds->mds_md_name);
3238                 if (rc) {
3239                         OBD_FREE(mds->mds_md_name, LUSTRE_CFG_BUFLEN(lcfg, 5));
3240                         GOTO(err_ops, rc);
3241                 }
3242         }
3243         
3244         mds->mds_obd_type = MDS_MASTER_OBD;
3245
3246         if (LUSTRE_CFG_BUFLEN(lcfg, 6) > 0 && lustre_cfg_buf(lcfg, 6) &&
3247             strncmp(lustre_cfg_string(lcfg, 6), "dumb", 
3248                     LUSTRE_CFG_BUFLEN(lcfg, 6))) {
3249                 if (!memcmp(lustre_cfg_string(lcfg, 6), "master", 
3250                             strlen("master"))) {
3251                         mds->mds_obd_type = MDS_MASTER_OBD;
3252                 } else if (!memcmp(lustre_cfg_string(lcfg, 6), "cache", 
3253                                    strlen("cache"))) {
3254                         mds->mds_obd_type = MDS_CACHE_OBD;
3255                 }     
3256         }
3257
3258         rc = lvfs_mount_fs(lustre_cfg_string(lcfg, 1), 
3259                            lustre_cfg_string(lcfg, 2),
3260                            options, 0, &lvfs_ctxt);
3261
3262         free_page(page);
3263
3264         if (rc || !lvfs_ctxt) {
3265                 CERROR("lvfs_mount_fs failed: rc = %d\n", rc);
3266                 GOTO(err_ops, rc);
3267         }
3268
3269         mnt = lvfs_ctxt->loc_mnt;
3270         mds->mds_lvfs_ctxt = lvfs_ctxt;
3271         ll_clear_rdonly(ll_sbdev(mnt->mnt_sb));
3272
3273         CDEBUG(D_SUPER, "%s: mnt = %p\n", lustre_cfg_string(lcfg, 1), mnt);
3274
3275         sema_init(&mds->mds_epoch_sem, 1);
3276         atomic_set(&mds->mds_real_clients, 0);
3277         spin_lock_init(&mds->mds_transno_lock);
3278         spin_lock_init(&mds->mds_last_fid_lock);
3279         sema_init(&mds->mds_orphan_recovery_sem, 1);
3280         mds->mds_max_cookiesize = sizeof(struct llog_cookie);
3281
3282         sprintf(ns_name, "mds-%s", obd->obd_uuid.uuid);
3283         obd->obd_namespace = ldlm_namespace_new(ns_name, LDLM_NAMESPACE_SERVER);
3284
3285         if (obd->obd_namespace == NULL) {
3286                 mds_cleanup(obd, 0);
3287                 GOTO(err_put, rc = -ENOMEM);
3288         }
3289         ldlm_register_intent(obd->obd_namespace, mds_intent_policy);
3290
3291         rc = mds_fs_setup(obd, mnt);
3292         if (rc) {
3293                 CERROR("%s: MDS filesystem method init failed: rc = %d\n",
3294                        obd->obd_name, rc);
3295                 GOTO(err_ns, rc);
3296         }
3297         
3298         rc = llog_start_commit_thread();
3299         if (rc < 0)
3300
3301                 GOTO(err_fs, rc);
3302
3303
3304         if (LUSTRE_CFG_BUFLEN(lcfg, 3) > 0 && lustre_cfg_buf(lcfg, 3) &&
3305             strncmp(lustre_cfg_string(lcfg, 3), "dumb", 
3306                     LUSTRE_CFG_BUFLEN(lcfg, 3))) {
3307                 class_uuid_t uuid;
3308
3309                 generate_random_uuid(uuid);
3310                 class_uuid_unparse(uuid, &mds->mds_dt_uuid);
3311
3312                 OBD_ALLOC(mds->mds_profile, LUSTRE_CFG_BUFLEN(lcfg, 3));
3313                 if (mds->mds_profile == NULL)
3314                         GOTO(err_fs, rc = -ENOMEM);
3315
3316                 strncpy(mds->mds_profile, lustre_cfg_string(lcfg, 3),
3317                         LUSTRE_CFG_BUFLEN(lcfg, 3));
3318         }
3319
3320         /* 
3321          * setup root dir and files ID dir if lmv already connected, or there is
3322          * not lmv at all.
3323          */
3324         if (mds->mds_md_exp || (LUSTRE_CFG_BUFLEN(lcfg, 3) > 0 && 
3325                                 lustre_cfg_buf(lcfg, 3) &&
3326                                 strncmp(lustre_cfg_string(lcfg, 3), "dumb", 
3327                                         LUSTRE_CFG_BUFLEN(lcfg, 3)))) {
3328                 rc = mds_fs_setup_rootid(obd);
3329                 if (rc)
3330                         GOTO(err_fs, rc);
3331
3332                 rc = mds_fs_setup_virtid(obd);
3333                 if (rc)
3334                         GOTO(err_fs, rc);
3335         }
3336
3337         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
3338                            "mds_ldlm_client", &obd->obd_ldlm_client);
3339         obd->obd_replayable = 1;
3340
3341         rc = mds_postsetup(obd);
3342         if (rc)
3343                 GOTO(err_fs, rc);
3344
3345         RETURN(0);
3346
3347 err_fs:
3348         /* No extra cleanup needed for llog_init_commit_thread() */
3349         mds_fs_cleanup(obd, 0);
3350 err_ns:
3351         ldlm_namespace_free(obd->obd_namespace, 0);
3352         obd->obd_namespace = NULL;
3353 err_put:
3354         unlock_kernel();
3355         lvfs_umount_fs(mds->mds_lvfs_ctxt);
3356         mds->mds_sb = 0;
3357         lock_kernel();
3358 err_ops:
3359         fsfilt_put_ops(obd->obd_fsops);
3360         return rc;
3361 }
3362
3363 static int mds_postsetup(struct obd_device *obd)
3364 {
3365         struct mds_obd *mds = &obd->u.mds;
3366         int rc = 0;
3367         ENTRY;
3368
3369         rc = obd_llog_setup(obd, &obd->obd_llogs, LLOG_CONFIG_ORIG_CTXT, 
3370                             obd, 0, NULL, &llog_lvfs_ops);
3371         if (rc)
3372                 RETURN(rc);
3373
3374         if (mds->mds_profile) {
3375                 struct llog_ctxt *lgctxt;
3376                 struct lvfs_run_ctxt saved;
3377                 struct lustre_profile *lprof;
3378                 struct config_llog_instance cfg;
3379
3380                 cfg.cfg_instance = NULL;
3381                 cfg.cfg_uuid = mds->mds_dt_uuid;
3382                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3383
3384                 lgctxt = llog_get_context(&obd->obd_llogs, LLOG_CONFIG_ORIG_CTXT);
3385                 if (!lgctxt) {
3386                         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3387                         GOTO(err_llog, rc = -EINVAL);
3388                 }
3389                 
3390                 rc = class_config_process_llog(lgctxt, mds->mds_profile, &cfg);
3391                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3392
3393                 if (rc)
3394                         GOTO(err_llog, rc);
3395
3396                 lprof = class_get_profile(mds->mds_profile);
3397                 if (lprof == NULL) {
3398                         CERROR("No profile found: %s\n", mds->mds_profile);
3399                         GOTO(err_cleanup, rc = -ENOENT);
3400                 }
3401                 rc = mds_dt_connect(obd, lprof->lp_lov);
3402                 if (rc)
3403                         GOTO(err_cleanup, rc);
3404
3405                 rc = mds_md_postsetup(obd);
3406                 if (rc)
3407                         GOTO(err_cleanup, rc);
3408         }
3409
3410         RETURN(rc);
3411 err_cleanup:
3412         mds_dt_clean(obd);
3413 err_llog:
3414         obd_llog_cleanup(llog_get_context(&obd->obd_llogs,
3415                                           LLOG_CONFIG_ORIG_CTXT));
3416         return rc;
3417 }
3418
3419 int mds_postrecov_common(struct obd_device *obd)
3420 {
3421         struct mds_obd *mds = &obd->u.mds;
3422         struct llog_ctxt *ctxt;
3423         int rc, item = 0, valsize;
3424          __u32 group;
3425         ENTRY;
3426
3427         LASSERT(!obd->obd_recovering);
3428         ctxt = llog_get_context(&obd->obd_llogs, LLOG_UNLINK_ORIG_CTXT);
3429         LASSERT(ctxt != NULL);
3430
3431         /* set nextid first, so we are sure it happens */
3432         rc = mds_dt_set_nextid(obd);
3433         if (rc) {
3434                 CERROR("%s: mds_dt_set_nextid() failed\n", obd->obd_name);
3435                 GOTO(out, rc);
3436         }
3437
3438         /* clean PENDING dir */
3439         rc = mds_cleanup_orphans(obd);
3440         if (rc < 0)
3441                 GOTO(out, rc);
3442         item = rc;
3443
3444         group = FILTER_GROUP_FIRST_MDS + mds->mds_num;
3445         valsize = sizeof(group);
3446         rc = obd_set_info(mds->mds_dt_exp, strlen("mds_conn"), "mds_conn",
3447                           valsize, &group);
3448         if (rc)
3449                 GOTO(out, rc);
3450
3451         rc = llog_connect(ctxt, obd->u.mds.mds_dt_desc.ld_tgt_count,
3452                           NULL, NULL, NULL);
3453         if (rc) {
3454                 CERROR("%s: failed at llog_origin_connect: %d\n", 
3455                        obd->obd_name, rc);
3456                 GOTO(out, rc);
3457         }
3458
3459         /* remove the orphaned precreated objects */
3460         rc = mds_dt_clearorphans(mds, NULL /* all OSTs */);
3461         if (rc)
3462                 GOTO(err_llog, rc);
3463
3464 out:
3465         RETURN(rc < 0 ? rc : item);
3466
3467 err_llog:
3468         /* cleanup all llogging subsystems */
3469         rc = obd_llog_finish(obd, &obd->obd_llogs,
3470                              mds->mds_dt_desc.ld_tgt_count);
3471         if (rc)
3472                 CERROR("%s: failed to cleanup llogging subsystems\n",
3473                         obd->obd_name);
3474         goto out;
3475 }
3476
3477 int mds_postrecov(struct obd_device *obd)
3478 {
3479         int rc;
3480         ENTRY;
3481         rc = mds_postrecov_common(obd);
3482         if (rc == 0)
3483                 rc = mds_md_reconnect(obd);
3484         RETURN(rc);
3485 }
3486
3487 int mds_dt_clean(struct obd_device *obd)
3488 {
3489         struct mds_obd *mds = &obd->u.mds;
3490         ENTRY;
3491
3492         if (mds->mds_profile) {
3493                 char * cln_prof;
3494                 struct llog_ctxt *llctx;
3495                 struct lvfs_run_ctxt saved;
3496                 struct config_llog_instance cfg;
3497                 int len = strlen(mds->mds_profile) + sizeof("-clean") + 1;
3498
3499                 OBD_ALLOC(cln_prof, len);
3500                 sprintf(cln_prof, "%s-clean", mds->mds_profile);
3501
3502                 cfg.cfg_instance = NULL;
3503                 cfg.cfg_uuid = mds->mds_dt_uuid;
3504
3505                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3506                 llctx = llog_get_context(&obd->obd_llogs,
3507                                          LLOG_CONFIG_ORIG_CTXT);
3508                 class_config_process_llog(llctx, cln_prof, &cfg);
3509                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3510
3511                 OBD_FREE(cln_prof, len);
3512                 OBD_FREE(mds->mds_profile, strlen(mds->mds_profile) + 1);
3513                 mds->mds_profile = NULL;
3514         }
3515         RETURN(0);
3516 }
3517
3518 int mds_md_clean(struct obd_device *obd)
3519 {
3520         struct mds_obd *mds = &obd->u.mds;
3521         ENTRY;
3522
3523         if (mds->mds_md_name) {
3524                 OBD_FREE(mds->mds_md_name, strlen(mds->mds_md_name) + 1);
3525                 mds->mds_md_name = NULL;
3526         }
3527         RETURN(0);
3528 }
3529
3530 static int mds_precleanup(struct obd_device *obd, int flags)
3531 {
3532         int rc = 0;
3533         ENTRY;
3534
3535         mds_md_clean(obd);
3536         mds_dt_disconnect(obd, flags);
3537         mds_dt_clean(obd);
3538         obd_llog_cleanup(llog_get_context(&obd->obd_llogs, LLOG_CONFIG_ORIG_CTXT));
3539         RETURN(rc);
3540 }
3541
3542 extern void lgss_svc_cache_purge_all(void);
3543 static int mds_cleanup(struct obd_device *obd, int flags)
3544 {
3545         struct mds_obd *mds = &obd->u.mds;
3546         ENTRY;
3547
3548         if (mds->mds_sb == NULL)
3549                 RETURN(0);
3550
3551         mds_update_server_data(obd, 1);
3552         mds_update_last_fid(obd, NULL, 1);
3553         
3554         if (mds->mds_dt_objids != NULL) {
3555                 int size = mds->mds_dt_desc.ld_tgt_count *
3556                         sizeof(obd_id);
3557                 OBD_FREE(mds->mds_dt_objids, size);
3558         }
3559         mds_fs_cleanup(obd, flags);
3560
3561         unlock_kernel();
3562
3563         /* 2 seems normal on mds, (may_umount() also expects 2
3564           fwiw), but we only see 1 at this point in obdfilter. */
3565         lvfs_umount_fs(mds->mds_lvfs_ctxt);
3566
3567         mds->mds_sb = 0;
3568
3569         ldlm_namespace_free(obd->obd_namespace, flags & OBD_OPT_FORCE);
3570
3571         spin_lock_bh(&obd->obd_processing_task_lock);
3572         if (obd->obd_recovering) {
3573                 target_cancel_recovery_timer(obd);
3574                 obd->obd_recovering = 0;
3575         }
3576         spin_unlock_bh(&obd->obd_processing_task_lock);
3577
3578         lock_kernel();
3579         fsfilt_put_ops(obd->obd_fsops);
3580
3581 #ifdef ENABLE_GSS
3582         /* XXX */
3583         lgss_svc_cache_purge_all();
3584 #endif
3585         RETURN(0);
3586 }
3587
3588 static int set_security(const char *value, char **sec)
3589 {
3590         int rc = 0;
3591
3592         if (!strcmp(value, "null"))
3593                 *sec = "null";
3594         else if (!strcmp(value, "krb5i"))
3595                 *sec = "krb5i";
3596         else if (!strcmp(value, "krb5p"))
3597                 *sec = "krb5p";
3598         else {
3599                 CERROR("Unrecognized value, force use NULL\n");
3600                 rc = -EINVAL;
3601         }
3602
3603         return rc;
3604 }
3605
3606 static int mds_process_config(struct obd_device *obd, obd_count len, void *buf)
3607 {
3608         struct lustre_cfg *lcfg = buf;
3609         struct mds_obd *mds = &obd->u.mds;
3610         int rc = 0;
3611         ENTRY;
3612
3613         switch(lcfg->lcfg_command) {
3614         case LCFG_SET_SECURITY: {
3615                 if (LUSTRE_CFG_BUFLEN(lcfg, 1) || LUSTRE_CFG_BUFLEN(lcfg, 2))
3616                         GOTO(out, rc = -EINVAL);
3617
3618                 if (!strcmp(lustre_cfg_string(lcfg, 1), "mds_mds_sec"))
3619                         rc = set_security(lustre_cfg_string(lcfg, 2),
3620                                           &mds->mds_mds_sec);
3621                 else if (!strcmp(lustre_cfg_string(lcfg, 2), "mds_ost_sec"))
3622                         rc = set_security(lustre_cfg_string(lcfg, 2),
3623                                           &mds->mds_ost_sec);
3624                 else {
3625                         CERROR("Unrecognized key\n");
3626                         rc = -EINVAL;
3627                 }
3628                 break;
3629         }
3630         default: {
3631                 CERROR("Unknown command: %d\n", lcfg->lcfg_command);
3632                 GOTO(out, rc = -EINVAL);
3633
3634         }
3635         }
3636 out:
3637         RETURN(rc);
3638 }
3639
3640 static void fixup_handle_for_resent_req(struct ptlrpc_request *req,
3641                                         int offset,
3642                                         struct ldlm_lock *new_lock,
3643                                         struct ldlm_lock **old_lock,
3644                                         struct lustre_handle *lockh)
3645 {
3646         struct obd_export *exp = req->rq_export;
3647         struct obd_device *obd = exp->exp_obd;
3648         struct ldlm_request *dlmreq =
3649                 lustre_msg_buf(req->rq_reqmsg, offset, sizeof (*dlmreq));
3650         struct lustre_handle remote_hdl = dlmreq->lock_handle1;
3651         struct list_head *iter;
3652
3653         if (!(lustre_msg_get_flags(req->rq_reqmsg) & MSG_RESENT))
3654                 return;
3655
3656         l_lock(&obd->obd_namespace->ns_lock);
3657         list_for_each(iter, &exp->exp_ldlm_data.led_held_locks) {
3658                 struct ldlm_lock *lock;
3659                 lock = list_entry(iter, struct ldlm_lock, l_export_chain);
3660                 if (lock == new_lock)
3661                         continue;
3662                 if (lock->l_remote_handle.cookie == remote_hdl.cookie) {
3663                         lockh->cookie = lock->l_handle.h_cookie;
3664                         LDLM_DEBUG(lock, "restoring lock cookie");
3665                         DEBUG_REQ(D_HA, req, "restoring lock cookie "LPX64,
3666                                   lockh->cookie);
3667                         if (old_lock)
3668                                 *old_lock = LDLM_LOCK_GET(lock);
3669                         l_unlock(&obd->obd_namespace->ns_lock);
3670                         return;
3671                 }
3672         }
3673         l_unlock(&obd->obd_namespace->ns_lock);
3674
3675         /* If the xid matches, then we know this is a resent request,
3676          * and allow it. (It's probably an OPEN, for which we don't
3677          * send a lock */
3678         if (req->rq_xid == 
3679             le64_to_cpu(exp->exp_mds_data.med_mcd->mcd_last_xid))
3680                 return;
3681
3682         if (req->rq_xid == 
3683             le64_to_cpu(exp->exp_mds_data.med_mcd->mcd_last_close_xid))
3684                 return;
3685
3686         /* This remote handle isn't enqueued, so we never received or
3687          * processed this request.  Clear MSG_RESENT, because it can
3688          * be handled like any normal request now. */
3689
3690         lustre_msg_clear_flags(req->rq_reqmsg, MSG_RESENT);
3691
3692         DEBUG_REQ(D_HA, req, "no existing lock with rhandle "LPX64,
3693                   remote_hdl.cookie);
3694 }
3695
3696 int intent_disposition(struct ldlm_reply *rep, int flag)
3697 {
3698         if (!rep)
3699                 return 0;
3700         return (rep->lock_policy_res1 & flag);
3701 }
3702
3703 void intent_set_disposition(struct ldlm_reply *rep, int flag)
3704 {
3705         if (!rep)
3706                 return;
3707         rep->lock_policy_res1 |= flag;
3708 }
3709
3710 static int mds_intent_policy(struct ldlm_namespace *ns,
3711                              struct ldlm_lock **lockp, void *req_cookie,
3712                              ldlm_mode_t mode, int flags, void *data)
3713 {
3714         struct ptlrpc_request *req = req_cookie;
3715         struct ldlm_lock *lock = *lockp;
3716         struct ldlm_intent *it;
3717         struct mds_obd *mds = &req->rq_export->exp_obd->u.mds;
3718         struct ldlm_reply *rep;
3719         struct lustre_handle lockh[2] = {{0}, {0}};
3720         struct ldlm_lock *new_lock = NULL;
3721         int getattr_part = MDS_INODELOCK_UPDATE;
3722         int rc, reply_buffers;
3723         int repsize[5] = {sizeof(struct ldlm_reply),
3724                           sizeof(struct mds_body),
3725                           mds->mds_max_mdsize};
3726
3727         int offset = MDS_REQ_INTENT_REC_OFF; 
3728         ENTRY;
3729
3730         LASSERT(req != NULL);
3731         MD_COUNTER_INCREMENT(req->rq_export->exp_obd, intent_lock);
3732
3733         if (req->rq_reqmsg->bufcount <= MDS_REQ_INTENT_IT_OFF) {
3734                 /* No intent was provided */
3735                 int size = sizeof(struct ldlm_reply);
3736                 rc = lustre_pack_reply(req, 1, &size, NULL);
3737                 LASSERT(rc == 0);
3738                 RETURN(0);
3739         }
3740
3741         it = lustre_swab_reqbuf(req, MDS_REQ_INTENT_IT_OFF, sizeof(*it),
3742                                 lustre_swab_ldlm_intent);
3743         if (it == NULL) {
3744                 CERROR("Intent missing\n");
3745                 RETURN(req->rq_status = -EFAULT);
3746         }
3747
3748         LDLM_DEBUG(lock, "intent policy, opc: %s", ldlm_it2str(it->opc));
3749
3750         reply_buffers = 3;
3751         if (it->opc & ( IT_OPEN | IT_GETATTR | IT_LOOKUP | IT_CHDIR )) {
3752                 reply_buffers = 5;
3753                 repsize[3] = 4;
3754                 repsize[4] = xattr_acl_size(LL_ACL_MAX_ENTRIES);
3755         }
3756
3757         rc = lustre_pack_reply(req, reply_buffers, repsize, NULL);
3758         if (rc)
3759                 RETURN(req->rq_status = rc);
3760
3761         rep = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*rep));
3762         LASSERT(rep != NULL);
3763
3764         intent_set_disposition(rep, DISP_IT_EXECD);
3765
3766         /* execute policy */
3767         switch ((long)it->opc) {
3768         case IT_OPEN:
3769         case IT_CREAT|IT_OPEN:
3770                 fixup_handle_for_resent_req(req, MDS_REQ_INTENT_LOCKREQ_OFF,
3771                                             lock, NULL, lockh);
3772                 /* XXX swab here to assert that an mds_open reint
3773                  * packet is following */
3774                 fixup_handle_for_resent_req(req, MDS_REQ_INTENT_LOCKREQ_OFF, 
3775                                             lock, NULL, lockh);
3776                 rep->lock_policy_res2 = mds_reint(req, offset, lockh);
3777
3778                 if (rep->lock_policy_res2) {
3779                         /* 
3780                          * mds_open() returns ENOLCK where it should return
3781                          * zero, but it has no lock to return.
3782                          */
3783                         if (rep->lock_policy_res2 == ENOLCK)
3784                                 rep->lock_policy_res2 = 0;
3785
3786                         RETURN(ELDLM_LOCK_ABORTED);
3787                 }
3788                 
3789                 /*
3790                  * IT_OPEN may return lock on cross-node dentry that we want to
3791                  * hold during attr retrival -bzzz
3792                  */
3793                 if (lockh[0].cookie == 0)
3794                         RETURN(ELDLM_LOCK_ABORTED);
3795                 
3796                 break;
3797         case IT_LOOKUP:
3798                 getattr_part = MDS_INODELOCK_LOOKUP;
3799         case IT_CHDIR:
3800         case IT_GETATTR:
3801                 getattr_part |= MDS_INODELOCK_LOOKUP;
3802         case IT_READDIR:
3803                 fixup_handle_for_resent_req(req, MDS_REQ_INTENT_LOCKREQ_OFF, 
3804                                             lock, &new_lock, lockh);
3805                 rep->lock_policy_res2 = mds_getattr_lock(req, offset, lockh,
3806                                                          getattr_part);
3807                 /* FIXME: LDLM can set req->rq_status. MDS sets
3808                    policy_res{1,2} with disposition and status.
3809                    - replay: returns 0 & req->status is old status
3810                    - otherwise: returns req->status */
3811                 if (intent_disposition(rep, DISP_LOOKUP_NEG))
3812                         rep->lock_policy_res2 = 0;
3813                 if (!intent_disposition(rep, DISP_LOOKUP_POS) ||
3814                     rep->lock_policy_res2)
3815                         RETURN(ELDLM_LOCK_ABORTED);
3816                 if (req->rq_status != 0) {
3817                         LBUG();
3818                         rep->lock_policy_res2 = req->rq_status;
3819                         RETURN(ELDLM_LOCK_ABORTED);
3820                 }
3821                 break;
3822         case IT_UNLINK:
3823                 rc = mds_lock_and_check_slave(offset, req, lockh);
3824                 if ((rep->lock_policy_res2 = rc)) {
3825                         if (rc == ENOLCK)
3826                                 rep->lock_policy_res2 = 0;
3827                         RETURN(ELDLM_LOCK_ABORTED);
3828                 }
3829                 break;
3830         default:
3831                 CERROR("Unhandled intent "LPD64"\n", it->opc);
3832                 LBUG();
3833         }
3834
3835         /* By this point, whatever function we called above must have either
3836          * filled in 'lockh', been an intent replay, or returned an error.  We
3837          * want to allow replayed RPCs to not get a lock, since we would just
3838          * drop it below anyways because lock replay is done separately by the
3839          * client afterwards.  For regular RPCs we want to give the new lock to
3840          * the client instead of whatever lock it was about to get. */
3841         if (new_lock == NULL)
3842                 new_lock = ldlm_handle2lock(&lockh[0]);
3843         if (new_lock == NULL && (flags & LDLM_FL_INTENT_ONLY))
3844                 RETURN(0);
3845
3846         LASSERTF(new_lock != NULL, "op "LPX64" lockh "LPX64"\n",
3847                  it->opc, lockh[0].cookie);
3848
3849         /* If we've already given this lock to a client once, then we should
3850          * have no readers or writers.  Otherwise, we should have one reader
3851          * _or_ writer ref (which will be zeroed below) before returning the
3852          * lock to a client. */
3853         if (new_lock->l_export == req->rq_export) {
3854                 LASSERT(new_lock->l_readers + new_lock->l_writers == 0);
3855         } else {
3856                 LASSERT(new_lock->l_export == NULL);
3857                 LASSERT(new_lock->l_readers + new_lock->l_writers == 1);
3858         }
3859
3860         *lockp = new_lock;
3861
3862         if (new_lock->l_export == req->rq_export) {
3863                 /* Already gave this to the client, which means that we
3864                  * reconstructed a reply. */
3865                 LASSERT(lustre_msg_get_flags(req->rq_reqmsg) &
3866                         MSG_RESENT);
3867                 RETURN(ELDLM_LOCK_REPLACED);
3868         }
3869
3870         /* Fixup the lock to be given to the client */
3871         l_lock(&new_lock->l_resource->lr_namespace->ns_lock);
3872         new_lock->l_readers = 0;
3873         new_lock->l_writers = 0;
3874
3875         new_lock->l_export = class_export_get(req->rq_export);
3876         list_add(&new_lock->l_export_chain,
3877                  &new_lock->l_export->exp_ldlm_data.led_held_locks);
3878
3879         new_lock->l_blocking_ast = lock->l_blocking_ast;
3880         new_lock->l_completion_ast = lock->l_completion_ast;
3881
3882         memcpy(&new_lock->l_remote_handle, &lock->l_remote_handle,
3883                sizeof(lock->l_remote_handle));
3884
3885         new_lock->l_flags &= ~LDLM_FL_LOCAL;
3886
3887         LDLM_LOCK_PUT(new_lock);
3888         l_unlock(&new_lock->l_resource->lr_namespace->ns_lock);
3889
3890         RETURN(ELDLM_LOCK_REPLACED);
3891 }
3892
3893 int mds_attach(struct obd_device *dev, obd_count len, void *data)
3894 {
3895         struct lprocfs_static_vars lvars;
3896         int rc = 0;
3897
3898         lprocfs_init_multi_vars(0, &lvars);
3899
3900         rc = lprocfs_obd_attach(dev, lvars.obd_vars);
3901         if (rc)
3902                 return rc;
3903
3904         return lprocfs_alloc_md_stats(dev, 0);
3905 }
3906
3907 int mds_detach(struct obd_device *dev)
3908 {
3909         lprocfs_free_md_stats(dev);
3910         return lprocfs_obd_detach(dev);
3911 }
3912
3913 int mdt_attach(struct obd_device *dev, obd_count len, void *data)
3914 {
3915         struct lprocfs_static_vars lvars;
3916
3917         lprocfs_init_multi_vars(1, &lvars);
3918         return lprocfs_obd_attach(dev, lvars.obd_vars);
3919 }
3920
3921 int mdt_detach(struct obd_device *dev)
3922 {
3923         return lprocfs_obd_detach(dev);
3924 }
3925
3926 static int mdt_setup(struct obd_device *obd, obd_count len, void *buf)
3927 {
3928         struct mds_obd *mds = &obd->u.mds;
3929         int rc = 0;
3930         ENTRY;
3931
3932         mds->mds_service =
3933                 ptlrpc_init_svc(MDS_NBUFS, MDS_BUFSIZE, MDS_MAXREQSIZE,
3934                                 MDS_REQUEST_PORTAL, MDC_REPLY_PORTAL,
3935                                 MDS_SERVICE_WATCHDOG_TIMEOUT,
3936                                 mds_handle, "mds", obd->obd_proc_entry);
3937
3938         if (!mds->mds_service) {
3939                 CERROR("failed to start service\n");
3940                 RETURN(-ENOMEM);
3941         }
3942
3943         rc = ptlrpc_start_n_threads(obd, mds->mds_service, MDT_NUM_THREADS,
3944                                     "ll_mdt");
3945         if (rc)
3946                 GOTO(err_thread, rc);
3947
3948         mds->mds_setattr_service =
3949                 ptlrpc_init_svc(MDS_NBUFS, MDS_BUFSIZE, MDS_MAXREQSIZE,
3950                                 MDS_SETATTR_PORTAL, MDC_REPLY_PORTAL,
3951                                 MDS_SERVICE_WATCHDOG_TIMEOUT,
3952                                 mds_handle, "mds_setattr",
3953                                 obd->obd_proc_entry);
3954         if (!mds->mds_setattr_service) {
3955                 CERROR("failed to start getattr service\n");
3956                 GOTO(err_thread, rc = -ENOMEM);
3957         }
3958
3959         rc = ptlrpc_start_n_threads(obd, mds->mds_setattr_service,
3960                                     MDT_NUM_THREADS, "ll_mdt_attr");
3961         if (rc)
3962                 GOTO(err_thread2, rc);
3963
3964         mds->mds_readpage_service =
3965                 ptlrpc_init_svc(MDS_NBUFS, MDS_BUFSIZE, MDS_MAXREQSIZE,
3966                                 MDS_READPAGE_PORTAL, MDC_REPLY_PORTAL,
3967                                 MDS_SERVICE_WATCHDOG_TIMEOUT,
3968                                 mds_handle, "mds_readpage",
3969                                 obd->obd_proc_entry);
3970         if (!mds->mds_readpage_service) {
3971                 CERROR("failed to start readpage service\n");
3972                 GOTO(err_thread2, rc = -ENOMEM);
3973         }
3974
3975         rc = ptlrpc_start_n_threads(obd, mds->mds_readpage_service,
3976                                     MDT_NUM_THREADS, "ll_mdt_rdpg");
3977
3978         if (rc)
3979                 GOTO(err_thread3, rc);
3980
3981         RETURN(0);
3982
3983 err_thread3:
3984         ptlrpc_unregister_service(mds->mds_readpage_service);
3985 err_thread2:
3986         ptlrpc_unregister_service(mds->mds_setattr_service);
3987 err_thread:
3988         ptlrpc_unregister_service(mds->mds_service);
3989         return rc;
3990 }
3991
3992 static int mdt_cleanup(struct obd_device *obd, int flags)
3993 {
3994         struct mds_obd *mds = &obd->u.mds;
3995         ENTRY;
3996
3997         ptlrpc_stop_all_threads(mds->mds_readpage_service);
3998         ptlrpc_unregister_service(mds->mds_readpage_service);
3999
4000         ptlrpc_stop_all_threads(mds->mds_setattr_service);
4001         ptlrpc_unregister_service(mds->mds_setattr_service);
4002
4003         ptlrpc_stop_all_threads(mds->mds_service);
4004         ptlrpc_unregister_service(mds->mds_service);
4005
4006         RETURN(0);
4007 }
4008
4009 static struct dentry *mds_lvfs_id2dentry(__u64 ino, __u32 gen,
4010                                          __u64 gr, void *data)
4011 {
4012         struct lustre_id id;
4013         struct obd_device *obd = data;
4014         
4015         id_ino(&id) = ino;
4016         id_gen(&id) = gen;
4017         return mds_id2dentry(obd, &id, NULL);
4018 }
4019
4020 static int mds_get_info(struct obd_export *exp, __u32 keylen,
4021                         void *key, __u32 *valsize, void *val)
4022 {
4023         struct obd_device *obd;
4024         struct mds_obd *mds;
4025         ENTRY;
4026
4027         obd = class_exp2obd(exp);
4028         mds = &obd->u.mds;
4029         
4030         if (obd == NULL) {
4031                 CDEBUG(D_IOCTL, "invalid client cookie "LPX64"\n",
4032                        exp->exp_handle.h_cookie);
4033                 RETURN(-EINVAL);
4034         }
4035
4036         if (keylen >= strlen("reint_log") && memcmp(key, "reint_log", 9) == 0) {
4037                 /* get log_context handle. */
4038                 unsigned long *llh_handle = val;
4039                 *valsize = sizeof(unsigned long);
4040                 *llh_handle = (unsigned long)obd->obd_llog_ctxt[LLOG_REINT_ORIG_CTXT];
4041                 RETURN(0);
4042         }
4043         if (keylen >= strlen("cache_sb") && memcmp(key, "cache_sb", 8) == 0) {
4044                 /* get log_context handle. */
4045                 unsigned long *sb = val;
4046                 *valsize = sizeof(unsigned long);
4047                 *sb = (unsigned long)obd->u.mds.mds_sb;
4048                 RETURN(0);
4049         }
4050
4051         if (keylen >= strlen("mdsize") && memcmp(key, "mdsize", keylen) == 0) {
4052                 __u32 *mdsize = val;
4053                 *valsize = sizeof(*mdsize);
4054                 *mdsize = mds->mds_max_mdsize;
4055                 RETURN(0);
4056         }
4057
4058         if (keylen >= strlen("mdsnum") && strcmp(key, "mdsnum") == 0) {
4059                 __u32 *mdsnum = val;
4060                 *valsize = sizeof(*mdsnum);
4061                 *mdsnum = mds->mds_num;
4062                 RETURN(0);
4063         }
4064
4065         if (keylen >= strlen("rootid") && strcmp(key, "rootid") == 0) {
4066                 struct lustre_id *rootid = val;
4067                 *valsize = sizeof(struct lustre_id);
4068                 *rootid = mds->mds_rootid;
4069                 RETURN(0);
4070         }
4071
4072         CDEBUG(D_IOCTL, "invalid key\n");
4073         RETURN(-EINVAL);
4074
4075 }
4076 struct lvfs_callback_ops mds_lvfs_ops = {
4077         l_id2dentry:     mds_lvfs_id2dentry,
4078 };
4079
4080 int mds_preprw(int cmd, struct obd_export *exp, struct obdo *oa,
4081                 int objcount, struct obd_ioobj *obj,
4082                 int niocount, struct niobuf_remote *nb,
4083                 struct niobuf_local *res,
4084                 struct obd_trans_info *oti);
4085
4086 int mds_commitrw(int cmd, struct obd_export *exp, struct obdo *oa,
4087                  int objcount, struct obd_ioobj *obj, int niocount,
4088                  struct niobuf_local *res, struct obd_trans_info *oti,
4089                  int rc);
4090
4091 /* use obd ops to offer management infrastructure */
4092 static struct obd_ops mds_obd_ops = {
4093         .o_owner           = THIS_MODULE,
4094         .o_attach          = mds_attach,
4095         .o_detach          = mds_detach,
4096         .o_connect         = mds_connect,
4097         .o_connect_post    = mds_connect_post,
4098         .o_init_export     = mds_init_export,
4099         .o_destroy_export  = mds_destroy_export,
4100         .o_disconnect      = mds_disconnect,
4101         .o_setup           = mds_setup,
4102         .o_precleanup      = mds_precleanup,
4103         .o_cleanup         = mds_cleanup,
4104         .o_process_config  = mds_process_config,
4105         .o_postrecov       = mds_postrecov,
4106         .o_statfs          = mds_obd_statfs,
4107         .o_iocontrol       = mds_iocontrol,
4108         .o_create          = mds_obd_create,
4109         .o_destroy         = mds_obd_destroy,
4110         .o_llog_init       = mds_llog_init,
4111         .o_llog_finish     = mds_llog_finish,
4112         .o_notify          = mds_notify,
4113         .o_get_info        = mds_get_info,
4114         .o_set_info        = mds_set_info,
4115         .o_preprw          = mds_preprw, 
4116         .o_commitrw        = mds_commitrw,
4117 };
4118
4119 static struct obd_ops mdt_obd_ops = {
4120         .o_owner           = THIS_MODULE,
4121         .o_attach          = mdt_attach,
4122         .o_detach          = mdt_detach,
4123         .o_setup           = mdt_setup,
4124         .o_cleanup         = mdt_cleanup,
4125 };
4126
4127 static int __init mds_init(void)
4128 {
4129         struct lprocfs_static_vars lvars;
4130
4131         mds_init_lsd_cache();
4132
4133         lprocfs_init_multi_vars(0, &lvars);
4134         class_register_type(&mds_obd_ops, NULL, lvars.module_vars,
4135                             LUSTRE_MDS_NAME);
4136         lprocfs_init_multi_vars(1, &lvars);
4137         class_register_type(&mdt_obd_ops, NULL, lvars.module_vars,
4138                             LUSTRE_MDT_NAME);
4139
4140         return 0;
4141 }
4142
4143 static void /*__exit*/ mds_exit(void)
4144 {
4145         mds_cleanup_lsd_cache();
4146
4147         class_unregister_type(LUSTRE_MDS_NAME);
4148         class_unregister_type(LUSTRE_MDT_NAME);
4149 }
4150
4151 MODULE_AUTHOR("Cluster File Systems, Inc. <info@clusterfs.com>");
4152 MODULE_DESCRIPTION("Lustre Metadata Server (MDS)");
4153 MODULE_LICENSE("GPL");
4154
4155 module_init(mds_init);
4156 module_exit(mds_exit);