drivers/s390/scsi/zfcp_fsf.c

   1 /*
   2  * zfcp device driver
   3  *
   4  * Implementation of FSF commands.
   5  *
   6  * Copyright IBM Corp. 2002, 2015
   7  */
   8
   9 #define KMSG_COMPONENT "zfcp"
  10 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
  11
  12 #include <linux/blktrace_api.h>
  13 #include <linux/slab.h>
  14 #include <scsi/fc/fc_els.h>
  15 #include "zfcp_ext.h"
  16 #include "zfcp_fc.h"
  17 #include "zfcp_dbf.h"
  18 #include "zfcp_qdio.h"
  19 #include "zfcp_reqlist.h"
  20
  21 struct kmem_cache *zfcp_fsf_qtcb_cache;
  22
  23 static void zfcp_fsf_request_timeout_handler(unsigned long data)
  24 {
  25         struct zfcp_adapter *adapter = (struct zfcp_adapter *) data;
  26         zfcp_qdio_siosl(adapter);
  27         zfcp_erp_adapter_reopen(adapter, ZFCP_STATUS_COMMON_ERP_FAILED,
  28                                 "fsrth_1");
  29 }
  30
  31 static void zfcp_fsf_start_timer(struct zfcp_fsf_req *fsf_req,
  32                                  unsigned long timeout)
  33 {
  34         fsf_req->timer.function = zfcp_fsf_request_timeout_handler;
  35         fsf_req->timer.data = (unsigned long) fsf_req->adapter;
  36         fsf_req->timer.expires = jiffies + timeout;
  37         add_timer(&fsf_req->timer);
  38 }
  39
  40 static void zfcp_fsf_start_erp_timer(struct zfcp_fsf_req *fsf_req)
  41 {
  42         BUG_ON(!fsf_req->erp_action);
  43         fsf_req->timer.function = zfcp_erp_timeout_handler;
  44         fsf_req->timer.data = (unsigned long) fsf_req->erp_action;
  45         fsf_req->timer.expires = jiffies + 30 * HZ;
  46         add_timer(&fsf_req->timer);
  47 }
  48
  49 /* association between FSF command and FSF QTCB type */
  50 static u32 fsf_qtcb_type[] = {
  51         [FSF_QTCB_FCP_CMND] =             FSF_IO_COMMAND,
  52         [FSF_QTCB_ABORT_FCP_CMND] =       FSF_SUPPORT_COMMAND,
  53         [FSF_QTCB_OPEN_PORT_WITH_DID] =   FSF_SUPPORT_COMMAND,
  54         [FSF_QTCB_OPEN_LUN] =             FSF_SUPPORT_COMMAND,
  55         [FSF_QTCB_CLOSE_LUN] =            FSF_SUPPORT_COMMAND,
  56         [FSF_QTCB_CLOSE_PORT] =           FSF_SUPPORT_COMMAND,
  57         [FSF_QTCB_CLOSE_PHYSICAL_PORT] =  FSF_SUPPORT_COMMAND,
  58         [FSF_QTCB_SEND_ELS] =             FSF_SUPPORT_COMMAND,
  59         [FSF_QTCB_SEND_GENERIC] =         FSF_SUPPORT_COMMAND,
  60         [FSF_QTCB_EXCHANGE_CONFIG_DATA] = FSF_CONFIG_COMMAND,
  61         [FSF_QTCB_EXCHANGE_PORT_DATA] =   FSF_PORT_COMMAND,
  62         [FSF_QTCB_DOWNLOAD_CONTROL_FILE] = FSF_SUPPORT_COMMAND,
  63         [FSF_QTCB_UPLOAD_CONTROL_FILE] =  FSF_SUPPORT_COMMAND
  64 };
  65
  66 static void zfcp_fsf_class_not_supp(struct zfcp_fsf_req *req)
  67 {
  68         dev_err(&req->adapter->ccw_device->dev, "FCP device not "
  69                 "operational because of an unsupported FC class\n");
  70         zfcp_erp_adapter_shutdown(req->adapter, 0, "fscns_1");
  71         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
  72 }
  73
  74 /**
  75  * zfcp_fsf_req_free - free memory used by fsf request
  76  * @fsf_req: pointer to struct zfcp_fsf_req
  77  */
  78 void zfcp_fsf_req_free(struct zfcp_fsf_req *req)
  79 {
  80         if (likely(req->pool)) {
  81                 if (likely(req->qtcb))
  82                         mempool_free(req->qtcb, req->adapter->pool.qtcb_pool);
  83                 mempool_free(req, req->pool);
  84                 return;
  85         }
  86
  87         if (likely(req->qtcb))
  88                 kmem_cache_free(zfcp_fsf_qtcb_cache, req->qtcb);
  89         kfree(req);
  90 }
  91
  92 static void zfcp_fsf_status_read_port_closed(struct zfcp_fsf_req *req)
  93 {
  94         unsigned long flags;
  95         struct fsf_status_read_buffer *sr_buf = req->data;
  96         struct zfcp_adapter *adapter = req->adapter;
  97         struct zfcp_port *port;
  98         int d_id = ntoh24(sr_buf->d_id);
  99
 100         read_lock_irqsave(&adapter->port_list_lock, flags);
 101         list_for_each_entry(port, &adapter->port_list, list)
 102                 if (port->d_id == d_id) {
 103                         zfcp_erp_port_reopen(port, 0, "fssrpc1");
 104                         break;
 105                 }
 106         read_unlock_irqrestore(&adapter->port_list_lock, flags);
 107 }
 108
 109 static void zfcp_fsf_link_down_info_eval(struct zfcp_fsf_req *req,
 110                                          struct fsf_link_down_info *link_down)
 111 {
 112         struct zfcp_adapter *adapter = req->adapter;
 113
 114         if (atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED)
 115                 return;
 116
 117         atomic_set_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED, &adapter->status);
 118
 119         zfcp_scsi_schedule_rports_block(adapter);
 120
 121         if (!link_down)
 122                 goto out;
 123
 124         switch (link_down->error_code) {
 125         case FSF_PSQ_LINK_NO_LIGHT:
 126                 dev_warn(&req->adapter->ccw_device->dev,
 127                          "There is no light signal from the local "
 128                          "fibre channel cable\n");
 129                 break;
 130         case FSF_PSQ_LINK_WRAP_PLUG:
 131                 dev_warn(&req->adapter->ccw_device->dev,
 132                          "There is a wrap plug instead of a fibre "
 133                          "channel cable\n");
 134                 break;
 135         case FSF_PSQ_LINK_NO_FCP:
 136                 dev_warn(&req->adapter->ccw_device->dev,
 137                          "The adjacent fibre channel node does not "
 138                          "support FCP\n");
 139                 break;
 140         case FSF_PSQ_LINK_FIRMWARE_UPDATE:
 141                 dev_warn(&req->adapter->ccw_device->dev,
 142                          "The FCP device is suspended because of a "
 143                          "firmware update\n");
 144                 break;
 145         case FSF_PSQ_LINK_INVALID_WWPN:
 146                 dev_warn(&req->adapter->ccw_device->dev,
 147                          "The FCP device detected a WWPN that is "
 148                          "duplicate or not valid\n");
 149                 break;
 150         case FSF_PSQ_LINK_NO_NPIV_SUPPORT:
 151                 dev_warn(&req->adapter->ccw_device->dev,
 152                          "The fibre channel fabric does not support NPIV\n");
 153                 break;
 154         case FSF_PSQ_LINK_NO_FCP_RESOURCES:
 155                 dev_warn(&req->adapter->ccw_device->dev,
 156                          "The FCP adapter cannot support more NPIV ports\n");
 157                 break;
 158         case FSF_PSQ_LINK_NO_FABRIC_RESOURCES:
 159                 dev_warn(&req->adapter->ccw_device->dev,
 160                          "The adjacent switch cannot support "
 161                          "more NPIV ports\n");
 162                 break;
 163         case FSF_PSQ_LINK_FABRIC_LOGIN_UNABLE:
 164                 dev_warn(&req->adapter->ccw_device->dev,
 165                          "The FCP adapter could not log in to the "
 166                          "fibre channel fabric\n");
 167                 break;
 168         case FSF_PSQ_LINK_WWPN_ASSIGNMENT_CORRUPTED:
 169                 dev_warn(&req->adapter->ccw_device->dev,
 170                          "The WWPN assignment file on the FCP adapter "
 171                          "has been damaged\n");
 172                 break;
 173         case FSF_PSQ_LINK_MODE_TABLE_CURRUPTED:
 174                 dev_warn(&req->adapter->ccw_device->dev,
 175                          "The mode table on the FCP adapter "
 176                          "has been damaged\n");
 177                 break;
 178         case FSF_PSQ_LINK_NO_WWPN_ASSIGNMENT:
 179                 dev_warn(&req->adapter->ccw_device->dev,
 180                          "All NPIV ports on the FCP adapter have "
 181                          "been assigned\n");
 182                 break;
 183         default:
 184                 dev_warn(&req->adapter->ccw_device->dev,
 185                          "The link between the FCP adapter and "
 186                          "the FC fabric is down\n");
 187         }
 188 out:
 189         zfcp_erp_set_adapter_status(adapter, ZFCP_STATUS_COMMON_ERP_FAILED);
 190 }
 191
 192 static void zfcp_fsf_status_read_link_down(struct zfcp_fsf_req *req)
 193 {
 194         struct fsf_status_read_buffer *sr_buf = req->data;
 195         struct fsf_link_down_info *ldi =
 196                 (struct fsf_link_down_info *) &sr_buf->payload;
 197
 198         switch (sr_buf->status_subtype) {
 199         case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
 200                 zfcp_fsf_link_down_info_eval(req, ldi);
 201                 break;
 202         case FSF_STATUS_READ_SUB_FDISC_FAILED:
 203                 zfcp_fsf_link_down_info_eval(req, ldi);
 204                 break;
 205         case FSF_STATUS_READ_SUB_FIRMWARE_UPDATE:
 206                 zfcp_fsf_link_down_info_eval(req, NULL);
 207         };
 208 }
 209
 210 static void zfcp_fsf_status_read_handler(struct zfcp_fsf_req *req)
 211 {
 212         struct zfcp_adapter *adapter = req->adapter;
 213         struct fsf_status_read_buffer *sr_buf = req->data;
 214
 215         if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
 216                 zfcp_dbf_hba_fsf_uss("fssrh_1", req);
 217                 mempool_free(virt_to_page(sr_buf), adapter->pool.sr_data);
 218                 zfcp_fsf_req_free(req);
 219                 return;
 220         }
 221
 222         zfcp_dbf_hba_fsf_uss("fssrh_4", req);
 223
 224         switch (sr_buf->status_type) {
 225         case FSF_STATUS_READ_PORT_CLOSED:
 226                 zfcp_fsf_status_read_port_closed(req);
 227                 break;
 228         case FSF_STATUS_READ_INCOMING_ELS:
 229                 zfcp_fc_incoming_els(req);
 230                 break;
 231         case FSF_STATUS_READ_SENSE_DATA_AVAIL:
 232                 break;
 233         case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
 234                 dev_warn(&adapter->ccw_device->dev,
 235                          "The error threshold for checksum statistics "
 236                          "has been exceeded\n");
 237                 zfcp_dbf_hba_bit_err("fssrh_3", req);
 238                 break;
 239         case FSF_STATUS_READ_LINK_DOWN:
 240                 zfcp_fsf_status_read_link_down(req);
 241                 zfcp_fc_enqueue_event(adapter, FCH_EVT_LINKDOWN, 0);
 242                 break;
 243         case FSF_STATUS_READ_LINK_UP:
 244                 dev_info(&adapter->ccw_device->dev,
 245                          "The local link has been restored\n");
 246                 /* All ports should be marked as ready to run again */
 247                 zfcp_erp_set_adapter_status(adapter,
 248                                             ZFCP_STATUS_COMMON_RUNNING);
 249                 zfcp_erp_adapter_reopen(adapter,
 250                                         ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
 251                                         ZFCP_STATUS_COMMON_ERP_FAILED,
 252                                         "fssrh_2");
 253                 zfcp_fc_enqueue_event(adapter, FCH_EVT_LINKUP, 0);
 254
 255                 break;
 256         case FSF_STATUS_READ_NOTIFICATION_LOST:
 257                 if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_ACT_UPDATED)
 258                         zfcp_cfdc_adapter_access_changed(adapter);
 259                 if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_INCOMING_ELS)
 260                         queue_work(adapter->work_queue, &adapter->scan_work);
 261                 break;
 262         case FSF_STATUS_READ_CFDC_UPDATED:
 263                 zfcp_cfdc_adapter_access_changed(adapter);
 264                 break;
 265         case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
 266                 adapter->adapter_features = sr_buf->payload.word[0];
 267                 break;
 268         }
 269
 270         mempool_free(virt_to_page(sr_buf), adapter->pool.sr_data);
 271         zfcp_fsf_req_free(req);
 272
 273         atomic_inc(&adapter->stat_miss);
 274         queue_work(adapter->work_queue, &adapter->stat_work);
 275 }
 276
 277 static void zfcp_fsf_fsfstatus_qual_eval(struct zfcp_fsf_req *req)
 278 {
 279         switch (req->qtcb->header.fsf_status_qual.word[0]) {
 280         case FSF_SQ_FCP_RSP_AVAILABLE:
 281         case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
 282         case FSF_SQ_NO_RETRY_POSSIBLE:
 283         case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
 284                 return;
 285         case FSF_SQ_COMMAND_ABORTED:
 286                 break;
 287         case FSF_SQ_NO_RECOM:
 288                 dev_err(&req->adapter->ccw_device->dev,
 289                         "The FCP adapter reported a problem "
 290                         "that cannot be recovered\n");
 291                 zfcp_qdio_siosl(req->adapter);
 292                 zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfsqe1");
 293                 break;
 294         }
 295         /* all non-return stats set FSFREQ_ERROR*/
 296         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 297 }
 298
 299 static void zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *req)
 300 {
 301         if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
 302                 return;
 303
 304         switch (req->qtcb->header.fsf_status) {
 305         case FSF_UNKNOWN_COMMAND:
 306                 dev_err(&req->adapter->ccw_device->dev,
 307                         "The FCP adapter does not recognize the command 0x%x\n",
 308                         req->qtcb->header.fsf_command);
 309                 zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfse_1");
 310                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 311                 break;
 312         case FSF_ADAPTER_STATUS_AVAILABLE:
 313                 zfcp_fsf_fsfstatus_qual_eval(req);
 314                 break;
 315         }
 316 }
 317
 318 static void zfcp_fsf_protstatus_eval(struct zfcp_fsf_req *req)
 319 {
 320         struct zfcp_adapter *adapter = req->adapter;
 321         struct fsf_qtcb *qtcb = req->qtcb;
 322         union fsf_prot_status_qual *psq = &qtcb->prefix.prot_status_qual;
 323
 324         zfcp_dbf_hba_fsf_response(req);
 325
 326         if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
 327                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 328                 return;
 329         }
 330
 331         switch (qtcb->prefix.prot_status) {
 332         case FSF_PROT_GOOD:
 333         case FSF_PROT_FSF_STATUS_PRESENTED:
 334                 return;
 335         case FSF_PROT_QTCB_VERSION_ERROR:
 336                 dev_err(&adapter->ccw_device->dev,
 337                         "QTCB version 0x%x not supported by FCP adapter "
 338                         "(0x%x to 0x%x)\n", FSF_QTCB_CURRENT_VERSION,
 339                         psq->word[0], psq->word[1]);
 340                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_1");
 341                 break;
 342         case FSF_PROT_ERROR_STATE:
 343         case FSF_PROT_SEQ_NUMB_ERROR:
 344                 zfcp_erp_adapter_reopen(adapter, 0, "fspse_2");
 345                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 346                 break;
 347         case FSF_PROT_UNSUPP_QTCB_TYPE:
 348                 dev_err(&adapter->ccw_device->dev,
 349                         "The QTCB type is not supported by the FCP adapter\n");
 350                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_3");
 351                 break;
 352         case FSF_PROT_HOST_CONNECTION_INITIALIZING:
 353                 atomic_set_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
 354                                 &adapter->status);
 355                 break;
 356         case FSF_PROT_DUPLICATE_REQUEST_ID:
 357                 dev_err(&adapter->ccw_device->dev,
 358                         "0x%Lx is an ambiguous request identifier\n",
 359                         (unsigned long long)qtcb->bottom.support.req_handle);
 360                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_4");
 361                 break;
 362         case FSF_PROT_LINK_DOWN:
 363                 zfcp_fsf_link_down_info_eval(req, &psq->link_down_info);
 364                 /* go through reopen to flush pending requests */
 365                 zfcp_erp_adapter_reopen(adapter, 0, "fspse_6");
 366                 break;
 367         case FSF_PROT_REEST_QUEUE:
 368                 /* All ports should be marked as ready to run again */
 369                 zfcp_erp_set_adapter_status(adapter,
 370                                             ZFCP_STATUS_COMMON_RUNNING);
 371                 zfcp_erp_adapter_reopen(adapter,
 372                                         ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
 373                                         ZFCP_STATUS_COMMON_ERP_FAILED,
 374                                         "fspse_8");
 375                 break;
 376         default:
 377                 dev_err(&adapter->ccw_device->dev,
 378                         "0x%x is not a valid transfer protocol status\n",
 379                         qtcb->prefix.prot_status);
 380                 zfcp_qdio_siosl(adapter);
 381                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_9");
 382         }
 383         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 384 }
 385
 386 /**
 387  * zfcp_fsf_req_complete - process completion of a FSF request
 388  * @fsf_req: The FSF request that has been completed.
 389  *
 390  * When a request has been completed either from the FCP adapter,
 391  * or it has been dismissed due to a queue shutdown, this function
 392  * is called to process the completion status and trigger further
 393  * events related to the FSF request.
 394  */
 395 static void zfcp_fsf_req_complete(struct zfcp_fsf_req *req)
 396 {
 397         if (unlikely(req->fsf_command == FSF_QTCB_UNSOLICITED_STATUS)) {
 398                 zfcp_fsf_status_read_handler(req);
 399                 return;
 400         }
 401
 402         del_timer(&req->timer);
 403         zfcp_fsf_protstatus_eval(req);
 404         zfcp_fsf_fsfstatus_eval(req);
 405         req->handler(req);
 406
 407         if (req->erp_action)
 408                 zfcp_erp_notify(req->erp_action, 0);
 409
 410         if (likely(req->status & ZFCP_STATUS_FSFREQ_CLEANUP))
 411                 zfcp_fsf_req_free(req);
 412         else
 413                 complete(&req->completion);
 414 }
 415
 416 /**
 417  * zfcp_fsf_req_dismiss_all - dismiss all fsf requests
 418  * @adapter: pointer to struct zfcp_adapter
 419  *
 420  * Never ever call this without shutting down the adapter first.
 421  * Otherwise the adapter would continue using and corrupting s390 storage.
 422  * Included BUG_ON() call to ensure this is done.
 423  * ERP is supposed to be the only user of this function.
 424  */
 425 void zfcp_fsf_req_dismiss_all(struct zfcp_adapter *adapter)
 426 {
 427         struct zfcp_fsf_req *req, *tmp;
 428         LIST_HEAD(remove_queue);
 429
 430         BUG_ON(atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_QDIOUP);
 431         zfcp_reqlist_move(adapter->req_list, &remove_queue);
 432
 433         list_for_each_entry_safe(req, tmp, &remove_queue, list) {
 434                 list_del(&req->list);
 435                 req->status |= ZFCP_STATUS_FSFREQ_DISMISSED;
 436                 zfcp_fsf_req_complete(req);
 437         }
 438 }
 439
 440 static int zfcp_fsf_exchange_config_evaluate(struct zfcp_fsf_req *req)
 441 {
 442         struct fsf_qtcb_bottom_config *bottom = &req->qtcb->bottom.config;
 443         struct zfcp_adapter *adapter = req->adapter;
 444         struct Scsi_Host *shost = adapter->scsi_host;
 445         struct fc_els_flogi *nsp, *plogi;
 446
 447         /* adjust pointers for missing command code */
 448         nsp = (struct fc_els_flogi *) ((u8 *)&bottom->nport_serv_param
 449                                         - sizeof(u32));
 450         plogi = (struct fc_els_flogi *) ((u8 *)&bottom->plogi_payload
 451                                         - sizeof(u32));
 452
 453         if (req->data)
 454                 memcpy(req->data, bottom, sizeof(*bottom));
 455
 456         fc_host_port_name(shost) = nsp->fl_wwpn;
 457         fc_host_node_name(shost) = nsp->fl_wwnn;
 458         fc_host_supported_classes(shost) = FC_COS_CLASS2 | FC_COS_CLASS3;
 459
 460         adapter->timer_ticks = bottom->timer_interval & ZFCP_FSF_TIMER_INT_MASK;
 461         adapter->stat_read_buf_num = max(bottom->status_read_buf_num,
 462                                          (u16)FSF_STATUS_READS_RECOM);
 463
 464         if (fc_host_permanent_port_name(shost) == -1)
 465                 fc_host_permanent_port_name(shost) = fc_host_port_name(shost);
 466
 467         zfcp_scsi_set_prot(adapter);
 468
 469         /* no error return above here, otherwise must fix call chains */
 470         /* do not evaluate invalid fields */
 471         if (req->qtcb->header.fsf_status == FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE)
 472                 return 0;
 473
 474         fc_host_port_id(shost) = ntoh24(bottom->s_id);
 475         fc_host_speed(shost) = bottom->fc_link_speed;
 476
 477         adapter->hydra_version = bottom->adapter_type;
 478
 479         switch (bottom->fc_topology) {
 480         case FSF_TOPO_P2P:
 481                 adapter->peer_d_id = ntoh24(bottom->peer_d_id);
 482                 adapter->peer_wwpn = plogi->fl_wwpn;
 483                 adapter->peer_wwnn = plogi->fl_wwnn;
 484                 fc_host_port_type(shost) = FC_PORTTYPE_PTP;
 485                 break;
 486         case FSF_TOPO_FABRIC:
 487                 if (bottom->connection_features & FSF_FEATURE_NPIV_MODE)
 488                         fc_host_port_type(shost) = FC_PORTTYPE_NPIV;
 489                 else
 490                         fc_host_port_type(shost) = FC_PORTTYPE_NPORT;
 491                 break;
 492         case FSF_TOPO_AL:
 493                 fc_host_port_type(shost) = FC_PORTTYPE_NLPORT;
 494                 /* fall through */
 495         default:
 496                 dev_err(&adapter->ccw_device->dev,
 497                         "Unknown or unsupported arbitrated loop "
 498                         "fibre channel topology detected\n");
 499                 zfcp_erp_adapter_shutdown(adapter, 0, "fsece_1");
 500                 return -EIO;
 501         }
 502
 503         return 0;
 504 }
 505
 506 static void zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *req)
 507 {
 508         struct zfcp_adapter *adapter = req->adapter;
 509         struct fsf_qtcb *qtcb = req->qtcb;
 510         struct fsf_qtcb_bottom_config *bottom = &qtcb->bottom.config;
 511         struct Scsi_Host *shost = adapter->scsi_host;
 512
 513         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
 514                 return;
 515
 516         adapter->fsf_lic_version = bottom->lic_version;
 517         adapter->adapter_features = bottom->adapter_features;
 518         adapter->connection_features = bottom->connection_features;
 519         adapter->peer_wwpn = 0;
 520         adapter->peer_wwnn = 0;
 521         adapter->peer_d_id = 0;
 522
 523         switch (qtcb->header.fsf_status) {
 524         case FSF_GOOD:
 525                 if (zfcp_fsf_exchange_config_evaluate(req))
 526                         return;
 527
 528                 if (bottom->max_qtcb_size < sizeof(struct fsf_qtcb)) {
 529                         dev_err(&adapter->ccw_device->dev,
 530                                 "FCP adapter maximum QTCB size (%d bytes) "
 531                                 "is too small\n",
 532                                 bottom->max_qtcb_size);
 533                         zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh1");
 534                         return;
 535                 }
 536                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
 537                                 &adapter->status);
 538                 break;
 539         case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
 540                 fc_host_node_name(shost) = 0;
 541                 fc_host_port_name(shost) = 0;
 542                 fc_host_port_id(shost) = 0;
 543                 fc_host_speed(shost) = FC_PORTSPEED_UNKNOWN;
 544                 fc_host_port_type(shost) = FC_PORTTYPE_UNKNOWN;
 545                 adapter->hydra_version = 0;
 546
 547                 /* avoids adapter shutdown to be able to recognize
 548                  * events such as LINK UP */
 549                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
 550                                 &adapter->status);
 551                 zfcp_fsf_link_down_info_eval(req,
 552                         &qtcb->header.fsf_status_qual.link_down_info);
 553                 if (zfcp_fsf_exchange_config_evaluate(req))
 554                         return;
 555                 break;
 556         default:
 557                 zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh3");
 558                 return;
 559         }
 560
 561         if (adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT) {
 562                 adapter->hardware_version = bottom->hardware_version;
 563                 memcpy(fc_host_serial_number(shost), bottom->serial_number,
 564                        min(FC_SERIAL_NUMBER_SIZE, 17));
 565                 EBCASC(fc_host_serial_number(shost),
 566                        min(FC_SERIAL_NUMBER_SIZE, 17));
 567         }
 568
 569         if (FSF_QTCB_CURRENT_VERSION < bottom->low_qtcb_version) {
 570                 dev_err(&adapter->ccw_device->dev,
 571                         "The FCP adapter only supports newer "
 572                         "control block versions\n");
 573                 zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh4");
 574                 return;
 575         }
 576         if (FSF_QTCB_CURRENT_VERSION > bottom->high_qtcb_version) {
 577                 dev_err(&adapter->ccw_device->dev,
 578                         "The FCP adapter only supports older "
 579                         "control block versions\n");
 580                 zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh5");
 581         }
 582 }
 583
 584 static void zfcp_fsf_exchange_port_evaluate(struct zfcp_fsf_req *req)
 585 {
 586         struct zfcp_adapter *adapter = req->adapter;
 587         struct fsf_qtcb_bottom_port *bottom = &req->qtcb->bottom.port;
 588         struct Scsi_Host *shost = adapter->scsi_host;
 589
 590         if (req->data)
 591                 memcpy(req->data, bottom, sizeof(*bottom));
 592
 593         if (adapter->connection_features & FSF_FEATURE_NPIV_MODE) {
 594                 fc_host_permanent_port_name(shost) = bottom->wwpn;
 595         } else
 596                 fc_host_permanent_port_name(shost) = fc_host_port_name(shost);
 597         fc_host_maxframe_size(shost) = bottom->maximum_frame_size;
 598         fc_host_supported_speeds(shost) = bottom->supported_speed;
 599         memcpy(fc_host_supported_fc4s(shost), bottom->supported_fc4_types,
 600                FC_FC4_LIST_SIZE);
 601         memcpy(fc_host_active_fc4s(shost), bottom->active_fc4_types,
 602                FC_FC4_LIST_SIZE);
 603 }
 604
 605 static void zfcp_fsf_exchange_port_data_handler(struct zfcp_fsf_req *req)
 606 {
 607         struct fsf_qtcb *qtcb = req->qtcb;
 608
 609         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
 610                 return;
 611
 612         switch (qtcb->header.fsf_status) {
 613         case FSF_GOOD:
 614                 zfcp_fsf_exchange_port_evaluate(req);
 615                 break;
 616         case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
 617                 zfcp_fsf_exchange_port_evaluate(req);
 618                 zfcp_fsf_link_down_info_eval(req,
 619                         &qtcb->header.fsf_status_qual.link_down_info);
 620                 break;
 621         }
 622 }
 623
 624 static struct zfcp_fsf_req *zfcp_fsf_alloc(mempool_t *pool)
 625 {
 626         struct zfcp_fsf_req *req;
 627
 628         if (likely(pool))
 629                 req = mempool_alloc(pool, GFP_ATOMIC);
 630         else
 631                 req = kmalloc(sizeof(*req), GFP_ATOMIC);
 632
 633         if (unlikely(!req))
 634                 return NULL;
 635
 636         memset(req, 0, sizeof(*req));
 637         req->pool = pool;
 638         return req;
 639 }
 640
 641 static struct fsf_qtcb *zfcp_qtcb_alloc(mempool_t *pool)
 642 {
 643         struct fsf_qtcb *qtcb;
 644
 645         if (likely(pool))
 646                 qtcb = mempool_alloc(pool, GFP_ATOMIC);
 647         else
 648                 qtcb = kmem_cache_alloc(zfcp_fsf_qtcb_cache, GFP_ATOMIC);
 649
 650         if (unlikely(!qtcb))
 651                 return NULL;
 652
 653         memset(qtcb, 0, sizeof(*qtcb));
 654         return qtcb;
 655 }
 656
 657 static struct zfcp_fsf_req *zfcp_fsf_req_create(struct zfcp_qdio *qdio,
 658                                                 u32 fsf_cmd, u8 sbtype,
 659                                                 mempool_t *pool)
 660 {
 661         struct zfcp_adapter *adapter = qdio->adapter;
 662         struct zfcp_fsf_req *req = zfcp_fsf_alloc(pool);
 663
 664         if (unlikely(!req))
 665                 return ERR_PTR(-ENOMEM);
 666
 667         if (adapter->req_no == 0)
 668                 adapter->req_no++;
 669
 670         INIT_LIST_HEAD(&req->list);
 671         init_timer(&req->timer);
 672         init_completion(&req->completion);
 673
 674         req->adapter = adapter;
 675         req->fsf_command = fsf_cmd;
 676         req->req_id = adapter->req_no;
 677
 678         if (likely(fsf_cmd != FSF_QTCB_UNSOLICITED_STATUS)) {
 679                 if (likely(pool))
 680                         req->qtcb = zfcp_qtcb_alloc(adapter->pool.qtcb_pool);
 681                 else
 682                         req->qtcb = zfcp_qtcb_alloc(NULL);
 683
 684                 if (unlikely(!req->qtcb)) {
 685                         zfcp_fsf_req_free(req);
 686                         return ERR_PTR(-ENOMEM);
 687                 }
 688
 689                 req->seq_no = adapter->fsf_req_seq_no;
 690                 req->qtcb->prefix.req_seq_no = adapter->fsf_req_seq_no;
 691                 req->qtcb->prefix.req_id = req->req_id;
 692                 req->qtcb->prefix.ulp_info = 26;
 693                 req->qtcb->prefix.qtcb_type = fsf_qtcb_type[req->fsf_command];
 694                 req->qtcb->prefix.qtcb_version = FSF_QTCB_CURRENT_VERSION;
 695                 req->qtcb->header.req_handle = req->req_id;
 696                 req->qtcb->header.fsf_command = req->fsf_command;
 697         }
 698
 699         zfcp_qdio_req_init(adapter->qdio, &req->qdio_req, req->req_id, sbtype,
 700                            req->qtcb, sizeof(struct fsf_qtcb));
 701
 702         return req;
 703 }
 704
 705 static int zfcp_fsf_req_send(struct zfcp_fsf_req *req)
 706 {
 707         struct zfcp_adapter *adapter = req->adapter;
 708         struct zfcp_qdio *qdio = adapter->qdio;
 709         int with_qtcb = (req->qtcb != NULL);
 710         int req_id = req->req_id;
 711
 712         zfcp_reqlist_add(adapter->req_list, req);
 713
 714         req->qdio_req.qdio_outb_usage = atomic_read(&qdio->req_q_free);
 715         req->issued = get_clock();
 716         if (zfcp_qdio_send(qdio, &req->qdio_req)) {
 717                 del_timer(&req->timer);
 718                 /* lookup request again, list might have changed */
 719                 zfcp_reqlist_find_rm(adapter->req_list, req_id);
 720                 zfcp_erp_adapter_reopen(adapter, 0, "fsrs__1");
 721                 return -EIO;
 722         }
 723
 724         /* Don't increase for unsolicited status */
 725         if (with_qtcb)
 726                 adapter->fsf_req_seq_no++;
 727         adapter->req_no++;
 728
 729         return 0;
 730 }
 731
 732 /**
 733  * zfcp_fsf_status_read - send status read request
 734  * @adapter: pointer to struct zfcp_adapter
 735  * @req_flags: request flags
 736  * Returns: 0 on success, ERROR otherwise
 737  */
 738 int zfcp_fsf_status_read(struct zfcp_qdio *qdio)
 739 {
 740         struct zfcp_adapter *adapter = qdio->adapter;
 741         struct zfcp_fsf_req *req;
 742         struct fsf_status_read_buffer *sr_buf;
 743         struct page *page;
 744         int retval = -EIO;
 745
 746         spin_lock_irq(&qdio->req_q_lock);
 747         if (zfcp_qdio_sbal_get(qdio))
 748                 goto out;
 749
 750         req = zfcp_fsf_req_create(qdio, FSF_QTCB_UNSOLICITED_STATUS, 0,
 751                                   adapter->pool.status_read_req);
 752         if (IS_ERR(req)) {
 753                 retval = PTR_ERR(req);
 754                 goto out;
 755         }
 756
 757         page = mempool_alloc(adapter->pool.sr_data, GFP_ATOMIC);
 758         if (!page) {
 759                 retval = -ENOMEM;
 760                 goto failed_buf;
 761         }
 762         sr_buf = page_address(page);
 763         memset(sr_buf, 0, sizeof(*sr_buf));
 764         req->data = sr_buf;
 765
 766         zfcp_qdio_fill_next(qdio, &req->qdio_req, sr_buf, sizeof(*sr_buf));
 767         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
 768
 769         retval = zfcp_fsf_req_send(req);
 770         if (retval)
 771                 goto failed_req_send;
 772
 773         goto out;
 774
 775 failed_req_send:
 776         req->data = NULL;
 777         mempool_free(virt_to_page(sr_buf), adapter->pool.sr_data);
 778 failed_buf:
 779         zfcp_dbf_hba_fsf_uss("fssr__1", req);
 780         zfcp_fsf_req_free(req);
 781 out:
 782         spin_unlock_irq(&qdio->req_q_lock);
 783         return retval;
 784 }
 785
 786 static void zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *req)
 787 {
 788         struct scsi_device *sdev = req->data;
 789         struct zfcp_scsi_dev *zfcp_sdev;
 790         union fsf_status_qual *fsq = &req->qtcb->header.fsf_status_qual;
 791
 792         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
 793                 return;
 794
 795         zfcp_sdev = sdev_to_zfcp(sdev);
 796
 797         switch (req->qtcb->header.fsf_status) {
 798         case FSF_PORT_HANDLE_NOT_VALID:
 799                 if (fsq->word[0] == fsq->word[1]) {
 800                         zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0,
 801                                                 "fsafch1");
 802                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 803                 }
 804                 break;
 805         case FSF_LUN_HANDLE_NOT_VALID:
 806                 if (fsq->word[0] == fsq->word[1]) {
 807                         zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fsafch2");
 808                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 809                 }
 810                 break;
 811         case FSF_FCP_COMMAND_DOES_NOT_EXIST:
 812                 req->status |= ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED;
 813                 break;
 814         case FSF_PORT_BOXED:
 815                 zfcp_erp_set_port_status(zfcp_sdev->port,
 816                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
 817                 zfcp_erp_port_reopen(zfcp_sdev->port,
 818                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fsafch3");
 819                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 820                 break;
 821         case FSF_LUN_BOXED:
 822                 zfcp_erp_set_lun_status(sdev, ZFCP_STATUS_COMMON_ACCESS_BOXED);
 823                 zfcp_erp_lun_reopen(sdev, ZFCP_STATUS_COMMON_ERP_FAILED,
 824                                     "fsafch4");
 825                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 826                 break;
 827         case FSF_ADAPTER_STATUS_AVAILABLE:
 828                 switch (fsq->word[0]) {
 829                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
 830                         zfcp_fc_test_link(zfcp_sdev->port);
 831                         /* fall through */
 832                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
 833                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 834                         break;
 835                 }
 836                 break;
 837         case FSF_GOOD:
 838                 req->status |= ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED;
 839                 break;
 840         }
 841 }
 842
 843 /**
 844  * zfcp_fsf_abort_fcp_cmnd - abort running SCSI command
 845  * @scmnd: The SCSI command to abort
 846  * Returns: pointer to struct zfcp_fsf_req
 847  */
 848
 849 struct zfcp_fsf_req *zfcp_fsf_abort_fcp_cmnd(struct scsi_cmnd *scmnd)
 850 {
 851         struct zfcp_fsf_req *req = NULL;
 852         struct scsi_device *sdev = scmnd->device;
 853         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
 854         struct zfcp_qdio *qdio = zfcp_sdev->port->adapter->qdio;
 855         unsigned long old_req_id = (unsigned long) scmnd->host_scribble;
 856
 857         spin_lock_irq(&qdio->req_q_lock);
 858         if (zfcp_qdio_sbal_get(qdio))
 859                 goto out;
 860         req = zfcp_fsf_req_create(qdio, FSF_QTCB_ABORT_FCP_CMND,
 861                                   SBAL_SFLAGS0_TYPE_READ,
 862                                   qdio->adapter->pool.scsi_abort);
 863         if (IS_ERR(req)) {
 864                 req = NULL;
 865                 goto out;
 866         }
 867
 868         if (unlikely(!(atomic_read(&zfcp_sdev->status) &
 869                        ZFCP_STATUS_COMMON_UNBLOCKED)))
 870                 goto out_error_free;
 871
 872         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
 873
 874         req->data = sdev;
 875         req->handler = zfcp_fsf_abort_fcp_command_handler;
 876         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
 877         req->qtcb->header.port_handle = zfcp_sdev->port->handle;
 878         req->qtcb->bottom.support.req_handle = (u64) old_req_id;
 879
 880         zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
 881         if (!zfcp_fsf_req_send(req))
 882                 goto out;
 883
 884 out_error_free:
 885         zfcp_fsf_req_free(req);
 886         req = NULL;
 887 out:
 888         spin_unlock_irq(&qdio->req_q_lock);
 889         return req;
 890 }
 891
 892 static void zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *req)
 893 {
 894         struct zfcp_adapter *adapter = req->adapter;
 895         struct zfcp_fsf_ct_els *ct = req->data;
 896         struct fsf_qtcb_header *header = &req->qtcb->header;
 897
 898         ct->status = -EINVAL;
 899
 900         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
 901                 goto skip_fsfstatus;
 902
 903         switch (header->fsf_status) {
 904         case FSF_GOOD:
 905                 zfcp_dbf_san_res("fsscth2", req);
 906                 ct->status = 0;
 907                 break;
 908         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
 909                 zfcp_fsf_class_not_supp(req);
 910                 break;
 911         case FSF_ADAPTER_STATUS_AVAILABLE:
 912                 switch (header->fsf_status_qual.word[0]){
 913                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
 914                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
 915                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 916                         break;
 917                 }
 918                 break;
 919         case FSF_ACCESS_DENIED:
 920                 break;
 921         case FSF_PORT_BOXED:
 922                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 923                 break;
 924         case FSF_PORT_HANDLE_NOT_VALID:
 925                 zfcp_erp_adapter_reopen(adapter, 0, "fsscth1");
 926                 /* fall through */
 927         case FSF_GENERIC_COMMAND_REJECTED:
 928         case FSF_PAYLOAD_SIZE_MISMATCH:
 929         case FSF_REQUEST_SIZE_TOO_LARGE:
 930         case FSF_RESPONSE_SIZE_TOO_LARGE:
 931         case FSF_SBAL_MISMATCH:
 932                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 933                 break;
 934         }
 935
 936 skip_fsfstatus:
 937         if (ct->handler)
 938                 ct->handler(ct->handler_data);
 939 }
 940
 941 static void zfcp_fsf_setup_ct_els_unchained(struct zfcp_qdio *qdio,
 942                                             struct zfcp_qdio_req *q_req,
 943                                             struct scatterlist *sg_req,
 944                                             struct scatterlist *sg_resp)
 945 {
 946         zfcp_qdio_fill_next(qdio, q_req, sg_virt(sg_req), sg_req->length);
 947         zfcp_qdio_fill_next(qdio, q_req, sg_virt(sg_resp), sg_resp->length);
 948         zfcp_qdio_set_sbale_last(qdio, q_req);
 949 }
 950
 951 static int zfcp_fsf_setup_ct_els_sbals(struct zfcp_fsf_req *req,
 952                                        struct scatterlist *sg_req,
 953                                        struct scatterlist *sg_resp)
 954 {
 955         struct zfcp_adapter *adapter = req->adapter;
 956         struct zfcp_qdio *qdio = adapter->qdio;
 957         struct fsf_qtcb *qtcb = req->qtcb;
 958         u32 feat = adapter->adapter_features;
 959
 960         if (zfcp_adapter_multi_buffer_active(adapter)) {
 961                 if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_req))
 962                         return -EIO;
 963                 qtcb->bottom.support.req_buf_length =
 964                         zfcp_qdio_real_bytes(sg_req);
 965                 if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_resp))
 966                         return -EIO;
 967                 qtcb->bottom.support.resp_buf_length =
 968                         zfcp_qdio_real_bytes(sg_resp);
 969
 970                 zfcp_qdio_set_data_div(qdio, &req->qdio_req,
 971                                         zfcp_qdio_sbale_count(sg_req));
 972                 zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
 973                 zfcp_qdio_set_scount(qdio, &req->qdio_req);
 974                 return 0;
 975         }
 976
 977         /* use single, unchained SBAL if it can hold the request */
 978         if (zfcp_qdio_sg_one_sbale(sg_req) && zfcp_qdio_sg_one_sbale(sg_resp)) {
 979                 zfcp_fsf_setup_ct_els_unchained(qdio, &req->qdio_req,
 980                                                 sg_req, sg_resp);
 981                 return 0;
 982         }
 983
 984         if (!(feat & FSF_FEATURE_ELS_CT_CHAINED_SBALS))
 985                 return -EOPNOTSUPP;
 986
 987         if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_req))
 988                 return -EIO;
 989
 990         qtcb->bottom.support.req_buf_length = zfcp_qdio_real_bytes(sg_req);
 991
 992         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
 993         zfcp_qdio_skip_to_last_sbale(qdio, &req->qdio_req);
 994
 995         if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_resp))
 996                 return -EIO;
 997
 998         qtcb->bottom.support.resp_buf_length = zfcp_qdio_real_bytes(sg_resp);
 999
1000         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1001
1002         return 0;
1003 }
1004
1005 static int zfcp_fsf_setup_ct_els(struct zfcp_fsf_req *req,
1006                                  struct scatterlist *sg_req,
1007                                  struct scatterlist *sg_resp,
1008                                  unsigned int timeout)
1009 {
1010         int ret;
1011
1012         ret = zfcp_fsf_setup_ct_els_sbals(req, sg_req, sg_resp);
1013         if (ret)
1014                 return ret;
1015
1016         /* common settings for ct/gs and els requests */
1017         if (timeout > 255)
1018                 timeout = 255; /* max value accepted by hardware */
1019         req->qtcb->bottom.support.service_class = FSF_CLASS_3;
1020         req->qtcb->bottom.support.timeout = timeout;
1021         zfcp_fsf_start_timer(req, (timeout + 10) * HZ);
1022
1023         return 0;
1024 }
1025
1026 /**
1027  * zfcp_fsf_send_ct - initiate a Generic Service request (FC-GS)
1028  * @ct: pointer to struct zfcp_send_ct with data for request
1029  * @pool: if non-null this mempool is used to allocate struct zfcp_fsf_req
1030  */
1031 int zfcp_fsf_send_ct(struct zfcp_fc_wka_port *wka_port,
1032                      struct zfcp_fsf_ct_els *ct, mempool_t *pool,
1033                      unsigned int timeout)
1034 {
1035         struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1036         struct zfcp_fsf_req *req;
1037         int ret = -EIO;
1038
1039         spin_lock_irq(&qdio->req_q_lock);
1040         if (zfcp_qdio_sbal_get(qdio))
1041                 goto out;
1042
1043         req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_GENERIC,
1044                                   SBAL_SFLAGS0_TYPE_WRITE_READ, pool);
1045
1046         if (IS_ERR(req)) {
1047                 ret = PTR_ERR(req);
1048                 goto out;
1049         }
1050
1051         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1052         ret = zfcp_fsf_setup_ct_els(req, ct->req, ct->resp, timeout);
1053         if (ret)
1054                 goto failed_send;
1055
1056         req->handler = zfcp_fsf_send_ct_handler;
1057         req->qtcb->header.port_handle = wka_port->handle;
1058         req->data = ct;
1059
1060         zfcp_dbf_san_req("fssct_1", req, wka_port->d_id);
1061
1062         ret = zfcp_fsf_req_send(req);
1063         if (ret)
1064                 goto failed_send;
1065
1066         goto out;
1067
1068 failed_send:
1069         zfcp_fsf_req_free(req);
1070 out:
1071         spin_unlock_irq(&qdio->req_q_lock);
1072         return ret;
1073 }
1074
1075 static void zfcp_fsf_send_els_handler(struct zfcp_fsf_req *req)
1076 {
1077         struct zfcp_fsf_ct_els *send_els = req->data;
1078         struct zfcp_port *port = send_els->port;
1079         struct fsf_qtcb_header *header = &req->qtcb->header;
1080
1081         send_els->status = -EINVAL;
1082
1083         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1084                 goto skip_fsfstatus;
1085
1086         switch (header->fsf_status) {
1087         case FSF_GOOD:
1088                 zfcp_dbf_san_res("fsselh1", req);
1089                 send_els->status = 0;
1090                 break;
1091         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
1092                 zfcp_fsf_class_not_supp(req);
1093                 break;
1094         case FSF_ADAPTER_STATUS_AVAILABLE:
1095                 switch (header->fsf_status_qual.word[0]){
1096                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1097                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1098                 case FSF_SQ_RETRY_IF_POSSIBLE:
1099                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1100                         break;
1101                 }
1102                 break;
1103         case FSF_ELS_COMMAND_REJECTED:
1104         case FSF_PAYLOAD_SIZE_MISMATCH:
1105         case FSF_REQUEST_SIZE_TOO_LARGE:
1106         case FSF_RESPONSE_SIZE_TOO_LARGE:
1107                 break;
1108         case FSF_ACCESS_DENIED:
1109                 if (port) {
1110                         zfcp_cfdc_port_denied(port, &header->fsf_status_qual);
1111                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1112                 }
1113                 break;
1114         case FSF_SBAL_MISMATCH:
1115                 /* should never occur, avoided in zfcp_fsf_send_els */
1116                 /* fall through */
1117         default:
1118                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1119                 break;
1120         }
1121 skip_fsfstatus:
1122         if (send_els->handler)
1123                 send_els->handler(send_els->handler_data);
1124 }
1125
1126 /**
1127  * zfcp_fsf_send_els - initiate an ELS command (FC-FS)
1128  * @els: pointer to struct zfcp_send_els with data for the command
1129  */
1130 int zfcp_fsf_send_els(struct zfcp_adapter *adapter, u32 d_id,
1131                       struct zfcp_fsf_ct_els *els, unsigned int timeout)
1132 {
1133         struct zfcp_fsf_req *req;
1134         struct zfcp_qdio *qdio = adapter->qdio;
1135         int ret = -EIO;
1136
1137         spin_lock_irq(&qdio->req_q_lock);
1138         if (zfcp_qdio_sbal_get(qdio))
1139                 goto out;
1140
1141         req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_ELS,
1142                                   SBAL_SFLAGS0_TYPE_WRITE_READ, NULL);
1143
1144         if (IS_ERR(req)) {
1145                 ret = PTR_ERR(req);
1146                 goto out;
1147         }
1148
1149         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1150
1151         if (!zfcp_adapter_multi_buffer_active(adapter))
1152                 zfcp_qdio_sbal_limit(qdio, &req->qdio_req, 2);
1153
1154         ret = zfcp_fsf_setup_ct_els(req, els->req, els->resp, timeout);
1155
1156         if (ret)
1157                 goto failed_send;
1158
1159         hton24(req->qtcb->bottom.support.d_id, d_id);
1160         req->handler = zfcp_fsf_send_els_handler;
1161         req->data = els;
1162
1163         zfcp_dbf_san_req("fssels1", req, d_id);
1164
1165         ret = zfcp_fsf_req_send(req);
1166         if (ret)
1167                 goto failed_send;
1168
1169         goto out;
1170
1171 failed_send:
1172         zfcp_fsf_req_free(req);
1173 out:
1174         spin_unlock_irq(&qdio->req_q_lock);
1175         return ret;
1176 }
1177
1178 int zfcp_fsf_exchange_config_data(struct zfcp_erp_action *erp_action)
1179 {
1180         struct zfcp_fsf_req *req;
1181         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1182         int retval = -EIO;
1183
1184         spin_lock_irq(&qdio->req_q_lock);
1185         if (zfcp_qdio_sbal_get(qdio))
1186                 goto out;
1187
1188         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA,
1189                                   SBAL_SFLAGS0_TYPE_READ,
1190                                   qdio->adapter->pool.erp_req);
1191
1192         if (IS_ERR(req)) {
1193                 retval = PTR_ERR(req);
1194                 goto out;
1195         }
1196
1197         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1198         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1199
1200         req->qtcb->bottom.config.feature_selection =
1201                         FSF_FEATURE_CFDC |
1202                         FSF_FEATURE_LUN_SHARING |
1203                         FSF_FEATURE_NOTIFICATION_LOST |
1204                         FSF_FEATURE_UPDATE_ALERT;
1205         req->erp_action = erp_action;
1206         req->handler = zfcp_fsf_exchange_config_data_handler;
1207         erp_action->fsf_req_id = req->req_id;
1208
1209         zfcp_fsf_start_erp_timer(req);
1210         retval = zfcp_fsf_req_send(req);
1211         if (retval) {
1212                 zfcp_fsf_req_free(req);
1213                 erp_action->fsf_req_id = 0;
1214         }
1215 out:
1216         spin_unlock_irq(&qdio->req_q_lock);
1217         return retval;
1218 }
1219
1220 int zfcp_fsf_exchange_config_data_sync(struct zfcp_qdio *qdio,
1221                                        struct fsf_qtcb_bottom_config *data)
1222 {
1223         struct zfcp_fsf_req *req = NULL;
1224         int retval = -EIO;
1225
1226         spin_lock_irq(&qdio->req_q_lock);
1227         if (zfcp_qdio_sbal_get(qdio))
1228                 goto out_unlock;
1229
1230         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA,
1231                                   SBAL_SFLAGS0_TYPE_READ, NULL);
1232
1233         if (IS_ERR(req)) {
1234                 retval = PTR_ERR(req);
1235                 goto out_unlock;
1236         }
1237
1238         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1239         req->handler = zfcp_fsf_exchange_config_data_handler;
1240
1241         req->qtcb->bottom.config.feature_selection =
1242                         FSF_FEATURE_CFDC |
1243                         FSF_FEATURE_LUN_SHARING |
1244                         FSF_FEATURE_NOTIFICATION_LOST |
1245                         FSF_FEATURE_UPDATE_ALERT;
1246
1247         if (data)
1248                 req->data = data;
1249
1250         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1251         retval = zfcp_fsf_req_send(req);
1252         spin_unlock_irq(&qdio->req_q_lock);
1253         if (!retval)
1254                 wait_for_completion(&req->completion);
1255
1256         zfcp_fsf_req_free(req);
1257         return retval;
1258
1259 out_unlock:
1260         spin_unlock_irq(&qdio->req_q_lock);
1261         return retval;
1262 }
1263
1264 /**
1265  * zfcp_fsf_exchange_port_data - request information about local port
1266  * @erp_action: ERP action for the adapter for which port data is requested
1267  * Returns: 0 on success, error otherwise
1268  */
1269 int zfcp_fsf_exchange_port_data(struct zfcp_erp_action *erp_action)
1270 {
1271         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1272         struct zfcp_fsf_req *req;
1273         int retval = -EIO;
1274
1275         if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1276                 return -EOPNOTSUPP;
1277
1278         spin_lock_irq(&qdio->req_q_lock);
1279         if (zfcp_qdio_sbal_get(qdio))
1280                 goto out;
1281
1282         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA,
1283                                   SBAL_SFLAGS0_TYPE_READ,
1284                                   qdio->adapter->pool.erp_req);
1285
1286         if (IS_ERR(req)) {
1287                 retval = PTR_ERR(req);
1288                 goto out;
1289         }
1290
1291         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1292         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1293
1294         req->handler = zfcp_fsf_exchange_port_data_handler;
1295         req->erp_action = erp_action;
1296         erp_action->fsf_req_id = req->req_id;
1297
1298         zfcp_fsf_start_erp_timer(req);
1299         retval = zfcp_fsf_req_send(req);
1300         if (retval) {
1301                 zfcp_fsf_req_free(req);
1302                 erp_action->fsf_req_id = 0;
1303         }
1304 out:
1305         spin_unlock_irq(&qdio->req_q_lock);
1306         return retval;
1307 }
1308
1309 /**
1310  * zfcp_fsf_exchange_port_data_sync - request information about local port
1311  * @qdio: pointer to struct zfcp_qdio
1312  * @data: pointer to struct fsf_qtcb_bottom_port
1313  * Returns: 0 on success, error otherwise
1314  */
1315 int zfcp_fsf_exchange_port_data_sync(struct zfcp_qdio *qdio,
1316                                      struct fsf_qtcb_bottom_port *data)
1317 {
1318         struct zfcp_fsf_req *req = NULL;
1319         int retval = -EIO;
1320
1321         if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1322                 return -EOPNOTSUPP;
1323
1324         spin_lock_irq(&qdio->req_q_lock);
1325         if (zfcp_qdio_sbal_get(qdio))
1326                 goto out_unlock;
1327
1328         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA,
1329                                   SBAL_SFLAGS0_TYPE_READ, NULL);
1330
1331         if (IS_ERR(req)) {
1332                 retval = PTR_ERR(req);
1333                 goto out_unlock;
1334         }
1335
1336         if (data)
1337                 req->data = data;
1338
1339         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1340
1341         req->handler = zfcp_fsf_exchange_port_data_handler;
1342         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1343         retval = zfcp_fsf_req_send(req);
1344         spin_unlock_irq(&qdio->req_q_lock);
1345
1346         if (!retval)
1347                 wait_for_completion(&req->completion);
1348
1349         zfcp_fsf_req_free(req);
1350
1351         return retval;
1352
1353 out_unlock:
1354         spin_unlock_irq(&qdio->req_q_lock);
1355         return retval;
1356 }
1357
1358 static void zfcp_fsf_open_port_handler(struct zfcp_fsf_req *req)
1359 {
1360         struct zfcp_port *port = req->data;
1361         struct fsf_qtcb_header *header = &req->qtcb->header;
1362         struct fc_els_flogi *plogi;
1363
1364         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1365                 goto out;
1366
1367         switch (header->fsf_status) {
1368         case FSF_PORT_ALREADY_OPEN:
1369                 break;
1370         case FSF_ACCESS_DENIED:
1371                 zfcp_cfdc_port_denied(port, &header->fsf_status_qual);
1372                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1373                 break;
1374         case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
1375                 dev_warn(&req->adapter->ccw_device->dev,
1376                          "Not enough FCP adapter resources to open "
1377                          "remote port 0x%016Lx\n",
1378                          (unsigned long long)port->wwpn);
1379                 zfcp_erp_set_port_status(port,
1380                                          ZFCP_STATUS_COMMON_ERP_FAILED);
1381                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1382                 break;
1383         case FSF_ADAPTER_STATUS_AVAILABLE:
1384                 switch (header->fsf_status_qual.word[0]) {
1385                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1386                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1387                 case FSF_SQ_NO_RETRY_POSSIBLE:
1388                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1389                         break;
1390                 }
1391                 break;
1392         case FSF_GOOD:
1393                 port->handle = header->port_handle;
1394                 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN |
1395                                 ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1396                 atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
1397                                   ZFCP_STATUS_COMMON_ACCESS_BOXED,
1398                                   &port->status);
1399                 /* check whether D_ID has changed during open */
1400                 /*
1401                  * FIXME: This check is not airtight, as the FCP channel does
1402                  * not monitor closures of target port connections caused on
1403                  * the remote side. Thus, they might miss out on invalidating
1404                  * locally cached WWPNs (and other N_Port parameters) of gone
1405                  * target ports. So, our heroic attempt to make things safe
1406                  * could be undermined by 'open port' response data tagged with
1407                  * obsolete WWPNs. Another reason to monitor potential
1408                  * connection closures ourself at least (by interpreting
1409                  * incoming ELS' and unsolicited status). It just crosses my
1410                  * mind that one should be able to cross-check by means of
1411                  * another GID_PN straight after a port has been opened.
1412                  * Alternately, an ADISC/PDISC ELS should suffice, as well.
1413                  */
1414                 plogi = (struct fc_els_flogi *) req->qtcb->bottom.support.els;
1415                 if (req->qtcb->bottom.support.els1_length >=
1416                     FSF_PLOGI_MIN_LEN)
1417                                 zfcp_fc_plogi_evaluate(port, plogi);
1418                 break;
1419         case FSF_UNKNOWN_OP_SUBTYPE:
1420                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1421                 break;
1422         }
1423
1424 out:
1425         put_device(&port->dev);
1426 }
1427
1428 /**
1429  * zfcp_fsf_open_port - create and send open port request
1430  * @erp_action: pointer to struct zfcp_erp_action
1431  * Returns: 0 on success, error otherwise
1432  */
1433 int zfcp_fsf_open_port(struct zfcp_erp_action *erp_action)
1434 {
1435         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1436         struct zfcp_port *port = erp_action->port;
1437         struct zfcp_fsf_req *req;
1438         int retval = -EIO;
1439
1440         spin_lock_irq(&qdio->req_q_lock);
1441         if (zfcp_qdio_sbal_get(qdio))
1442                 goto out;
1443
1444         req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
1445                                   SBAL_SFLAGS0_TYPE_READ,
1446                                   qdio->adapter->pool.erp_req);
1447
1448         if (IS_ERR(req)) {
1449                 retval = PTR_ERR(req);
1450                 goto out;
1451         }
1452
1453         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1454         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1455
1456         req->handler = zfcp_fsf_open_port_handler;
1457         hton24(req->qtcb->bottom.support.d_id, port->d_id);
1458         req->data = port;
1459         req->erp_action = erp_action;
1460         erp_action->fsf_req_id = req->req_id;
1461         get_device(&port->dev);
1462
1463         zfcp_fsf_start_erp_timer(req);
1464         retval = zfcp_fsf_req_send(req);
1465         if (retval) {
1466                 zfcp_fsf_req_free(req);
1467                 erp_action->fsf_req_id = 0;
1468                 put_device(&port->dev);
1469         }
1470 out:
1471         spin_unlock_irq(&qdio->req_q_lock);
1472         return retval;
1473 }
1474
1475 static void zfcp_fsf_close_port_handler(struct zfcp_fsf_req *req)
1476 {
1477         struct zfcp_port *port = req->data;
1478
1479         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1480                 return;
1481
1482         switch (req->qtcb->header.fsf_status) {
1483         case FSF_PORT_HANDLE_NOT_VALID:
1484                 zfcp_erp_adapter_reopen(port->adapter, 0, "fscph_1");
1485                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1486                 break;
1487         case FSF_ADAPTER_STATUS_AVAILABLE:
1488                 break;
1489         case FSF_GOOD:
1490                 zfcp_erp_clear_port_status(port, ZFCP_STATUS_COMMON_OPEN);
1491                 break;
1492         }
1493 }
1494
1495 /**
1496  * zfcp_fsf_close_port - create and send close port request
1497  * @erp_action: pointer to struct zfcp_erp_action
1498  * Returns: 0 on success, error otherwise
1499  */
1500 int zfcp_fsf_close_port(struct zfcp_erp_action *erp_action)
1501 {
1502         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1503         struct zfcp_fsf_req *req;
1504         int retval = -EIO;
1505
1506         spin_lock_irq(&qdio->req_q_lock);
1507         if (zfcp_qdio_sbal_get(qdio))
1508                 goto out;
1509
1510         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
1511                                   SBAL_SFLAGS0_TYPE_READ,
1512                                   qdio->adapter->pool.erp_req);
1513
1514         if (IS_ERR(req)) {
1515                 retval = PTR_ERR(req);
1516                 goto out;
1517         }
1518
1519         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1520         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1521
1522         req->handler = zfcp_fsf_close_port_handler;
1523         req->data = erp_action->port;
1524         req->erp_action = erp_action;
1525         req->qtcb->header.port_handle = erp_action->port->handle;
1526         erp_action->fsf_req_id = req->req_id;
1527
1528         zfcp_fsf_start_erp_timer(req);
1529         retval = zfcp_fsf_req_send(req);
1530         if (retval) {
1531                 zfcp_fsf_req_free(req);
1532                 erp_action->fsf_req_id = 0;
1533         }
1534 out:
1535         spin_unlock_irq(&qdio->req_q_lock);
1536         return retval;
1537 }
1538
1539 static void zfcp_fsf_open_wka_port_handler(struct zfcp_fsf_req *req)
1540 {
1541         struct zfcp_fc_wka_port *wka_port = req->data;
1542         struct fsf_qtcb_header *header = &req->qtcb->header;
1543
1544         if (req->status & ZFCP_STATUS_FSFREQ_ERROR) {
1545                 wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1546                 goto out;
1547         }
1548
1549         switch (header->fsf_status) {
1550         case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
1551                 dev_warn(&req->adapter->ccw_device->dev,
1552                          "Opening WKA port 0x%x failed\n", wka_port->d_id);
1553                 /* fall through */
1554         case FSF_ADAPTER_STATUS_AVAILABLE:
1555                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1556                 /* fall through */
1557         case FSF_ACCESS_DENIED:
1558                 wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1559                 break;
1560         case FSF_GOOD:
1561                 wka_port->handle = header->port_handle;
1562                 /* fall through */
1563         case FSF_PORT_ALREADY_OPEN:
1564                 wka_port->status = ZFCP_FC_WKA_PORT_ONLINE;
1565         }
1566 out:
1567         wake_up(&wka_port->completion_wq);
1568 }
1569
1570 /**
1571  * zfcp_fsf_open_wka_port - create and send open wka-port request
1572  * @wka_port: pointer to struct zfcp_fc_wka_port
1573  * Returns: 0 on success, error otherwise
1574  */
1575 int zfcp_fsf_open_wka_port(struct zfcp_fc_wka_port *wka_port)
1576 {
1577         struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1578         struct zfcp_fsf_req *req = NULL;
1579         int retval = -EIO;
1580
1581         spin_lock_irq(&qdio->req_q_lock);
1582         if (zfcp_qdio_sbal_get(qdio))
1583                 goto out;
1584
1585         req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
1586                                   SBAL_SFLAGS0_TYPE_READ,
1587                                   qdio->adapter->pool.erp_req);
1588
1589         if (IS_ERR(req)) {
1590                 retval = PTR_ERR(req);
1591                 goto out;
1592         }
1593
1594         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1595         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1596
1597         req->handler = zfcp_fsf_open_wka_port_handler;
1598         hton24(req->qtcb->bottom.support.d_id, wka_port->d_id);
1599         req->data = wka_port;
1600
1601         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1602         retval = zfcp_fsf_req_send(req);
1603         if (retval)
1604                 zfcp_fsf_req_free(req);
1605 out:
1606         spin_unlock_irq(&qdio->req_q_lock);
1607         if (req && !IS_ERR(req))
1608                 zfcp_dbf_rec_run_wka("fsowp_1", wka_port, req->req_id);
1609         return retval;
1610 }
1611
1612 static void zfcp_fsf_close_wka_port_handler(struct zfcp_fsf_req *req)
1613 {
1614         struct zfcp_fc_wka_port *wka_port = req->data;
1615
1616         if (req->qtcb->header.fsf_status == FSF_PORT_HANDLE_NOT_VALID) {
1617                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1618                 zfcp_erp_adapter_reopen(wka_port->adapter, 0, "fscwph1");
1619         }
1620
1621         wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1622         wake_up(&wka_port->completion_wq);
1623 }
1624
1625 /**
1626  * zfcp_fsf_close_wka_port - create and send close wka port request
1627  * @wka_port: WKA port to open
1628  * Returns: 0 on success, error otherwise
1629  */
1630 int zfcp_fsf_close_wka_port(struct zfcp_fc_wka_port *wka_port)
1631 {
1632         struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1633         struct zfcp_fsf_req *req = NULL;
1634         int retval = -EIO;
1635
1636         spin_lock_irq(&qdio->req_q_lock);
1637         if (zfcp_qdio_sbal_get(qdio))
1638                 goto out;
1639
1640         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
1641                                   SBAL_SFLAGS0_TYPE_READ,
1642                                   qdio->adapter->pool.erp_req);
1643
1644         if (IS_ERR(req)) {
1645                 retval = PTR_ERR(req);
1646                 goto out;
1647         }
1648
1649         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1650         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1651
1652         req->handler = zfcp_fsf_close_wka_port_handler;
1653         req->data = wka_port;
1654         req->qtcb->header.port_handle = wka_port->handle;
1655
1656         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1657         retval = zfcp_fsf_req_send(req);
1658         if (retval)
1659                 zfcp_fsf_req_free(req);
1660 out:
1661         spin_unlock_irq(&qdio->req_q_lock);
1662         if (req && !IS_ERR(req))
1663                 zfcp_dbf_rec_run_wka("fscwp_1", wka_port, req->req_id);
1664         return retval;
1665 }
1666
1667 static void zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *req)
1668 {
1669         struct zfcp_port *port = req->data;
1670         struct fsf_qtcb_header *header = &req->qtcb->header;
1671         struct scsi_device *sdev;
1672
1673         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1674                 return;
1675
1676         switch (header->fsf_status) {
1677         case FSF_PORT_HANDLE_NOT_VALID:
1678                 zfcp_erp_adapter_reopen(port->adapter, 0, "fscpph1");
1679                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1680                 break;
1681         case FSF_ACCESS_DENIED:
1682                 zfcp_cfdc_port_denied(port, &header->fsf_status_qual);
1683                 break;
1684         case FSF_PORT_BOXED:
1685                 /* can't use generic zfcp_erp_modify_port_status because
1686                  * ZFCP_STATUS_COMMON_OPEN must not be reset for the port */
1687                 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1688                 shost_for_each_device(sdev, port->adapter->scsi_host)
1689                         if (sdev_to_zfcp(sdev)->port == port)
1690                                 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
1691                                                   &sdev_to_zfcp(sdev)->status);
1692                 zfcp_erp_set_port_status(port, ZFCP_STATUS_COMMON_ACCESS_BOXED);
1693                 zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
1694                                      "fscpph2");
1695                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1696                 break;
1697         case FSF_ADAPTER_STATUS_AVAILABLE:
1698                 switch (header->fsf_status_qual.word[0]) {
1699                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1700                         /* fall through */
1701                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1702                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1703                         break;
1704                 }
1705                 break;
1706         case FSF_GOOD:
1707                 /* can't use generic zfcp_erp_modify_port_status because
1708                  * ZFCP_STATUS_COMMON_OPEN must not be reset for the port
1709                  */
1710                 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1711                 shost_for_each_device(sdev, port->adapter->scsi_host)
1712                         if (sdev_to_zfcp(sdev)->port == port)
1713                                 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
1714                                                   &sdev_to_zfcp(sdev)->status);
1715                 break;
1716         }
1717 }
1718
1719 /**
1720  * zfcp_fsf_close_physical_port - close physical port
1721  * @erp_action: pointer to struct zfcp_erp_action
1722  * Returns: 0 on success
1723  */
1724 int zfcp_fsf_close_physical_port(struct zfcp_erp_action *erp_action)
1725 {
1726         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1727         struct zfcp_fsf_req *req;
1728         int retval = -EIO;
1729
1730         spin_lock_irq(&qdio->req_q_lock);
1731         if (zfcp_qdio_sbal_get(qdio))
1732                 goto out;
1733
1734         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PHYSICAL_PORT,
1735                                   SBAL_SFLAGS0_TYPE_READ,
1736                                   qdio->adapter->pool.erp_req);
1737
1738         if (IS_ERR(req)) {
1739                 retval = PTR_ERR(req);
1740                 goto out;
1741         }
1742
1743         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1744         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1745
1746         req->data = erp_action->port;
1747         req->qtcb->header.port_handle = erp_action->port->handle;
1748         req->erp_action = erp_action;
1749         req->handler = zfcp_fsf_close_physical_port_handler;
1750         erp_action->fsf_req_id = req->req_id;
1751
1752         zfcp_fsf_start_erp_timer(req);
1753         retval = zfcp_fsf_req_send(req);
1754         if (retval) {
1755                 zfcp_fsf_req_free(req);
1756                 erp_action->fsf_req_id = 0;
1757         }
1758 out:
1759         spin_unlock_irq(&qdio->req_q_lock);
1760         return retval;
1761 }
1762
1763 static void zfcp_fsf_open_lun_handler(struct zfcp_fsf_req *req)
1764 {
1765         struct zfcp_adapter *adapter = req->adapter;
1766         struct scsi_device *sdev = req->data;
1767         struct zfcp_scsi_dev *zfcp_sdev;
1768         struct fsf_qtcb_header *header = &req->qtcb->header;
1769         struct fsf_qtcb_bottom_support *bottom = &req->qtcb->bottom.support;
1770
1771         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1772                 return;
1773
1774         zfcp_sdev = sdev_to_zfcp(sdev);
1775
1776         atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
1777                           ZFCP_STATUS_COMMON_ACCESS_BOXED |
1778                           ZFCP_STATUS_LUN_SHARED |
1779                           ZFCP_STATUS_LUN_READONLY,
1780                           &zfcp_sdev->status);
1781
1782         switch (header->fsf_status) {
1783
1784         case FSF_PORT_HANDLE_NOT_VALID:
1785                 zfcp_erp_adapter_reopen(adapter, 0, "fsouh_1");
1786                 /* fall through */
1787         case FSF_LUN_ALREADY_OPEN:
1788                 break;
1789         case FSF_ACCESS_DENIED:
1790                 zfcp_cfdc_lun_denied(sdev, &header->fsf_status_qual);
1791                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1792                 break;
1793         case FSF_PORT_BOXED:
1794                 zfcp_erp_set_port_status(zfcp_sdev->port,
1795                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
1796                 zfcp_erp_port_reopen(zfcp_sdev->port,
1797                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fsouh_2");
1798                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1799                 break;
1800         case FSF_LUN_SHARING_VIOLATION:
1801                 zfcp_cfdc_lun_shrng_vltn(sdev, &header->fsf_status_qual);
1802                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1803                 break;
1804         case FSF_MAXIMUM_NUMBER_OF_LUNS_EXCEEDED:
1805                 dev_warn(&adapter->ccw_device->dev,
1806                          "No handle is available for LUN "
1807                          "0x%016Lx on port 0x%016Lx\n",
1808                          (unsigned long long)zfcp_scsi_dev_lun(sdev),
1809                          (unsigned long long)zfcp_sdev->port->wwpn);
1810                 zfcp_erp_set_lun_status(sdev, ZFCP_STATUS_COMMON_ERP_FAILED);
1811                 /* fall through */
1812         case FSF_INVALID_COMMAND_OPTION:
1813                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1814                 break;
1815         case FSF_ADAPTER_STATUS_AVAILABLE:
1816                 switch (header->fsf_status_qual.word[0]) {
1817                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1818                         zfcp_fc_test_link(zfcp_sdev->port);
1819                         /* fall through */
1820                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1821                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1822                         break;
1823                 }
1824                 break;
1825
1826         case FSF_GOOD:
1827                 zfcp_sdev->lun_handle = header->lun_handle;
1828                 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &zfcp_sdev->status);
1829                 zfcp_cfdc_open_lun_eval(sdev, bottom);
1830                 break;
1831         }
1832 }
1833
1834 /**
1835  * zfcp_fsf_open_lun - open LUN
1836  * @erp_action: pointer to struct zfcp_erp_action
1837  * Returns: 0 on success, error otherwise
1838  */
1839 int zfcp_fsf_open_lun(struct zfcp_erp_action *erp_action)
1840 {
1841         struct zfcp_adapter *adapter = erp_action->adapter;
1842         struct zfcp_qdio *qdio = adapter->qdio;
1843         struct zfcp_fsf_req *req;
1844         int retval = -EIO;
1845
1846         spin_lock_irq(&qdio->req_q_lock);
1847         if (zfcp_qdio_sbal_get(qdio))
1848                 goto out;
1849
1850         req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_LUN,
1851                                   SBAL_SFLAGS0_TYPE_READ,
1852                                   adapter->pool.erp_req);
1853
1854         if (IS_ERR(req)) {
1855                 retval = PTR_ERR(req);
1856                 goto out;
1857         }
1858
1859         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1860         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1861
1862         req->qtcb->header.port_handle = erp_action->port->handle;
1863         req->qtcb->bottom.support.fcp_lun = zfcp_scsi_dev_lun(erp_action->sdev);
1864         req->handler = zfcp_fsf_open_lun_handler;
1865         req->data = erp_action->sdev;
1866         req->erp_action = erp_action;
1867         erp_action->fsf_req_id = req->req_id;
1868
1869         if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE))
1870                 req->qtcb->bottom.support.option = FSF_OPEN_LUN_SUPPRESS_BOXING;
1871
1872         zfcp_fsf_start_erp_timer(req);
1873         retval = zfcp_fsf_req_send(req);
1874         if (retval) {
1875                 zfcp_fsf_req_free(req);
1876                 erp_action->fsf_req_id = 0;
1877         }
1878 out:
1879         spin_unlock_irq(&qdio->req_q_lock);
1880         return retval;
1881 }
1882
1883 static void zfcp_fsf_close_lun_handler(struct zfcp_fsf_req *req)
1884 {
1885         struct scsi_device *sdev = req->data;
1886         struct zfcp_scsi_dev *zfcp_sdev;
1887
1888         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1889                 return;
1890
1891         zfcp_sdev = sdev_to_zfcp(sdev);
1892
1893         switch (req->qtcb->header.fsf_status) {
1894         case FSF_PORT_HANDLE_NOT_VALID:
1895                 zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0, "fscuh_1");
1896                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1897                 break;
1898         case FSF_LUN_HANDLE_NOT_VALID:
1899                 zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fscuh_2");
1900                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1901                 break;
1902         case FSF_PORT_BOXED:
1903                 zfcp_erp_set_port_status(zfcp_sdev->port,
1904                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
1905                 zfcp_erp_port_reopen(zfcp_sdev->port,
1906                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fscuh_3");
1907                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1908                 break;
1909         case FSF_ADAPTER_STATUS_AVAILABLE:
1910                 switch (req->qtcb->header.fsf_status_qual.word[0]) {
1911                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1912                         zfcp_fc_test_link(zfcp_sdev->port);
1913                         /* fall through */
1914                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1915                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1916                         break;
1917                 }
1918                 break;
1919         case FSF_GOOD:
1920                 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &zfcp_sdev->status);
1921                 break;
1922         }
1923 }
1924
1925 /**
1926  * zfcp_fsf_close_LUN - close LUN
1927  * @erp_action: pointer to erp_action triggering the "close LUN"
1928  * Returns: 0 on success, error otherwise
1929  */
1930 int zfcp_fsf_close_lun(struct zfcp_erp_action *erp_action)
1931 {
1932         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1933         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(erp_action->sdev);
1934         struct zfcp_fsf_req *req;
1935         int retval = -EIO;
1936
1937         spin_lock_irq(&qdio->req_q_lock);
1938         if (zfcp_qdio_sbal_get(qdio))
1939                 goto out;
1940
1941         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_LUN,
1942                                   SBAL_SFLAGS0_TYPE_READ,
1943                                   qdio->adapter->pool.erp_req);
1944
1945         if (IS_ERR(req)) {
1946                 retval = PTR_ERR(req);
1947                 goto out;
1948         }
1949
1950         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1951         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1952
1953         req->qtcb->header.port_handle = erp_action->port->handle;
1954         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
1955         req->handler = zfcp_fsf_close_lun_handler;
1956         req->data = erp_action->sdev;
1957         req->erp_action = erp_action;
1958         erp_action->fsf_req_id = req->req_id;
1959
1960         zfcp_fsf_start_erp_timer(req);
1961         retval = zfcp_fsf_req_send(req);
1962         if (retval) {
1963                 zfcp_fsf_req_free(req);
1964                 erp_action->fsf_req_id = 0;
1965         }
1966 out:
1967         spin_unlock_irq(&qdio->req_q_lock);
1968         return retval;
1969 }
1970
1971 static void zfcp_fsf_update_lat(struct fsf_latency_record *lat_rec, u32 lat)
1972 {
1973         lat_rec->sum += lat;
1974         lat_rec->min = min(lat_rec->min, lat);
1975         lat_rec->max = max(lat_rec->max, lat);
1976 }
1977
1978 static void zfcp_fsf_req_trace(struct zfcp_fsf_req *req, struct scsi_cmnd *scsi)
1979 {
1980         struct fsf_qual_latency_info *lat_in;
1981         struct latency_cont *lat = NULL;
1982         struct zfcp_scsi_dev *zfcp_sdev;
1983         struct zfcp_blk_drv_data blktrc;
1984         int ticks = req->adapter->timer_ticks;
1985
1986         lat_in = &req->qtcb->prefix.prot_status_qual.latency_info;
1987
1988         blktrc.flags = 0;
1989         blktrc.magic = ZFCP_BLK_DRV_DATA_MAGIC;
1990         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1991                 blktrc.flags |= ZFCP_BLK_REQ_ERROR;
1992         blktrc.inb_usage = 0;
1993         blktrc.outb_usage = req->qdio_req.qdio_outb_usage;
1994
1995         if (req->adapter->adapter_features & FSF_FEATURE_MEASUREMENT_DATA &&
1996             !(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
1997                 zfcp_sdev = sdev_to_zfcp(scsi->device);
1998                 blktrc.flags |= ZFCP_BLK_LAT_VALID;
1999                 blktrc.channel_lat = lat_in->channel_lat * ticks;
2000                 blktrc.fabric_lat = lat_in->fabric_lat * ticks;
2001
2002                 switch (req->qtcb->bottom.io.data_direction) {
2003                 case FSF_DATADIR_DIF_READ_STRIP:
2004                 case FSF_DATADIR_DIF_READ_CONVERT:
2005                 case FSF_DATADIR_READ:
2006                         lat = &zfcp_sdev->latencies.read;
2007                         break;
2008                 case FSF_DATADIR_DIF_WRITE_INSERT:
2009                 case FSF_DATADIR_DIF_WRITE_CONVERT:
2010                 case FSF_DATADIR_WRITE:
2011                         lat = &zfcp_sdev->latencies.write;
2012                         break;
2013                 case FSF_DATADIR_CMND:
2014                         lat = &zfcp_sdev->latencies.cmd;
2015                         break;
2016                 }
2017
2018                 if (lat) {
2019                         spin_lock(&zfcp_sdev->latencies.lock);
2020                         zfcp_fsf_update_lat(&lat->channel, lat_in->channel_lat);
2021                         zfcp_fsf_update_lat(&lat->fabric, lat_in->fabric_lat);
2022                         lat->counter++;
2023                         spin_unlock(&zfcp_sdev->latencies.lock);
2024                 }
2025         }
2026
2027         blk_add_driver_data(scsi->request->q, scsi->request, &blktrc,
2028                             sizeof(blktrc));
2029 }
2030
2031 static void zfcp_fsf_fcp_handler_common(struct zfcp_fsf_req *req)
2032 {
2033         struct scsi_cmnd *scmnd = req->data;
2034         struct scsi_device *sdev = scmnd->device;
2035         struct zfcp_scsi_dev *zfcp_sdev;
2036         struct fsf_qtcb_header *header = &req->qtcb->header;
2037
2038         if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
2039                 return;
2040
2041         zfcp_sdev = sdev_to_zfcp(sdev);
2042
2043         switch (header->fsf_status) {
2044         case FSF_HANDLE_MISMATCH:
2045         case FSF_PORT_HANDLE_NOT_VALID:
2046                 zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0, "fssfch1");
2047                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2048                 break;
2049         case FSF_FCPLUN_NOT_VALID:
2050         case FSF_LUN_HANDLE_NOT_VALID:
2051                 zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fssfch2");
2052                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2053                 break;
2054         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
2055                 zfcp_fsf_class_not_supp(req);
2056                 break;
2057         case FSF_ACCESS_DENIED:
2058                 zfcp_cfdc_lun_denied(sdev, &header->fsf_status_qual);
2059                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2060                 break;
2061         case FSF_DIRECTION_INDICATOR_NOT_VALID:
2062                 dev_err(&req->adapter->ccw_device->dev,
2063                         "Incorrect direction %d, LUN 0x%016Lx on port "
2064                         "0x%016Lx closed\n",
2065                         req->qtcb->bottom.io.data_direction,
2066                         (unsigned long long)zfcp_scsi_dev_lun(sdev),
2067                         (unsigned long long)zfcp_sdev->port->wwpn);
2068                 zfcp_erp_adapter_shutdown(zfcp_sdev->port->adapter, 0,
2069                                           "fssfch3");
2070                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2071                 break;
2072         case FSF_CMND_LENGTH_NOT_VALID:
2073                 dev_err(&req->adapter->ccw_device->dev,
2074                         "Incorrect CDB length %d, LUN 0x%016Lx on "
2075                         "port 0x%016Lx closed\n",
2076                         req->qtcb->bottom.io.fcp_cmnd_length,
2077                         (unsigned long long)zfcp_scsi_dev_lun(sdev),
2078                         (unsigned long long)zfcp_sdev->port->wwpn);
2079                 zfcp_erp_adapter_shutdown(zfcp_sdev->port->adapter, 0,
2080                                           "fssfch4");
2081                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2082                 break;
2083         case FSF_PORT_BOXED:
2084                 zfcp_erp_set_port_status(zfcp_sdev->port,
2085                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
2086                 zfcp_erp_port_reopen(zfcp_sdev->port,
2087                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fssfch5");
2088                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2089                 break;
2090         case FSF_LUN_BOXED:
2091                 zfcp_erp_set_lun_status(sdev, ZFCP_STATUS_COMMON_ACCESS_BOXED);
2092                 zfcp_erp_lun_reopen(sdev, ZFCP_STATUS_COMMON_ERP_FAILED,
2093                                     "fssfch6");
2094                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2095                 break;
2096         case FSF_ADAPTER_STATUS_AVAILABLE:
2097                 if (header->fsf_status_qual.word[0] ==
2098                     FSF_SQ_INVOKE_LINK_TEST_PROCEDURE)
2099                         zfcp_fc_test_link(zfcp_sdev->port);
2100                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2101                 break;
2102         }
2103 }
2104
2105 static void zfcp_fsf_fcp_cmnd_handler(struct zfcp_fsf_req *req)
2106 {
2107         struct scsi_cmnd *scpnt;
2108         struct fcp_resp_with_ext *fcp_rsp;
2109         unsigned long flags;
2110
2111         read_lock_irqsave(&req->adapter->abort_lock, flags);
2112
2113         scpnt = req->data;
2114         if (unlikely(!scpnt)) {
2115                 read_unlock_irqrestore(&req->adapter->abort_lock, flags);
2116                 return;
2117         }
2118
2119         zfcp_fsf_fcp_handler_common(req);
2120
2121         if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
2122                 set_host_byte(scpnt, DID_TRANSPORT_DISRUPTED);
2123                 goto skip_fsfstatus;
2124         }
2125
2126         switch (req->qtcb->header.fsf_status) {
2127         case FSF_INCONSISTENT_PROT_DATA:
2128         case FSF_INVALID_PROT_PARM:
2129                 set_host_byte(scpnt, DID_ERROR);
2130                 goto skip_fsfstatus;
2131         case FSF_BLOCK_GUARD_CHECK_FAILURE:
2132                 zfcp_scsi_dif_sense_error(scpnt, 0x1);
2133                 goto skip_fsfstatus;
2134         case FSF_APP_TAG_CHECK_FAILURE:
2135                 zfcp_scsi_dif_sense_error(scpnt, 0x2);
2136                 goto skip_fsfstatus;
2137         case FSF_REF_TAG_CHECK_FAILURE:
2138                 zfcp_scsi_dif_sense_error(scpnt, 0x3);
2139                 goto skip_fsfstatus;
2140         }
2141         fcp_rsp = (struct fcp_resp_with_ext *) &req->qtcb->bottom.io.fcp_rsp;
2142         zfcp_fc_eval_fcp_rsp(fcp_rsp, scpnt);
2143
2144 skip_fsfstatus:
2145         zfcp_fsf_req_trace(req, scpnt);
2146         zfcp_dbf_scsi_result(scpnt, req);
2147
2148         scpnt->host_scribble = NULL;
2149         (scpnt->scsi_done) (scpnt);
2150         /*
2151          * We must hold this lock until scsi_done has been called.
2152          * Otherwise we may call scsi_done after abort regarding this
2153          * command has completed.
2154          * Note: scsi_done must not block!
2155          */
2156         read_unlock_irqrestore(&req->adapter->abort_lock, flags);
2157 }
2158
2159 static int zfcp_fsf_set_data_dir(struct scsi_cmnd *scsi_cmnd, u32 *data_dir)
2160 {
2161         switch (scsi_get_prot_op(scsi_cmnd)) {
2162         case SCSI_PROT_NORMAL:
2163                 switch (scsi_cmnd->sc_data_direction) {
2164                 case DMA_NONE:
2165                         *data_dir = FSF_DATADIR_CMND;
2166                         break;
2167                 case DMA_FROM_DEVICE:
2168                         *data_dir = FSF_DATADIR_READ;
2169                         break;
2170                 case DMA_TO_DEVICE:
2171                         *data_dir = FSF_DATADIR_WRITE;
2172                         break;
2173                 case DMA_BIDIRECTIONAL:
2174                         return -EINVAL;
2175                 }
2176                 break;
2177
2178         case SCSI_PROT_READ_STRIP:
2179                 *data_dir = FSF_DATADIR_DIF_READ_STRIP;
2180                 break;
2181         case SCSI_PROT_WRITE_INSERT:
2182                 *data_dir = FSF_DATADIR_DIF_WRITE_INSERT;
2183                 break;
2184         case SCSI_PROT_READ_PASS:
2185                 *data_dir = FSF_DATADIR_DIF_READ_CONVERT;
2186                 break;
2187         case SCSI_PROT_WRITE_PASS:
2188                 *data_dir = FSF_DATADIR_DIF_WRITE_CONVERT;
2189                 break;
2190         default:
2191                 return -EINVAL;
2192         }
2193
2194         return 0;
2195 }
2196
2197 /**
2198  * zfcp_fsf_fcp_cmnd - initiate an FCP command (for a SCSI command)
2199  * @scsi_cmnd: scsi command to be sent
2200  */
2201 int zfcp_fsf_fcp_cmnd(struct scsi_cmnd *scsi_cmnd)
2202 {
2203         struct zfcp_fsf_req *req;
2204         struct fcp_cmnd *fcp_cmnd;
2205         u8 sbtype = SBAL_SFLAGS0_TYPE_READ;
2206         int retval = -EIO;
2207         struct scsi_device *sdev = scsi_cmnd->device;
2208         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
2209         struct zfcp_adapter *adapter = zfcp_sdev->port->adapter;
2210         struct zfcp_qdio *qdio = adapter->qdio;
2211         struct fsf_qtcb_bottom_io *io;
2212         unsigned long flags;
2213
2214         if (unlikely(!(atomic_read(&zfcp_sdev->status) &
2215                        ZFCP_STATUS_COMMON_UNBLOCKED)))
2216                 return -EBUSY;
2217
2218         spin_lock_irqsave(&qdio->req_q_lock, flags);
2219         if (atomic_read(&qdio->req_q_free) <= 0) {
2220                 atomic_inc(&qdio->req_q_full);
2221                 goto out;
2222         }
2223
2224         if (scsi_cmnd->sc_data_direction == DMA_TO_DEVICE)
2225                 sbtype = SBAL_SFLAGS0_TYPE_WRITE;
2226
2227         req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
2228                                   sbtype, adapter->pool.scsi_req);
2229
2230         if (IS_ERR(req)) {
2231                 retval = PTR_ERR(req);
2232                 goto out;
2233         }
2234
2235         scsi_cmnd->host_scribble = (unsigned char *) req->req_id;
2236
2237         io = &req->qtcb->bottom.io;
2238         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
2239         req->data = scsi_cmnd;
2240         req->handler = zfcp_fsf_fcp_cmnd_handler;
2241         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
2242         req->qtcb->header.port_handle = zfcp_sdev->port->handle;
2243         io->service_class = FSF_CLASS_3;
2244         io->fcp_cmnd_length = FCP_CMND_LEN;
2245
2246         if (scsi_get_prot_op(scsi_cmnd) != SCSI_PROT_NORMAL) {
2247                 io->data_block_length = scsi_cmnd->device->sector_size;
2248                 io->ref_tag_value = scsi_get_lba(scsi_cmnd) & 0xFFFFFFFF;
2249         }
2250
2251         if (zfcp_fsf_set_data_dir(scsi_cmnd, &io->data_direction))
2252                 goto failed_scsi_cmnd;
2253
2254         fcp_cmnd = (struct fcp_cmnd *) &req->qtcb->bottom.io.fcp_cmnd;
2255         zfcp_fc_scsi_to_fcp(fcp_cmnd, scsi_cmnd, 0);
2256
2257         if (scsi_prot_sg_count(scsi_cmnd)) {
2258                 zfcp_qdio_set_data_div(qdio, &req->qdio_req,
2259                                        scsi_prot_sg_count(scsi_cmnd));
2260                 retval = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req,
2261                                                  scsi_prot_sglist(scsi_cmnd));
2262                 if (retval)
2263                         goto failed_scsi_cmnd;
2264                 io->prot_data_length = zfcp_qdio_real_bytes(
2265                                                 scsi_prot_sglist(scsi_cmnd));
2266         }
2267
2268         retval = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req,
2269                                          scsi_sglist(scsi_cmnd));
2270         if (unlikely(retval))
2271                 goto failed_scsi_cmnd;
2272
2273         zfcp_qdio_set_sbale_last(adapter->qdio, &req->qdio_req);
2274         if (zfcp_adapter_multi_buffer_active(adapter))
2275                 zfcp_qdio_set_scount(qdio, &req->qdio_req);
2276
2277         retval = zfcp_fsf_req_send(req);
2278         if (unlikely(retval))
2279                 goto failed_scsi_cmnd;
2280
2281         goto out;
2282
2283 failed_scsi_cmnd:
2284         zfcp_fsf_req_free(req);
2285         scsi_cmnd->host_scribble = NULL;
2286 out:
2287         spin_unlock_irqrestore(&qdio->req_q_lock, flags);
2288         return retval;
2289 }
2290
2291 static void zfcp_fsf_fcp_task_mgmt_handler(struct zfcp_fsf_req *req)
2292 {
2293         struct fcp_resp_with_ext *fcp_rsp;
2294         struct fcp_resp_rsp_info *rsp_info;
2295
2296         zfcp_fsf_fcp_handler_common(req);
2297
2298         fcp_rsp = (struct fcp_resp_with_ext *) &req->qtcb->bottom.io.fcp_rsp;
2299         rsp_info = (struct fcp_resp_rsp_info *) &fcp_rsp[1];
2300
2301         if ((rsp_info->rsp_code != FCP_TMF_CMPL) ||
2302              (req->status & ZFCP_STATUS_FSFREQ_ERROR))
2303                 req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
2304 }
2305
2306 /**
2307  * zfcp_fsf_fcp_task_mgmt - send SCSI task management command
2308  * @scmnd: SCSI command to send the task management command for
2309  * @tm_flags: unsigned byte for task management flags
2310  * Returns: on success pointer to struct fsf_req, NULL otherwise
2311  */
2312 struct zfcp_fsf_req *zfcp_fsf_fcp_task_mgmt(struct scsi_cmnd *scmnd,
2313                                             u8 tm_flags)
2314 {
2315         struct zfcp_fsf_req *req = NULL;
2316         struct fcp_cmnd *fcp_cmnd;
2317         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(scmnd->device);
2318         struct zfcp_qdio *qdio = zfcp_sdev->port->adapter->qdio;
2319
2320         if (unlikely(!(atomic_read(&zfcp_sdev->status) &
2321                        ZFCP_STATUS_COMMON_UNBLOCKED)))
2322                 return NULL;
2323
2324         spin_lock_irq(&qdio->req_q_lock);
2325         if (zfcp_qdio_sbal_get(qdio))
2326                 goto out;
2327
2328         req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
2329                                   SBAL_SFLAGS0_TYPE_WRITE,
2330                                   qdio->adapter->pool.scsi_req);
2331
2332         if (IS_ERR(req)) {
2333                 req = NULL;
2334                 goto out;
2335         }
2336
2337         req->data = scmnd;
2338         req->handler = zfcp_fsf_fcp_task_mgmt_handler;
2339         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
2340         req->qtcb->header.port_handle = zfcp_sdev->port->handle;
2341         req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
2342         req->qtcb->bottom.io.service_class = FSF_CLASS_3;
2343         req->qtcb->bottom.io.fcp_cmnd_length = FCP_CMND_LEN;
2344
2345         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
2346
2347         fcp_cmnd = (struct fcp_cmnd *) &req->qtcb->bottom.io.fcp_cmnd;
2348         zfcp_fc_scsi_to_fcp(fcp_cmnd, scmnd, tm_flags);
2349
2350         zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
2351         if (!zfcp_fsf_req_send(req))
2352                 goto out;
2353
2354         zfcp_fsf_req_free(req);
2355         req = NULL;
2356 out:
2357         spin_unlock_irq(&qdio->req_q_lock);
2358         return req;
2359 }
2360
2361 static void zfcp_fsf_control_file_handler(struct zfcp_fsf_req *req)
2362 {
2363 }
2364
2365 /**
2366  * zfcp_fsf_control_file - control file upload/download
2367  * @adapter: pointer to struct zfcp_adapter
2368  * @fsf_cfdc: pointer to struct zfcp_fsf_cfdc
2369  * Returns: on success pointer to struct zfcp_fsf_req, NULL otherwise
2370  */
2371 struct zfcp_fsf_req *zfcp_fsf_control_file(struct zfcp_adapter *adapter,
2372                                            struct zfcp_fsf_cfdc *fsf_cfdc)
2373 {
2374         struct zfcp_qdio *qdio = adapter->qdio;
2375         struct zfcp_fsf_req *req = NULL;
2376         struct fsf_qtcb_bottom_support *bottom;
2377         int retval = -EIO;
2378         u8 direction;
2379
2380         if (!(adapter->adapter_features & FSF_FEATURE_CFDC))
2381                 return ERR_PTR(-EOPNOTSUPP);
2382
2383         switch (fsf_cfdc->command) {
2384         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
2385                 direction = SBAL_SFLAGS0_TYPE_WRITE;
2386                 break;
2387         case FSF_QTCB_UPLOAD_CONTROL_FILE:
2388                 direction = SBAL_SFLAGS0_TYPE_READ;
2389                 break;
2390         default:
2391                 return ERR_PTR(-EINVAL);
2392         }
2393
2394         spin_lock_irq(&qdio->req_q_lock);
2395         if (zfcp_qdio_sbal_get(qdio))
2396                 goto out;
2397
2398         req = zfcp_fsf_req_create(qdio, fsf_cfdc->command, direction, NULL);
2399         if (IS_ERR(req)) {
2400                 retval = -EPERM;
2401                 goto out;
2402         }
2403
2404         req->handler = zfcp_fsf_control_file_handler;
2405
2406         bottom = &req->qtcb->bottom.support;
2407         bottom->operation_subtype = FSF_CFDC_OPERATION_SUBTYPE;
2408         bottom->option = fsf_cfdc->option;
2409
2410         retval = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, fsf_cfdc->sg);
2411
2412         if (retval ||
2413                 (zfcp_qdio_real_bytes(fsf_cfdc->sg) != ZFCP_CFDC_MAX_SIZE)) {
2414                 zfcp_fsf_req_free(req);
2415                 retval = -EIO;
2416                 goto out;
2417         }
2418         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
2419         if (zfcp_adapter_multi_buffer_active(adapter))
2420                 zfcp_qdio_set_scount(qdio, &req->qdio_req);
2421
2422         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
2423         retval = zfcp_fsf_req_send(req);
2424 out:
2425         spin_unlock_irq(&qdio->req_q_lock);
2426
2427         if (!retval) {
2428                 wait_for_completion(&req->completion);
2429                 return req;
2430         }
2431         return ERR_PTR(retval);
2432 }
2433
2434 /**
2435  * zfcp_fsf_reqid_check - validate req_id contained in SBAL returned by QDIO
2436  * @adapter: pointer to struct zfcp_adapter
2437  * @sbal_idx: response queue index of SBAL to be processed
2438  */
2439 void zfcp_fsf_reqid_check(struct zfcp_qdio *qdio, int sbal_idx)
2440 {
2441         struct zfcp_adapter *adapter = qdio->adapter;
2442         struct qdio_buffer *sbal = qdio->res_q[sbal_idx];
2443         struct qdio_buffer_element *sbale;
2444         struct zfcp_fsf_req *fsf_req;
2445         unsigned long req_id;
2446         int idx;
2447
2448         for (idx = 0; idx < QDIO_MAX_ELEMENTS_PER_BUFFER; idx++) {
2449
2450                 sbale = &sbal->element[idx];
2451                 req_id = (unsigned long) sbale->addr;
2452                 fsf_req = zfcp_reqlist_find_rm(adapter->req_list, req_id);
2453
2454                 if (!fsf_req) {
2455                         /*
2456                          * Unknown request means that we have potentially memory
2457                          * corruption and must stop the machine immediately.
2458                          */
2459                         zfcp_qdio_siosl(adapter);
2460                         panic("error: unknown req_id (%lx) on adapter %s.\n",
2461                               req_id, dev_name(&adapter->ccw_device->dev));
2462                 }
2463
2464                 fsf_req->qdio_req.sbal_response = sbal_idx;
2465                 zfcp_fsf_req_complete(fsf_req);
2466
2467                 if (likely(sbale->eflags & SBAL_EFLAGS_LAST_ENTRY))
2468                         break;
2469         }
2470 }
2471
2472 struct zfcp_fsf_req *zfcp_fsf_get_req(struct zfcp_qdio *qdio,
2473                                       struct qdio_buffer *sbal)
2474 {
2475         struct qdio_buffer_element *sbale = &sbal->element[0];
2476         u64 req_id = (unsigned long) sbale->addr;
2477
2478         return zfcp_reqlist_find(qdio->adapter->req_list, req_id);
2479 }