lustre/mds/mds_lib.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  *  Copyright (c) 2003 Cluster File Systems, Inc.
   5  *
   6  *   This file is part of the Lustre file system, http://www.lustre.org
   7  *   Lustre is a trademark of Cluster File Systems, Inc.
   8  *
   9  *   You may have signed or agreed to another license before downloading
  10  *   this software.  If so, you are bound by the terms and conditions
  11  *   of that agreement, and the following does not apply to you.  See the
  12  *   LICENSE file included with this distribution for more information.
  13  *
  14  *   If you did not agree to a different license, then this copy of Lustre
  15  *   is open source software; you can redistribute it and/or modify it
  16  *   under the terms of version 2 of the GNU General Public License as
  17  *   published by the Free Software Foundation.
  18  *
  19  *   In either case, Lustre is distributed in the hope that it will be
  20  *   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
  21  *   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22  *   license text for more details.
  23  */
  24
  25 #define DEBUG_SUBSYSTEM S_MDS
  26
  27 #ifdef HAVE_KERNEL_CONFIG_H
  28 #include <linux/config.h>
  29 #endif
  30 #include <linux/module.h>
  31 #include <linux/kernel.h>
  32 #include <linux/mm.h>
  33 #include <linux/string.h>
  34 #include <linux/stat.h>
  35 #include <linux/errno.h>
  36 #include <linux/version.h>
  37 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0))
  38 # include <linux/locks.h>   // for wait_on_buffer
  39 #else
  40 # include <linux/buffer_head.h>   // for wait_on_buffer
  41 #endif
  42 #include <linux/unistd.h>
  43
  44 #include <asm/system.h>
  45 #include <asm/uaccess.h>
  46
  47 #include <linux/fs.h>
  48 #include <linux/stat.h>
  49 #include <asm/uaccess.h>
  50 #include <linux/slab.h>
  51 #include <asm/segment.h>
  52
  53 #include <obd_support.h>
  54 #include <lustre_lib.h>
  55 #include "mds_internal.h"
  56
  57 void mds_pack_inode2fid(struct ll_fid *fid, struct inode *inode)
  58 {
  59         fid->id = inode->i_ino;
  60         fid->generation = inode->i_generation;
  61         fid->f_type = (S_IFMT & inode->i_mode);
  62 }
  63
  64 /* Note that we can copy all of the fields, just some will not be "valid" */
  65 void mds_pack_inode2body(struct mds_body *b, struct inode *inode)
  66 {
  67         b->valid |= OBD_MD_FLID | OBD_MD_FLCTIME | OBD_MD_FLUID |
  68                     OBD_MD_FLGID | OBD_MD_FLFLAGS | OBD_MD_FLTYPE |
  69                     OBD_MD_FLMODE | OBD_MD_FLNLINK | OBD_MD_FLGENER |
  70                     OBD_MD_FLATIME | OBD_MD_FLMTIME; /* bug 2020 */
  71
  72         if (!S_ISREG(inode->i_mode))
  73                 b->valid |= OBD_MD_FLSIZE | OBD_MD_FLBLOCKS | OBD_MD_FLATIME |
  74                             OBD_MD_FLMTIME | OBD_MD_FLRDEV;
  75
  76         b->ino = inode->i_ino;
  77         b->atime = LTIME_S(inode->i_atime);
  78         b->mtime = LTIME_S(inode->i_mtime);
  79         b->ctime = LTIME_S(inode->i_ctime);
  80         b->mode = inode->i_mode;
  81         b->size = inode->i_size;
  82         b->blocks = inode->i_blocks;
  83         b->uid = inode->i_uid;
  84         b->gid = inode->i_gid;
  85         b->flags = ll_inode_to_ext_flags(b->flags, inode->i_flags);
  86         b->rdev = inode->i_rdev;
  87         /* Return the correct link count for orphan inodes */
  88         b->nlink = mds_inode_is_orphan(inode) ? 0 : inode->i_nlink;
  89         b->generation = inode->i_generation;
  90         b->suppgid = -1;
  91 }
  92
  93 /* unpacking */
  94 static int mds_setattr_unpack(struct ptlrpc_request *req, int offset,
  95                               struct mds_update_record *r)
  96 {
  97         struct iattr *attr = &r->ur_iattr;
  98         struct mds_rec_setattr *rec;
  99         ENTRY;
 100
 101         rec = lustre_swab_reqbuf(req, offset, sizeof(*rec),
 102                                  lustre_swab_mds_rec_setattr);
 103         if (rec == NULL)
 104                 RETURN (-EFAULT);
 105
 106         r->ur_uc.luc_fsuid = rec->sa_fsuid;
 107         r->ur_uc.luc_fsgid = rec->sa_fsgid;
 108         r->ur_uc.luc_cap = rec->sa_cap;
 109         r->ur_uc.luc_suppgid1 = rec->sa_suppgid;
 110         r->ur_uc.luc_suppgid2 = -1;
 111         r->ur_fid1 = &rec->sa_fid;
 112         attr->ia_valid = rec->sa_valid;
 113         attr->ia_mode = rec->sa_mode;
 114         attr->ia_uid = rec->sa_uid;
 115         attr->ia_gid = rec->sa_gid;
 116         attr->ia_size = rec->sa_size;
 117         LTIME_S(attr->ia_atime) = rec->sa_atime;
 118         LTIME_S(attr->ia_mtime) = rec->sa_mtime;
 119         LTIME_S(attr->ia_ctime) = rec->sa_ctime;
 120         r->ur_flags = rec->sa_attr_flags;
 121
 122         LASSERT_REQSWAB (req, offset + 1);
 123         if (lustre_msg_bufcount(req->rq_reqmsg) > offset + 1) {
 124                 r->ur_eadata = lustre_msg_buf(req->rq_reqmsg, offset + 1, 0);
 125                 if (r->ur_eadata == NULL)
 126                         RETURN(-EFAULT);
 127                 r->ur_eadatalen = lustre_msg_buflen(req->rq_reqmsg, offset + 1);
 128         }
 129
 130         if (lustre_msg_bufcount(req->rq_reqmsg) > offset + 2) {
 131                 r->ur_logcookies = lustre_msg_buf(req->rq_reqmsg, offset + 2,0);
 132                 if (r->ur_eadata == NULL)
 133                         RETURN (-EFAULT);
 134
 135                 r->ur_cookielen = lustre_msg_buflen(req->rq_reqmsg, offset + 2);
 136         }
 137
 138         RETURN(0);
 139 }
 140
 141 static int mds_create_unpack(struct ptlrpc_request *req, int offset,
 142                              struct mds_update_record *r)
 143 {
 144         struct mds_rec_create *rec;
 145         ENTRY;
 146
 147         rec = lustre_swab_reqbuf(req, offset, sizeof (*rec),
 148                                  lustre_swab_mds_rec_create);
 149         if (rec == NULL)
 150                 RETURN (-EFAULT);
 151
 152         r->ur_uc.luc_fsuid = rec->cr_fsuid;
 153         r->ur_uc.luc_fsgid = rec->cr_fsgid;
 154         r->ur_uc.luc_cap = rec->cr_cap;
 155         r->ur_uc.luc_suppgid1 = rec->cr_suppgid;
 156         r->ur_uc.luc_suppgid2 = -1;
 157         r->ur_fid1 = &rec->cr_fid;
 158         r->ur_fid2 = &rec->cr_replayfid;
 159         r->ur_mode = rec->cr_mode;
 160         r->ur_rdev = rec->cr_rdev;
 161         r->ur_time = rec->cr_time;
 162         r->ur_flags = rec->cr_flags;
 163
 164         LASSERT_REQSWAB(req, offset + 1);
 165         r->ur_name = lustre_msg_string(req->rq_reqmsg, offset + 1, 0);
 166         if (r->ur_name == NULL)
 167                 RETURN (-EFAULT);
 168         r->ur_namelen = lustre_msg_buflen(req->rq_reqmsg, offset + 1);
 169
 170         LASSERT_REQSWAB(req, offset + 2);
 171         if (lustre_msg_bufcount(req->rq_reqmsg) > offset + 2) {
 172                 /* NB for now, we only seem to pass NULL terminated symlink
 173                  * target strings here.  If this ever changes, we'll have
 174                  * to stop checking for a buffer filled completely with a
 175                  * NULL terminated string here, and make the callers check
 176                  * depending on what they expect.  We should probably stash
 177                  * it in r->ur_eadata in that case, so it's obvious... -eeb
 178                  */
 179                 r->ur_tgt = lustre_msg_string(req->rq_reqmsg, offset + 2, 0);
 180                 if (r->ur_tgt == NULL)
 181                         RETURN (-EFAULT);
 182                 r->ur_tgtlen = lustre_msg_buflen(req->rq_reqmsg, offset + 2);
 183         }
 184         RETURN(0);
 185 }
 186
 187 static int mds_link_unpack(struct ptlrpc_request *req, int offset,
 188                            struct mds_update_record *r)
 189 {
 190         struct mds_rec_link *rec;
 191         ENTRY;
 192
 193         rec = lustre_swab_reqbuf(req, offset, sizeof (*rec),
 194                                  lustre_swab_mds_rec_link);
 195         if (rec == NULL)
 196                 RETURN (-EFAULT);
 197
 198         r->ur_uc.luc_fsuid = rec->lk_fsuid;
 199         r->ur_uc.luc_fsgid = rec->lk_fsgid;
 200         r->ur_uc.luc_cap = rec->lk_cap;
 201         r->ur_uc.luc_suppgid1 = rec->lk_suppgid1;
 202         r->ur_uc.luc_suppgid2 = rec->lk_suppgid2;
 203         r->ur_fid1 = &rec->lk_fid1;
 204         r->ur_fid2 = &rec->lk_fid2;
 205         r->ur_time = rec->lk_time;
 206
 207         LASSERT_REQSWAB(req, offset + 1);
 208         r->ur_name = lustre_msg_string(req->rq_reqmsg, offset + 1, 0);
 209         if (r->ur_name == NULL)
 210                 RETURN (-EFAULT);
 211         r->ur_namelen = lustre_msg_buflen(req->rq_reqmsg, offset + 1);
 212         RETURN(0);
 213 }
 214
 215 static int mds_unlink_unpack(struct ptlrpc_request *req, int offset,
 216                              struct mds_update_record *r)
 217 {
 218         struct mds_rec_unlink *rec;
 219         ENTRY;
 220
 221         rec = lustre_swab_reqbuf(req, offset, sizeof (*rec),
 222                                  lustre_swab_mds_rec_unlink);
 223         if (rec == NULL)
 224                 RETURN(-EFAULT);
 225
 226         r->ur_uc.luc_fsuid = rec->ul_fsuid;
 227         r->ur_uc.luc_fsgid = rec->ul_fsgid;
 228         r->ur_uc.luc_cap = rec->ul_cap;
 229         r->ur_uc.luc_suppgid1 = rec->ul_suppgid;
 230         r->ur_uc.luc_suppgid2 = -1;
 231         r->ur_mode = rec->ul_mode;
 232         r->ur_fid1 = &rec->ul_fid1;
 233         r->ur_fid2 = &rec->ul_fid2;
 234         r->ur_time = rec->ul_time;
 235
 236         LASSERT_REQSWAB(req, offset + 1);
 237         r->ur_name = lustre_msg_string(req->rq_reqmsg, offset + 1, 0);
 238         if (r->ur_name == NULL)
 239                 RETURN(-EFAULT);
 240         r->ur_namelen = lustre_msg_buflen(req->rq_reqmsg, offset + 1);
 241         RETURN(0);
 242 }
 243
 244 static int mds_rename_unpack(struct ptlrpc_request *req, int offset,
 245                              struct mds_update_record *r)
 246 {
 247         struct mds_rec_rename *rec;
 248         ENTRY;
 249
 250         rec = lustre_swab_reqbuf(req, offset, sizeof (*rec),
 251                                  lustre_swab_mds_rec_rename);
 252         if (rec == NULL)
 253                 RETURN(-EFAULT);
 254
 255         r->ur_uc.luc_fsuid = rec->rn_fsuid;
 256         r->ur_uc.luc_fsgid = rec->rn_fsgid;
 257         r->ur_uc.luc_cap = rec->rn_cap;
 258         r->ur_uc.luc_suppgid1 = rec->rn_suppgid1;
 259         r->ur_uc.luc_suppgid2 = rec->rn_suppgid2;
 260         r->ur_fid1 = &rec->rn_fid1;
 261         r->ur_fid2 = &rec->rn_fid2;
 262         r->ur_time = rec->rn_time;
 263
 264         LASSERT_REQSWAB (req, offset + 1);
 265         r->ur_name = lustre_msg_string(req->rq_reqmsg, offset + 1, 0);
 266         if (r->ur_name == NULL)
 267                 RETURN(-EFAULT);
 268         r->ur_namelen = lustre_msg_buflen(req->rq_reqmsg, offset + 1);
 269
 270         LASSERT_REQSWAB (req, offset + 2);
 271         r->ur_tgt = lustre_msg_string(req->rq_reqmsg, offset + 2, 0);
 272         if (r->ur_tgt == NULL)
 273                 RETURN(-EFAULT);
 274         r->ur_tgtlen = lustre_msg_buflen(req->rq_reqmsg, offset + 2);
 275         RETURN(0);
 276 }
 277
 278 static int mds_open_unpack(struct ptlrpc_request *req, int offset,
 279                            struct mds_update_record *r)
 280 {
 281         struct mds_rec_create *rec;
 282         ENTRY;
 283
 284         rec = lustre_swab_reqbuf(req, offset, sizeof(*rec),
 285                                  lustre_swab_mds_rec_create);
 286         if (rec == NULL)
 287                 RETURN(-EFAULT);
 288
 289         r->ur_uc.luc_fsuid = rec->cr_fsuid;
 290         r->ur_uc.luc_fsgid = rec->cr_fsgid;
 291         r->ur_uc.luc_cap = rec->cr_cap;
 292         r->ur_uc.luc_suppgid1 = rec->cr_suppgid;
 293         r->ur_uc.luc_suppgid2 = -1;
 294         r->ur_fid1 = &rec->cr_fid;
 295         r->ur_fid2 = &rec->cr_replayfid;
 296         r->ur_mode = rec->cr_mode;
 297         r->ur_rdev = rec->cr_rdev;
 298         r->ur_time = rec->cr_time;
 299         r->ur_flags = rec->cr_flags;
 300
 301         LASSERT_REQSWAB(req, offset + 1);
 302         r->ur_name = lustre_msg_string(req->rq_reqmsg, offset + 1, 0);
 303         if (r->ur_name == NULL)
 304                 RETURN(-EFAULT);
 305         r->ur_namelen = lustre_msg_buflen(req->rq_reqmsg, offset + 1);
 306
 307         LASSERT_REQSWAB(req, offset + 2);
 308         if (lustre_msg_bufcount(req->rq_reqmsg) > offset + 2) {
 309                 r->ur_eadata = lustre_msg_buf(req->rq_reqmsg, offset + 2, 0);
 310                 if (r->ur_eadata == NULL)
 311                         RETURN (-EFAULT);
 312                 r->ur_eadatalen = lustre_msg_buflen(req->rq_reqmsg, offset + 2);
 313         }
 314         RETURN(0);
 315 }
 316
 317 typedef int (*update_unpacker)(struct ptlrpc_request *req, int offset,
 318                                struct mds_update_record *r);
 319
 320 static update_unpacker mds_unpackers[REINT_MAX] = {
 321         [REINT_SETATTR] mds_setattr_unpack,
 322         [REINT_CREATE] mds_create_unpack,
 323         [REINT_LINK] mds_link_unpack,
 324         [REINT_UNLINK] mds_unlink_unpack,
 325         [REINT_RENAME] mds_rename_unpack,
 326         [REINT_OPEN] mds_open_unpack,
 327 };
 328
 329 int mds_update_unpack(struct ptlrpc_request *req, int offset,
 330                       struct mds_update_record *rec)
 331 {
 332         mds_reint_t opcode, *opcodep;
 333         int rc;
 334         ENTRY;
 335
 336         /* NB don't lustre_swab_reqbuf() here.  We're just taking a peek
 337          * and we want to leave it to the specific unpacker once we've
 338          * identified the message type */
 339         opcodep = lustre_msg_buf(req->rq_reqmsg, offset, sizeof (*opcodep));
 340         if (opcodep == NULL)
 341                 RETURN(-EFAULT);
 342
 343         opcode = *opcodep;
 344         if (lustre_msg_swabbed(req->rq_reqmsg))
 345                 __swab32s(&opcode);
 346
 347         if (opcode >= REINT_MAX || mds_unpackers[opcode] == NULL) {
 348                 CERROR("Unexpected opcode %d\n", opcode);
 349                 RETURN(-EFAULT);
 350         }
 351
 352         rec->ur_opcode = opcode;
 353         rc = mds_unpackers[opcode](req, offset, rec);
 354
 355         RETURN(rc);
 356 }
 357
 358 int mds_init_ucred(struct lvfs_ucred *ucred, struct ptlrpc_request *req,
 359                    int offset)
 360 {
 361         struct mds_body *body = lustre_msg_buf(req->rq_reqmsg, offset,
 362                                                sizeof(*body));
 363         struct mds_obd *mds = mds_req2mds(req);
 364         int rc;
 365
 366         LASSERT(body != NULL); /* previously verified & swabbed by caller */
 367
 368 #ifdef CRAY_XT3
 369         if (req->rq_uid != LNET_UID_ANY) {
 370                 /* Non-root local cluster client */
 371                 LASSERT (req->rq_uid != 0);
 372                 ucred->luc_fsuid = req->rq_uid;
 373         } else
 374 #endif
 375         {
 376                 ucred->luc_fsuid = body->fsuid;
 377                 ucred->luc_fsgid = body->fsgid;
 378                 ucred->luc_cap = body->capability;
 379         }
 380
 381         ucred->luc_uce = upcall_cache_get_entry(mds->mds_group_hash,
 382                                                 ucred->luc_fsuid,
 383                                                 ucred->luc_fsgid, 1,
 384                                                 &body->suppgid);
 385         if (IS_ERR(ucred->luc_uce)) {
 386                 rc = PTR_ERR(ucred->luc_uce);
 387                 ucred->luc_uce = NULL;
 388                 return rc;
 389         }
 390
 391 #ifdef CRAY_XT3
 392         if (ucred->luc_uce)
 393                 ucred->luc_fsgid = ucred->luc_uce->ue_primary;
 394 #endif
 395
 396         return 0;
 397 }
 398
 399 void mds_exit_ucred(struct lvfs_ucred *ucred, struct mds_obd *mds)
 400 {
 401         upcall_cache_put_entry(mds->mds_group_hash, ucred->luc_uce);
 402 }