drivers/target/target_core_file.c

   1 /*******************************************************************************
   2  * Filename:  target_core_file.c
   3  *
   4  * This file contains the Storage Engine <-> FILEIO transport specific functions
   5  *
   6  * (c) Copyright 2005-2012 RisingTide Systems LLC.
   7  *
   8  * Nicholas A. Bellinger <nab@kernel.org>
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  23  *
  24  ******************************************************************************/
  25
  26 #include <linux/string.h>
  27 #include <linux/parser.h>
  28 #include <linux/timer.h>
  29 #include <linux/blkdev.h>
  30 #include <linux/slab.h>
  31 #include <linux/spinlock.h>
  32 #include <linux/module.h>
  33 #include <scsi/scsi.h>
  34 #include <scsi/scsi_host.h>
  35
  36 #include <target/target_core_base.h>
  37 #include <target/target_core_backend.h>
  38
  39 #include "target_core_file.h"
  40
  41 static inline struct fd_dev *FD_DEV(struct se_device *dev)
  42 {
  43         return container_of(dev, struct fd_dev, dev);
  44 }
  45
  46 /*      fd_attach_hba(): (Part of se_subsystem_api_t template)
  47  *
  48  *
  49  */
  50 static int fd_attach_hba(struct se_hba *hba, u32 host_id)
  51 {
  52         struct fd_host *fd_host;
  53
  54         fd_host = kzalloc(sizeof(struct fd_host), GFP_KERNEL);
  55         if (!fd_host) {
  56                 pr_err("Unable to allocate memory for struct fd_host\n");
  57                 return -ENOMEM;
  58         }
  59
  60         fd_host->fd_host_id = host_id;
  61
  62         hba->hba_ptr = fd_host;
  63
  64         pr_debug("CORE_HBA[%d] - TCM FILEIO HBA Driver %s on Generic"
  65                 " Target Core Stack %s\n", hba->hba_id, FD_VERSION,
  66                 TARGET_CORE_MOD_VERSION);
  67         pr_debug("CORE_HBA[%d] - Attached FILEIO HBA: %u to Generic"
  68                 " MaxSectors: %u\n",
  69                 hba->hba_id, fd_host->fd_host_id, FD_MAX_SECTORS);
  70
  71         return 0;
  72 }
  73
  74 static void fd_detach_hba(struct se_hba *hba)
  75 {
  76         struct fd_host *fd_host = hba->hba_ptr;
  77
  78         pr_debug("CORE_HBA[%d] - Detached FILEIO HBA: %u from Generic"
  79                 " Target Core\n", hba->hba_id, fd_host->fd_host_id);
  80
  81         kfree(fd_host);
  82         hba->hba_ptr = NULL;
  83 }
  84
  85 static struct se_device *fd_alloc_device(struct se_hba *hba, const char *name)
  86 {
  87         struct fd_dev *fd_dev;
  88         struct fd_host *fd_host = hba->hba_ptr;
  89
  90         fd_dev = kzalloc(sizeof(struct fd_dev), GFP_KERNEL);
  91         if (!fd_dev) {
  92                 pr_err("Unable to allocate memory for struct fd_dev\n");
  93                 return NULL;
  94         }
  95
  96         fd_dev->fd_host = fd_host;
  97
  98         pr_debug("FILEIO: Allocated fd_dev for %p\n", name);
  99
 100         return &fd_dev->dev;
 101 }
 102
 103 static int fd_configure_device(struct se_device *dev)
 104 {
 105         struct fd_dev *fd_dev = FD_DEV(dev);
 106         struct fd_host *fd_host = dev->se_hba->hba_ptr;
 107         struct file *file;
 108         struct inode *inode = NULL;
 109         int flags, ret = -EINVAL;
 110
 111         if (!(fd_dev->fbd_flags & FBDF_HAS_PATH)) {
 112                 pr_err("Missing fd_dev_name=\n");
 113                 return -EINVAL;
 114         }
 115
 116         /*
 117          * Use O_DSYNC by default instead of O_SYNC to forgo syncing
 118          * of pure timestamp updates.
 119          */
 120         flags = O_RDWR | O_CREAT | O_LARGEFILE | O_DSYNC;
 121
 122         /*
 123          * Optionally allow fd_buffered_io=1 to be enabled for people
 124          * who want use the fs buffer cache as an WriteCache mechanism.
 125          *
 126          * This means that in event of a hard failure, there is a risk
 127          * of silent data-loss if the SCSI client has *not* performed a
 128          * forced unit access (FUA) write, or issued SYNCHRONIZE_CACHE
 129          * to write-out the entire device cache.
 130          */
 131         if (fd_dev->fbd_flags & FDBD_HAS_BUFFERED_IO_WCE) {
 132                 pr_debug("FILEIO: Disabling O_DSYNC, using buffered FILEIO\n");
 133                 flags &= ~O_DSYNC;
 134         }
 135
 136         file = filp_open(fd_dev->fd_dev_name, flags, 0600);
 137         if (IS_ERR(file)) {
 138                 pr_err("filp_open(%s) failed\n", fd_dev->fd_dev_name);
 139                 ret = PTR_ERR(file);
 140                 goto fail;
 141         }
 142         fd_dev->fd_file = file;
 143         /*
 144          * If using a block backend with this struct file, we extract
 145          * fd_dev->fd_[block,dev]_size from struct block_device.
 146          *
 147          * Otherwise, we use the passed fd_size= from configfs
 148          */
 149         inode = file->f_mapping->host;
 150         if (S_ISBLK(inode->i_mode)) {
 151                 struct request_queue *q = bdev_get_queue(inode->i_bdev);
 152                 unsigned long long dev_size;
 153
 154                 dev->dev_attrib.hw_block_size =
 155                         bdev_logical_block_size(inode->i_bdev);
 156                 dev->dev_attrib.hw_max_sectors = queue_max_hw_sectors(q);
 157
 158                 /*
 159                  * Determine the number of bytes from i_size_read() minus
 160                  * one (1) logical sector from underlying struct block_device
 161                  */
 162                 dev_size = (i_size_read(file->f_mapping->host) -
 163                                        fd_dev->fd_block_size);
 164
 165                 pr_debug("FILEIO: Using size: %llu bytes from struct"
 166                         " block_device blocks: %llu logical_block_size: %d\n",
 167                         dev_size, div_u64(dev_size, fd_dev->fd_block_size),
 168                         fd_dev->fd_block_size);
 169         } else {
 170                 if (!(fd_dev->fbd_flags & FBDF_HAS_SIZE)) {
 171                         pr_err("FILEIO: Missing fd_dev_size="
 172                                 " parameter, and no backing struct"
 173                                 " block_device\n");
 174                         goto fail;
 175                 }
 176
 177                 dev->dev_attrib.hw_block_size = FD_BLOCKSIZE;
 178                 dev->dev_attrib.hw_max_sectors = FD_MAX_SECTORS;
 179         }
 180
 181         fd_dev->fd_block_size = dev->dev_attrib.hw_block_size;
 182
 183         dev->dev_attrib.hw_queue_depth = FD_MAX_DEVICE_QUEUE_DEPTH;
 184
 185         if (fd_dev->fbd_flags & FDBD_HAS_BUFFERED_IO_WCE) {
 186                 pr_debug("FILEIO: Forcing setting of emulate_write_cache=1"
 187                         " with FDBD_HAS_BUFFERED_IO_WCE\n");
 188                 dev->dev_attrib.emulate_write_cache = 1;
 189         }
 190
 191         fd_dev->fd_dev_id = fd_host->fd_host_dev_id_count++;
 192         fd_dev->fd_queue_depth = dev->queue_depth;
 193
 194         pr_debug("CORE_FILE[%u] - Added TCM FILEIO Device ID: %u at %s,"
 195                 " %llu total bytes\n", fd_host->fd_host_id, fd_dev->fd_dev_id,
 196                         fd_dev->fd_dev_name, fd_dev->fd_dev_size);
 197
 198         return 0;
 199 fail:
 200         if (fd_dev->fd_file) {
 201                 filp_close(fd_dev->fd_file, NULL);
 202                 fd_dev->fd_file = NULL;
 203         }
 204         return ret;
 205 }
 206
 207 static void fd_free_device(struct se_device *dev)
 208 {
 209         struct fd_dev *fd_dev = FD_DEV(dev);
 210
 211         if (fd_dev->fd_file) {
 212                 filp_close(fd_dev->fd_file, NULL);
 213                 fd_dev->fd_file = NULL;
 214         }
 215
 216         kfree(fd_dev);
 217 }
 218
 219 static int fd_do_readv(struct se_cmd *cmd, struct scatterlist *sgl,
 220                 u32 sgl_nents)
 221 {
 222         struct se_device *se_dev = cmd->se_dev;
 223         struct fd_dev *dev = FD_DEV(se_dev);
 224         struct file *fd = dev->fd_file;
 225         struct scatterlist *sg;
 226         struct iovec *iov;
 227         mm_segment_t old_fs;
 228         loff_t pos = (cmd->t_task_lba * se_dev->dev_attrib.block_size);
 229         int ret = 0, i;
 230
 231         iov = kzalloc(sizeof(struct iovec) * sgl_nents, GFP_KERNEL);
 232         if (!iov) {
 233                 pr_err("Unable to allocate fd_do_readv iov[]\n");
 234                 return -ENOMEM;
 235         }
 236
 237         for_each_sg(sgl, sg, sgl_nents, i) {
 238                 iov[i].iov_len = sg->length;
 239                 iov[i].iov_base = kmap(sg_page(sg)) + sg->offset;
 240         }
 241
 242         old_fs = get_fs();
 243         set_fs(get_ds());
 244         ret = vfs_readv(fd, &iov[0], sgl_nents, &pos);
 245         set_fs(old_fs);
 246
 247         for_each_sg(sgl, sg, sgl_nents, i)
 248                 kunmap(sg_page(sg));
 249         kfree(iov);
 250         /*
 251          * Return zeros and GOOD status even if the READ did not return
 252          * the expected virt_size for struct file w/o a backing struct
 253          * block_device.
 254          */
 255         if (S_ISBLK(fd->f_dentry->d_inode->i_mode)) {
 256                 if (ret < 0 || ret != cmd->data_length) {
 257                         pr_err("vfs_readv() returned %d,"
 258                                 " expecting %d for S_ISBLK\n", ret,
 259                                 (int)cmd->data_length);
 260                         return (ret < 0 ? ret : -EINVAL);
 261                 }
 262         } else {
 263                 if (ret < 0) {
 264                         pr_err("vfs_readv() returned %d for non"
 265                                 " S_ISBLK\n", ret);
 266                         return ret;
 267                 }
 268         }
 269
 270         return 1;
 271 }
 272
 273 static int fd_do_writev(struct se_cmd *cmd, struct scatterlist *sgl,
 274                 u32 sgl_nents)
 275 {
 276         struct se_device *se_dev = cmd->se_dev;
 277         struct fd_dev *dev = FD_DEV(se_dev);
 278         struct file *fd = dev->fd_file;
 279         struct scatterlist *sg;
 280         struct iovec *iov;
 281         mm_segment_t old_fs;
 282         loff_t pos = (cmd->t_task_lba * se_dev->dev_attrib.block_size);
 283         int ret, i = 0;
 284
 285         iov = kzalloc(sizeof(struct iovec) * sgl_nents, GFP_KERNEL);
 286         if (!iov) {
 287                 pr_err("Unable to allocate fd_do_writev iov[]\n");
 288                 return -ENOMEM;
 289         }
 290
 291         for_each_sg(sgl, sg, sgl_nents, i) {
 292                 iov[i].iov_len = sg->length;
 293                 iov[i].iov_base = kmap(sg_page(sg)) + sg->offset;
 294         }
 295
 296         old_fs = get_fs();
 297         set_fs(get_ds());
 298         ret = vfs_writev(fd, &iov[0], sgl_nents, &pos);
 299         set_fs(old_fs);
 300
 301         for_each_sg(sgl, sg, sgl_nents, i)
 302                 kunmap(sg_page(sg));
 303
 304         kfree(iov);
 305
 306         if (ret < 0 || ret != cmd->data_length) {
 307                 pr_err("vfs_writev() returned %d\n", ret);
 308                 return (ret < 0 ? ret : -EINVAL);
 309         }
 310
 311         return 1;
 312 }
 313
 314 static sense_reason_t
 315 fd_execute_sync_cache(struct se_cmd *cmd)
 316 {
 317         struct se_device *dev = cmd->se_dev;
 318         struct fd_dev *fd_dev = FD_DEV(dev);
 319         int immed = (cmd->t_task_cdb[1] & 0x2);
 320         loff_t start, end;
 321         int ret;
 322
 323         /*
 324          * If the Immediate bit is set, queue up the GOOD response
 325          * for this SYNCHRONIZE_CACHE op
 326          */
 327         if (immed)
 328                 target_complete_cmd(cmd, SAM_STAT_GOOD);
 329
 330         /*
 331          * Determine if we will be flushing the entire device.
 332          */
 333         if (cmd->t_task_lba == 0 && cmd->data_length == 0) {
 334                 start = 0;
 335                 end = LLONG_MAX;
 336         } else {
 337                 start = cmd->t_task_lba * dev->dev_attrib.block_size;
 338                 if (cmd->data_length)
 339                         end = start + cmd->data_length;
 340                 else
 341                         end = LLONG_MAX;
 342         }
 343
 344         ret = vfs_fsync_range(fd_dev->fd_file, start, end, 1);
 345         if (ret != 0)
 346                 pr_err("FILEIO: vfs_fsync_range() failed: %d\n", ret);
 347
 348         if (immed)
 349                 return 0;
 350
 351         if (ret)
 352                 target_complete_cmd(cmd, SAM_STAT_CHECK_CONDITION);
 353         else
 354                 target_complete_cmd(cmd, SAM_STAT_GOOD);
 355
 356         return 0;
 357 }
 358
 359 static sense_reason_t
 360 fd_execute_rw(struct se_cmd *cmd)
 361 {
 362         struct scatterlist *sgl = cmd->t_data_sg;
 363         u32 sgl_nents = cmd->t_data_nents;
 364         enum dma_data_direction data_direction = cmd->data_direction;
 365         struct se_device *dev = cmd->se_dev;
 366         int ret = 0;
 367
 368         /*
 369          * Call vectorized fileio functions to map struct scatterlist
 370          * physical memory addresses to struct iovec virtual memory.
 371          */
 372         if (data_direction == DMA_FROM_DEVICE) {
 373                 ret = fd_do_readv(cmd, sgl, sgl_nents);
 374         } else {
 375                 ret = fd_do_writev(cmd, sgl, sgl_nents);
 376                 /*
 377                  * Perform implict vfs_fsync_range() for fd_do_writev() ops
 378                  * for SCSI WRITEs with Forced Unit Access (FUA) set.
 379                  * Allow this to happen independent of WCE=0 setting.
 380                  */
 381                 if (ret > 0 &&
 382                     dev->dev_attrib.emulate_fua_write > 0 &&
 383                     (cmd->se_cmd_flags & SCF_FUA)) {
 384                         struct fd_dev *fd_dev = FD_DEV(dev);
 385                         loff_t start = cmd->t_task_lba *
 386                                 dev->dev_attrib.block_size;
 387                         loff_t end = start + cmd->data_length;
 388
 389                         vfs_fsync_range(fd_dev->fd_file, start, end, 1);
 390                 }
 391         }
 392
 393         if (ret < 0)
 394                 return TCM_LOGICAL_UNIT_COMMUNICATION_FAILURE;
 395
 396         if (ret)
 397                 target_complete_cmd(cmd, SAM_STAT_GOOD);
 398         return 0;
 399 }
 400
 401 enum {
 402         Opt_fd_dev_name, Opt_fd_dev_size, Opt_fd_buffered_io, Opt_err
 403 };
 404
 405 static match_table_t tokens = {
 406         {Opt_fd_dev_name, "fd_dev_name=%s"},
 407         {Opt_fd_dev_size, "fd_dev_size=%s"},
 408         {Opt_fd_buffered_io, "fd_buffered_io=%d"},
 409         {Opt_err, NULL}
 410 };
 411
 412 static ssize_t fd_set_configfs_dev_params(struct se_device *dev,
 413                 const char *page, ssize_t count)
 414 {
 415         struct fd_dev *fd_dev = FD_DEV(dev);
 416         char *orig, *ptr, *arg_p, *opts;
 417         substring_t args[MAX_OPT_ARGS];
 418         int ret = 0, arg, token;
 419
 420         opts = kstrdup(page, GFP_KERNEL);
 421         if (!opts)
 422                 return -ENOMEM;
 423
 424         orig = opts;
 425
 426         while ((ptr = strsep(&opts, ",\n")) != NULL) {
 427                 if (!*ptr)
 428                         continue;
 429
 430                 token = match_token(ptr, tokens, args);
 431                 switch (token) {
 432                 case Opt_fd_dev_name:
 433                         if (match_strlcpy(fd_dev->fd_dev_name, &args[0],
 434                                 FD_MAX_DEV_NAME) == 0) {
 435                                 ret = -EINVAL;
 436                                 break;
 437                         }
 438                         pr_debug("FILEIO: Referencing Path: %s\n",
 439                                         fd_dev->fd_dev_name);
 440                         fd_dev->fbd_flags |= FBDF_HAS_PATH;
 441                         break;
 442                 case Opt_fd_dev_size:
 443                         arg_p = match_strdup(&args[0]);
 444                         if (!arg_p) {
 445                                 ret = -ENOMEM;
 446                                 break;
 447                         }
 448                         ret = strict_strtoull(arg_p, 0, &fd_dev->fd_dev_size);
 449                         kfree(arg_p);
 450                         if (ret < 0) {
 451                                 pr_err("strict_strtoull() failed for"
 452                                                 " fd_dev_size=\n");
 453                                 goto out;
 454                         }
 455                         pr_debug("FILEIO: Referencing Size: %llu"
 456                                         " bytes\n", fd_dev->fd_dev_size);
 457                         fd_dev->fbd_flags |= FBDF_HAS_SIZE;
 458                         break;
 459                 case Opt_fd_buffered_io:
 460                         match_int(args, &arg);
 461                         if (arg != 1) {
 462                                 pr_err("bogus fd_buffered_io=%d value\n", arg);
 463                                 ret = -EINVAL;
 464                                 goto out;
 465                         }
 466
 467                         pr_debug("FILEIO: Using buffered I/O"
 468                                 " operations for struct fd_dev\n");
 469
 470                         fd_dev->fbd_flags |= FDBD_HAS_BUFFERED_IO_WCE;
 471                         break;
 472                 default:
 473                         break;
 474                 }
 475         }
 476
 477 out:
 478         kfree(orig);
 479         return (!ret) ? count : ret;
 480 }
 481
 482 static ssize_t fd_show_configfs_dev_params(struct se_device *dev, char *b)
 483 {
 484         struct fd_dev *fd_dev = FD_DEV(dev);
 485         ssize_t bl = 0;
 486
 487         bl = sprintf(b + bl, "TCM FILEIO ID: %u", fd_dev->fd_dev_id);
 488         bl += sprintf(b + bl, "        File: %s  Size: %llu  Mode: %s\n",
 489                 fd_dev->fd_dev_name, fd_dev->fd_dev_size,
 490                 (fd_dev->fbd_flags & FDBD_HAS_BUFFERED_IO_WCE) ?
 491                 "Buffered-WCE" : "O_DSYNC");
 492         return bl;
 493 }
 494
 495 static sector_t fd_get_blocks(struct se_device *dev)
 496 {
 497         struct fd_dev *fd_dev = FD_DEV(dev);
 498         struct file *f = fd_dev->fd_file;
 499         struct inode *i = f->f_mapping->host;
 500         unsigned long long dev_size;
 501         /*
 502          * When using a file that references an underlying struct block_device,
 503          * ensure dev_size is always based on the current inode size in order
 504          * to handle underlying block_device resize operations.
 505          */
 506         if (S_ISBLK(i->i_mode))
 507                 dev_size = (i_size_read(i) - fd_dev->fd_block_size);
 508         else
 509                 dev_size = fd_dev->fd_dev_size;
 510
 511         return div_u64(dev_size, dev->dev_attrib.block_size);
 512 }
 513
 514 static struct sbc_ops fd_sbc_ops = {
 515         .execute_rw             = fd_execute_rw,
 516         .execute_sync_cache     = fd_execute_sync_cache,
 517 };
 518
 519 static sense_reason_t
 520 fd_parse_cdb(struct se_cmd *cmd)
 521 {
 522         return sbc_parse_cdb(cmd, &fd_sbc_ops);
 523 }
 524
 525 static struct se_subsystem_api fileio_template = {
 526         .name                   = "fileio",
 527         .inquiry_prod           = "FILEIO",
 528         .inquiry_rev            = FD_VERSION,
 529         .owner                  = THIS_MODULE,
 530         .transport_type         = TRANSPORT_PLUGIN_VHBA_PDEV,
 531         .attach_hba             = fd_attach_hba,
 532         .detach_hba             = fd_detach_hba,
 533         .alloc_device           = fd_alloc_device,
 534         .configure_device       = fd_configure_device,
 535         .free_device            = fd_free_device,
 536         .parse_cdb              = fd_parse_cdb,
 537         .set_configfs_dev_params = fd_set_configfs_dev_params,
 538         .show_configfs_dev_params = fd_show_configfs_dev_params,
 539         .get_device_type        = sbc_get_device_type,
 540         .get_blocks             = fd_get_blocks,
 541 };
 542
 543 static int __init fileio_module_init(void)
 544 {
 545         return transport_subsystem_register(&fileio_template);
 546 }
 547
 548 static void fileio_module_exit(void)
 549 {
 550         transport_subsystem_release(&fileio_template);
 551 }
 552
 553 MODULE_DESCRIPTION("TCM FILEIO subsystem plugin");
 554 MODULE_AUTHOR("nab@Linux-iSCSI.org");
 555 MODULE_LICENSE("GPL");
 556
 557 module_init(fileio_module_init);
 558 module_exit(fileio_module_exit);