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/ext3_fs.h>
  43 #if (LINUX_VERSION_CODE >= KERNEL_VERSION(2,5,0))
  44 # include <linux/smp_lock.h>
  45 # include <linux/buffer_head.h>
  46 # include <linux/workqueue.h>
  47 # include <linux/mount.h>
  48 #else
  49 # include <linux/locks.h>
  50 #endif
  51 #include <linux/obd_lov.h>
  52 #include <linux/lustre_mds.h>
  53 #include <linux/lustre_fsfilt.h>
  54 #include <linux/lprocfs_status.h>
  55 #include <linux/lustre_commit_confd.h>
  56
  57 #include "mds_internal.h"
  58
  59 static int mds_cleanup(struct obd_device *obd, int flags);
  60
  61 static int mds_bulk_timeout(void *data)
  62 {
  63         struct ptlrpc_bulk_desc *desc = data;
  64         struct obd_export *exp = desc->bd_export;
  65
  66         DEBUG_REQ(D_ERROR, desc->bd_req,"bulk send timed out: evicting %s@%s\n",
  67                   exp->exp_client_uuid.uuid,
  68                   exp->exp_connection->c_remote_uuid.uuid);
  69         ptlrpc_fail_export(exp);
  70         ptlrpc_abort_bulk (desc);
  71         RETURN(1);
  72 }
  73
  74 /* Assumes caller has already pushed into the kernel filesystem context */
  75 static int mds_sendpage(struct ptlrpc_request *req, struct file *file,
  76                         loff_t offset, int count)
  77 {
  78         struct ptlrpc_bulk_desc *desc;
  79         struct l_wait_info lwi;
  80         struct page **pages;
  81         int rc = 0, npages, i, tmpcount, tmpsize = 0;
  82         ENTRY;
  83
  84         LASSERT((offset & (PAGE_SIZE - 1)) == 0); /* I'm dubious about this */
  85
  86         npages = (count + PAGE_SIZE - 1) >> PAGE_SHIFT;
  87         OBD_ALLOC(pages, sizeof(*pages) * npages);
  88         if (!pages)
  89                 GOTO(out, rc = -ENOMEM);
  90
  91         desc = ptlrpc_prep_bulk_exp (req, BULK_PUT_SOURCE, MDS_BULK_PORTAL);
  92         if (desc == NULL)
  93                 GOTO(out_free, rc = -ENOMEM);
  94
  95         for (i = 0, tmpcount = count; i < npages; i++, tmpcount -= tmpsize) {
  96                 tmpsize = tmpcount > PAGE_SIZE ? PAGE_SIZE : tmpcount;
  97
  98                 pages[i] = alloc_pages(GFP_KERNEL, 0);
  99                 if (pages[i] == NULL)
 100                         GOTO(cleanup_buf, rc = -ENOMEM);
 101
 102                 rc = ptlrpc_prep_bulk_page(desc, pages[i], 0, tmpsize);
 103                 if (rc != 0)
 104                         GOTO(cleanup_buf, rc);
 105         }
 106
 107         for (i = 0, tmpcount = count; i < npages; i++, tmpcount -= tmpsize) {
 108                 tmpsize = tmpcount > PAGE_SIZE ? PAGE_SIZE : tmpcount;
 109                 CDEBUG(D_EXT2, "reading %u@%llu from dir %lu (size %llu)\n",
 110                        tmpsize, offset, file->f_dentry->d_inode->i_ino,
 111                        file->f_dentry->d_inode->i_size);
 112
 113                 rc = fsfilt_readpage(req->rq_export->exp_obd, file,
 114                                      page_address(pages[i]), tmpsize, &offset);
 115
 116                 if (rc != tmpsize)
 117                         GOTO(cleanup_buf, rc = -EIO);
 118         }
 119
 120         rc = ptlrpc_bulk_put(desc);
 121         if (rc)
 122                 GOTO(cleanup_buf, rc);
 123
 124         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_SENDPAGE)) {
 125                 CERROR("obd_fail_loc=%x, fail operation rc=%d\n",
 126                        OBD_FAIL_MDS_SENDPAGE, rc);
 127                 ptlrpc_abort_bulk(desc);
 128                 GOTO(cleanup_buf, rc);
 129         }
 130
 131         lwi = LWI_TIMEOUT(obd_timeout * HZ / 4, mds_bulk_timeout, desc);
 132         rc = l_wait_event(desc->bd_waitq, ptlrpc_bulk_complete (desc), &lwi);
 133         if (rc) {
 134                 LASSERT (rc == -ETIMEDOUT);
 135                 GOTO(cleanup_buf, rc);
 136         }
 137
 138         EXIT;
 139  cleanup_buf:
 140         for (i = 0; i < npages; i++)
 141                 if (pages[i])
 142                         __free_pages(pages[i], 0);
 143
 144         ptlrpc_free_bulk(desc);
 145  out_free:
 146         OBD_FREE(pages, sizeof(*pages) * npages);
 147  out:
 148         return rc;
 149 }
 150
 151 /* only valid locked dentries or errors should be returned */
 152 struct dentry *mds_fid2locked_dentry(struct obd_device *obd, struct ll_fid *fid,
 153                                      struct vfsmount **mnt, int lock_mode,
 154                                      struct lustre_handle *lockh,
 155                                      char *name, int namelen)
 156 {
 157         struct mds_obd *mds = &obd->u.mds;
 158         struct dentry *de = mds_fid2dentry(mds, fid, mnt), *retval = de;
 159         struct ldlm_res_id res_id = { .name = {0} };
 160         int flags = 0, rc;
 161         ENTRY;
 162
 163         if (IS_ERR(de))
 164                 RETURN(de);
 165
 166         res_id.name[0] = de->d_inode->i_ino;
 167         res_id.name[1] = de->d_inode->i_generation;
 168         rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace, NULL,
 169                               res_id, LDLM_PLAIN, NULL, 0, lock_mode,
 170                               &flags, ldlm_completion_ast,
 171                               mds_blocking_ast, NULL, lockh);
 172         if (rc != ELDLM_OK) {
 173                 l_dput(de);
 174                 retval = ERR_PTR(-EIO); /* XXX translate ldlm code */
 175         }
 176
 177         RETURN(retval);
 178 }
 179
 180 #ifndef DCACHE_DISCONNECTED
 181 #define DCACHE_DISCONNECTED DCACHE_NFSD_DISCONNECTED
 182 #endif
 183
 184
 185 /* Look up an entry by inode number. */
 186 /* this function ONLY returns valid dget'd dentries with an initialized inode
 187    or errors */
 188 struct dentry *mds_fid2dentry(struct mds_obd *mds, struct ll_fid *fid,
 189                               struct vfsmount **mnt)
 190 {
 191         char fid_name[32];
 192         unsigned long ino = fid->id;
 193         __u32 generation = fid->generation;
 194         struct inode *inode;
 195         struct dentry *result;
 196
 197         if (ino == 0)
 198                 RETURN(ERR_PTR(-ESTALE));
 199
 200         snprintf(fid_name, sizeof(fid_name), "0x%lx", ino);
 201
 202         CDEBUG(D_DENTRY, "--> mds_fid2dentry: ino %lu, gen %u, sb %p\n",
 203                ino, generation, mds->mds_sb);
 204
 205         /* under ext3 this is neither supposed to return bad inodes
 206            nor NULL inodes. */
 207         result = ll_lookup_one_len(fid_name, mds->mds_fid_de, strlen(fid_name));
 208         if (IS_ERR(result))
 209                 RETURN(result);
 210
 211         inode = result->d_inode;
 212         if (!inode)
 213                 RETURN(ERR_PTR(-ENOENT));
 214
 215         if (generation && inode->i_generation != generation) {
 216                 /* we didn't find the right inode.. */
 217                 CERROR("bad inode %lu, link: %lu ct: %d or generation %u/%u\n",
 218                        inode->i_ino, (unsigned long)inode->i_nlink,
 219                        atomic_read(&inode->i_count), inode->i_generation,
 220                        generation);
 221                 dput(result);
 222                 RETURN(ERR_PTR(-ENOENT));
 223         }
 224
 225         if (mnt) {
 226                 *mnt = mds->mds_vfsmnt;
 227                 mntget(*mnt);
 228         }
 229
 230         RETURN(result);
 231 }
 232
 233
 234 /* Establish a connection to the MDS.
 235  *
 236  * This will set up an export structure for the client to hold state data
 237  * about that client, like open files, the last operation number it did
 238  * on the server, etc.
 239  */
 240 static int mds_connect(struct lustre_handle *conn, struct obd_device *obd,
 241                        struct obd_uuid *cluuid)
 242 {
 243         struct obd_export *exp;
 244         struct mds_export_data *med; /*  */
 245         struct mds_client_data *mcd;
 246         int rc, abort_recovery;
 247         ENTRY;
 248
 249         if (!conn || !obd || !cluuid)
 250                 RETURN(-EINVAL);
 251
 252         /* Check for aborted recovery. */
 253         spin_lock_bh(&obd->obd_processing_task_lock);
 254         abort_recovery = obd->obd_abort_recovery;
 255         spin_unlock_bh(&obd->obd_processing_task_lock);
 256         if (abort_recovery)
 257                 target_abort_recovery(obd);
 258
 259         /* XXX There is a small race between checking the list and adding a
 260          * new connection for the same UUID, but the real threat (list
 261          * corruption when multiple different clients connect) is solved.
 262          *
 263          * There is a second race between adding the export to the list,
 264          * and filling in the client data below.  Hence skipping the case
 265          * of NULL mcd above.  We should already be controlling multiple
 266          * connects at the client, and we can't hold the spinlock over
 267          * memory allocations without risk of deadlocking.
 268          */
 269         rc = class_connect(conn, obd, cluuid);
 270         if (rc)
 271                 RETURN(rc);
 272         exp = class_conn2export(conn);
 273         LASSERT(exp);
 274         med = &exp->exp_mds_data;
 275
 276         OBD_ALLOC(mcd, sizeof(*mcd));
 277         if (!mcd) {
 278                 CERROR("mds: out of memory for client data\n");
 279                 GOTO(out, rc = -ENOMEM);
 280         }
 281
 282         memcpy(mcd->mcd_uuid, cluuid, sizeof(mcd->mcd_uuid));
 283         med->med_mcd = mcd;
 284
 285         rc = mds_client_add(obd, &obd->u.mds, med, -1);
 286         if (rc == 0)
 287                 EXIT;
 288 out:
 289         if (rc) {
 290                 OBD_FREE(mcd, sizeof(*mcd));
 291                 class_disconnect(exp, 0);
 292         }
 293         class_export_put(exp);
 294
 295         return rc;
 296 }
 297
 298 static int mds_init_export(struct obd_export *exp)
 299 {
 300         struct mds_export_data *med = &exp->exp_mds_data;
 301
 302         INIT_LIST_HEAD(&med->med_open_head);
 303         spin_lock_init(&med->med_open_lock);
 304         RETURN(0);
 305 }
 306
 307 static int mds_destroy_export(struct obd_export *export)
 308 {
 309         struct mds_export_data *med;
 310         struct obd_device *obd = export->exp_obd;
 311         struct obd_run_ctxt saved;
 312         int rc = 0;
 313         ENTRY;
 314
 315         med = &export->exp_mds_data;
 316         target_destroy_export(export);
 317
 318         push_ctxt(&saved, &obd->obd_ctxt, NULL);
 319         /* Close any open files (which may also cause orphan unlinking). */
 320         spin_lock(&med->med_open_lock);
 321         while (!list_empty(&med->med_open_head)) {
 322                 struct list_head *tmp = med->med_open_head.next;
 323                 struct mds_file_data *mfd =
 324                         list_entry(tmp, struct mds_file_data, mfd_list);
 325                 BDEVNAME_DECLARE_STORAGE(btmp);
 326
 327                 /* bug 1579: fix force-closing for 2.5 */
 328                 struct dentry *dentry = mfd->mfd_dentry;
 329
 330                 list_del(&mfd->mfd_list);
 331                 spin_unlock(&med->med_open_lock);
 332
 333                 CERROR("force closing client file handle for %*s (%s:%lu)\n",
 334                        dentry->d_name.len, dentry->d_name.name,
 335                        ll_bdevname(dentry->d_inode->i_sb, btmp),
 336                        dentry->d_inode->i_ino);
 337                 rc = mds_mfd_close(NULL, obd, mfd,
 338                                    !(export->exp_flags & OBD_OPT_FAILOVER));
 339
 340                 if (rc)
 341                         CDEBUG(D_INODE, "Error closing file: %d\n", rc);
 342                 spin_lock(&med->med_open_lock);
 343         }
 344         spin_unlock(&med->med_open_lock);
 345         pop_ctxt(&saved, &obd->obd_ctxt, NULL);
 346
 347         mds_client_free(export, !(export->exp_flags & OBD_OPT_FAILOVER));
 348
 349         RETURN(rc);
 350 }
 351
 352 static int mds_disconnect(struct obd_export *export, int flags)
 353 {
 354         unsigned long irqflags;
 355         int rc;
 356         ENTRY;
 357
 358         ldlm_cancel_locks_for_export(export);
 359
 360         spin_lock_irqsave(&export->exp_lock, irqflags);
 361         export->exp_flags = flags;
 362         spin_unlock_irqrestore(&export->exp_lock, irqflags);
 363
 364         rc = class_disconnect(export, flags);
 365         RETURN(rc);
 366 }
 367
 368 static int mds_getstatus(struct ptlrpc_request *req)
 369 {
 370         struct mds_obd *mds = mds_req2mds(req);
 371         struct mds_body *body;
 372         int rc, size = sizeof(*body);
 373         ENTRY;
 374
 375         rc = lustre_pack_reply(req, 1, &size, NULL);
 376         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_GETSTATUS_PACK)) {
 377                 CERROR("mds: out of memory for message: size=%d\n", size);
 378                 req->rq_status = -ENOMEM;       /* superfluous? */
 379                 RETURN(-ENOMEM);
 380         }
 381
 382         body = lustre_msg_buf(req->rq_repmsg, 0, sizeof (*body));
 383         memcpy(&body->fid1, &mds->mds_rootfid, sizeof(body->fid1));
 384
 385         /* the last_committed and last_xid fields are filled in for all
 386          * replies already - no need to do so here also.
 387          */
 388         RETURN(0);
 389 }
 390
 391 int mds_blocking_ast(struct ldlm_lock *lock, struct ldlm_lock_desc *desc,
 392                      void *data, int flag)
 393 {
 394         int do_ast;
 395         ENTRY;
 396
 397         if (flag == LDLM_CB_CANCELING) {
 398                 /* Don't need to do anything here. */
 399                 RETURN(0);
 400         }
 401
 402         /* XXX layering violation!  -phil */
 403         l_lock(&lock->l_resource->lr_namespace->ns_lock);
 404         /* Get this: if mds_blocking_ast is racing with ldlm_intent_policy,
 405          * such that mds_blocking_ast is called just before l_i_p takes the
 406          * ns_lock, then by the time we get the lock, we might not be the
 407          * correct blocking function anymore.  So check, and return early, if
 408          * so. */
 409         if (lock->l_blocking_ast != mds_blocking_ast) {
 410                 l_unlock(&lock->l_resource->lr_namespace->ns_lock);
 411                 RETURN(0);
 412         }
 413
 414         lock->l_flags |= LDLM_FL_CBPENDING;
 415         do_ast = (!lock->l_readers && !lock->l_writers);
 416         l_unlock(&lock->l_resource->lr_namespace->ns_lock);
 417
 418         if (do_ast) {
 419                 struct lustre_handle lockh;
 420                 int rc;
 421
 422                 LDLM_DEBUG(lock, "already unused, calling ldlm_cli_cancel");
 423                 ldlm_lock2handle(lock, &lockh);
 424                 rc = ldlm_cli_cancel(&lockh);
 425                 if (rc < 0)
 426                         CERROR("ldlm_cli_cancel: %d\n", rc);
 427         } else {
 428                 LDLM_DEBUG(lock, "Lock still has references, will be "
 429                            "cancelled later");
 430         }
 431         RETURN(0);
 432 }
 433
 434 /* Call with lock=1 if you want mds_pack_md to take the i_sem.
 435  * Call with lock=0 if the caller has already taken the i_sem. */
 436 int mds_pack_md(struct obd_device *obd, struct lustre_msg *msg, int offset,
 437                 struct mds_body *body, struct inode *inode, int lock)
 438 {
 439         struct mds_obd *mds = &obd->u.mds;
 440         void *lmm;
 441         int lmm_size;
 442         int rc;
 443         ENTRY;
 444
 445         lmm = lustre_msg_buf(msg, offset, 0);
 446         if (lmm == NULL) {
 447                 /* Some problem with getting eadata when I sized the reply
 448                  * buffer... */
 449                 CDEBUG(D_INFO, "no space reserved for inode %lu MD\n",
 450                        inode->i_ino);
 451                 RETURN(0);
 452         }
 453         lmm_size = msg->buflens[offset];
 454
 455         /* I don't really like this, but it is a sanity check on the client
 456          * MD request.  However, if the client doesn't know how much space
 457          * to reserve for the MD, it shouldn't be bad to have too much space.
 458          */
 459         if (lmm_size > mds->mds_max_mdsize) {
 460                 CWARN("Reading MD for inode %lu of %d bytes > max %d\n",
 461                        inode->i_ino, lmm_size, mds->mds_max_mdsize);
 462                 // RETURN(-EINVAL);
 463         }
 464
 465         if (lock)
 466                 down(&inode->i_sem);
 467         rc = fsfilt_get_md(obd, inode, lmm, lmm_size);
 468         if (lock)
 469                 up(&inode->i_sem);
 470         if (rc < 0) {
 471                 CERROR("Error %d reading eadata for ino %lu\n",
 472                        rc, inode->i_ino);
 473         } else if (rc > 0) {
 474                 lmm_size = rc;
 475                 rc = mds_convert_lov_ea(obd, inode, lmm, lmm_size);
 476
 477                 if (rc > 0)
 478                         lmm_size = rc;
 479                 body->valid |= OBD_MD_FLEASIZE;
 480                 body->eadatasize = lmm_size;
 481                 rc = 0;
 482         }
 483
 484         RETURN(rc);
 485 }
 486
 487 static int mds_getattr_internal(struct obd_device *obd, struct dentry *dentry,
 488                                 struct ptlrpc_request *req,
 489                                 struct mds_body *reqbody, int reply_off)
 490 {
 491         struct mds_body *body;
 492         struct inode *inode = dentry->d_inode;
 493         int rc = 0;
 494         ENTRY;
 495
 496         if (inode == NULL)
 497                 RETURN(-ENOENT);
 498
 499         body = lustre_msg_buf(req->rq_repmsg, reply_off, sizeof(*body));
 500         LASSERT(body != NULL);                 /* caller prepped reply */
 501
 502         mds_pack_inode2fid(&body->fid1, inode);
 503         mds_pack_inode2body(body, inode);
 504
 505         if (S_ISREG(inode->i_mode) && (reqbody->valid & OBD_MD_FLEASIZE) != 0) {
 506                 rc = mds_pack_md(obd, req->rq_repmsg, reply_off + 1, body,
 507                                  inode, 1);
 508
 509                 /* If we have LOV EA data, the OST holds size, atime, mtime */
 510                 if (!(body->valid & OBD_MD_FLEASIZE))
 511                         body->valid |= (OBD_MD_FLSIZE | OBD_MD_FLBLOCKS |
 512                                         OBD_MD_FLATIME | OBD_MD_FLMTIME);
 513         } else if (S_ISLNK(inode->i_mode) &&
 514                    (reqbody->valid & OBD_MD_LINKNAME) != 0) {
 515                 char *symname = lustre_msg_buf(req->rq_repmsg, reply_off + 1,0);
 516                 int len;
 517
 518                 LASSERT (symname != NULL);       /* caller prepped reply */
 519                 len = req->rq_repmsg->buflens[reply_off + 1];
 520
 521                 rc = inode->i_op->readlink(dentry, symname, len);
 522                 if (rc < 0) {
 523                         CERROR("readlink failed: %d\n", rc);
 524                 } else if (rc != len - 1) {
 525                         CERROR ("Unexpected readlink rc %d: expecting %d\n",
 526                                 rc, len - 1);
 527                         rc = -EINVAL;
 528                 } else {
 529                         CDEBUG(D_INODE, "read symlink dest %s\n", symname);
 530                         body->valid |= OBD_MD_LINKNAME;
 531                         body->eadatasize = rc + 1;
 532                         symname[rc] = 0;        /* NULL terminate */
 533                         rc = 0;
 534                 }
 535         }
 536
 537         RETURN(rc);
 538 }
 539
 540 static int mds_getattr_pack_msg(struct ptlrpc_request *req, struct inode *inode,
 541                                 int offset)
 542 {
 543         struct mds_obd *mds = mds_req2mds(req);
 544         struct mds_body *body;
 545         int rc = 0, size[2] = {sizeof(*body)}, bufcount = 1;
 546         ENTRY;
 547
 548         body = lustre_msg_buf(req->rq_reqmsg, offset, sizeof (*body));
 549         LASSERT(body != NULL);                 /* checked by caller */
 550         LASSERT_REQSWABBED(req, offset);       /* swabbed by caller */
 551
 552         if (S_ISREG(inode->i_mode) && (body->valid & OBD_MD_FLEASIZE)) {
 553                 int rc;
 554                 down(&inode->i_sem);
 555                 rc = fsfilt_get_md(req->rq_export->exp_obd, inode, NULL, 0);
 556                 up(&inode->i_sem);
 557                 CDEBUG(D_INODE, "got %d bytes MD data for inode %lu\n",
 558                        rc, inode->i_ino);
 559                 if (rc < 0) {
 560                         if (rc != -ENODATA)
 561                                 CERROR("error getting inode %lu MD: rc = %d\n",
 562                                        inode->i_ino, rc);
 563                         size[bufcount] = 0;
 564                 } else if (rc > mds->mds_max_mdsize) {
 565                         size[bufcount] = 0;
 566                         CERROR("MD size %d larger than maximum possible %u\n",
 567                                rc, mds->mds_max_mdsize);
 568                 } else {
 569                         size[bufcount] = rc;
 570                 }
 571                 bufcount++;
 572         } else if (S_ISLNK(inode->i_mode) && (body->valid & OBD_MD_LINKNAME)) {
 573                 if (inode->i_size + 1 != body->eadatasize)
 574                         CERROR("symlink size: %Lu, reply space: %d\n",
 575                                inode->i_size + 1, body->eadatasize);
 576                 size[bufcount] = MIN(inode->i_size + 1, body->eadatasize);
 577                 bufcount++;
 578                 CDEBUG(D_INODE, "symlink size: %Lu, reply space: %d\n",
 579                        inode->i_size + 1, body->eadatasize);
 580         }
 581
 582         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_GETATTR_PACK)) {
 583                 CERROR("failed MDS_GETATTR_PACK test\n");
 584                 req->rq_status = -ENOMEM;
 585                 GOTO(out, rc = -ENOMEM);
 586         }
 587
 588         rc = lustre_pack_reply(req, bufcount, size, NULL);
 589         if (rc) {
 590                 CERROR("out of memory\n");
 591                 GOTO(out, req->rq_status = rc);
 592         }
 593
 594         EXIT;
 595  out:
 596         return(rc);
 597 }
 598
 599 static int mds_getattr_name(int offset, struct ptlrpc_request *req,
 600                             struct lustre_handle *child_lockh)
 601 {
 602         struct obd_device *obd = req->rq_export->exp_obd;
 603         struct ldlm_reply *rep = NULL;
 604         struct obd_run_ctxt saved;
 605         struct mds_body *body;
 606         struct dentry *de = NULL, *dchild = NULL;
 607         struct inode *dir;
 608         struct obd_ucred uc;
 609         struct ldlm_res_id child_res_id = { .name = {0} };
 610         struct lustre_handle parent_lockh;
 611         int namesize;
 612         int flags = 0, rc = 0, cleanup_phase = 0;
 613         char *name;
 614         ENTRY;
 615
 616         LASSERT(!strcmp(obd->obd_type->typ_name, "mds"));
 617
 618         /* Swab now, before anyone looks inside the request */
 619
 620         body = lustre_swab_reqbuf(req, offset, sizeof(*body),
 621                                   lustre_swab_mds_body);
 622         if (body == NULL) {
 623                 CERROR("Can't swab mds_body\n");
 624                 GOTO(cleanup, rc = -EFAULT);
 625         }
 626
 627         LASSERT_REQSWAB(req, offset + 1);
 628         name = lustre_msg_string(req->rq_reqmsg, offset + 1, 0);
 629         if (name == NULL) {
 630                 CERROR("Can't unpack name\n");
 631                 GOTO(cleanup, rc = -EFAULT);
 632         }
 633         namesize = req->rq_reqmsg->buflens[offset + 1];
 634
 635         LASSERT (offset == 0 || offset == 2);
 636         /* if requests were at offset 2, the getattr reply goes back at 1 */
 637         if (offset) {
 638                 rep = lustre_msg_buf(req->rq_repmsg, 0, sizeof (*rep));
 639                 offset = 1;
 640         }
 641
 642         uc.ouc_fsuid = body->fsuid;
 643         uc.ouc_fsgid = body->fsgid;
 644         uc.ouc_cap = body->capability;
 645         uc.ouc_suppgid1 = body->suppgid;
 646         uc.ouc_suppgid2 = -1;
 647         push_ctxt(&saved, &obd->obd_ctxt, &uc);
 648         /* Step 1: Lookup/lock parent */
 649         intent_set_disposition(rep, DISP_LOOKUP_EXECD);
 650         de = mds_fid2locked_dentry(obd, &body->fid1, NULL, LCK_PR,
 651                                    &parent_lockh, name, namesize - 1);
 652         if (IS_ERR(de))
 653                 GOTO(cleanup, rc = PTR_ERR(de));
 654         dir = de->d_inode;
 655         LASSERT(dir);
 656
 657         cleanup_phase = 1; /* parent dentry and lock */
 658
 659         CDEBUG(D_INODE, "parent ino %lu, name %s\n", dir->i_ino, name);
 660
 661         /* Step 2: Lookup child */
 662 #if 0
 663         if (body->valid == OBD_MD_FLID) {
 664                 struct mds_body *mds_reply;
 665                 int size = sizeof(*mds_reply);
 666                 ino_t inum;
 667                 // The user requested ONLY the inode number, so do a raw lookup
 668                 rc = lustre_pack_reply(req, 1, &size, NULL);
 669                 if (rc) {
 670                         CERROR("out of memory\n");
 671                         GOTO(cleanup, rc);
 672                 }
 673
 674                 rc = dir->i_op->lookup_raw(dir, name, namesize - 1, &inum);
 675
 676                 mds_reply = lustre_msg_buf(req->rq_repmsg, offset,
 677                                            sizeof(*mds_reply));
 678                 mds_reply->fid1.id = inum;
 679                 mds_reply->valid = OBD_MD_FLID;
 680                 GOTO(cleanup, rc);
 681         }
 682 #endif
 683
 684         dchild = ll_lookup_one_len(name, de, namesize - 1);
 685         if (IS_ERR(dchild)) {
 686                 CDEBUG(D_INODE, "child lookup error %ld\n", PTR_ERR(dchild));
 687                 GOTO(cleanup, rc = PTR_ERR(dchild));
 688         }
 689         cleanup_phase = 2; /* child dentry */
 690
 691         if (dchild->d_inode == NULL) {
 692                 intent_set_disposition(rep, DISP_LOOKUP_NEG);
 693                 /* in the intent case, the policy clears this error:
 694                    the disposition is enough */
 695                 GOTO(cleanup, rc = -ENOENT);
 696         } else {
 697                 intent_set_disposition(rep, DISP_LOOKUP_POS);
 698         }
 699
 700         /* Step 3: Lock child */
 701         /* fixup_handle_for_resent_req might have set the child_lockh for us, if
 702          * the lock was already granted for this request on the last
 703          * transmission. */
 704         if (child_lockh->cookie == 0) {
 705                 child_res_id.name[0] = dchild->d_inode->i_ino;
 706                 child_res_id.name[1] = dchild->d_inode->i_generation;
 707                 rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace, NULL,
 708                                       child_res_id, LDLM_PLAIN, NULL, 0, LCK_PR,
 709                                       &flags, ldlm_completion_ast,
 710                                       mds_blocking_ast, NULL, child_lockh);
 711                 if (rc != ELDLM_OK) {
 712                         CERROR("ldlm_cli_enqueue: %d\n", rc);
 713                         GOTO(cleanup, rc = -EIO);
 714                 }
 715         }
 716
 717         cleanup_phase = 3; /* child lock */
 718
 719         if (req->rq_repmsg == NULL) {
 720                 rc = mds_getattr_pack_msg(req, dchild->d_inode, offset);
 721                 if (rc != 0) {
 722                         CERROR ("mds_getattr_pack_msg: %d\n", rc);
 723                         GOTO (cleanup, rc);
 724                 }
 725         }
 726
 727         rc = mds_getattr_internal(obd, dchild, req, body, offset);
 728         GOTO(cleanup, rc); /* returns the lock to the client */
 729
 730  cleanup:
 731         switch (cleanup_phase) {
 732         case 3:
 733                 if (rc)
 734                         ldlm_lock_decref(child_lockh, LCK_PR);
 735         case 2:
 736                 l_dput(dchild);
 737
 738         case 1:
 739                 if (rc) {
 740                         ldlm_lock_decref(&parent_lockh, LCK_PR);
 741                 } else {
 742                         ldlm_put_lock_into_req(req, &parent_lockh, LCK_PR);
 743                 }
 744                 l_dput(de);
 745         default: ;
 746         }
 747         pop_ctxt(&saved, &obd->obd_ctxt, &uc);
 748         return rc;
 749 }
 750
 751 static int mds_getattr(int offset, struct ptlrpc_request *req)
 752 {
 753         struct mds_obd *mds = mds_req2mds(req);
 754         struct obd_device *obd = req->rq_export->exp_obd;
 755         struct obd_run_ctxt saved;
 756         struct dentry *de;
 757         struct mds_body *body;
 758         struct obd_ucred uc;
 759         int rc = 0;
 760         ENTRY;
 761
 762         body = lustre_swab_reqbuf (req, offset, sizeof (*body),
 763                                    lustre_swab_mds_body);
 764         if (body == NULL) {
 765                 CERROR ("Can't unpack body\n");
 766                 RETURN (-EFAULT);
 767         }
 768
 769         uc.ouc_fsuid = body->fsuid;
 770         uc.ouc_fsgid = body->fsgid;
 771         uc.ouc_cap = body->capability;
 772         push_ctxt(&saved, &obd->obd_ctxt, &uc);
 773         de = mds_fid2dentry(mds, &body->fid1, NULL);
 774         if (IS_ERR(de)) {
 775                 rc = req->rq_status = -ENOENT;
 776                 GOTO(out_pop, PTR_ERR(de));
 777         }
 778
 779         rc = mds_getattr_pack_msg(req, de->d_inode, offset);
 780         if (rc != 0) {
 781                 CERROR ("mds_getattr_pack_msg: %d\n", rc);
 782                 GOTO (out_pop, rc);
 783         }
 784
 785         req->rq_status = mds_getattr_internal(obd, de, req, body, 0);
 786
 787         l_dput(de);
 788         GOTO(out_pop, rc);
 789 out_pop:
 790         pop_ctxt(&saved, &obd->obd_ctxt, &uc);
 791         return rc;
 792 }
 793
 794
 795 static int mds_obd_statfs(struct obd_device *obd, struct obd_statfs *osfs,
 796                           unsigned long max_age)
 797 {
 798         return fsfilt_statfs(obd, obd->u.mds.mds_sb, osfs);
 799 }
 800
 801 static int mds_statfs(struct ptlrpc_request *req)
 802 {
 803         struct obd_device *obd = req->rq_export->exp_obd;
 804         int rc, size = sizeof(struct obd_statfs);
 805         ENTRY;
 806
 807         rc = lustre_pack_reply(req, 1, &size, NULL);
 808         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_STATFS_PACK)) {
 809                 CERROR("mds: statfs lustre_pack_reply failed: rc = %d\n", rc);
 810                 GOTO(out, rc);
 811         }
 812
 813         /* We call this so that we can cache a bit - 1 jiffie worth */
 814         rc = obd_statfs(obd, lustre_msg_buf(req->rq_repmsg,0,size),jiffies-HZ);
 815         if (rc) {
 816                 CERROR("mds_obd_statfs failed: rc %d\n", rc);
 817                 GOTO(out, rc);
 818         }
 819
 820         EXIT;
 821 out:
 822         req->rq_status = rc;
 823         return 0;
 824 }
 825
 826 static int mds_sync(struct ptlrpc_request *req)
 827 {
 828         struct obd_device *obd = req->rq_export->exp_obd;
 829         struct mds_obd *mds = &obd->u.mds;
 830         struct mds_body *body;
 831         int rc, size = sizeof(*body);
 832         ENTRY;
 833
 834         body = lustre_msg_buf(req->rq_reqmsg, 0, sizeof(*body));
 835         if (body == NULL)
 836                 GOTO(out, rc = -EPROTO);
 837
 838         rc = lustre_pack_reply(req, 1, &size, NULL);
 839         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_SYNC_PACK)) {
 840                 CERROR("fsync lustre_pack_reply failed: rc = %d\n", rc);
 841                 GOTO(out, rc);
 842         }
 843
 844         if (body->fid1.id == 0) {
 845                 /* a fid of zero is taken to mean "sync whole filesystem" */
 846                 rc = fsfilt_sync(obd, mds->mds_sb);
 847                 if (rc)
 848                         GOTO(out, rc);
 849         } else {
 850                 /* just any file to grab fsync method - "file" arg unused */
 851                 struct file *file = mds->mds_rcvd_filp;
 852                 struct dentry *de;
 853
 854                 de = mds_fid2dentry(mds, &body->fid1, NULL);
 855                 if (IS_ERR(de))
 856                         GOTO(out, rc = PTR_ERR(de));
 857
 858                 rc = file->f_op->fsync(NULL, de, 1);
 859                 l_dput(de);
 860                 if (rc)
 861                         GOTO(out, rc);
 862
 863                 body = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*body));
 864                 mds_pack_inode2fid(&body->fid1, de->d_inode);
 865                 mds_pack_inode2body(body, de->d_inode);
 866         }
 867 out:
 868         req->rq_status = rc;
 869         return 0;
 870 }
 871
 872 static int mds_readpage(struct ptlrpc_request *req)
 873 {
 874         struct obd_device *obd = req->rq_export->exp_obd;
 875         struct vfsmount *mnt;
 876         struct dentry *de;
 877         struct file *file;
 878         struct mds_body *body, *repbody;
 879         struct lustre_handle lockh;
 880         struct obd_run_ctxt saved;
 881         int rc, size = sizeof(*repbody);
 882         struct obd_ucred uc;
 883         ENTRY;
 884
 885         rc = lustre_pack_reply(req, 1, &size, NULL);
 886         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_READPAGE_PACK)) {
 887                 CERROR("mds: out of memory\n");
 888                 GOTO(out, rc = -ENOMEM);
 889         }
 890
 891         body = lustre_swab_reqbuf (req, 0, sizeof (*body),
 892                                    lustre_swab_mds_body);
 893         if (body == NULL)
 894                 GOTO (out, rc = -EFAULT);
 895
 896         uc.ouc_fsuid = body->fsuid;
 897         uc.ouc_fsgid = body->fsgid;
 898         uc.ouc_cap = body->capability;
 899         push_ctxt(&saved, &obd->obd_ctxt, &uc);
 900         de = mds_fid2locked_dentry(obd, &body->fid1, &mnt, LCK_PR,
 901                                    &lockh, NULL, 0);
 902         if (IS_ERR(de))
 903                 GOTO(out_pop, rc = PTR_ERR(de));
 904
 905         CDEBUG(D_INODE, "ino %lu\n", de->d_inode->i_ino);
 906
 907         file = dentry_open(de, mnt, O_RDONLY | O_LARGEFILE);
 908         /* note: in case of an error, dentry_open puts dentry */
 909         if (IS_ERR(file))
 910                 GOTO(out_lock, rc = PTR_ERR(file));
 911
 912         /* body->size is actually the offset -eeb */
 913         if ((body->size & (de->d_inode->i_blksize - 1)) != 0) {
 914                 CERROR("offset "LPU64" not on a block boundary of %lu\n",
 915                        body->size, de->d_inode->i_blksize);
 916                 GOTO(out_file, rc = -EFAULT);
 917         }
 918
 919         /* body->nlink is actually the #bytes to read -eeb */
 920         if (body->nlink & (de->d_inode->i_blksize - 1)) {
 921                 CERROR("size %u is not multiple of blocksize %lu\n",
 922                        body->nlink, de->d_inode->i_blksize);
 923                 GOTO(out_file, rc = -EFAULT);
 924         }
 925
 926         repbody = lustre_msg_buf(req->rq_repmsg, 0, sizeof (*repbody));
 927         repbody->size = file->f_dentry->d_inode->i_size;
 928         repbody->valid = OBD_MD_FLSIZE;
 929
 930         /* to make this asynchronous make sure that the handling function
 931            doesn't send a reply when this function completes. Instead a
 932            callback function would send the reply */
 933         /* body->size is actually the offset -eeb */
 934         rc = mds_sendpage(req, file, body->size, body->nlink);
 935
 936 out_file:
 937         filp_close(file, 0);
 938 out_lock:
 939         ldlm_lock_decref(&lockh, LCK_PR);
 940 out_pop:
 941         pop_ctxt(&saved, &obd->obd_ctxt, &uc);
 942 out:
 943         req->rq_status = rc;
 944         RETURN(0);
 945 }
 946
 947 int mds_reint(struct ptlrpc_request *req, int offset,
 948               struct lustre_handle *lockh)
 949 {
 950         struct mds_update_record *rec; /* 116 bytes on the stack?  no sir! */
 951         int rc;
 952
 953         OBD_ALLOC(rec, sizeof(*rec));
 954         if (rec == NULL)
 955                 RETURN(-ENOMEM);
 956
 957         rc = mds_update_unpack(req, offset, rec);
 958         if (rc || OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_UNPACK)) {
 959                 CERROR("invalid record\n");
 960                 GOTO(out, req->rq_status = -EINVAL);
 961         }
 962         /* rc will be used to interrupt a for loop over multiple records */
 963         rc = mds_reint_rec(rec, offset, req, lockh);
 964  out:
 965         OBD_FREE(rec, sizeof(*rec));
 966         return rc;
 967 }
 968
 969 static int mds_filter_recovery_request(struct ptlrpc_request *req,
 970                                        struct obd_device *obd, int *process)
 971 {
 972         switch (req->rq_reqmsg->opc) {
 973         case MDS_CONNECT: /* This will never get here, but for completeness. */
 974         case OST_CONNECT: /* This will never get here, but for completeness. */
 975         case MDS_DISCONNECT:
 976         case OST_DISCONNECT:
 977                *process = 1;
 978                RETURN(0);
 979
 980         case MDS_CLOSE:
 981         case MDS_SYNC: /* used in unmounting */
 982         case OBD_PING:
 983         case MDS_REINT:
 984         case LDLM_ENQUEUE:
 985                 *process = target_queue_recovery_request(req, obd);
 986                 RETURN(0);
 987
 988         default:
 989                 DEBUG_REQ(D_ERROR, req, "not permitted during recovery");
 990                 *process = 0;
 991                 /* XXX what should we set rq_status to here? */
 992                 req->rq_status = -EAGAIN;
 993                 RETURN(ptlrpc_error(req));
 994         }
 995 }
 996
 997 static char *reint_names[] = {
 998         [REINT_SETATTR] "setattr",
 999         [REINT_CREATE]  "create",
1000         [REINT_LINK]    "link",
1001         [REINT_UNLINK]  "unlink",
1002         [REINT_RENAME]  "rename",
1003         [REINT_OPEN]    "open",
1004 };
1005
1006 void mds_steal_ack_locks(struct obd_export *exp,
1007                          struct ptlrpc_request *req)
1008 {
1009         unsigned long  flags;
1010         struct ptlrpc_request *oldrep = exp->exp_outstanding_reply;
1011
1012         if (oldrep == NULL)
1013                 return;
1014         memcpy(req->rq_ack_locks, oldrep->rq_ack_locks,
1015                sizeof req->rq_ack_locks);
1016         spin_lock_irqsave (&req->rq_lock, flags);
1017         oldrep->rq_resent = 1;
1018         wake_up(&oldrep->rq_wait_for_rep);
1019         spin_unlock_irqrestore (&req->rq_lock, flags);
1020         DEBUG_REQ(D_HA, oldrep, "stole locks from");
1021         DEBUG_REQ(D_HA, req, "stole locks for");
1022 }
1023
1024 int mds_handle(struct ptlrpc_request *req)
1025 {
1026         int should_process;
1027         int rc = 0;
1028         struct mds_obd *mds = NULL; /* quell gcc overwarning */
1029         struct obd_device *obd = NULL;
1030         ENTRY;
1031
1032         OBD_FAIL_RETURN(OBD_FAIL_MDS_ALL_REQUEST_NET | OBD_FAIL_ONCE, 0);
1033
1034         LASSERT(!strcmp(req->rq_obd->obd_type->typ_name, LUSTRE_MDT_NAME));
1035
1036         LASSERT(current->journal_info == NULL);
1037         /* XXX identical to OST */
1038         if (req->rq_reqmsg->opc != MDS_CONNECT) {
1039                 struct mds_export_data *med;
1040                 int recovering, abort_recovery;
1041
1042                 if (req->rq_export == NULL) {
1043                         CERROR("lustre_mds: operation %d on unconnected MDS\n",
1044                                req->rq_reqmsg->opc);
1045                         req->rq_status = -ENOTCONN;
1046                         GOTO(out, rc = -ENOTCONN);
1047                 }
1048
1049                 med = &req->rq_export->exp_mds_data;
1050                 obd = req->rq_export->exp_obd;
1051                 mds = &obd->u.mds;
1052
1053                 /* Check for aborted recovery. */
1054                 spin_lock_bh(&obd->obd_processing_task_lock);
1055                 abort_recovery = obd->obd_abort_recovery;
1056                 recovering = obd->obd_recovering;
1057                 spin_unlock_bh(&obd->obd_processing_task_lock);
1058                 if (abort_recovery) {
1059                         target_abort_recovery(obd);
1060                 } else if (recovering) {
1061                         rc = mds_filter_recovery_request(req, obd,
1062                                                          &should_process);
1063                         if (rc || !should_process)
1064                                 RETURN(rc);
1065                 }
1066         }
1067
1068         switch (req->rq_reqmsg->opc) {
1069         case MDS_CONNECT:
1070                 DEBUG_REQ(D_INODE, req, "connect");
1071                 OBD_FAIL_RETURN(OBD_FAIL_MDS_CONNECT_NET, 0);
1072                 rc = target_handle_connect(req, mds_handle);
1073                 if (!rc)
1074                         /* Now that we have an export, set mds. */
1075                         mds = mds_req2mds(req);
1076                 break;
1077
1078         case MDS_DISCONNECT:
1079                 DEBUG_REQ(D_INODE, req, "disconnect");
1080                 OBD_FAIL_RETURN(OBD_FAIL_MDS_DISCONNECT_NET, 0);
1081                 rc = target_handle_disconnect(req);
1082                 req->rq_status = rc;            /* superfluous? */
1083                 break;
1084
1085         case MDS_GETSTATUS:
1086                 DEBUG_REQ(D_INODE, req, "getstatus");
1087                 OBD_FAIL_RETURN(OBD_FAIL_MDS_GETSTATUS_NET, 0);
1088                 rc = mds_getstatus(req);
1089                 break;
1090
1091         case MDS_GETATTR:
1092                 DEBUG_REQ(D_INODE, req, "getattr");
1093                 OBD_FAIL_RETURN(OBD_FAIL_MDS_GETATTR_NET, 0);
1094                 rc = mds_getattr(0, req);
1095                 break;
1096
1097         case MDS_GETATTR_NAME: {
1098                 struct lustre_handle lockh;
1099                 DEBUG_REQ(D_INODE, req, "getattr_name");
1100                 OBD_FAIL_RETURN(OBD_FAIL_MDS_GETATTR_NAME_NET, 0);
1101
1102                 /* If this request gets a reconstructed reply, we won't be
1103                  * acquiring any new locks in mds_getattr_name, so we don't
1104                  * want to cancel.
1105                  */
1106                 lockh.cookie = 0;
1107                 rc = mds_getattr_name(0, req, &lockh);
1108                 /* this non-intent call (from an ioctl) is special */
1109                 req->rq_status = rc;
1110                 if (rc == 0 && lockh.cookie)
1111                         ldlm_lock_decref(&lockh, LCK_PR);
1112                 break;
1113         }
1114         case MDS_STATFS:
1115                 DEBUG_REQ(D_INODE, req, "statfs");
1116                 OBD_FAIL_RETURN(OBD_FAIL_MDS_STATFS_NET, 0);
1117                 rc = mds_statfs(req);
1118                 break;
1119
1120         case MDS_READPAGE:
1121                 DEBUG_REQ(D_INODE, req, "readpage");
1122                 OBD_FAIL_RETURN(OBD_FAIL_MDS_READPAGE_NET, 0);
1123                 rc = mds_readpage(req);
1124
1125                 if (OBD_FAIL_CHECK(OBD_FAIL_MDS_SENDPAGE))
1126                         return 0;
1127                 break;
1128
1129         case MDS_REINT: {
1130                 __u32 *opcp = lustre_msg_buf(req->rq_reqmsg, 0, sizeof (*opcp));
1131                 __u32  opc;
1132                 int size[3] = {sizeof(struct mds_body), mds->mds_max_mdsize,
1133                                mds->mds_max_cookiesize};
1134                 int bufcount;
1135
1136                 /* NB only peek inside req now; mds_reint() will swab it */
1137                 if (opcp == NULL) {
1138                         CERROR ("Can't inspect opcode\n");
1139                         rc = -EINVAL;
1140                         break;
1141                 }
1142                 opc = *opcp;
1143                 if (lustre_msg_swabbed (req->rq_reqmsg))
1144                         __swab32s(&opc);
1145
1146                 DEBUG_REQ(D_INODE, req, "reint %d (%s)", opc,
1147                           (opc < sizeof(reint_names) / sizeof(reint_names[0]) ||
1148                            reint_names[opc] == NULL) ? reint_names[opc] :
1149                                                        "unknown opcode");
1150
1151                 OBD_FAIL_RETURN(OBD_FAIL_MDS_REINT_NET, 0);
1152
1153                 if (opc == REINT_UNLINK)
1154                         bufcount = 3;
1155                 else if (opc == REINT_OPEN || opc == REINT_RENAME)
1156                         bufcount = 2;
1157                 else
1158                         bufcount = 1;
1159
1160                 rc = lustre_pack_reply(req, bufcount, size, NULL);
1161                 if (rc)
1162                         break;
1163
1164                 rc = mds_reint(req, 0, NULL);
1165                 OBD_FAIL_RETURN(OBD_FAIL_MDS_REINT_NET_REP, 0);
1166                 break;
1167         }
1168
1169         case MDS_CLOSE:
1170                 DEBUG_REQ(D_INODE, req, "close");
1171                 OBD_FAIL_RETURN(OBD_FAIL_MDS_CLOSE_NET, 0);
1172                 rc = mds_close(req);
1173                 break;
1174
1175         case MDS_DONE_WRITING:
1176                 DEBUG_REQ(D_INODE, req, "done_writing");
1177                 OBD_FAIL_RETURN(OBD_FAIL_MDS_DONE_WRITING_NET, 0);
1178                 rc = mds_done_writing(req);
1179                 break;
1180
1181         case MDS_PIN:
1182                 DEBUG_REQ(D_INODE, req, "pin");
1183                 OBD_FAIL_RETURN(OBD_FAIL_MDS_PIN_NET, 0);
1184                 rc = mds_pin(req);
1185                 break;
1186
1187         case MDS_SYNC:
1188                 DEBUG_REQ(D_INODE, req, "sync");
1189                 OBD_FAIL_RETURN(OBD_FAIL_MDS_SYNC_NET, 0);
1190                 rc = mds_sync(req);
1191                 break;
1192
1193         case OBD_PING:
1194                 DEBUG_REQ(D_INODE, req, "ping");
1195                 rc = target_handle_ping(req);
1196                 break;
1197
1198         case OBD_LOG_CANCEL:
1199                 CDEBUG(D_INODE, "log cancel\n");
1200                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOG_CANCEL_NET, 0);
1201                 rc = -ENOTSUPP; /* la la la */
1202                 break;
1203
1204         case LDLM_ENQUEUE:
1205                 DEBUG_REQ(D_INODE, req, "enqueue");
1206                 OBD_FAIL_RETURN(OBD_FAIL_LDLM_ENQUEUE, 0);
1207                 rc = ldlm_handle_enqueue(req, ldlm_server_completion_ast,
1208                                          ldlm_server_blocking_ast);
1209                 break;
1210         case LDLM_CONVERT:
1211                 DEBUG_REQ(D_INODE, req, "convert");
1212                 OBD_FAIL_RETURN(OBD_FAIL_LDLM_CONVERT, 0);
1213                 rc = ldlm_handle_convert(req);
1214                 break;
1215         case LDLM_BL_CALLBACK:
1216         case LDLM_CP_CALLBACK:
1217                 DEBUG_REQ(D_INODE, req, "callback");
1218                 CERROR("callbacks should not happen on MDS\n");
1219                 LBUG();
1220                 OBD_FAIL_RETURN(OBD_FAIL_LDLM_BL_CALLBACK, 0);
1221                 break;
1222         case LLOG_ORIGIN_HANDLE_CREATE:
1223                 DEBUG_REQ(D_INODE, req, "llog_init");
1224                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
1225                 rc = llog_origin_handle_create(req);
1226                 break;
1227         case LLOG_ORIGIN_HANDLE_NEXT_BLOCK:
1228                 DEBUG_REQ(D_INODE, req, "llog next block");
1229                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
1230                 rc = llog_origin_handle_next_block(req);
1231                 break;
1232         case LLOG_ORIGIN_HANDLE_READ_HEADER:
1233                 DEBUG_REQ(D_INODE, req, "llog read header");
1234                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
1235                 rc = llog_origin_handle_read_header(req);
1236                 break;
1237         case LLOG_ORIGIN_HANDLE_CLOSE:
1238                 DEBUG_REQ(D_INODE, req, "llog close");
1239                 OBD_FAIL_RETURN(OBD_FAIL_OBD_LOGD_NET, 0);
1240                 rc = llog_origin_handle_close(req);
1241                 break;
1242         default:
1243                 req->rq_status = -ENOTSUPP;
1244                 rc = ptlrpc_error(req);
1245                 RETURN(rc);
1246         }
1247
1248         LASSERT(current->journal_info == NULL);
1249
1250         EXIT;
1251
1252         /* If we're DISCONNECTing, the mds_export_data is already freed */
1253         if (!rc && req->rq_reqmsg->opc != MDS_DISCONNECT) {
1254                 struct mds_export_data *med = &req->rq_export->exp_mds_data;
1255                 struct obd_device *obd = list_entry(mds, struct obd_device,
1256                                                     u.mds);
1257                 req->rq_repmsg->last_xid =
1258                         le64_to_cpu(med->med_mcd->mcd_last_xid);
1259
1260                 if (!obd->obd_no_transno) {
1261                         req->rq_repmsg->last_committed =
1262                                 obd->obd_last_committed;
1263                 } else {
1264                         DEBUG_REQ(D_IOCTL, req,
1265                                   "not sending last_committed update");
1266                 }
1267                 CDEBUG(D_INFO, "last_transno "LPU64", last_committed "LPU64
1268                        ", xid "LPU64"\n",
1269                        mds->mds_last_transno, obd->obd_last_committed,
1270                        req->rq_xid);
1271         }
1272  out:
1273
1274         if (lustre_msg_get_flags(req->rq_reqmsg) & MSG_LAST_REPLAY) {
1275                 if (obd && obd->obd_recovering) {
1276                         DEBUG_REQ(D_HA, req, "LAST_REPLAY, queuing reply");
1277                         return target_queue_final_reply(req, rc);
1278                 }
1279                 /* Lost a race with recovery; let the error path DTRT. */
1280                 rc = req->rq_status = -ENOTCONN;
1281         }
1282
1283         target_send_reply(req, rc, OBD_FAIL_MDS_ALL_REPLY_NET);
1284         return 0;
1285 }
1286
1287 /* Update the server data on disk.  This stores the new mount_count and
1288  * also the last_rcvd value to disk.  If we don't have a clean shutdown,
1289  * then the server last_rcvd value may be less than that of the clients.
1290  * This will alert us that we may need to do client recovery.
1291  *
1292  * Also assumes for mds_last_transno that we are not modifying it (no locking).
1293  */
1294 int mds_update_server_data(struct obd_device *obd, int force_sync)
1295 {
1296         struct mds_obd *mds = &obd->u.mds;
1297         struct mds_server_data *msd = mds->mds_server_data;
1298         struct file *filp = mds->mds_rcvd_filp;
1299         struct obd_run_ctxt saved;
1300         loff_t off = 0;
1301         int rc;
1302         ENTRY;
1303
1304         push_ctxt(&saved, &obd->obd_ctxt, NULL);
1305         msd->msd_last_transno = cpu_to_le64(mds->mds_last_transno);
1306         msd->msd_mount_count = cpu_to_le64(mds->mds_mount_count);
1307
1308         CDEBUG(D_SUPER, "MDS mount_count is "LPU64", last_transno is "LPU64"\n",
1309                mds->mds_mount_count, mds->mds_last_transno);
1310         rc = fsfilt_write_record(obd, filp, msd, sizeof(*msd), &off,force_sync);
1311         if (rc)
1312                 CERROR("error writing MDS server data: rc = %d\n", rc);
1313         pop_ctxt(&saved, &obd->obd_ctxt, NULL);
1314         RETURN(rc);
1315 }
1316
1317
1318 /* mount the file system (secretly) */
1319 static int mds_setup(struct obd_device *obd, obd_count len, void *buf)
1320 {
1321         struct lustre_cfg* lcfg = buf;
1322         struct mds_obd *mds = &obd->u.mds;
1323         struct vfsmount *mnt;
1324         int rc = 0;
1325         unsigned long page;
1326         ENTRY;
1327
1328         dev_clear_rdonly(2);
1329
1330         if (!lcfg->lcfg_inlbuf1 || !lcfg->lcfg_inlbuf2)
1331                 RETURN(rc = -EINVAL);
1332
1333         obd->obd_fsops = fsfilt_get_ops(lcfg->lcfg_inlbuf2);
1334         if (IS_ERR(obd->obd_fsops))
1335                 RETURN(rc = PTR_ERR(obd->obd_fsops));
1336
1337         if (!(page = __get_free_page(GFP_KERNEL)))
1338                 RETURN(-ENOMEM);
1339
1340         memset((void *)page, 0, PAGE_SIZE);
1341         sprintf((char *)page, "iopen_nopriv");
1342
1343         mnt = do_kern_mount(lcfg->lcfg_inlbuf2, 0,
1344                             lcfg->lcfg_inlbuf1, (void *)page);
1345         free_page(page);
1346         if (IS_ERR(mnt)) {
1347                 rc = PTR_ERR(mnt);
1348                 CERROR("do_kern_mount failed: rc = %d\n", rc);
1349                 GOTO(err_ops, rc);
1350         }
1351
1352         CDEBUG(D_SUPER, "%s: mnt = %p\n", lcfg->lcfg_inlbuf1, mnt);
1353
1354         sema_init(&mds->mds_orphan_recovery_sem, 1);
1355         sema_init(&mds->mds_epoch_sem, 1);
1356         spin_lock_init(&mds->mds_transno_lock);
1357         mds->mds_max_mdsize = sizeof(struct lov_mds_md);
1358         mds->mds_max_cookiesize = sizeof(struct llog_cookie);
1359
1360         obd->obd_namespace = ldlm_namespace_new("mds_server",
1361                                                 LDLM_NAMESPACE_SERVER);
1362         if (obd->obd_namespace == NULL) {
1363                 mds_cleanup(obd, 0);
1364                 GOTO(err_put, rc = -ENOMEM);
1365         }
1366
1367         rc = mds_fs_setup(obd, mnt);
1368         if (rc) {
1369                 CERROR("MDS filesystem method init failed: rc = %d\n", rc);
1370                 GOTO(err_ns, rc);
1371         }
1372
1373         rc = llog_start_commit_thread();
1374         if (rc < 0)
1375                 GOTO(err_fs, rc);
1376
1377
1378         if (lcfg->lcfg_inllen3 > 0 && lcfg->lcfg_inlbuf3) {
1379                 class_uuid_t uuid;
1380
1381                 generate_random_uuid(uuid);
1382                 class_uuid_unparse(uuid, &mds->mds_lov_uuid);
1383
1384                 OBD_ALLOC(mds->mds_profile, lcfg->lcfg_inllen3);
1385                 if (mds->mds_profile == NULL)
1386                         GOTO(err_fs, rc = -ENOMEM);
1387
1388                 memcpy(mds->mds_profile, lcfg->lcfg_inlbuf3,
1389                        lcfg->lcfg_inllen3);
1390
1391         }
1392
1393         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
1394                            "mds_ldlm_client", &obd->obd_ldlm_client);
1395         obd->obd_replayable = 1;
1396
1397         RETURN(0);
1398
1399 err_fs:
1400         /* No extra cleanup needed for llog_init_commit_thread() */
1401         mds_fs_cleanup(obd, 0);
1402 err_ns:
1403         ldlm_namespace_free(obd->obd_namespace, 0);
1404         obd->obd_namespace = NULL;
1405 err_put:
1406         unlock_kernel();
1407         mntput(mds->mds_vfsmnt);
1408         mds->mds_sb = 0;
1409         lock_kernel();
1410 err_ops:
1411         fsfilt_put_ops(obd->obd_fsops);
1412         return rc;
1413 }
1414
1415 static int mds_postsetup(struct obd_device *obd)
1416 {
1417         struct mds_obd *mds = &obd->u.mds;
1418         int rc = 0;
1419         ENTRY;
1420
1421
1422         rc = llog_setup(obd, LLOG_CONFIG_ORIG_CTXT, obd, 0, NULL,
1423                         &llog_lvfs_ops);
1424         if (rc)
1425                 RETURN(rc);
1426
1427         if (mds->mds_profile) {
1428                 struct obd_run_ctxt saved;
1429                 struct lustre_profile *lprof;
1430                 struct config_llog_instance cfg;
1431
1432                 cfg.cfg_instance = NULL;
1433                 cfg.cfg_uuid = mds->mds_lov_uuid;
1434                 push_ctxt(&saved, &obd->obd_ctxt, NULL);
1435                 rc = class_config_parse_llog(llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT),
1436                                              mds->mds_profile, &cfg);
1437                 pop_ctxt(&saved, &obd->obd_ctxt, NULL);
1438                 if (rc)
1439                         GOTO(err_llog, rc);
1440
1441                 lprof = class_get_profile(mds->mds_profile);
1442                 if (lprof == NULL) {
1443                         CERROR("No profile found: %s\n", mds->mds_profile);
1444                         GOTO(err_cleanup, rc = -ENOENT);
1445                 }
1446                 rc = mds_lov_connect(obd, lprof->lp_osc);
1447                 if (rc)
1448                         GOTO(err_cleanup, rc);
1449         }
1450
1451         RETURN(rc);
1452
1453 err_cleanup:
1454         mds_lov_clean(obd);
1455 err_llog:
1456         llog_cleanup(llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT));
1457         RETURN(rc);
1458 }
1459
1460 static int mds_postrecov(struct obd_device *obd)
1461
1462 {
1463         int rc, rc2;
1464
1465         LASSERT(!obd->obd_recovering);
1466
1467 #ifdef ENABLE_ORPHANS
1468         rc = llog_connect(llog_get_context(obd, LLOG_UNLINK_ORIG_CTXT),
1469                           obd->u.mds.mds_lov_desc.ld_tgt_count, NULL, NULL);
1470         if (rc != 0) {
1471                 CERROR("faild at llog_origin_connect: %d\n", rc);
1472         }
1473 #endif
1474         rc = mds_cleanup_orphans(obd);
1475
1476         rc2 = mds_lov_set_nextid(obd);
1477         if (rc2 == 0)
1478                 rc2 = rc;
1479         RETURN(rc2);
1480 }
1481
1482 int mds_lov_clean(struct obd_device *obd)
1483 {
1484         struct mds_obd *mds = &obd->u.mds;
1485
1486         if (mds->mds_profile) {
1487                 char * cln_prof;
1488                 struct config_llog_instance cfg;
1489                 struct obd_run_ctxt saved;
1490                 int len = strlen(mds->mds_profile) + sizeof("-clean") + 1;
1491
1492                 OBD_ALLOC(cln_prof, len);
1493                 sprintf(cln_prof, "%s-clean", mds->mds_profile);
1494
1495                 cfg.cfg_instance = NULL;
1496                 cfg.cfg_uuid = mds->mds_lov_uuid;
1497
1498                 push_ctxt(&saved, &obd->obd_ctxt, NULL);
1499                 class_config_parse_llog(llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT),
1500                                         cln_prof, &cfg);
1501                 pop_ctxt(&saved, &obd->obd_ctxt, NULL);
1502
1503                 OBD_FREE(cln_prof, len);
1504                 OBD_FREE(mds->mds_profile, strlen(mds->mds_profile) + 1);
1505                 mds->mds_profile = NULL;
1506         }
1507         RETURN(0);
1508 }
1509
1510 static int mds_precleanup(struct obd_device *obd, int flags)
1511 {
1512         int rc = 0;
1513         ENTRY;
1514
1515         mds_lov_disconnect(obd, flags);
1516         mds_lov_clean(obd);
1517         llog_cleanup(llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT));
1518         RETURN(rc);
1519 }
1520
1521 static int mds_cleanup(struct obd_device *obd, int flags)
1522 {
1523         struct mds_obd *mds = &obd->u.mds;
1524         ENTRY;
1525
1526         if (mds->mds_sb == NULL)
1527                 RETURN(0);
1528
1529         mds_update_server_data(obd, 1);
1530         if (mds->mds_lov_objids != NULL) {
1531                 OBD_FREE(mds->mds_lov_objids,
1532                          mds->mds_lov_desc.ld_tgt_count * sizeof(obd_id));
1533         }
1534         mds_fs_cleanup(obd, flags);
1535
1536         unlock_kernel();
1537
1538         /* 2 seems normal on mds, (may_umount() also expects 2
1539           fwiw), but we only see 1 at this point in obdfilter. */
1540         if (atomic_read(&obd->u.mds.mds_vfsmnt->mnt_count) > 2)
1541                 CERROR("%s: mount busy, mnt_count %d != 2\n", obd->obd_name,
1542                        atomic_read(&obd->u.mds.mds_vfsmnt->mnt_count));
1543
1544         mntput(mds->mds_vfsmnt);
1545
1546         mds->mds_sb = 0;
1547
1548         ldlm_namespace_free(obd->obd_namespace, flags & OBD_OPT_FORCE);
1549
1550         if (obd->obd_recovering)
1551                 target_cancel_recovery_timer(obd);
1552         lock_kernel();
1553         dev_clear_rdonly(2);
1554         fsfilt_put_ops(obd->obd_fsops);
1555
1556         RETURN(0);
1557 }
1558
1559 static void fixup_handle_for_resent_req(struct ptlrpc_request *req,
1560                                         struct ldlm_lock *new_lock,
1561                                         struct lustre_handle *lockh)
1562 {
1563         struct obd_export *exp = req->rq_export;
1564         struct obd_device *obd = exp->exp_obd;
1565         struct ldlm_request *dlmreq =
1566                 lustre_msg_buf(req->rq_reqmsg, 0, sizeof (*dlmreq));
1567         struct lustre_handle remote_hdl = dlmreq->lock_handle1;
1568         struct list_head *iter;
1569
1570         if (!(lustre_msg_get_flags(req->rq_reqmsg) & MSG_RESENT))
1571                 return;
1572
1573         l_lock(&obd->obd_namespace->ns_lock);
1574         list_for_each(iter, &exp->exp_ldlm_data.led_held_locks) {
1575                 struct ldlm_lock *lock;
1576                 lock = list_entry(iter, struct ldlm_lock, l_export_chain);
1577                 if (lock == new_lock)
1578                         continue;
1579                 if (lock->l_remote_handle.cookie == remote_hdl.cookie) {
1580                         lockh->cookie = lock->l_handle.h_cookie;
1581                         DEBUG_REQ(D_HA, req, "restoring lock cookie "LPX64,
1582                                   lockh->cookie);
1583                         l_unlock(&obd->obd_namespace->ns_lock);
1584                         return;
1585                 }
1586         }
1587         l_unlock(&obd->obd_namespace->ns_lock);
1588
1589         /* This remote handle isn't enqueued, so we never received or
1590          * processed this request.  Clear MSG_RESENT, because it can
1591          * be handled like any normal request now. */
1592
1593         lustre_msg_clear_flags(req->rq_reqmsg, MSG_RESENT);
1594
1595         DEBUG_REQ(D_HA, req, "no existing lock with rhandle "LPX64,
1596                   remote_hdl.cookie);
1597 }
1598
1599 int intent_disposition(struct ldlm_reply *rep, int flag)
1600 {
1601         if (!rep)
1602                 return 0;
1603         return (rep->lock_policy_res1 & flag);
1604 }
1605
1606 void intent_set_disposition(struct ldlm_reply *rep, int flag)
1607 {
1608         if (!rep)
1609                 return;
1610         rep->lock_policy_res1 |= flag;
1611 }
1612
1613 static int ldlm_intent_policy(struct ldlm_namespace *ns,
1614                               struct ldlm_lock **lockp, void *req_cookie,
1615                               ldlm_mode_t mode, int flags, void *data)
1616 {
1617         struct ptlrpc_request *req = req_cookie;
1618         struct ldlm_lock *lock = *lockp;
1619         int rc;
1620         ENTRY;
1621
1622         if (!req_cookie)
1623                 RETURN(0);
1624
1625         if (req->rq_reqmsg->bufcount > 1) {
1626                 /* an intent needs to be considered */
1627                 struct ldlm_intent *it;
1628                 struct mds_obd *mds = &req->rq_export->exp_obd->u.mds;
1629                 struct ldlm_reply *rep;
1630                 struct lustre_handle lockh = { 0 };
1631                 struct ldlm_lock *new_lock;
1632                 int offset = 2, repsize[4] = {sizeof(struct ldlm_reply),
1633                                               sizeof(struct mds_body),
1634                                               mds->mds_max_mdsize,
1635                                               mds->mds_max_cookiesize};
1636
1637                 it = lustre_swab_reqbuf(req, 1, sizeof (*it),
1638                                         lustre_swab_ldlm_intent);
1639                 if (it == NULL) {
1640                         CERROR ("Intent missing\n");
1641                         req->rq_status = -EFAULT;
1642                         RETURN(req->rq_status);
1643                 }
1644
1645                 LDLM_DEBUG(lock, "intent policy, opc: %s",
1646                            ldlm_it2str(it->opc));
1647
1648                 rc = lustre_pack_reply(req, it->opc == IT_UNLINK ? 4 : 3,
1649                                        repsize, NULL);
1650                 if (rc)
1651                         RETURN(req->rq_status = rc);
1652
1653                 rep = lustre_msg_buf(req->rq_repmsg, 0, sizeof (*rep));
1654                 intent_set_disposition(rep, DISP_IT_EXECD);
1655
1656                 fixup_handle_for_resent_req(req, lock, &lockh);
1657
1658                 /* execute policy */
1659                 switch ((long)it->opc) {
1660                 case IT_OPEN:
1661                 case IT_CREAT|IT_OPEN:
1662                         /* XXX swab here to assert that an mds_open reint
1663                          * packet is following */
1664                         rep->lock_policy_res2 = mds_reint(req, offset, &lockh);
1665 #if 0
1666                         /* We abort the lock if the lookup was negative and
1667                          * we did not make it to the OPEN portion */
1668                         if (!intent_disposition(rep, DISP_LOOKUP_EXECD))
1669                                 RETURN(ELDLM_LOCK_ABORTED);
1670                         if (intent_disposition(rep, DISP_LOOKUP_NEG) &&
1671                             !intent_disposition(rep, DISP_OPEN_OPEN))
1672 #endif
1673                                 RETURN(ELDLM_LOCK_ABORTED);
1674                         break;
1675                 case IT_GETATTR:
1676                 case IT_LOOKUP:
1677                 case IT_READDIR:
1678                         rep->lock_policy_res2 = mds_getattr_name(offset, req,
1679                                                                  &lockh);
1680                         /* FIXME: LDLM can set req->rq_status. MDS sets
1681                            policy_res{1,2} with disposition and status.
1682                            - replay: returns 0 & req->status is old status
1683                            - otherwise: returns req->status */
1684                         if (intent_disposition(rep, DISP_LOOKUP_NEG))
1685                                 rep->lock_policy_res2 = 0;
1686                         if (!intent_disposition(rep, DISP_LOOKUP_POS) ||
1687                             rep->lock_policy_res2)
1688                                 RETURN(ELDLM_LOCK_ABORTED);
1689                         if (req->rq_status != 0) {
1690                                 LBUG();
1691                                 rep->lock_policy_res2 = req->rq_status;
1692                                 RETURN(ELDLM_LOCK_ABORTED);
1693                         }
1694                         break;
1695                 default:
1696                         CERROR("Unhandled intent "LPD64"\n", it->opc);
1697                         LBUG();
1698                 }
1699
1700                 /* By this point, whatever function we called above must have
1701                  * either filled in 'lockh', been an intent replay, or returned
1702                  * an error.  We want to allow replayed RPCs to not get a lock,
1703                  * since we would just drop it below anyways because lock replay
1704                  * is done separately by the client afterwards.  For regular
1705                  * RPCs we want to give the new lock to the client instead of
1706                  * whatever lock it was about to get.
1707                  */
1708                 new_lock = ldlm_handle2lock(&lockh);
1709                 if (new_lock == NULL && (flags & LDLM_FL_INTENT_ONLY))
1710                         RETURN(0);
1711
1712                 LASSERT(new_lock != NULL);
1713
1714                 /* If we've already given this lock to a client once, then we
1715                  * should have no readers or writers.  Otherwise, we should
1716                  * have one reader _or_ writer ref (which will be zeroed below)
1717                  * before returning the lock to a client.
1718                  */
1719                 if (new_lock->l_export == req->rq_export) {
1720                         LASSERT(new_lock->l_readers + new_lock->l_writers == 0);
1721                 } else {
1722                         LASSERT(new_lock->l_export == NULL);
1723                         LASSERT(new_lock->l_readers + new_lock->l_writers == 1);
1724                 }
1725
1726                 *lockp = new_lock;
1727
1728                 if (new_lock->l_export == req->rq_export) {
1729                         /* Already gave this to the client, which means that we
1730                          * reconstructed a reply. */
1731                         LASSERT(lustre_msg_get_flags(req->rq_reqmsg) &
1732                                 MSG_RESENT);
1733                         RETURN(ELDLM_LOCK_REPLACED);
1734                 }
1735
1736                 /* Fixup the lock to be given to the client */
1737                 l_lock(&new_lock->l_resource->lr_namespace->ns_lock);
1738                 new_lock->l_readers = 0;
1739                 new_lock->l_writers = 0;
1740
1741                 new_lock->l_export = class_export_get(req->rq_export);
1742                 list_add(&new_lock->l_export_chain,
1743                          &new_lock->l_export->exp_ldlm_data.led_held_locks);
1744
1745                 new_lock->l_blocking_ast = lock->l_blocking_ast;
1746                 new_lock->l_completion_ast = lock->l_completion_ast;
1747
1748                 memcpy(&new_lock->l_remote_handle, &lock->l_remote_handle,
1749                        sizeof(lock->l_remote_handle));
1750
1751                 new_lock->l_flags &= ~LDLM_FL_LOCAL;
1752
1753                 LDLM_LOCK_PUT(new_lock);
1754                 l_unlock(&new_lock->l_resource->lr_namespace->ns_lock);
1755
1756                 RETURN(ELDLM_LOCK_REPLACED);
1757         } else {
1758                 int size = sizeof(struct ldlm_reply);
1759                 rc = lustre_pack_reply(req, 1, &size, NULL);
1760                 if (rc) {
1761                         LBUG();
1762                         RETURN(-ENOMEM);
1763                 }
1764         }
1765         RETURN(0);
1766 }
1767
1768 int mds_attach(struct obd_device *dev, obd_count len, void *data)
1769 {
1770         struct lprocfs_static_vars lvars;
1771
1772         lprocfs_init_multi_vars(0, &lvars);
1773         return lprocfs_obd_attach(dev, lvars.obd_vars);
1774 }
1775
1776 int mds_detach(struct obd_device *dev)
1777 {
1778         return lprocfs_obd_detach(dev);
1779 }
1780
1781 int mdt_attach(struct obd_device *dev, obd_count len, void *data)
1782 {
1783         struct lprocfs_static_vars lvars;
1784
1785         lprocfs_init_multi_vars(1, &lvars);
1786         return lprocfs_obd_attach(dev, lvars.obd_vars);
1787 }
1788
1789 int mdt_detach(struct obd_device *dev)
1790 {
1791         return lprocfs_obd_detach(dev);
1792 }
1793
1794 static int mdt_setup(struct obd_device *obddev, obd_count len, void *buf)
1795 {
1796         struct mds_obd *mds = &obddev->u.mds;
1797         int rc = 0;
1798         ENTRY;
1799
1800         mds->mds_service = ptlrpc_init_svc(MDS_NEVENTS, MDS_NBUFS,
1801                                            MDS_BUFSIZE, MDS_MAXREQSIZE,
1802                                            MDS_REQUEST_PORTAL, MDC_REPLY_PORTAL,
1803                                            mds_handle, "mds",
1804                                            obddev->obd_proc_entry);
1805
1806         if (!mds->mds_service) {
1807                 CERROR("failed to start service\n");
1808                 RETURN(rc = -ENOMEM);
1809         }
1810
1811         rc = ptlrpc_start_n_threads(obddev, mds->mds_service, MDT_NUM_THREADS,
1812                                     "ll_mdt");
1813         if (rc)
1814                 GOTO(err_thread, rc);
1815
1816         mds->mds_setattr_service =
1817                 ptlrpc_init_svc(MDS_NEVENTS, MDS_NBUFS,
1818                                 MDS_BUFSIZE, MDS_MAXREQSIZE,
1819                                 MDS_SETATTR_PORTAL, MDC_REPLY_PORTAL,
1820                                 mds_handle, "mds_setattr",
1821                                 obddev->obd_proc_entry);
1822         if (!mds->mds_setattr_service) {
1823                 CERROR("failed to start getattr service\n");
1824                 GOTO(err_thread, rc = -ENOMEM);
1825         }
1826
1827         rc = ptlrpc_start_n_threads(obddev, mds->mds_setattr_service,
1828                                  MDT_NUM_THREADS, "ll_mdt_attr");
1829         if (rc)
1830                 GOTO(err_thread2, rc);
1831
1832         mds->mds_readpage_service =
1833                 ptlrpc_init_svc(MDS_NEVENTS, MDS_NBUFS,
1834                                 MDS_BUFSIZE, MDS_MAXREQSIZE,
1835                                 MDS_READPAGE_PORTAL, MDC_REPLY_PORTAL,
1836                                 mds_handle, "mds_readpage",
1837                                 obddev->obd_proc_entry);
1838         if (!mds->mds_readpage_service) {
1839                 CERROR("failed to start readpage service\n");
1840                 GOTO(err_thread2, rc = -ENOMEM);
1841         }
1842
1843         rc = ptlrpc_start_n_threads(obddev, mds->mds_readpage_service,
1844                                     MDT_NUM_THREADS, "ll_mdt_rdpg");
1845
1846         if (rc)
1847                 GOTO(err_thread3, rc);
1848
1849         RETURN(0);
1850
1851 err_thread3:
1852         ptlrpc_unregister_service(mds->mds_readpage_service);
1853 err_thread2:
1854         ptlrpc_unregister_service(mds->mds_setattr_service);
1855 err_thread:
1856         ptlrpc_unregister_service(mds->mds_service);
1857         return rc;
1858 }
1859
1860
1861 static int mdt_cleanup(struct obd_device *obddev, int flags)
1862 {
1863         struct mds_obd *mds = &obddev->u.mds;
1864         ENTRY;
1865
1866         ptlrpc_stop_all_threads(mds->mds_readpage_service);
1867         ptlrpc_unregister_service(mds->mds_readpage_service);
1868
1869         ptlrpc_stop_all_threads(mds->mds_setattr_service);
1870         ptlrpc_unregister_service(mds->mds_setattr_service);
1871
1872         ptlrpc_stop_all_threads(mds->mds_service);
1873         ptlrpc_unregister_service(mds->mds_service);
1874
1875         RETURN(0);
1876 }
1877
1878 static struct dentry *mds_lvfs_fid2dentry(__u64 id, __u32 gen, __u64 gr, void *data)
1879 {
1880         struct obd_device *obd = data;
1881         struct ll_fid fid;
1882         fid.id = id;
1883         fid.generation = gen;
1884         return mds_fid2dentry(&obd->u.mds, &fid, NULL);
1885 }
1886
1887 struct lvfs_callback_ops mds_lvfs_ops = {
1888         l_fid2dentry:     mds_lvfs_fid2dentry,
1889 };
1890
1891 /* use obd ops to offer management infrastructure */
1892 static struct obd_ops mds_obd_ops = {
1893         o_owner:       THIS_MODULE,
1894         o_attach:      mds_attach,
1895         o_detach:      mds_detach,
1896         o_connect:     mds_connect,
1897         o_init_export:  mds_init_export,
1898         o_destroy_export:  mds_destroy_export,
1899         o_disconnect:  mds_disconnect,
1900         o_setup:       mds_setup,
1901         o_postsetup:   mds_postsetup,
1902         o_precleanup:  mds_precleanup,
1903         o_cleanup:     mds_cleanup,
1904         o_postrecov:   mds_postrecov,
1905         o_statfs:      mds_obd_statfs,
1906         o_iocontrol:   mds_iocontrol,
1907         o_create:      mds_obd_create,
1908         o_destroy:     mds_obd_destroy,
1909         o_llog_init:   mds_llog_init,
1910         o_llog_finish: mds_llog_finish,
1911         o_notify:      mds_notify,
1912 };
1913
1914 static struct obd_ops mdt_obd_ops = {
1915         o_owner:       THIS_MODULE,
1916         o_attach:      mdt_attach,
1917         o_detach:      mdt_detach,
1918         o_setup:       mdt_setup,
1919         o_cleanup:     mdt_cleanup,
1920 };
1921
1922 static int __init mds_init(void)
1923 {
1924         struct lprocfs_static_vars lvars;
1925
1926         lprocfs_init_multi_vars(0, &lvars);
1927         class_register_type(&mds_obd_ops, lvars.module_vars, LUSTRE_MDS_NAME);
1928         lprocfs_init_multi_vars(1, &lvars);
1929         class_register_type(&mdt_obd_ops, lvars.module_vars, LUSTRE_MDT_NAME);
1930         ldlm_register_intent(ldlm_intent_policy);
1931
1932         return 0;
1933 }
1934
1935 static void /*__exit*/ mds_exit(void)
1936 {
1937         ldlm_unregister_intent();
1938         class_unregister_type(LUSTRE_MDS_NAME);
1939         class_unregister_type(LUSTRE_MDT_NAME);
1940 }
1941
1942 MODULE_AUTHOR("Cluster File Systems, Inc. <info@clusterfs.com>");
1943 MODULE_DESCRIPTION("Lustre Metadata Server (MDS)");
1944 MODULE_LICENSE("GPL");
1945
1946 module_init(mds_init);
1947 module_exit(mds_exit);