drivers/s390/scsi/zfcp_scsi.c

   1 /*
   2  *
   3  * linux/drivers/s390/scsi/zfcp_scsi.c
   4  *
   5  * FCP adapter driver for IBM eServer zSeries
   6  *
   7  * (C) Copyright IBM Corp. 2002, 2004
   8  *
   9  * Author(s): Martin Peschke <mpeschke@de.ibm.com>
  10  *            Raimund Schroeder <raimund.schroeder@de.ibm.com>
  11  *            Aron Zeh
  12  *            Wolfgang Taphorn
  13  *            Stefan Bader <stefan.bader@de.ibm.com>
  14  *            Heiko Carstens <heiko.carstens@de.ibm.com>
  15  *            Andreas Herrmann <aherrman@de.ibm.com>
  16  *
  17  * This program is free software; you can redistribute it and/or modify
  18  * it under the terms of the GNU General Public License as published by
  19  * the Free Software Foundation; either version 2, or (at your option)
  20  * any later version.
  21  *
  22  * This program is distributed in the hope that it will be useful,
  23  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  25  * GNU General Public License for more details.
  26  *
  27  * You should have received a copy of the GNU General Public License
  28  * along with this program; if not, write to the Free Software
  29  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  30  */
  31
  32 #define ZFCP_LOG_AREA                   ZFCP_LOG_AREA_SCSI
  33
  34 #define ZFCP_SCSI_REVISION "$Revision: 1.74 $"
  35
  36 #include "zfcp_ext.h"
  37
  38 static void zfcp_scsi_slave_destroy(struct scsi_device *sdp);
  39 static int zfcp_scsi_slave_alloc(struct scsi_device *sdp);
  40 static int zfcp_scsi_slave_configure(struct scsi_device *sdp);
  41 static int zfcp_scsi_queuecommand(struct scsi_cmnd *,
  42                                   void (*done) (struct scsi_cmnd *));
  43 static int zfcp_scsi_eh_abort_handler(struct scsi_cmnd *);
  44 static int zfcp_scsi_eh_device_reset_handler(struct scsi_cmnd *);
  45 static int zfcp_scsi_eh_bus_reset_handler(struct scsi_cmnd *);
  46 static int zfcp_scsi_eh_host_reset_handler(struct scsi_cmnd *);
  47 static int zfcp_task_management_function(struct zfcp_unit *, u8);
  48
  49 static struct zfcp_unit *zfcp_unit_lookup(struct zfcp_adapter *, int, scsi_id_t,
  50                                           scsi_lun_t);
  51 static struct zfcp_port *zfcp_port_lookup(struct zfcp_adapter *, int,
  52                                           scsi_id_t);
  53
  54 static struct device_attribute *zfcp_sysfs_sdev_attrs[];
  55
  56 struct scsi_transport_template *zfcp_transport_template;
  57
  58 struct zfcp_data zfcp_data = {
  59         .scsi_host_template = {
  60               name:                    ZFCP_NAME,
  61               proc_name:               "zfcp",
  62               proc_info:               NULL,
  63               detect:                  NULL,
  64               slave_alloc:             zfcp_scsi_slave_alloc,
  65               slave_configure:         zfcp_scsi_slave_configure,
  66               slave_destroy:           zfcp_scsi_slave_destroy,
  67               queuecommand:            zfcp_scsi_queuecommand,
  68               eh_abort_handler:        zfcp_scsi_eh_abort_handler,
  69               eh_device_reset_handler: zfcp_scsi_eh_device_reset_handler,
  70               eh_bus_reset_handler:    zfcp_scsi_eh_bus_reset_handler,
  71               eh_host_reset_handler:   zfcp_scsi_eh_host_reset_handler,
  72                                        /* FIXME(openfcp): Tune */
  73               can_queue:               4096,
  74               this_id:                 0,
  75               /*
  76                * FIXME:
  77                * one less? can zfcp_create_sbale cope with it?
  78                */
  79               sg_tablesize:            ZFCP_MAX_SBALES_PER_REQ,
  80               cmd_per_lun:             1,
  81               unchecked_isa_dma:       0,
  82               use_clustering:          1,
  83               sdev_attrs:              zfcp_sysfs_sdev_attrs,
  84         },
  85         .driver_version = ZFCP_VERSION,
  86         /* rest initialised with zeros */
  87 };
  88
  89 /* Find start of Response Information in FCP response unit*/
  90 char *
  91 zfcp_get_fcp_rsp_info_ptr(struct fcp_rsp_iu *fcp_rsp_iu)
  92 {
  93         char *fcp_rsp_info_ptr;
  94
  95         fcp_rsp_info_ptr =
  96             (unsigned char *) fcp_rsp_iu + (sizeof (struct fcp_rsp_iu));
  97
  98         return fcp_rsp_info_ptr;
  99 }
 100
 101 /* Find start of Sense Information in FCP response unit*/
 102 char *
 103 zfcp_get_fcp_sns_info_ptr(struct fcp_rsp_iu *fcp_rsp_iu)
 104 {
 105         char *fcp_sns_info_ptr;
 106
 107         fcp_sns_info_ptr =
 108             (unsigned char *) fcp_rsp_iu + (sizeof (struct fcp_rsp_iu));
 109         if (fcp_rsp_iu->validity.bits.fcp_rsp_len_valid)
 110                 fcp_sns_info_ptr = (char *) fcp_sns_info_ptr +
 111                     fcp_rsp_iu->fcp_rsp_len;
 112
 113         return fcp_sns_info_ptr;
 114 }
 115
 116 fcp_dl_t *
 117 zfcp_get_fcp_dl_ptr(struct fcp_cmnd_iu * fcp_cmd)
 118 {
 119         int additional_length = fcp_cmd->add_fcp_cdb_length << 2;
 120         fcp_dl_t *fcp_dl_addr;
 121
 122         fcp_dl_addr = (fcp_dl_t *)
 123                 ((unsigned char *) fcp_cmd +
 124                  sizeof (struct fcp_cmnd_iu) + additional_length);
 125         /*
 126          * fcp_dl_addr = start address of fcp_cmnd structure +
 127          * size of fixed part + size of dynamically sized add_dcp_cdb field
 128          * SEE FCP-2 documentation
 129          */
 130         return fcp_dl_addr;
 131 }
 132
 133 fcp_dl_t
 134 zfcp_get_fcp_dl(struct fcp_cmnd_iu * fcp_cmd)
 135 {
 136         return *zfcp_get_fcp_dl_ptr(fcp_cmd);
 137 }
 138
 139 void
 140 zfcp_set_fcp_dl(struct fcp_cmnd_iu *fcp_cmd, fcp_dl_t fcp_dl)
 141 {
 142         *zfcp_get_fcp_dl_ptr(fcp_cmd) = fcp_dl;
 143 }
 144
 145 /*
 146  * note: it's a bit-or operation not an assignment
 147  * regarding the specified byte
 148  */
 149 static inline void
 150 set_byte(u32 * result, char status, char pos)
 151 {
 152         *result |= status << (pos * 8);
 153 }
 154
 155 void
 156 set_host_byte(u32 * result, char status)
 157 {
 158         set_byte(result, status, 2);
 159 }
 160
 161 void
 162 set_driver_byte(u32 * result, char status)
 163 {
 164         set_byte(result, status, 3);
 165 }
 166
 167 /*
 168  * function:    zfcp_scsi_slave_alloc
 169  *
 170  * purpose:
 171  *
 172  * returns:
 173  */
 174
 175 static int
 176 zfcp_scsi_slave_alloc(struct scsi_device *sdp)
 177 {
 178         struct zfcp_adapter *adapter;
 179         struct zfcp_unit *unit;
 180         unsigned long flags;
 181         int retval = -ENODEV;
 182
 183         adapter = (struct zfcp_adapter *) sdp->host->hostdata[0];
 184         if (!adapter)
 185                 goto out;
 186
 187         read_lock_irqsave(&zfcp_data.config_lock, flags);
 188         unit = zfcp_unit_lookup(adapter, sdp->channel, sdp->id, sdp->lun);
 189         if (unit) {
 190                 sdp->hostdata = unit;
 191                 unit->device = sdp;
 192                 zfcp_unit_get(unit);
 193                 retval = 0;
 194         }
 195         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
 196  out:
 197         return retval;
 198 }
 199
 200 /*
 201  * function:    zfcp_scsi_slave_destroy
 202  *
 203  * purpose:
 204  *
 205  * returns:
 206  */
 207
 208 static void
 209 zfcp_scsi_slave_destroy(struct scsi_device *sdpnt)
 210 {
 211         struct zfcp_unit *unit = (struct zfcp_unit *) sdpnt->hostdata;
 212
 213         if (unit) {
 214                 sdpnt->hostdata = NULL;
 215                 unit->device = NULL;
 216                 zfcp_unit_put(unit);
 217         } else {
 218                 ZFCP_LOG_NORMAL("bug: no unit associated with SCSI device at "
 219                                 "address %p\n", sdpnt);
 220         }
 221 }
 222
 223 /*
 224  * called from scsi midlayer to allow finetuning of a device.
 225  */
 226 static int
 227 zfcp_scsi_slave_configure(struct scsi_device *sdp)
 228 {
 229         if (sdp->tagged_supported)
 230                 scsi_adjust_queue_depth(sdp, MSG_SIMPLE_TAG, ZFCP_CMND_PER_LUN);
 231         else
 232                 scsi_adjust_queue_depth(sdp, 0, 1);
 233         return 0;
 234 }
 235
 236 /**
 237  * zfcp_scsi_command_fail - set result in scsi_cmnd and call scsi_done function
 238  * @scpnt: pointer to struct scsi_cmnd where result is set
 239  * @result: result to be set in scpnt (e.g. DID_ERROR)
 240  */
 241 static void
 242 zfcp_scsi_command_fail(struct scsi_cmnd *scpnt, int result)
 243 {
 244         set_host_byte(&scpnt->result, result);
 245         zfcp_cmd_dbf_event_scsi("failing", scpnt);
 246         /* return directly */
 247         scpnt->scsi_done(scpnt);
 248 }
 249
 250 /**
 251  * zfcp_scsi_command_async - worker for zfcp_scsi_queuecommand and
 252  *      zfcp_scsi_command_sync
 253  * @adapter: adapter where scsi command is issued
 254  * @unit: unit to which scsi command is sent
 255  * @scpnt: scsi command to be sent
 256  * @timer: timer to be started if request is successfully initiated
 257  *
 258  * Note: In scsi_done function must be set in scpnt.
 259  */
 260 int
 261 zfcp_scsi_command_async(struct zfcp_adapter *adapter, struct zfcp_unit *unit,
 262                         struct scsi_cmnd *scpnt, struct timer_list *timer)
 263 {
 264         int tmp;
 265         int retval;
 266
 267         retval = 0;
 268
 269         BUG_ON((adapter == NULL) || (adapter != unit->port->adapter));
 270         BUG_ON(scpnt->scsi_done == NULL);
 271
 272         if (unlikely(NULL == unit)) {
 273                 zfcp_scsi_command_fail(scpnt, DID_NO_CONNECT);
 274                 goto out;
 275         }
 276
 277         if (unlikely(
 278               atomic_test_mask(ZFCP_STATUS_COMMON_ERP_FAILED, &unit->status) ||
 279              !atomic_test_mask(ZFCP_STATUS_COMMON_RUNNING, &unit->status))) {
 280                 ZFCP_LOG_DEBUG("stopping SCSI I/O on unit 0x%016Lx on port "
 281                                "0x%016Lx on adapter %s\n",
 282                                unit->fcp_lun, unit->port->wwpn,
 283                                zfcp_get_busid_by_adapter(adapter));
 284                 zfcp_scsi_command_fail(scpnt, DID_ERROR);
 285                 goto out;
 286         }
 287
 288         if (unlikely(
 289              !atomic_test_mask(ZFCP_STATUS_COMMON_UNBLOCKED, &unit->status))) {
 290                 ZFCP_LOG_DEBUG("adapter %s not ready or unit 0x%016Lx "
 291                                "on port 0x%016Lx in recovery\n",
 292                                zfcp_get_busid_by_unit(unit),
 293                                unit->fcp_lun, unit->port->wwpn);
 294                 retval = SCSI_MLQUEUE_DEVICE_BUSY;
 295                 goto out;
 296         }
 297
 298         tmp = zfcp_fsf_send_fcp_command_task(adapter, unit, scpnt, timer,
 299                                              ZFCP_REQ_AUTO_CLEANUP);
 300
 301         if (unlikely(tmp < 0)) {
 302                 ZFCP_LOG_DEBUG("error: initiation of Send FCP Cmnd failed\n");
 303                 retval = SCSI_MLQUEUE_HOST_BUSY;
 304         }
 305
 306 out:
 307         return retval;
 308 }
 309
 310 void
 311 zfcp_scsi_command_sync_handler(struct scsi_cmnd *scpnt)
 312 {
 313         struct completion *wait = (struct completion *) scpnt->SCp.ptr;
 314         complete(wait);
 315 }
 316
 317
 318 /**
 319  * zfcp_scsi_command_sync - send a SCSI command and wait for completion
 320  * @unit: unit where command is sent to
 321  * @scpnt: scsi command to be sent
 322  * @timer: timer to be started if request is successfully initiated
 323  * Return: 0
 324  *
 325  * Errors are indicated in scpnt->result
 326  */
 327 int
 328 zfcp_scsi_command_sync(struct zfcp_unit *unit, struct scsi_cmnd *scpnt,
 329                        struct timer_list *timer)
 330 {
 331         int ret;
 332         DECLARE_COMPLETION(wait);
 333
 334         scpnt->SCp.ptr = (void *) &wait;  /* silent re-use */
 335         scpnt->scsi_done = zfcp_scsi_command_sync_handler;
 336         ret = zfcp_scsi_command_async(unit->port->adapter, unit, scpnt, timer);
 337         if (ret == 0)
 338                 wait_for_completion(&wait);
 339
 340         scpnt->SCp.ptr = NULL;
 341
 342         return 0;
 343 }
 344
 345 /*
 346  * function:    zfcp_scsi_queuecommand
 347  *
 348  * purpose:     enqueues a SCSI command to the specified target device
 349  *
 350  * returns:     0 - success, SCSI command enqueued
 351  *              !0 - failure
 352  */
 353 int
 354 zfcp_scsi_queuecommand(struct scsi_cmnd *scpnt,
 355                        void (*done) (struct scsi_cmnd *))
 356 {
 357         struct zfcp_unit *unit;
 358         struct zfcp_adapter *adapter;
 359
 360         /* reset the status for this request */
 361         scpnt->result = 0;
 362         scpnt->host_scribble = NULL;
 363         scpnt->scsi_done = done;
 364
 365         /*
 366          * figure out adapter and target device
 367          * (stored there by zfcp_scsi_slave_alloc)
 368          */
 369         adapter = (struct zfcp_adapter *) scpnt->device->host->hostdata[0];
 370         unit = (struct zfcp_unit *) scpnt->device->hostdata;
 371
 372         return zfcp_scsi_command_async(adapter, unit, scpnt, NULL);
 373 }
 374
 375 /*
 376  * function:    zfcp_unit_lookup
 377  *
 378  * purpose:
 379  *
 380  * returns:
 381  *
 382  * context:
 383  */
 384 static struct zfcp_unit *
 385 zfcp_unit_lookup(struct zfcp_adapter *adapter, int channel, scsi_id_t id,
 386                  scsi_lun_t lun)
 387 {
 388         struct zfcp_port *port;
 389         struct zfcp_unit *unit, *retval = NULL;
 390
 391         list_for_each_entry(port, &adapter->port_list_head, list) {
 392                 if (!port->rport || (id != port->rport->scsi_target_id))
 393                         continue;
 394                 list_for_each_entry(unit, &port->unit_list_head, list) {
 395                         if (lun == unit->scsi_lun) {
 396                                 retval = unit;
 397                                 goto out;
 398                         }
 399                 }
 400         }
 401  out:
 402         return retval;
 403 }
 404
 405 static struct zfcp_port *
 406 zfcp_port_lookup(struct zfcp_adapter *adapter, int channel, scsi_id_t id)
 407 {
 408         struct zfcp_port *port;
 409
 410         list_for_each_entry(port, &adapter->port_list_head, list) {
 411                 if (port->rport && (id == port->rport->scsi_target_id))
 412                         return port;
 413         }
 414         return (struct zfcp_port *) NULL;
 415 }
 416
 417 /*
 418  * function:    zfcp_scsi_eh_abort_handler
 419  *
 420  * purpose:     tries to abort the specified (timed out) SCSI command
 421  *
 422  * note:        We do not need to care for a SCSI command which completes
 423  *              normally but late during this abort routine runs.
 424  *              We are allowed to return late commands to the SCSI stack.
 425  *              It tracks the state of commands and will handle late commands.
 426  *              (Usually, the normal completion of late commands is ignored with
 427  *              respect to the running abort operation. Grep for 'done_late'
 428  *              in the SCSI stacks sources.)
 429  *
 430  * returns:     SUCCESS - command has been aborted and cleaned up in internal
 431  *                        bookkeeping,
 432  *                        SCSI stack won't be called for aborted command
 433  *              FAILED  - otherwise
 434  */
 435 int
 436 __zfcp_scsi_eh_abort_handler(struct scsi_cmnd *scpnt)
 437 {
 438         int retval = SUCCESS;
 439         struct zfcp_fsf_req *new_fsf_req, *old_fsf_req;
 440         struct zfcp_adapter *adapter = (struct zfcp_adapter *) scpnt->device->host->hostdata[0];
 441         struct zfcp_unit *unit = (struct zfcp_unit *) scpnt->device->hostdata;
 442         struct zfcp_port *port = unit->port;
 443         struct Scsi_Host *scsi_host = scpnt->device->host;
 444         union zfcp_req_data *req_data = NULL;
 445         unsigned long flags;
 446         u32 status = 0;
 447
 448         /* the components of a abort_dbf record (fixed size record) */
 449         u64 dbf_scsi_cmnd = (unsigned long) scpnt;
 450         char dbf_opcode[ZFCP_ABORT_DBF_LENGTH];
 451         wwn_t dbf_wwn = port->wwpn;
 452         fcp_lun_t dbf_fcp_lun = unit->fcp_lun;
 453         u64 dbf_retries = scpnt->retries;
 454         u64 dbf_allowed = scpnt->allowed;
 455         u64 dbf_timeout = 0;
 456         u64 dbf_fsf_req = 0;
 457         u64 dbf_fsf_status = 0;
 458         u64 dbf_fsf_qual[2] = { 0, 0 };
 459         char dbf_result[ZFCP_ABORT_DBF_LENGTH] = "##undef";
 460
 461         memset(dbf_opcode, 0, ZFCP_ABORT_DBF_LENGTH);
 462         memcpy(dbf_opcode,
 463                scpnt->cmnd,
 464                min(scpnt->cmd_len, (unsigned char) ZFCP_ABORT_DBF_LENGTH));
 465
 466         ZFCP_LOG_INFO("aborting scsi_cmnd=%p on adapter %s\n",
 467                       scpnt, zfcp_get_busid_by_adapter(adapter));
 468
 469         spin_unlock_irq(scsi_host->host_lock);
 470
 471         /*
 472          * Race condition between normal (late) completion and abort has
 473          * to be avoided.
 474          * The entirity of all accesses to scsi_req have to be atomic.
 475          * scsi_req is usually part of the fsf_req and thus we block the
 476          * release of fsf_req as long as we need to access scsi_req.
 477          */
 478         write_lock_irqsave(&adapter->abort_lock, flags);
 479
 480         /*
 481          * Check whether command has just completed and can not be aborted.
 482          * Even if the command has just been completed late, we can access
 483          * scpnt since the SCSI stack does not release it at least until
 484          * this routine returns. (scpnt is parameter passed to this routine
 485          * and must not disappear during abort even on late completion.)
 486          */
 487         req_data = (union zfcp_req_data *) scpnt->host_scribble;
 488         /* DEBUG */
 489         ZFCP_LOG_DEBUG("req_data=%p\n", req_data);
 490         if (!req_data) {
 491                 ZFCP_LOG_DEBUG("late command completion overtook abort\n");
 492                 /*
 493                  * That's it.
 494                  * Do not initiate abort but return SUCCESS.
 495                  */
 496                 write_unlock_irqrestore(&adapter->abort_lock, flags);
 497                 retval = SUCCESS;
 498                 strncpy(dbf_result, "##late1", ZFCP_ABORT_DBF_LENGTH);
 499                 goto out;
 500         }
 501
 502         /* Figure out which fsf_req needs to be aborted. */
 503         old_fsf_req = req_data->send_fcp_command_task.fsf_req;
 504
 505         dbf_fsf_req = (unsigned long) old_fsf_req;
 506         dbf_timeout =
 507             (jiffies - req_data->send_fcp_command_task.start_jiffies) / HZ;
 508
 509         ZFCP_LOG_DEBUG("old_fsf_req=%p\n", old_fsf_req);
 510         if (!old_fsf_req) {
 511                 write_unlock_irqrestore(&adapter->abort_lock, flags);
 512                 ZFCP_LOG_NORMAL("bug: no old fsf request found\n");
 513                 ZFCP_LOG_NORMAL("req_data:\n");
 514                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
 515                               (char *) req_data, sizeof (union zfcp_req_data));
 516                 ZFCP_LOG_NORMAL("scsi_cmnd:\n");
 517                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
 518                               (char *) scpnt, sizeof (struct scsi_cmnd));
 519                 retval = FAILED;
 520                 strncpy(dbf_result, "##bug:r", ZFCP_ABORT_DBF_LENGTH);
 521                 goto out;
 522         }
 523         old_fsf_req->data.send_fcp_command_task.scsi_cmnd = NULL;
 524         /* mark old request as being aborted */
 525         old_fsf_req->status |= ZFCP_STATUS_FSFREQ_ABORTING;
 526         /*
 527          * We have to collect all information (e.g. unit) needed by
 528          * zfcp_fsf_abort_fcp_command before calling that routine
 529          * since that routine is not allowed to access
 530          * fsf_req which it is going to abort.
 531          * This is because of we need to release fsf_req_list_lock
 532          * before calling zfcp_fsf_abort_fcp_command.
 533          * Since this lock will not be held, fsf_req may complete
 534          * late and may be released meanwhile.
 535          */
 536         ZFCP_LOG_DEBUG("unit 0x%016Lx (%p)\n", unit->fcp_lun, unit);
 537
 538         /*
 539          * We block (call schedule)
 540          * That's why we must release the lock and enable the
 541          * interrupts before.
 542          * On the other hand we do not need the lock anymore since
 543          * all critical accesses to scsi_req are done.
 544          */
 545         write_unlock_irqrestore(&adapter->abort_lock, flags);
 546         /* call FSF routine which does the abort */
 547         new_fsf_req = zfcp_fsf_abort_fcp_command((unsigned long) old_fsf_req,
 548                                                  adapter, unit, 0);
 549         ZFCP_LOG_DEBUG("new_fsf_req=%p\n", new_fsf_req);
 550         if (!new_fsf_req) {
 551                 retval = FAILED;
 552                 ZFCP_LOG_NORMAL("error: initiation of Abort FCP Cmnd "
 553                                 "failed\n");
 554                 strncpy(dbf_result, "##nores", ZFCP_ABORT_DBF_LENGTH);
 555                 goto out;
 556         }
 557
 558         /* wait for completion of abort */
 559         ZFCP_LOG_DEBUG("waiting for cleanup...\n");
 560 #if 1
 561         /*
 562          * FIXME:
 563          * copying zfcp_fsf_req_wait_and_cleanup code is not really nice
 564          */
 565         __wait_event(new_fsf_req->completion_wq,
 566                      new_fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
 567         status = new_fsf_req->status;
 568         dbf_fsf_status = new_fsf_req->qtcb->header.fsf_status;
 569         /*
 570          * Ralphs special debug load provides timestamps in the FSF
 571          * status qualifier. This might be specified later if being
 572          * useful for debugging aborts.
 573          */
 574         dbf_fsf_qual[0] =
 575             *(u64 *) & new_fsf_req->qtcb->header.fsf_status_qual.word[0];
 576         dbf_fsf_qual[1] =
 577             *(u64 *) & new_fsf_req->qtcb->header.fsf_status_qual.word[2];
 578         zfcp_fsf_req_free(new_fsf_req);
 579 #else
 580         retval = zfcp_fsf_req_wait_and_cleanup(new_fsf_req,
 581                                                ZFCP_UNINTERRUPTIBLE, &status);
 582 #endif
 583         ZFCP_LOG_DEBUG("Waiting for cleanup complete, status=0x%x\n", status);
 584         /* status should be valid since signals were not permitted */
 585         if (status & ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED) {
 586                 retval = SUCCESS;
 587                 strncpy(dbf_result, "##succ", ZFCP_ABORT_DBF_LENGTH);
 588         } else if (status & ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED) {
 589                 retval = SUCCESS;
 590                 strncpy(dbf_result, "##late2", ZFCP_ABORT_DBF_LENGTH);
 591         } else {
 592                 retval = FAILED;
 593                 strncpy(dbf_result, "##fail", ZFCP_ABORT_DBF_LENGTH);
 594         }
 595
 596  out:
 597         debug_event(adapter->abort_dbf, 1, &dbf_scsi_cmnd, sizeof (u64));
 598         debug_event(adapter->abort_dbf, 1, &dbf_opcode, ZFCP_ABORT_DBF_LENGTH);
 599         debug_event(adapter->abort_dbf, 1, &dbf_wwn, sizeof (wwn_t));
 600         debug_event(adapter->abort_dbf, 1, &dbf_fcp_lun, sizeof (fcp_lun_t));
 601         debug_event(adapter->abort_dbf, 1, &dbf_retries, sizeof (u64));
 602         debug_event(adapter->abort_dbf, 1, &dbf_allowed, sizeof (u64));
 603         debug_event(adapter->abort_dbf, 1, &dbf_timeout, sizeof (u64));
 604         debug_event(adapter->abort_dbf, 1, &dbf_fsf_req, sizeof (u64));
 605         debug_event(adapter->abort_dbf, 1, &dbf_fsf_status, sizeof (u64));
 606         debug_event(adapter->abort_dbf, 1, &dbf_fsf_qual[0], sizeof (u64));
 607         debug_event(adapter->abort_dbf, 1, &dbf_fsf_qual[1], sizeof (u64));
 608         debug_text_event(adapter->abort_dbf, 1, dbf_result);
 609
 610         spin_lock_irq(scsi_host->host_lock);
 611         return retval;
 612 }
 613
 614 int
 615 zfcp_scsi_eh_abort_handler(struct scsi_cmnd *scpnt)
 616 {
 617         int rc;
 618         struct Scsi_Host *scsi_host = scpnt->device->host;
 619         spin_lock_irq(scsi_host->host_lock);
 620         rc = __zfcp_scsi_eh_abort_handler(scpnt);
 621         spin_unlock_irq(scsi_host->host_lock);
 622         return rc;
 623 }
 624
 625 /*
 626  * function:    zfcp_scsi_eh_device_reset_handler
 627  *
 628  * purpose:
 629  *
 630  * returns:
 631  */
 632 int
 633 zfcp_scsi_eh_device_reset_handler(struct scsi_cmnd *scpnt)
 634 {
 635         int retval;
 636         struct zfcp_unit *unit = (struct zfcp_unit *) scpnt->device->hostdata;
 637
 638         if (!unit) {
 639                 ZFCP_LOG_NORMAL("bug: Tried reset for nonexistent unit\n");
 640                 retval = SUCCESS;
 641                 goto out;
 642         }
 643         ZFCP_LOG_NORMAL("resetting unit 0x%016Lx\n", unit->fcp_lun);
 644
 645         /*
 646          * If we do not know whether the unit supports 'logical unit reset'
 647          * then try 'logical unit reset' and proceed with 'target reset'
 648          * if 'logical unit reset' fails.
 649          * If the unit is known not to support 'logical unit reset' then
 650          * skip 'logical unit reset' and try 'target reset' immediately.
 651          */
 652         if (!atomic_test_mask(ZFCP_STATUS_UNIT_NOTSUPPUNITRESET,
 653                               &unit->status)) {
 654                 retval =
 655                     zfcp_task_management_function(unit, FCP_LOGICAL_UNIT_RESET);
 656                 if (retval) {
 657                         ZFCP_LOG_DEBUG("unit reset failed (unit=%p)\n", unit);
 658                         if (retval == -ENOTSUPP)
 659                                 atomic_set_mask
 660                                     (ZFCP_STATUS_UNIT_NOTSUPPUNITRESET,
 661                                      &unit->status);
 662                         /* fall through and try 'target reset' next */
 663                 } else {
 664                         ZFCP_LOG_DEBUG("unit reset succeeded (unit=%p)\n",
 665                                        unit);
 666                         /* avoid 'target reset' */
 667                         retval = SUCCESS;
 668                         goto out;
 669                 }
 670         }
 671         retval = zfcp_task_management_function(unit, FCP_TARGET_RESET);
 672         if (retval) {
 673                 ZFCP_LOG_DEBUG("target reset failed (unit=%p)\n", unit);
 674                 retval = FAILED;
 675         } else {
 676                 ZFCP_LOG_DEBUG("target reset succeeded (unit=%p)\n", unit);
 677                 retval = SUCCESS;
 678         }
 679  out:
 680         return retval;
 681 }
 682
 683 static int
 684 zfcp_task_management_function(struct zfcp_unit *unit, u8 tm_flags)
 685 {
 686         struct zfcp_adapter *adapter = unit->port->adapter;
 687         int retval;
 688         int status;
 689         struct zfcp_fsf_req *fsf_req;
 690
 691         /* issue task management function */
 692         fsf_req = zfcp_fsf_send_fcp_command_task_management
 693                 (adapter, unit, tm_flags, 0);
 694         if (!fsf_req) {
 695                 ZFCP_LOG_INFO("error: creation of task management request "
 696                               "failed for unit 0x%016Lx on port 0x%016Lx on  "
 697                               "adapter %s\n", unit->fcp_lun, unit->port->wwpn,
 698                               zfcp_get_busid_by_adapter(adapter));
 699                 retval = -ENOMEM;
 700                 goto out;
 701         }
 702
 703         retval = zfcp_fsf_req_wait_and_cleanup(fsf_req,
 704                                                ZFCP_UNINTERRUPTIBLE, &status);
 705         /*
 706          * check completion status of task management function
 707          * (status should always be valid since no signals permitted)
 708          */
 709         if (status & ZFCP_STATUS_FSFREQ_TMFUNCFAILED)
 710                 retval = -EIO;
 711         else if (status & ZFCP_STATUS_FSFREQ_TMFUNCNOTSUPP)
 712                 retval = -ENOTSUPP;
 713         else
 714                 retval = 0;
 715  out:
 716         return retval;
 717 }
 718
 719 /*
 720  * function:    zfcp_scsi_eh_bus_reset_handler
 721  *
 722  * purpose:
 723  *
 724  * returns:
 725  */
 726 int
 727 zfcp_scsi_eh_bus_reset_handler(struct scsi_cmnd *scpnt)
 728 {
 729         int retval = 0;
 730         struct zfcp_unit *unit;
 731
 732         unit = (struct zfcp_unit *) scpnt->device->hostdata;
 733         ZFCP_LOG_NORMAL("bus reset because of problems with "
 734                         "unit 0x%016Lx\n", unit->fcp_lun);
 735         zfcp_erp_adapter_reopen(unit->port->adapter, 0);
 736         zfcp_erp_wait(unit->port->adapter);
 737         retval = SUCCESS;
 738
 739         return retval;
 740 }
 741
 742 /*
 743  * function:    zfcp_scsi_eh_host_reset_handler
 744  *
 745  * purpose:
 746  *
 747  * returns:
 748  */
 749 int
 750 zfcp_scsi_eh_host_reset_handler(struct scsi_cmnd *scpnt)
 751 {
 752         int retval = 0;
 753         struct zfcp_unit *unit;
 754
 755         unit = (struct zfcp_unit *) scpnt->device->hostdata;
 756         ZFCP_LOG_NORMAL("host reset because of problems with "
 757                         "unit 0x%016Lx\n", unit->fcp_lun);
 758         zfcp_erp_adapter_reopen(unit->port->adapter, 0);
 759         zfcp_erp_wait(unit->port->adapter);
 760         retval = SUCCESS;
 761
 762         return retval;
 763 }
 764
 765 /*
 766  * function:
 767  *
 768  * purpose:
 769  *
 770  * returns:
 771  */
 772 int
 773 zfcp_adapter_scsi_register(struct zfcp_adapter *adapter)
 774 {
 775         int retval = 0;
 776         static unsigned int unique_id = 0;
 777
 778         /* register adapter as SCSI host with mid layer of SCSI stack */
 779         adapter->scsi_host = scsi_host_alloc(&zfcp_data.scsi_host_template,
 780                                              sizeof (struct zfcp_adapter *));
 781         if (!adapter->scsi_host) {
 782                 ZFCP_LOG_NORMAL("error: registration with SCSI stack failed "
 783                                 "for adapter %s ",
 784                                 zfcp_get_busid_by_adapter(adapter));
 785                 retval = -EIO;
 786                 goto out;
 787         }
 788         ZFCP_LOG_DEBUG("host registered, scsi_host=%p\n", adapter->scsi_host);
 789
 790         /* tell the SCSI stack some characteristics of this adapter */
 791         adapter->scsi_host->max_id = 1;
 792         adapter->scsi_host->max_lun = 1;
 793         adapter->scsi_host->max_channel = 0;
 794         adapter->scsi_host->unique_id = unique_id++;    /* FIXME */
 795         adapter->scsi_host->max_cmd_len = ZFCP_MAX_SCSI_CMND_LENGTH;
 796         adapter->scsi_host->transportt = zfcp_transport_template;
 797         /*
 798          * Reverse mapping of the host number to avoid race condition
 799          */
 800         adapter->scsi_host_no = adapter->scsi_host->host_no;
 801
 802         /*
 803          * save a pointer to our own adapter data structure within
 804          * hostdata field of SCSI host data structure
 805          */
 806         adapter->scsi_host->hostdata[0] = (unsigned long) adapter;
 807
 808         if (scsi_add_host(adapter->scsi_host, &adapter->ccw_device->dev)) {
 809                 scsi_host_put(adapter->scsi_host);
 810                 retval = -EIO;
 811                 goto out;
 812         }
 813         atomic_set_mask(ZFCP_STATUS_ADAPTER_REGISTERED, &adapter->status);
 814  out:
 815         return retval;
 816 }
 817
 818 /*
 819  * function:
 820  *
 821  * purpose:
 822  *
 823  * returns:
 824  */
 825 void
 826 zfcp_adapter_scsi_unregister(struct zfcp_adapter *adapter)
 827 {
 828         struct Scsi_Host *shost;
 829
 830         shost = adapter->scsi_host;
 831         if (!shost)
 832                 return;
 833         fc_remove_host(shost);
 834         scsi_remove_host(shost);
 835         scsi_host_put(shost);
 836         adapter->scsi_host = NULL;
 837         adapter->scsi_host_no = 0;
 838         atomic_clear_mask(ZFCP_STATUS_ADAPTER_REGISTERED, &adapter->status);
 839
 840         return;
 841 }
 842
 843
 844 void
 845 zfcp_fsf_start_scsi_er_timer(struct zfcp_adapter *adapter)
 846 {
 847         adapter->scsi_er_timer.function = zfcp_fsf_scsi_er_timeout_handler;
 848         adapter->scsi_er_timer.data = (unsigned long) adapter;
 849         adapter->scsi_er_timer.expires = jiffies + ZFCP_SCSI_ER_TIMEOUT;
 850         add_timer(&adapter->scsi_er_timer);
 851 }
 852
 853 /*
 854  * Support functions for FC transport class
 855  */
 856 static void
 857 zfcp_get_port_id(struct scsi_target *starget)
 858 {
 859         struct Scsi_Host *shost = dev_to_shost(starget->dev.parent);
 860         struct zfcp_adapter *adapter = (struct zfcp_adapter *)shost->hostdata[0];
 861         struct zfcp_port *port;
 862         unsigned long flags;
 863
 864         read_lock_irqsave(&zfcp_data.config_lock, flags);
 865         port = zfcp_port_lookup(adapter, starget->channel, starget->id);
 866         if (port)
 867                 fc_starget_port_id(starget) = port->d_id;
 868         else
 869                 fc_starget_port_id(starget) = -1;
 870         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
 871 }
 872
 873 static void
 874 zfcp_get_port_name(struct scsi_target *starget)
 875 {
 876         struct Scsi_Host *shost = dev_to_shost(starget->dev.parent);
 877         struct zfcp_adapter *adapter = (struct zfcp_adapter *)shost->hostdata[0];
 878         struct zfcp_port *port;
 879         unsigned long flags;
 880
 881         read_lock_irqsave(&zfcp_data.config_lock, flags);
 882         port = zfcp_port_lookup(adapter, starget->channel, starget->id);
 883         if (port)
 884                 fc_starget_port_name(starget) = port->wwpn;
 885         else
 886                 fc_starget_port_name(starget) = -1;
 887         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
 888 }
 889
 890 static void
 891 zfcp_get_node_name(struct scsi_target *starget)
 892 {
 893         struct Scsi_Host *shost = dev_to_shost(starget->dev.parent);
 894         struct zfcp_adapter *adapter = (struct zfcp_adapter *)shost->hostdata[0];
 895         struct zfcp_port *port;
 896         unsigned long flags;
 897
 898         read_lock_irqsave(&zfcp_data.config_lock, flags);
 899         port = zfcp_port_lookup(adapter, starget->channel, starget->id);
 900         if (port)
 901                 fc_starget_node_name(starget) = port->wwnn;
 902         else
 903                 fc_starget_node_name(starget) = -1;
 904         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
 905 }
 906
 907 void
 908 zfcp_set_fc_host_attrs(struct zfcp_adapter *adapter)
 909 {
 910         struct Scsi_Host *shost = adapter->scsi_host;
 911
 912         fc_host_node_name(shost) = adapter->wwnn;
 913         fc_host_port_name(shost) = adapter->wwpn;
 914         strncpy(fc_host_serial_number(shost), adapter->serial_number,
 915                 min(FC_SERIAL_NUMBER_SIZE, 32));
 916         fc_host_supported_classes(shost) = FC_COS_CLASS2 | FC_COS_CLASS3;
 917 }
 918
 919 struct fc_function_template zfcp_transport_functions = {
 920         .get_starget_port_id = zfcp_get_port_id,
 921         .get_starget_port_name = zfcp_get_port_name,
 922         .get_starget_node_name = zfcp_get_node_name,
 923         .show_starget_port_id = 1,
 924         .show_starget_port_name = 1,
 925         .show_starget_node_name = 1,
 926         .show_rport_supported_classes = 1,
 927         .show_host_node_name = 1,
 928         .show_host_port_name = 1,
 929         .show_host_supported_classes = 1,
 930         .show_host_serial_number = 1,
 931 };
 932
 933 /**
 934  * ZFCP_DEFINE_SCSI_ATTR
 935  * @_name:   name of show attribute
 936  * @_format: format string
 937  * @_value:  value to print
 938  *
 939  * Generates attribute for a unit.
 940  */
 941 #define ZFCP_DEFINE_SCSI_ATTR(_name, _format, _value)                    \
 942 static ssize_t zfcp_sysfs_scsi_##_name##_show(struct device *dev, struct device_attribute *attr,        \
 943                                               char *buf)                 \
 944 {                                                                        \
 945         struct scsi_device *sdev;                                        \
 946         struct zfcp_unit *unit;                                          \
 947                                                                          \
 948         sdev = to_scsi_device(dev);                                      \
 949         unit = sdev->hostdata;                                           \
 950         return sprintf(buf, _format, _value);                            \
 951 }                                                                        \
 952                                                                          \
 953 static DEVICE_ATTR(_name, S_IRUGO, zfcp_sysfs_scsi_##_name##_show, NULL);
 954
 955 ZFCP_DEFINE_SCSI_ATTR(hba_id, "%s\n", zfcp_get_busid_by_unit(unit));
 956 ZFCP_DEFINE_SCSI_ATTR(wwpn, "0x%016llx\n", unit->port->wwpn);
 957 ZFCP_DEFINE_SCSI_ATTR(fcp_lun, "0x%016llx\n", unit->fcp_lun);
 958
 959 static struct device_attribute *zfcp_sysfs_sdev_attrs[] = {
 960         &dev_attr_fcp_lun,
 961         &dev_attr_wwpn,
 962         &dev_attr_hba_id,
 963         NULL
 964 };
 965
 966 #undef ZFCP_LOG_AREA