lustre/llite/file.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  *  linux/fs/ext2/file.c
   5  *
   6  * This code is issued under the GNU General Public License.
   7  * See the file COPYING in this distribution
   8  *
   9  * Copyright (C) 1992, 1993, 1994, 1995
  10  * Remy Card (card@masi.ibp.fr)
  11  * Laboratoire MASI - Institut Blaise Pascal
  12  * Universite Pierre et Marie Curie (Paris VI)
  13  *
  14  *  from
  15  *
  16  *  linux/fs/minix/file.c
  17  *
  18  *  Copyright (C) 1991, 1992  Linus Torvalds
  19  *
  20  *  ext2 fs regular file handling primitives
  21  *
  22  *  64-bit file support on 64-bit platforms by Jakub Jelinek
  23  *      (jj@sunsite.ms.mff.cuni.cz)
  24  */
  25
  26 #define DEBUG_SUBSYSTEM S_LLITE
  27
  28 #include <linux/lustre_dlm.h>
  29 #include <linux/lustre_lite.h>
  30
  31 int ll_inode_setattr(struct inode *inode, struct iattr *attr, int do_trunc);
  32 extern int ll_setattr(struct dentry *de, struct iattr *attr);
  33
  34 static int ll_file_open(struct inode *inode, struct file *file)
  35 {
  36         int rc;
  37         struct ptlrpc_request *req = NULL;
  38         struct ll_file_data *fd;
  39         struct obdo *oa = NULL;
  40         struct lov_stripe_md *lsm = NULL;
  41         struct ll_sb_info *sbi = ll_i2sbi(inode);
  42         struct ll_inode_info *lli = ll_i2info(inode);
  43         ENTRY;
  44
  45         if (file->private_data)
  46                 LBUG();
  47
  48         lsm = lli->lli_smd;
  49
  50         /*  delayed create of object (intent created inode) */
  51         /*  XXX object needs to be cleaned up if mdc_open fails */
  52         /*  XXX error handling appropriate here? */
  53         if (lsm == NULL) {
  54                 struct inode *inode = file->f_dentry->d_inode;
  55
  56                 down(&lli->lli_open_sem);
  57                 /* Check to see if we lost the race */
  58                 if (lli->lli_smd == NULL) {
  59                         oa = obdo_alloc();
  60                         if (!oa) {
  61                                 up(&lli->lli_open_sem);
  62                                 RETURN(-ENOMEM);
  63                         }
  64                         oa->o_mode = S_IFREG | 0600;
  65                         oa->o_easize = ll_mds_easize(inode->i_sb);
  66                         oa->o_id = inode->i_ino;
  67                         oa->o_valid = OBD_MD_FLMODE | OBD_MD_FLEASIZE |
  68                                         OBD_MD_FLID;
  69                         rc = obd_create(ll_i2obdconn(inode), oa, &lli->lli_smd);
  70
  71                         if (rc) {
  72                                 obdo_free(oa);
  73                                 up(&lli->lli_open_sem);
  74                                 RETURN(rc);
  75                         }
  76                 }
  77                 if (lli->lli_smd->lsm_object_id == 0)
  78                         LBUG();
  79                 up(&lli->lli_open_sem);
  80                 lsm = lli->lli_smd;
  81         }
  82
  83         fd = kmem_cache_alloc(ll_file_data_slab, SLAB_KERNEL);
  84         if (!fd)
  85                 GOTO(out, rc = -ENOMEM);
  86         memset(fd, 0, sizeof(*fd));
  87
  88         rc = mdc_open(&sbi->ll_mdc_conn, inode->i_ino, S_IFREG | inode->i_mode,
  89                       file->f_flags, lsm, (__u64)(unsigned long)file,
  90                       &fd->fd_mdshandle, &req);
  91         fd->fd_req = req;
  92         ptlrpc_req_finished(req);
  93         if (rc)
  94                 GOTO(out_req, -abs(rc));
  95         if (!fd->fd_mdshandle) {
  96                 CERROR("mdc_open didn't assign fd_mdshandle\n");
  97                 /* XXX handle this how, abort or is it non-fatal? */
  98         }
  99
 100         if (oa == NULL && (oa = obdo_alloc()) == NULL)
 101                 GOTO(out_mdc, rc = -EINVAL);
 102
 103         oa->o_id = lsm->lsm_object_id;
 104         oa->o_mode = S_IFREG | inode->i_mode;
 105         oa->o_valid = OBD_MD_FLMODE | OBD_MD_FLID | OBD_MD_FLSIZE;
 106         rc = obd_open(ll_i2obdconn(inode), oa, lsm);
 107         obdo_free(oa);
 108         oa = NULL;
 109
 110         if (rc)
 111                 GOTO(out_mdc, rc = -abs(rc));
 112
 113         file->private_data = fd;
 114
 115         EXIT;
 116
 117         return 0;
 118 out_mdc:
 119         mdc_close(&sbi->ll_mdc_conn, inode->i_ino,
 120                   S_IFREG, fd->fd_mdshandle, &req);
 121 out_req:
 122         ptlrpc_free_req(req);
 123 //out_fd:
 124         obdo_free(oa);
 125         kmem_cache_free(ll_file_data_slab, fd);
 126         file->private_data = NULL;
 127 out:
 128         return rc;
 129 }
 130
 131 int ll_size_lock(struct inode *inode, struct lov_stripe_md *lsm, __u64 start,
 132                  int mode, struct lustre_handle **lockhs_p)
 133 {
 134         struct ll_sb_info *sbi = ll_i2sbi(inode);
 135         struct ldlm_extent extent;
 136         struct lustre_handle *lockhs = NULL;
 137         int rc, flags = 0;
 138
 139         if (sbi->ll_flags & LL_SBI_NOLCK) {
 140                 *lockhs_p = NULL;
 141                 RETURN(0);
 142         }
 143
 144         OBD_ALLOC(lockhs, lsm->lsm_stripe_count * sizeof(*lockhs));
 145         if (lockhs == NULL)
 146                 RETURN(-ENOMEM);
 147
 148         extent.start = start;
 149         extent.end = ~0;
 150
 151         rc = obd_enqueue(&sbi->ll_osc_conn, lsm, NULL, LDLM_EXTENT, &extent,
 152                          sizeof(extent), mode, &flags, ll_lock_callback,
 153                          inode, sizeof(*inode), lockhs);
 154         if (rc != ELDLM_OK) {
 155                 CERROR("lock enqueue: %d\n", rc);
 156                 OBD_FREE(lockhs, lsm->lsm_stripe_count * sizeof(*lockhs));
 157         } else
 158                 *lockhs_p = lockhs;
 159         RETURN(rc);
 160 }
 161
 162 int ll_size_unlock(struct inode *inode, struct lov_stripe_md *lsm, int mode,
 163                    struct lustre_handle *lockhs)
 164 {
 165         struct ll_sb_info *sbi = ll_i2sbi(inode);
 166         int rc;
 167
 168         if (sbi->ll_flags & LL_SBI_NOLCK)
 169                 RETURN(0);
 170
 171         if (lockhs == NULL) {
 172                 LBUG();
 173                 RETURN(-EINVAL);
 174         }
 175
 176         rc = obd_cancel(&sbi->ll_osc_conn, lsm, mode, lockhs);
 177         if (rc != ELDLM_OK) {
 178                 CERROR("lock cancel: %d\n", rc);
 179                 LBUG();
 180         }
 181
 182         OBD_FREE(lockhs, lsm->lsm_stripe_count * sizeof(*lockhs));
 183         RETURN(rc);
 184 }
 185
 186 int ll_file_size(struct inode *inode, struct lov_stripe_md *lsm)
 187 {
 188         struct ll_sb_info *sbi = ll_i2sbi(inode);
 189         struct lustre_handle *lockhs;
 190         struct obdo oa;
 191         int err, rc;
 192
 193         rc = ll_size_lock(inode, lsm, 0, LCK_PR, &lockhs);
 194         if (rc != ELDLM_OK) {
 195                 CERROR("lock enqueue: %d\n", rc);
 196                 RETURN(rc);
 197         }
 198
 199         oa.o_id = lsm->lsm_object_id;
 200         oa.o_mode = S_IFREG;
 201         oa.o_valid = OBD_MD_FLID|OBD_MD_FLMODE|OBD_MD_FLSIZE|OBD_MD_FLBLOCKS;
 202         rc = obd_getattr(&sbi->ll_osc_conn, &oa, lsm);
 203         if (!rc)
 204                 obdo_to_inode(inode, &oa, oa.o_valid);
 205
 206         err = ll_size_unlock(inode, lsm, LCK_PR, lockhs);
 207         if (err != ELDLM_OK) {
 208                 CERROR("lock cancel: %d\n", err);
 209                 LBUG();
 210         }
 211         RETURN(rc);
 212 }
 213
 214 static int ll_file_release(struct inode *inode, struct file *file)
 215 {
 216         int rc;
 217         struct ptlrpc_request *req = NULL;
 218         struct ll_file_data *fd;
 219         struct obdo oa;
 220         struct ll_sb_info *sbi = ll_i2sbi(inode);
 221         struct ll_inode_info *lli = ll_i2info(inode);
 222
 223         ENTRY;
 224
 225         fd = (struct ll_file_data *)file->private_data;
 226         if (!fd || !fd->fd_mdshandle) {
 227                 LBUG();
 228                 GOTO(out, rc = -EINVAL);
 229         }
 230
 231         memset(&oa, 0, sizeof(oa));
 232         oa.o_id = lli->lli_smd->lsm_object_id;
 233         oa.o_mode = S_IFREG;
 234         oa.o_valid = (OBD_MD_FLMODE | OBD_MD_FLID);
 235         rc = obd_close(ll_i2obdconn(inode), &oa, lli->lli_smd);
 236         if (rc)
 237                 GOTO(out_fd, abs(rc));
 238
 239         /* If this fails and we goto out_fd, the file size on the MDS is out of
 240          * date.  Is that a big deal? */
 241         if (file->f_mode & FMODE_WRITE) {
 242                 struct lustre_handle *lockhs;
 243
 244                 rc = ll_size_lock(inode, lli->lli_smd, 0, LCK_PR, &lockhs);
 245                 if (rc)
 246                         GOTO(out_fd, abs(rc));
 247
 248                 oa.o_id = lli->lli_smd->lsm_object_id;
 249                 oa.o_mode = S_IFREG;
 250                 oa.o_valid = OBD_MD_FLID | OBD_MD_FLMODE | OBD_MD_FLSIZE |
 251                         OBD_MD_FLBLOCKS;
 252                 rc = obd_getattr(&sbi->ll_osc_conn, &oa, lli->lli_smd);
 253                 if (!rc) {
 254                         struct iattr attr;
 255                         attr.ia_valid = (ATTR_MTIME | ATTR_CTIME | ATTR_ATIME |
 256                                          ATTR_SIZE);
 257                         attr.ia_mtime = inode->i_mtime;
 258                         attr.ia_ctime = inode->i_ctime;
 259                         attr.ia_atime = inode->i_atime;
 260                         attr.ia_size = oa.o_size;
 261
 262                         inode->i_blocks = oa.o_blocks;
 263
 264                         /* XXX: this introduces a small race that we should
 265                          * evaluate */
 266                         rc = ll_inode_setattr(inode, &attr, 0);
 267                         if (rc) {
 268                                 CERROR("failed - %d.\n", rc);
 269                                 rc = -EIO; /* XXX - GOTO(out)? -phil */
 270                         }
 271                 }
 272                 rc = ll_size_unlock(inode, lli->lli_smd, LCK_PR, lockhs);
 273                 if (rc) {
 274                         CERROR("lock cancel: %d\n", rc);
 275                         LBUG();
 276                 }
 277         }
 278
 279         rc = mdc_close(&sbi->ll_mdc_conn, inode->i_ino,
 280                        S_IFREG, fd->fd_mdshandle, &req);
 281         ptlrpc_req_finished(req);
 282         if (rc) {
 283                 if (rc > 0)
 284                         rc = -rc;
 285                 GOTO(out, rc);
 286         }
 287         ptlrpc_req_finished(fd->fd_req);
 288
 289         //ldlm_cli_cancel_unused();
 290
 291         EXIT;
 292
 293 out_fd:
 294         kmem_cache_free(ll_file_data_slab, fd);
 295         file->private_data = NULL;
 296 out:
 297         return rc;
 298 }
 299
 300
 301 static inline void ll_remove_suid(struct inode *inode)
 302 {
 303         unsigned int mode;
 304
 305         /* set S_IGID if S_IXGRP is set, and always set S_ISUID */
 306         mode = (inode->i_mode & S_IXGRP)*(S_ISGID/S_IXGRP) | S_ISUID;
 307
 308         /* was any of the uid bits set? */
 309         mode &= inode->i_mode;
 310         if (mode && !capable(CAP_FSETID)) {
 311                 inode->i_mode &= ~mode;
 312                 // XXX careful here - we cannot change the size
 313         }
 314 }
 315
 316 static void ll_update_atime(struct inode *inode)
 317 {
 318         struct iattr attr;
 319
 320         attr.ia_atime = CURRENT_TIME;
 321         attr.ia_valid = ATTR_ATIME;
 322
 323         if (inode->i_atime == attr.ia_atime) return;
 324         if (IS_RDONLY(inode)) return;
 325         if (IS_NOATIME(inode)) return;
 326
 327         /* ll_inode_setattr() sets inode->i_atime from attr.ia_atime */
 328         ll_inode_setattr(inode, &attr, 0);
 329 }
 330
 331 int ll_lock_callback(struct ldlm_lock *lock, struct ldlm_lock_desc *new,
 332                      void *data, __u32 data_len)
 333 {
 334         struct inode *inode = data;
 335         struct lustre_handle lockh;
 336         int rc;
 337         ENTRY;
 338
 339         if (data_len != sizeof(struct inode))
 340                 LBUG();
 341
 342         if (inode == NULL)
 343                 LBUG();
 344         down(&inode->i_sem);
 345         CDEBUG(D_INODE, "invalidating obdo/inode %ld\n", inode->i_ino);
 346         /* FIXME: do something better than throwing away everything */
 347         invalidate_inode_pages(inode);
 348         up(&inode->i_sem);
 349
 350         ldlm_lock2handle(lock, &lockh);
 351         rc = ldlm_cli_cancel(&lockh);
 352         if (rc != ELDLM_OK)
 353                 CERROR("ldlm_cli_cancel failed: %d\n", rc);
 354         RETURN(0);
 355 }
 356
 357 static ssize_t ll_file_read(struct file *filp, char *buf, size_t count,
 358                             loff_t *ppos)
 359 {
 360         struct ll_file_data *fd = (struct ll_file_data *)filp->private_data;
 361         struct inode *inode = filp->f_dentry->d_inode;
 362         struct ll_sb_info *sbi = ll_i2sbi(inode);
 363         struct ldlm_extent extent;
 364         struct lustre_handle *lockhs = NULL;
 365         struct lov_stripe_md *lsm = ll_i2info(inode)->lli_smd;
 366         int flags = 0;
 367         ldlm_error_t err;
 368         ssize_t retval;
 369         ENTRY;
 370
 371         if (!(fd->fd_flags & LL_FILE_IGNORE_LOCK) ||
 372             sbi->ll_flags & LL_SBI_NOLCK) {
 373                 OBD_ALLOC(lockhs, lsm->lsm_stripe_count * sizeof(*lockhs));
 374                 if (!lockhs)
 375                         RETURN(-ENOMEM);
 376
 377                 extent.start = *ppos;
 378                 extent.end = *ppos + count;
 379                 CDEBUG(D_INFO, "Locking inode %ld, start "LPU64" end "LPU64"\n",
 380                        inode->i_ino, extent.start, extent.end);
 381
 382                 err = obd_enqueue(&sbi->ll_osc_conn, lsm, NULL, LDLM_EXTENT,
 383                                   &extent, sizeof(extent), LCK_PR, &flags,
 384                                   ll_lock_callback, inode, sizeof(*inode),
 385                                   lockhs);
 386                 if (err != ELDLM_OK) {
 387                         OBD_FREE(lockhs, lsm->lsm_stripe_count*sizeof(*lockhs));
 388                         CERROR("lock enqueue: err: %d\n", err);
 389                         RETURN(err);
 390                 }
 391         }
 392
 393         CDEBUG(D_INFO, "Reading inode %ld, %d bytes, offset %Ld\n",
 394                inode->i_ino, count, *ppos);
 395         retval = generic_file_read(filp, buf, count, ppos);
 396
 397         if (retval > 0)
 398                 ll_update_atime(inode);
 399
 400         if (!(fd->fd_flags & LL_FILE_IGNORE_LOCK) ||
 401             sbi->ll_flags & LL_SBI_NOLCK) {
 402                 err = obd_cancel(&sbi->ll_osc_conn, lsm, LCK_PR, lockhs);
 403                 if (err != ELDLM_OK) {
 404                         CERROR("lock cancel: err: %d\n", err);
 405                         retval = err;
 406                 }
 407         }
 408
 409         if (lockhs)
 410                 OBD_FREE(lockhs, lsm->lsm_stripe_count * sizeof(*lockhs));
 411         RETURN(retval);
 412 }
 413
 414 /*
 415  * Write to a file (through the page cache).
 416  */
 417 static ssize_t
 418 ll_file_write(struct file *file, const char *buf, size_t count, loff_t *ppos)
 419 {
 420         struct ll_file_data *fd = (struct ll_file_data *)file->private_data;
 421         struct inode *inode = file->f_dentry->d_inode;
 422         struct ll_sb_info *sbi = ll_i2sbi(inode);
 423         struct ldlm_extent extent;
 424         struct lustre_handle *lockhs = NULL, *eof_lockhs = NULL;
 425         struct lov_stripe_md *lsm = ll_i2info(inode)->lli_smd;
 426         int flags = 0;
 427         ldlm_error_t err;
 428         ssize_t retval;
 429         ENTRY;
 430
 431         if (!S_ISBLK(inode->i_mode) && file->f_flags & O_APPEND) {
 432                 struct obdo oa;
 433                 err = ll_size_lock(inode, lsm, 0, LCK_PW, &eof_lockhs);
 434                 if (err)
 435                         RETURN(err);
 436
 437                 oa.o_id = lsm->lsm_object_id;
 438                 oa.o_mode = inode->i_mode;
 439                 oa.o_valid = OBD_MD_FLID | OBD_MD_FLMODE | OBD_MD_FLSIZE |
 440                         OBD_MD_FLBLOCKS;
 441                 retval = obd_getattr(&sbi->ll_osc_conn, &oa, lsm);
 442                 if (retval)
 443                         GOTO(out_eof, retval);
 444
 445                 *ppos = oa.o_size;
 446                 obdo_to_inode(inode, &oa, oa.o_valid);
 447         }
 448
 449         if (!(fd->fd_flags & LL_FILE_IGNORE_LOCK) ||
 450             sbi->ll_flags & LL_SBI_NOLCK) {
 451                 OBD_ALLOC(lockhs, lsm->lsm_stripe_count * sizeof(*lockhs));
 452                 if (!lockhs)
 453                         GOTO(out_eof, retval = -ENOMEM);
 454                 extent.start = *ppos;
 455                 extent.end = *ppos + count;
 456                 CDEBUG(D_INFO, "Locking inode %ld, start "LPU64" end "LPU64"\n",
 457                        inode->i_ino, extent.start, extent.end);
 458
 459                 err = obd_enqueue(&sbi->ll_osc_conn, lsm, NULL, LDLM_EXTENT,
 460                                   &extent, sizeof(extent), LCK_PW, &flags,
 461                                   ll_lock_callback, inode, sizeof(*inode),
 462                                   lockhs);
 463                 if (err != ELDLM_OK) {
 464                         CERROR("lock enqueue: err: %d\n", err);
 465                         GOTO(out_free, retval = err);
 466                 }
 467         }
 468
 469         CDEBUG(D_INFO, "Writing inode %ld, %ld bytes, offset "LPD64"\n",
 470                inode->i_ino, (long)count, *ppos);
 471
 472         retval = generic_file_write(file, buf, count, ppos);
 473
 474         if (!(fd->fd_flags & LL_FILE_IGNORE_LOCK) ||
 475             sbi->ll_flags & LL_SBI_NOLCK) {
 476                 err = obd_cancel(&sbi->ll_osc_conn, lsm, LCK_PW, lockhs);
 477                 if (err != ELDLM_OK) {
 478                         CERROR("lock cancel: err: %d\n", err);
 479                         GOTO(out_free, retval = err);
 480                 }
 481         }
 482
 483         EXIT;
 484  out_free:
 485         if (lockhs)
 486                 OBD_FREE(lockhs, lsm->lsm_stripe_count * sizeof(*lockhs));
 487
 488  out_eof:
 489         if (!S_ISBLK(inode->i_mode) && file->f_flags & O_APPEND) {
 490                 err = ll_size_unlock(inode, lsm, LCK_PW, eof_lockhs);
 491                 if (err && !retval)
 492                         retval = err;
 493         }
 494
 495         return retval;
 496 }
 497
 498 int ll_file_ioctl(struct inode *inode, struct file *file, unsigned int cmd,
 499                   unsigned long arg)
 500 {
 501         struct ll_file_data *fd = (struct ll_file_data *)file->private_data;
 502         int flags;
 503
 504         switch(cmd) {
 505         case LL_IOC_GETFLAGS:
 506                 /* Get the current value of the file flags */
 507                 return put_user(fd->fd_flags, (int *)arg);
 508         case LL_IOC_SETFLAGS:
 509         case LL_IOC_CLRFLAGS:
 510                 /* Set or clear specific file flags */
 511                 /* XXX This probably needs checks to ensure the flags are
 512                  *     not abused, and to handle any flag side effects.
 513                  */
 514                 if (get_user(flags, (int *) arg))
 515                         return -EFAULT;
 516
 517                 if (cmd == LL_IOC_SETFLAGS)
 518                         fd->fd_flags |= flags;
 519                 else
 520                         fd->fd_flags &= ~flags;
 521                 return 0;
 522
 523         /* We need to special case any other ioctls we want to handle,
 524          * to send them to the MDS/OST as appropriate and to properly
 525          * network encode the arg field.
 526         case EXT2_IOC_GETFLAGS:
 527         case EXT2_IOC_SETFLAGS:
 528         case EXT2_IOC_GETVERSION_OLD:
 529         case EXT2_IOC_GETVERSION_NEW:
 530         case EXT2_IOC_SETVERSION_OLD:
 531         case EXT2_IOC_SETVERSION_NEW:
 532         */
 533         default:
 534                 return -ENOTTY;
 535         }
 536 }
 537
 538 loff_t ll_file_seek(struct file *file, loff_t offset, int origin)
 539 {
 540         struct inode *inode = file->f_dentry->d_inode;
 541         long long retval;
 542         ENTRY;
 543
 544         switch (origin) {
 545         case 2: {
 546                 struct ll_inode_info *lli = ll_i2info(inode);
 547
 548                 retval = ll_file_size(inode, lli->lli_smd);
 549                 if (retval)
 550                         RETURN(retval);
 551
 552                 offset += inode->i_size;
 553                 break;
 554         }
 555         case 1:
 556                 offset += file->f_pos;
 557         }
 558         retval = -EINVAL;
 559         if (offset >= 0 && offset <= inode->i_sb->s_maxbytes) {
 560                 if (offset != file->f_pos) {
 561                         file->f_pos = offset;
 562                         file->f_reada = 0;
 563                         file->f_version = ++event;
 564                 }
 565                 retval = offset;
 566         }
 567         RETURN(retval);
 568 }
 569
 570 /* XXX this does not need to do anything for data, it _does_ need to
 571    call setattr */
 572 int ll_fsync(struct file *file, struct dentry *dentry, int data)
 573 {
 574         return 0;
 575 }
 576
 577 struct file_operations ll_file_operations = {
 578         read:           ll_file_read,
 579         write:          ll_file_write,
 580         ioctl:          ll_file_ioctl,
 581         open:           ll_file_open,
 582         release:        ll_file_release,
 583         mmap:           generic_file_mmap,
 584         llseek:         ll_file_seek,
 585         fsync:          NULL
 586 };
 587
 588 struct inode_operations ll_file_inode_operations = {
 589         truncate: ll_truncate,
 590         setattr: ll_setattr
 591 };