lustre/liblustre/namei.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  * Lustre Light Super operations
   5  *
   6  *  Copyright (c) 2002, 2003 Cluster File Systems, Inc.
   7  *
   8  *   This file is part of Lustre, http://www.lustre.org.
   9  *
  10  *   Lustre is free software; you can redistribute it and/or
  11  *   modify it under the terms of version 2 of the GNU General Public
  12  *   License as published by the Free Software Foundation.
  13  *
  14  *   Lustre is distributed in the hope that it will be useful,
  15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *   GNU General Public License for more details.
  18  *
  19  *   You should have received a copy of the GNU General Public License
  20  *   along with Lustre; if not, write to the Free Software
  21  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22  */
  23
  24 #define DEBUG_SUBSYSTEM S_LLITE
  25
  26 #include <stdlib.h>
  27 #include <string.h>
  28 #include <assert.h>
  29 #include <time.h>
  30 #include <sys/types.h>
  31 #include <sys/stat.h>
  32 #include <sys/fcntl.h>
  33 #include <sys/queue.h>
  34
  35 #include <sysio.h>
  36 #include <fs.h>
  37 #include <mount.h>
  38 #include <inode.h>
  39 #include <file.h>
  40
  41 #undef LIST_HEAD
  42
  43 #include "llite_lib.h"
  44
  45 static void ll_intent_drop_lock(struct lookup_intent *it)
  46 {
  47         struct lustre_handle *handle;
  48
  49         if (it->it_op && it->d.lustre.it_lock_mode) {
  50                 handle = (struct lustre_handle *)&it->d.lustre.it_lock_handle;
  51                 CDEBUG(D_DLMTRACE, "releasing lock with cookie "LPX64
  52                        " from it %p\n", handle->cookie, it);
  53                 ldlm_lock_decref(handle, it->d.lustre.it_lock_mode);
  54
  55                 /* bug 494: intent_release may be called multiple times, from
  56                  * this thread and we don't want to double-decref this lock */
  57                 it->d.lustre.it_lock_mode = 0;
  58         }
  59 }
  60
  61 static void ll_intent_release(struct lookup_intent *it)
  62 {
  63         ENTRY;
  64
  65         ll_intent_drop_lock(it);
  66         it->it_magic = 0;
  67         it->it_op_release = 0;
  68         it->d.lustre.it_disposition = 0;
  69         it->d.lustre.it_data = NULL;
  70         EXIT;
  71 }
  72
  73 /*
  74  * remove the stale inode from pnode
  75  */
  76 void unhook_stale_inode(struct pnode *pno)
  77 {
  78         struct inode *inode = pno->p_base->pb_ino;
  79         ENTRY;
  80
  81         LASSERT(inode);
  82         LASSERT(llu_i2info(inode)->lli_stale_flag);
  83
  84         pno->p_base->pb_ino = NULL;
  85         I_RELE(inode);
  86
  87         if (!llu_i2info(inode)->lli_open_count) {
  88                 CDEBUG(D_INODE, "unhook inode %p (ino %lu) from pno %p\n",
  89                                 inode, llu_i2info(inode)->lli_st_ino, pno);
  90                 if (!inode->i_ref)
  91                         _sysio_i_gone(inode);
  92         }
  93
  94         EXIT;
  95         return;
  96 }
  97
  98 void llu_lookup_finish_locks(struct lookup_intent *it, struct pnode *pnode)
  99 {
 100         LASSERT(it);
 101         LASSERT(pnode);
 102
 103         if (it && pnode->p_base->pb_ino != NULL) {
 104                 struct inode *inode = pnode->p_base->pb_ino;
 105                 CDEBUG(D_DLMTRACE, "setting l_data to inode %p (%lu/%lu)\n",
 106                        inode, llu_i2info(inode)->lli_st_ino,
 107                        llu_i2info(inode)->lli_st_generation);
 108                 mdc_set_lock_data(&it->d.lustre.it_lock_handle, inode);
 109         }
 110
 111         /* drop IT_LOOKUP locks */
 112         if (it->it_op == IT_LOOKUP)
 113                 ll_intent_release(it);
 114
 115 }
 116
 117 static inline void llu_invalidate_inode_pages(struct inode * inode)
 118 {
 119         /* do nothing */
 120 }
 121
 122 int llu_mdc_blocking_ast(struct ldlm_lock *lock,
 123                          struct ldlm_lock_desc *desc,
 124                          void *data, int flag)
 125 {
 126         int rc;
 127         struct lustre_handle lockh;
 128         ENTRY;
 129
 130
 131         switch (flag) {
 132         case LDLM_CB_BLOCKING:
 133                 ldlm_lock2handle(lock, &lockh);
 134                 rc = ldlm_cli_cancel(&lockh);
 135                 if (rc < 0) {
 136                         CDEBUG(D_INODE, "ldlm_cli_cancel: %d\n", rc);
 137                         RETURN(rc);
 138                 }
 139                 break;
 140         case LDLM_CB_CANCELING: {
 141                 struct inode *inode = llu_inode_from_lock(lock);
 142                 struct llu_inode_info *lli;
 143
 144                 /* Invalidate all dentries associated with this inode */
 145                 if (inode == NULL)
 146                         break;
 147
 148                 lli =  llu_i2info(inode);
 149
 150                 clear_bit(LLI_F_HAVE_MDS_SIZE_LOCK, &lli->lli_flags);
 151
 152                 if (lock->l_resource->lr_name.name[0] != lli->lli_st_ino ||
 153                     lock->l_resource->lr_name.name[1] != lli->lli_st_generation) {
 154                         LDLM_ERROR(lock, "data mismatch with ino %lu/%lu",
 155                                    lli->lli_st_ino, lli->lli_st_generation);
 156                 }
 157                 if (S_ISDIR(lli->lli_st_mode)) {
 158                         CDEBUG(D_INODE, "invalidating inode %lu\n",
 159                                lli->lli_st_ino);
 160
 161                         llu_invalidate_inode_pages(inode);
 162                 }
 163
 164 /*
 165                 if (inode->i_sb->s_root &&
 166                     inode != inode->i_sb->s_root->d_inode)
 167                         ll_unhash_aliases(inode);
 168 */
 169                 I_RELE(inode);
 170                 break;
 171         }
 172         default:
 173                 LBUG();
 174         }
 175
 176         RETURN(0);
 177 }
 178
 179 static int pnode_revalidate_finish(struct ptlrpc_request *req,
 180                                    int offset,
 181                                    struct lookup_intent *it,
 182                                    struct pnode *pnode)
 183 {
 184         struct inode *inode = pnode->p_base->pb_ino;
 185         struct lustre_md md;
 186         int rc = 0;
 187         ENTRY;
 188
 189         LASSERT(inode);
 190
 191         if (!req)
 192                 RETURN(0);
 193
 194         if (it_disposition(it, DISP_LOOKUP_NEG))
 195                 RETURN(-ENOENT);
 196
 197         rc = mdc_req2lustre_md(req, offset, llu_i2sbi(inode)->ll_osc_exp, &md);
 198         if (rc)
 199                 RETURN(rc);
 200
 201         llu_update_inode(inode, md.body, md.lsm);
 202
 203         RETURN(rc);
 204 }
 205
 206 int llu_pb_revalidate(struct pnode *pnode, int flags, struct lookup_intent *it)
 207 {
 208         struct pnode_base *pb = pnode->p_base;
 209         struct ll_fid pfid, cfid;
 210         struct it_cb_data icbd;
 211         struct ll_uctxt ctxt;
 212         struct ptlrpc_request *req = NULL;
 213         struct lookup_intent lookup_it = { .it_op = IT_LOOKUP };
 214         struct obd_export *exp;
 215         int rc;
 216         ENTRY;
 217
 218         CDEBUG(D_VFSTRACE, "VFS Op:name=%s,intent=%x\n",
 219                pb->pb_name.name, it ? it->it_op : 0);
 220
 221         /* We don't want to cache negative dentries, so return 0 immediately.
 222          * We believe that this is safe, that negative dentries cannot be
 223          * pinned by someone else */
 224         if (pb->pb_ino == NULL) {
 225                 CDEBUG(D_INODE, "negative pb\n");
 226                 RETURN(0);
 227         }
 228
 229         /* check stale inode */
 230         if (llu_i2info(pb->pb_ino)->lli_stale_flag)
 231                 unhook_stale_inode(pnode);
 232
 233         /* check again because unhook_stale_inode() might generate
 234          * negative pnode */
 235         if (pb->pb_ino == NULL) {
 236                 CDEBUG(D_INODE, "negative pb\n");
 237                 RETURN(0);
 238         }
 239
 240         /* This is due to bad interaction with libsysio. remove this when we
 241          * switched to libbsdio XXX
 242          */
 243         {
 244                 struct llu_inode_info *lli = llu_i2info(pb->pb_ino);
 245                 if (lli->lli_it) {
 246                         CDEBUG(D_INODE, "inode %lu still have intent "
 247                                         "%p(opc 0x%x), release it\n",
 248                                         lli->lli_st_ino, lli->lli_it,
 249                                         lli->lli_it->it_op);
 250                         ll_intent_release(lli->lli_it);
 251                         OBD_FREE(lli->lli_it, sizeof(*lli->lli_it));
 252                         lli->lli_it = NULL;
 253                 }
 254         }
 255
 256         exp = llu_i2mdcexp(pb->pb_ino);
 257         ll_inode2fid(&pfid, pnode->p_parent->p_base->pb_ino);
 258         ll_inode2fid(&cfid, pb->pb_ino);
 259         icbd.icbd_parent = pnode->p_parent->p_base->pb_ino;
 260         icbd.icbd_child = pnode;
 261
 262         if (!it) {
 263                 it = &lookup_it;
 264                 it->it_op_release = ll_intent_release;
 265         }
 266
 267         ll_i2uctxt(&ctxt, pnode->p_parent->p_base->pb_ino, pb->pb_ino);
 268
 269         rc = mdc_intent_lock(exp, &ctxt, &pfid,
 270                              pb->pb_name.name, pb->pb_name.len,
 271                              NULL, 0, &cfid, it, flags, &req,
 272                              llu_mdc_blocking_ast);
 273         /* If req is NULL, then mdc_intent_lock only tried to do a lock match;
 274          * if all was well, it will return 1 if it found locks, 0 otherwise. */
 275         if (req == NULL && rc >= 0)
 276                 GOTO(out, rc);
 277
 278         if (rc < 0)
 279                 GOTO(out, rc = 0);
 280
 281         rc = pnode_revalidate_finish(req, 1, it, pnode);
 282
 283         /* Note: ll_intent_lock may cause a callback, check this! */
 284
 285         if (it->it_op & (IT_OPEN | IT_GETATTR))
 286                 LL_SAVE_INTENT(pb->pb_ino, it);
 287         RETURN(1);
 288  out:
 289         if (req)
 290                 ptlrpc_req_finished(req);
 291         if (rc == 0) {
 292                 LASSERT(pb->pb_ino);
 293                 if (S_ISDIR(llu_i2info(pb->pb_ino)->lli_st_mode))
 294                         llu_invalidate_inode_pages(pb->pb_ino);
 295                 llu_i2info(pb->pb_ino)->lli_stale_flag = 1;
 296                 unhook_stale_inode(pnode);
 297         } else {
 298                 llu_lookup_finish_locks(it, pnode);
 299                 llu_i2info(pb->pb_ino)->lli_stale_flag = 0;
 300                 if (it->it_op & (IT_OPEN | IT_GETATTR))
 301                         LL_SAVE_INTENT(pb->pb_ino, it);
 302         }
 303         RETURN(rc);
 304 }
 305
 306 static int lookup_it_finish(struct ptlrpc_request *request, int offset,
 307                             struct lookup_intent *it, void *data)
 308 {
 309         struct it_cb_data *icbd = data;
 310         struct pnode *child = icbd->icbd_child;
 311         struct inode *parent = icbd->icbd_parent;
 312         struct llu_sb_info *sbi = llu_i2sbi(parent);
 313         struct inode *inode = NULL;
 314         int rc;
 315
 316         /* NB 1 request reference will be taken away by ll_intent_lock()
 317          * when I return
 318          * Note: libsysio require the inode must be generated here
 319          */
 320         if ((it->it_op & IT_CREAT) || !it_disposition(it, DISP_LOOKUP_NEG)) {
 321                 struct lustre_md md;
 322                 struct llu_inode_info *lli;
 323                 ENTRY;
 324
 325                 rc = mdc_req2lustre_md(request, offset, sbi->ll_osc_exp, &md);
 326                 if (rc)
 327                         RETURN(rc);
 328
 329                 inode = llu_iget(parent->i_fs, &md);
 330                 if (!inode) {
 331                         /* free the lsm if we allocated one above */
 332                         if (md.lsm != NULL)
 333                                 obd_free_memmd(sbi->ll_osc_exp, &md.lsm);
 334                         RETURN(-ENOMEM);
 335                 } else if (md.lsm != NULL &&
 336                            llu_i2info(inode)->lli_smd != md.lsm) {
 337                         obd_free_memmd(sbi->ll_osc_exp, &md.lsm);
 338                 }
 339
 340                 lli = llu_i2info(inode);
 341
 342                 /* If this is a stat, get the authoritative file size */
 343                 if (it->it_op == IT_GETATTR && S_ISREG(lli->lli_st_mode) &&
 344                     lli->lli_smd != NULL) {
 345                         struct lov_stripe_md *lsm = lli->lli_smd;
 346                         struct ost_lvb lvb;
 347                         ldlm_error_t rc;
 348
 349                         LASSERT(lsm->lsm_object_id != 0);
 350
 351                         /* bug 2334: drop MDS lock before acquiring OST lock */
 352                         ll_intent_drop_lock(it);
 353
 354                         rc = llu_glimpse_size(inode, &lvb);
 355                         if (rc) {
 356                                 I_RELE(inode);
 357                                 RETURN(-EIO);
 358                         }
 359                         lli->lli_st_size = lvb.lvb_size;
 360                 }
 361         } else {
 362                 ENTRY;
 363         }
 364
 365         /* intent will be further used in cases of open()/getattr() */
 366         if (inode && (it->it_op & (IT_OPEN | IT_GETATTR)))
 367                 LL_SAVE_INTENT(inode, it);
 368
 369         child->p_base->pb_ino = inode;
 370
 371         RETURN(0);
 372 }
 373
 374 struct inode *llu_inode_from_lock(struct ldlm_lock *lock)
 375 {
 376         struct inode *inode;
 377         l_lock(&lock->l_resource->lr_namespace->ns_lock);
 378
 379         if (lock->l_ast_data) {
 380                 inode = (struct inode *)lock->l_ast_data;
 381                 I_REF(inode);
 382         } else
 383                 inode = NULL;
 384
 385         l_unlock(&lock->l_resource->lr_namespace->ns_lock);
 386         return inode;
 387 }
 388
 389 static int llu_lookup_it(struct inode *parent, struct pnode *pnode,
 390                          struct lookup_intent *it, int flags)
 391 {
 392         struct ll_fid pfid;
 393         struct ll_uctxt ctxt;
 394         struct it_cb_data icbd;
 395         struct ptlrpc_request *req = NULL;
 396         struct lookup_intent lookup_it = { .it_op = IT_LOOKUP };
 397         int rc;
 398         ENTRY;
 399
 400         if (pnode->p_base->pb_name.len > EXT2_NAME_LEN)
 401                 RETURN(-ENAMETOOLONG);
 402
 403         if (!it) {
 404                 it = &lookup_it;
 405                 it->it_op_release = ll_intent_release;
 406         }
 407
 408         icbd.icbd_child = pnode;
 409         icbd.icbd_parent = parent;
 410         icbd.icbd_child = pnode;
 411         ll_inode2fid(&pfid, parent);
 412         ll_i2uctxt(&ctxt, parent, NULL);
 413
 414         rc = mdc_intent_lock(llu_i2mdcexp(parent), &ctxt, &pfid,
 415                              pnode->p_base->pb_name.name,
 416                              pnode->p_base->pb_name.len,
 417                              NULL, 0, NULL, it, flags, &req,
 418                              llu_mdc_blocking_ast);
 419         if (rc < 0)
 420                 GOTO(out, rc);
 421
 422         rc = lookup_it_finish(req, 1, it, &icbd);
 423         if (rc != 0) {
 424                 ll_intent_release(it);
 425                 GOTO(out, rc);
 426         }
 427
 428         llu_lookup_finish_locks(it, pnode);
 429
 430  out:
 431         if (req)
 432                 ptlrpc_req_finished(req);
 433         return rc;
 434 }
 435
 436 static struct lookup_intent*
 437 translate_lookup_intent(struct intent *intent, const char *path)
 438 {
 439         struct lookup_intent *it;
 440         int fmode;
 441
 442         /* libsysio trick */
 443         if (!intent || path) {
 444                 CDEBUG(D_VFSTRACE, "not intent needed\n");
 445                 return NULL;
 446         }
 447
 448         OBD_ALLOC(it, sizeof(*it));
 449         LASSERT(it);
 450
 451         memset(it, 0, sizeof(*it));
 452
 453         /* libsysio will assign intent like following:
 454          * NOTE: INT_CREAT has include INT_UPDPARENT
 455          *
 456          * open: INT_OPEN [| INT_CREAT]
 457          * mkdir: INT_CREAT
 458          * symlink: INT_CREAT
 459          * unlink: INT_UPDPARENT
 460          * rmdir: INT_UPDPARENT
 461          * mknod: INT_CREAT
 462          * stat: INT_GETATTR
 463          * setattr: NULL
 464          *
 465          * following logic is adjusted for libsysio
 466          */
 467
 468         it->it_flags = intent->int_arg2 ? *((int*)intent->int_arg2) : 0;
 469
 470         if (intent->int_opmask & INT_OPEN) {
 471                 it->it_op |= IT_OPEN;
 472
 473                 /* convert access mode from O_ to FMODE_ */
 474                 if (it->it_flags & O_WRONLY)
 475                         fmode = FMODE_WRITE;
 476                 else if (it->it_flags & O_RDWR)
 477                         fmode = FMODE_READ | FMODE_WRITE;
 478                 else
 479                         fmode = FMODE_READ;
 480                 it->it_flags &= ~O_ACCMODE;
 481                 it->it_flags |= fmode;
 482         }
 483
 484         /* XXX libsysio has strange code on intent handling,
 485          * more check later */
 486         if (it->it_flags & O_CREAT) {
 487                 it->it_op |= IT_CREAT;
 488                 it->it_create_mode = *((int*)intent->int_arg1);
 489         }
 490
 491         if (intent->int_opmask & INT_GETATTR)
 492                 it->it_op |= IT_GETATTR;
 493
 494         LASSERT(!(intent->int_opmask & INT_SETATTR));
 495
 496         /* libsysio is different to linux vfs when doing unlink/rmdir,
 497          * INT_UPDPARENT was passed down during name resolution. Here
 498          * we treat it as normal lookup, later unlink()/rmdir() will
 499          * do the actual work */
 500
 501         /* conform to kernel code, if only IT_LOOKUP was set, don't
 502          * pass down it */
 503         if (!it->it_op || it->it_op == IT_LOOKUP) {
 504                 OBD_FREE(it, sizeof(*it));
 505                 it = NULL;
 506         }
 507         if (it)
 508                 it->it_op_release = ll_intent_release;
 509
 510         CDEBUG(D_VFSTRACE, "final intent 0x%x\n", it ? it->it_op : 0);
 511         return it;
 512 }
 513
 514 int llu_iop_lookup(struct pnode *pnode,
 515                    struct inode **inop,
 516                    struct intent *intnt,
 517                    const char *path)
 518 {
 519         struct lookup_intent *it;
 520         int rc;
 521         ENTRY;
 522
 523         *inop = NULL;
 524
 525         /* the mount root inode have no name, so don't call
 526          * remote in this case. but probably we need revalidate
 527          * it here? FIXME */
 528         if (pnode->p_mount->mnt_root == pnode) {
 529                 struct inode *i = pnode->p_base->pb_ino;
 530                 *inop = i;
 531                 return 0;
 532         }
 533
 534         if (!pnode->p_base->pb_name.len)
 535                 RETURN(-EINVAL);
 536
 537         it = translate_lookup_intent(intnt, path);
 538
 539         /* param flags is not used, let it be 0 */
 540         if (llu_pb_revalidate(pnode, 0, it)) {
 541                 LASSERT(pnode->p_base->pb_ino);
 542                 *inop = pnode->p_base->pb_ino;
 543                 RETURN(0);
 544         }
 545
 546         rc = llu_lookup_it(pnode->p_parent->p_base->pb_ino, pnode, it, 0);
 547         if (!rc) {
 548                 if (!pnode->p_base->pb_ino)
 549                         rc = -ENOENT;
 550                 else
 551                         *inop = pnode->p_base->pb_ino;
 552         }
 553
 554         RETURN(rc);
 555 }
 556