drivers/s390/scsi/zfcp_fsf.c

   1 /*
   2  * This file is part of the zfcp device driver for
   3  * FCP adapters for IBM System z9 and zSeries.
   4  *
   5  * (C) Copyright IBM Corp. 2002, 2006
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2, or (at your option)
  10  * any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20  */
  21
  22 #include "zfcp_ext.h"
  23
  24 static int zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *);
  25 static void zfcp_fsf_exchange_port_data_handler(struct zfcp_fsf_req *);
  26 static int zfcp_fsf_open_port_handler(struct zfcp_fsf_req *);
  27 static int zfcp_fsf_close_port_handler(struct zfcp_fsf_req *);
  28 static int zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *);
  29 static int zfcp_fsf_open_unit_handler(struct zfcp_fsf_req *);
  30 static int zfcp_fsf_close_unit_handler(struct zfcp_fsf_req *);
  31 static int zfcp_fsf_send_fcp_command_handler(struct zfcp_fsf_req *);
  32 static int zfcp_fsf_send_fcp_command_task_handler(struct zfcp_fsf_req *);
  33 static int zfcp_fsf_send_fcp_command_task_management_handler(
  34         struct zfcp_fsf_req *);
  35 static int zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *);
  36 static int zfcp_fsf_status_read_handler(struct zfcp_fsf_req *);
  37 static int zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *);
  38 static int zfcp_fsf_send_els_handler(struct zfcp_fsf_req *);
  39 static int zfcp_fsf_control_file_handler(struct zfcp_fsf_req *);
  40 static inline int zfcp_fsf_req_sbal_check(
  41         unsigned long *, struct zfcp_qdio_queue *, int);
  42 static inline int zfcp_use_one_sbal(
  43         struct scatterlist *, int, struct scatterlist *, int);
  44 static struct zfcp_fsf_req *zfcp_fsf_req_alloc(mempool_t *, int);
  45 static int zfcp_fsf_req_send(struct zfcp_fsf_req *);
  46 static int zfcp_fsf_protstatus_eval(struct zfcp_fsf_req *);
  47 static int zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *);
  48 static int zfcp_fsf_fsfstatus_qual_eval(struct zfcp_fsf_req *);
  49 static void zfcp_fsf_link_down_info_eval(struct zfcp_adapter *,
  50         struct fsf_link_down_info *);
  51 static int zfcp_fsf_req_dispatch(struct zfcp_fsf_req *);
  52
  53 /* association between FSF command and FSF QTCB type */
  54 static u32 fsf_qtcb_type[] = {
  55         [FSF_QTCB_FCP_CMND] =             FSF_IO_COMMAND,
  56         [FSF_QTCB_ABORT_FCP_CMND] =       FSF_SUPPORT_COMMAND,
  57         [FSF_QTCB_OPEN_PORT_WITH_DID] =   FSF_SUPPORT_COMMAND,
  58         [FSF_QTCB_OPEN_LUN] =             FSF_SUPPORT_COMMAND,
  59         [FSF_QTCB_CLOSE_LUN] =            FSF_SUPPORT_COMMAND,
  60         [FSF_QTCB_CLOSE_PORT] =           FSF_SUPPORT_COMMAND,
  61         [FSF_QTCB_CLOSE_PHYSICAL_PORT] =  FSF_SUPPORT_COMMAND,
  62         [FSF_QTCB_SEND_ELS] =             FSF_SUPPORT_COMMAND,
  63         [FSF_QTCB_SEND_GENERIC] =         FSF_SUPPORT_COMMAND,
  64         [FSF_QTCB_EXCHANGE_CONFIG_DATA] = FSF_CONFIG_COMMAND,
  65         [FSF_QTCB_EXCHANGE_PORT_DATA] =   FSF_PORT_COMMAND,
  66         [FSF_QTCB_DOWNLOAD_CONTROL_FILE] = FSF_SUPPORT_COMMAND,
  67         [FSF_QTCB_UPLOAD_CONTROL_FILE] =  FSF_SUPPORT_COMMAND
  68 };
  69
  70 static const char zfcp_act_subtable_type[5][8] = {
  71         "unknown", "OS", "WWPN", "DID", "LUN"
  72 };
  73
  74 /****************************************************************/
  75 /*************** FSF related Functions  *************************/
  76 /****************************************************************/
  77
  78 #define ZFCP_LOG_AREA                   ZFCP_LOG_AREA_FSF
  79
  80 /*
  81  * function:    zfcp_fsf_req_alloc
  82  *
  83  * purpose:     Obtains an fsf_req and potentially a qtcb (for all but
  84  *              unsolicited requests) via helper functions
  85  *              Does some initial fsf request set-up.
  86  *
  87  * returns:     pointer to allocated fsf_req if successfull
  88  *              NULL otherwise
  89  *
  90  * locks:       none
  91  *
  92  */
  93 static struct zfcp_fsf_req *
  94 zfcp_fsf_req_alloc(mempool_t *pool, int req_flags)
  95 {
  96         size_t size;
  97         void *ptr;
  98         struct zfcp_fsf_req *fsf_req = NULL;
  99
 100         if (req_flags & ZFCP_REQ_NO_QTCB)
 101                 size = sizeof(struct zfcp_fsf_req);
 102         else
 103                 size = sizeof(struct zfcp_fsf_req_qtcb);
 104
 105         if (likely(pool))
 106                 ptr = mempool_alloc(pool, GFP_ATOMIC);
 107         else {
 108                 if (req_flags & ZFCP_REQ_NO_QTCB)
 109                         ptr = kmalloc(size, GFP_ATOMIC);
 110                 else
 111                         ptr = kmem_cache_alloc(zfcp_data.fsf_req_qtcb_cache,
 112                                                GFP_ATOMIC);
 113         }
 114
 115         if (unlikely(!ptr))
 116                 goto out;
 117
 118         memset(ptr, 0, size);
 119
 120         if (req_flags & ZFCP_REQ_NO_QTCB) {
 121                 fsf_req = (struct zfcp_fsf_req *) ptr;
 122         } else {
 123                 fsf_req = &((struct zfcp_fsf_req_qtcb *) ptr)->fsf_req;
 124                 fsf_req->qtcb = &((struct zfcp_fsf_req_qtcb *) ptr)->qtcb;
 125         }
 126
 127         fsf_req->pool = pool;
 128
 129  out:
 130         return fsf_req;
 131 }
 132
 133 /*
 134  * function:    zfcp_fsf_req_free
 135  *
 136  * purpose:     Frees the memory of an fsf_req (and potentially a qtcb) or
 137  *              returns it into the pool via helper functions.
 138  *
 139  * returns:     sod all
 140  *
 141  * locks:       none
 142  */
 143 void
 144 zfcp_fsf_req_free(struct zfcp_fsf_req *fsf_req)
 145 {
 146         if (likely(fsf_req->pool)) {
 147                 mempool_free(fsf_req, fsf_req->pool);
 148                 return;
 149         }
 150
 151         if (fsf_req->qtcb) {
 152                 kmem_cache_free(zfcp_data.fsf_req_qtcb_cache, fsf_req);
 153                 return;
 154         }
 155
 156         kfree(fsf_req);
 157 }
 158
 159 /*
 160  * Never ever call this without shutting down the adapter first.
 161  * Otherwise the adapter would continue using and corrupting s390 storage.
 162  * Included BUG_ON() call to ensure this is done.
 163  * ERP is supposed to be the only user of this function.
 164  */
 165 void zfcp_fsf_req_dismiss_all(struct zfcp_adapter *adapter)
 166 {
 167         struct zfcp_fsf_req *fsf_req, *tmp;
 168         unsigned long flags;
 169         LIST_HEAD(remove_queue);
 170         unsigned int i;
 171
 172         BUG_ON(atomic_test_mask(ZFCP_STATUS_ADAPTER_QDIOUP, &adapter->status));
 173         spin_lock_irqsave(&adapter->req_list_lock, flags);
 174         atomic_set(&adapter->reqs_active, 0);
 175         for (i = 0; i < REQUEST_LIST_SIZE; i++)
 176                 list_splice_init(&adapter->req_list[i], &remove_queue);
 177         spin_unlock_irqrestore(&adapter->req_list_lock, flags);
 178
 179         list_for_each_entry_safe(fsf_req, tmp, &remove_queue, list) {
 180                 list_del(&fsf_req->list);
 181                 fsf_req->status |= ZFCP_STATUS_FSFREQ_DISMISSED;
 182                 zfcp_fsf_req_complete(fsf_req);
 183         }
 184 }
 185
 186 /*
 187  * function:    zfcp_fsf_req_complete
 188  *
 189  * purpose:     Updates active counts and timers for openfcp-reqs
 190  *              May cleanup request after req_eval returns
 191  *
 192  * returns:     0 - success
 193  *              !0 - failure
 194  *
 195  * context:
 196  */
 197 int
 198 zfcp_fsf_req_complete(struct zfcp_fsf_req *fsf_req)
 199 {
 200         int retval = 0;
 201         int cleanup;
 202
 203         if (unlikely(fsf_req->fsf_command == FSF_QTCB_UNSOLICITED_STATUS)) {
 204                 ZFCP_LOG_DEBUG("Status read response received\n");
 205                 /*
 206                  * Note: all cleanup handling is done in the callchain of
 207                  * the function call-chain below.
 208                  */
 209                 zfcp_fsf_status_read_handler(fsf_req);
 210                 goto out;
 211         } else {
 212                 del_timer(&fsf_req->timer);
 213                 zfcp_fsf_protstatus_eval(fsf_req);
 214         }
 215
 216         /*
 217          * fsf_req may be deleted due to waking up functions, so
 218          * cleanup is saved here and used later
 219          */
 220         if (likely(fsf_req->status & ZFCP_STATUS_FSFREQ_CLEANUP))
 221                 cleanup = 1;
 222         else
 223                 cleanup = 0;
 224
 225         fsf_req->status |= ZFCP_STATUS_FSFREQ_COMPLETED;
 226
 227         /* cleanup request if requested by initiator */
 228         if (likely(cleanup)) {
 229                 ZFCP_LOG_TRACE("removing FSF request %p\n", fsf_req);
 230                 /*
 231                  * lock must not be held here since it will be
 232                  * grabed by the called routine, too
 233                  */
 234                 zfcp_fsf_req_free(fsf_req);
 235         } else {
 236                 /* notify initiator waiting for the requests completion */
 237                 ZFCP_LOG_TRACE("waking initiator of FSF request %p\n",fsf_req);
 238                 /*
 239                  * FIXME: Race! We must not access fsf_req here as it might have been
 240                  * cleaned up already due to the set ZFCP_STATUS_FSFREQ_COMPLETED
 241                  * flag. It's an improbable case. But, we have the same paranoia for
 242                  * the cleanup flag already.
 243                  * Might better be handled using complete()?
 244                  * (setting the flag and doing wakeup ought to be atomic
 245                  *  with regard to checking the flag as long as waitqueue is
 246                  *  part of the to be released structure)
 247                  */
 248                 wake_up(&fsf_req->completion_wq);
 249         }
 250
 251  out:
 252         return retval;
 253 }
 254
 255 /*
 256  * function:    zfcp_fsf_protstatus_eval
 257  *
 258  * purpose:     evaluates the QTCB of the finished FSF request
 259  *              and initiates appropriate actions
 260  *              (usually calling FSF command specific handlers)
 261  *
 262  * returns:
 263  *
 264  * context:
 265  *
 266  * locks:
 267  */
 268 static int
 269 zfcp_fsf_protstatus_eval(struct zfcp_fsf_req *fsf_req)
 270 {
 271         int retval = 0;
 272         struct zfcp_adapter *adapter = fsf_req->adapter;
 273         struct fsf_qtcb *qtcb = fsf_req->qtcb;
 274         union fsf_prot_status_qual *prot_status_qual =
 275                 &qtcb->prefix.prot_status_qual;
 276
 277         zfcp_hba_dbf_event_fsf_response(fsf_req);
 278
 279         if (fsf_req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
 280                 ZFCP_LOG_DEBUG("fsf_req 0x%lx has been dismissed\n",
 281                                (unsigned long) fsf_req);
 282                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
 283                         ZFCP_STATUS_FSFREQ_RETRY; /* only for SCSI cmnds. */
 284                 goto skip_protstatus;
 285         }
 286
 287         /* log additional information provided by FSF (if any) */
 288         if (likely(qtcb->header.log_length)) {
 289                 /* do not trust them ;-) */
 290                 if (unlikely(qtcb->header.log_start >
 291                              sizeof(struct fsf_qtcb))) {
 292                         ZFCP_LOG_NORMAL
 293                             ("bug: ULP (FSF logging) log data starts "
 294                              "beyond end of packet header. Ignored. "
 295                              "(start=%i, size=%li)\n",
 296                              qtcb->header.log_start,
 297                              sizeof(struct fsf_qtcb));
 298                         goto forget_log;
 299                 }
 300                 if (unlikely((size_t) (qtcb->header.log_start +
 301                                        qtcb->header.log_length) >
 302                              sizeof(struct fsf_qtcb))) {
 303                         ZFCP_LOG_NORMAL("bug: ULP (FSF logging) log data ends "
 304                                         "beyond end of packet header. Ignored. "
 305                                         "(start=%i, length=%i, size=%li)\n",
 306                                         qtcb->header.log_start,
 307                                         qtcb->header.log_length,
 308                                         sizeof(struct fsf_qtcb));
 309                         goto forget_log;
 310                 }
 311                 ZFCP_LOG_TRACE("ULP log data: \n");
 312                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE,
 313                               (char *) qtcb + qtcb->header.log_start,
 314                               qtcb->header.log_length);
 315         }
 316  forget_log:
 317
 318         /* evaluate FSF Protocol Status */
 319         switch (qtcb->prefix.prot_status) {
 320
 321         case FSF_PROT_GOOD:
 322         case FSF_PROT_FSF_STATUS_PRESENTED:
 323                 break;
 324
 325         case FSF_PROT_QTCB_VERSION_ERROR:
 326                 ZFCP_LOG_NORMAL("error: The adapter %s contains "
 327                                 "microcode of version 0x%x, the device driver "
 328                                 "only supports 0x%x. Aborting.\n",
 329                                 zfcp_get_busid_by_adapter(adapter),
 330                                 prot_status_qual->version_error.fsf_version,
 331                                 ZFCP_QTCB_VERSION);
 332                 zfcp_erp_adapter_shutdown(adapter, 0);
 333                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 334                 break;
 335
 336         case FSF_PROT_SEQ_NUMB_ERROR:
 337                 ZFCP_LOG_NORMAL("bug: Sequence number mismatch between "
 338                                 "driver (0x%x) and adapter %s (0x%x). "
 339                                 "Restarting all operations on this adapter.\n",
 340                                 qtcb->prefix.req_seq_no,
 341                                 zfcp_get_busid_by_adapter(adapter),
 342                                 prot_status_qual->sequence_error.exp_req_seq_no);
 343                 zfcp_erp_adapter_reopen(adapter, 0);
 344                 fsf_req->status |= ZFCP_STATUS_FSFREQ_RETRY;
 345                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 346                 break;
 347
 348         case FSF_PROT_UNSUPP_QTCB_TYPE:
 349                 ZFCP_LOG_NORMAL("error: Packet header type used by the "
 350                                 "device driver is incompatible with "
 351                                 "that used on adapter %s. "
 352                                 "Stopping all operations on this adapter.\n",
 353                                 zfcp_get_busid_by_adapter(adapter));
 354                 zfcp_erp_adapter_shutdown(adapter, 0);
 355                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 356                 break;
 357
 358         case FSF_PROT_HOST_CONNECTION_INITIALIZING:
 359                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 360                 atomic_set_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
 361                                 &(adapter->status));
 362                 break;
 363
 364         case FSF_PROT_DUPLICATE_REQUEST_ID:
 365                         ZFCP_LOG_NORMAL("bug: The request identifier 0x%Lx "
 366                                         "to the adapter %s is ambiguous. "
 367                                 "Stopping all operations on this adapter.\n",
 368                                 *(unsigned long long*)
 369                                 (&qtcb->bottom.support.req_handle),
 370                                         zfcp_get_busid_by_adapter(adapter));
 371                 zfcp_erp_adapter_shutdown(adapter, 0);
 372                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 373                 break;
 374
 375         case FSF_PROT_LINK_DOWN:
 376                 zfcp_fsf_link_down_info_eval(adapter,
 377                                              &prot_status_qual->link_down_info);
 378                 zfcp_erp_adapter_reopen(adapter, 0);
 379                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 380                 break;
 381
 382         case FSF_PROT_REEST_QUEUE:
 383                 ZFCP_LOG_NORMAL("The local link to adapter with "
 384                               "%s was re-plugged. "
 385                               "Re-starting operations on this adapter.\n",
 386                               zfcp_get_busid_by_adapter(adapter));
 387                 /* All ports should be marked as ready to run again */
 388                 zfcp_erp_modify_adapter_status(adapter,
 389                                                ZFCP_STATUS_COMMON_RUNNING,
 390                                                ZFCP_SET);
 391                 zfcp_erp_adapter_reopen(adapter,
 392                                         ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED
 393                                         | ZFCP_STATUS_COMMON_ERP_FAILED);
 394                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 395                 break;
 396
 397         case FSF_PROT_ERROR_STATE:
 398                 ZFCP_LOG_NORMAL("error: The adapter %s "
 399                                 "has entered the error state. "
 400                                 "Restarting all operations on this "
 401                                 "adapter.\n",
 402                                 zfcp_get_busid_by_adapter(adapter));
 403                 zfcp_erp_adapter_reopen(adapter, 0);
 404                 fsf_req->status |= ZFCP_STATUS_FSFREQ_RETRY;
 405                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 406                 break;
 407
 408         default:
 409                 ZFCP_LOG_NORMAL("bug: Transfer protocol status information "
 410                                 "provided by the adapter %s "
 411                                 "is not compatible with the device driver. "
 412                                 "Stopping all operations on this adapter. "
 413                                 "(debug info 0x%x).\n",
 414                                 zfcp_get_busid_by_adapter(adapter),
 415                                 qtcb->prefix.prot_status);
 416                 zfcp_erp_adapter_shutdown(adapter, 0);
 417                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 418         }
 419
 420  skip_protstatus:
 421         /*
 422          * always call specific handlers to give them a chance to do
 423          * something meaningful even in error cases
 424          */
 425         zfcp_fsf_fsfstatus_eval(fsf_req);
 426         return retval;
 427 }
 428
 429 /*
 430  * function:    zfcp_fsf_fsfstatus_eval
 431  *
 432  * purpose:     evaluates FSF status of completed FSF request
 433  *              and acts accordingly
 434  *
 435  * returns:
 436  */
 437 static int
 438 zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *fsf_req)
 439 {
 440         int retval = 0;
 441
 442         if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
 443                 goto skip_fsfstatus;
 444         }
 445
 446         /* evaluate FSF Status */
 447         switch (fsf_req->qtcb->header.fsf_status) {
 448         case FSF_UNKNOWN_COMMAND:
 449                 ZFCP_LOG_NORMAL("bug: Command issued by the device driver is "
 450                                 "not known by the adapter %s "
 451                                 "Stopping all operations on this adapter. "
 452                                 "(debug info 0x%x).\n",
 453                                 zfcp_get_busid_by_adapter(fsf_req->adapter),
 454                                 fsf_req->qtcb->header.fsf_command);
 455                 zfcp_erp_adapter_shutdown(fsf_req->adapter, 0);
 456                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 457                 break;
 458
 459         case FSF_FCP_RSP_AVAILABLE:
 460                 ZFCP_LOG_DEBUG("FCP Sense data will be presented to the "
 461                                "SCSI stack.\n");
 462                 break;
 463
 464         case FSF_ADAPTER_STATUS_AVAILABLE:
 465                 zfcp_fsf_fsfstatus_qual_eval(fsf_req);
 466                 break;
 467         }
 468
 469  skip_fsfstatus:
 470         /*
 471          * always call specific handlers to give them a chance to do
 472          * something meaningful even in error cases
 473          */
 474         zfcp_fsf_req_dispatch(fsf_req);
 475
 476         return retval;
 477 }
 478
 479 /*
 480  * function:    zfcp_fsf_fsfstatus_qual_eval
 481  *
 482  * purpose:     evaluates FSF status-qualifier of completed FSF request
 483  *              and acts accordingly
 484  *
 485  * returns:
 486  */
 487 static int
 488 zfcp_fsf_fsfstatus_qual_eval(struct zfcp_fsf_req *fsf_req)
 489 {
 490         int retval = 0;
 491
 492         switch (fsf_req->qtcb->header.fsf_status_qual.word[0]) {
 493         case FSF_SQ_FCP_RSP_AVAILABLE:
 494                 break;
 495         case FSF_SQ_RETRY_IF_POSSIBLE:
 496                 /* The SCSI-stack may now issue retries or escalate */
 497                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 498                 break;
 499         case FSF_SQ_COMMAND_ABORTED:
 500                 /* Carry the aborted state on to upper layer */
 501                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ABORTED;
 502                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 503                 break;
 504         case FSF_SQ_NO_RECOM:
 505                 ZFCP_LOG_NORMAL("bug: No recommendation could be given for a "
 506                                 "problem on the adapter %s "
 507                                 "Stopping all operations on this adapter. ",
 508                                 zfcp_get_busid_by_adapter(fsf_req->adapter));
 509                 zfcp_erp_adapter_shutdown(fsf_req->adapter, 0);
 510                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 511                 break;
 512         case FSF_SQ_ULP_PROGRAMMING_ERROR:
 513                 ZFCP_LOG_NORMAL("error: not enough SBALs for data transfer "
 514                                 "(adapter %s)\n",
 515                                 zfcp_get_busid_by_adapter(fsf_req->adapter));
 516                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 517                 break;
 518         case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
 519         case FSF_SQ_NO_RETRY_POSSIBLE:
 520         case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
 521                 /* dealt with in the respective functions */
 522                 break;
 523         default:
 524                 ZFCP_LOG_NORMAL("bug: Additional status info could "
 525                                 "not be interpreted properly.\n");
 526                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
 527                               (char *) &fsf_req->qtcb->header.fsf_status_qual,
 528                               sizeof (union fsf_status_qual));
 529                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 530                 break;
 531         }
 532
 533         return retval;
 534 }
 535
 536 /**
 537  * zfcp_fsf_link_down_info_eval - evaluate link down information block
 538  */
 539 static void
 540 zfcp_fsf_link_down_info_eval(struct zfcp_adapter *adapter,
 541                              struct fsf_link_down_info *link_down)
 542 {
 543         if (atomic_test_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED,
 544                              &adapter->status))
 545                 return;
 546
 547         atomic_set_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED, &adapter->status);
 548
 549         if (link_down == NULL)
 550                 goto out;
 551
 552         switch (link_down->error_code) {
 553         case FSF_PSQ_LINK_NO_LIGHT:
 554                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 555                                 "(no light detected)\n",
 556                                 zfcp_get_busid_by_adapter(adapter));
 557                 break;
 558         case FSF_PSQ_LINK_WRAP_PLUG:
 559                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 560                                 "(wrap plug detected)\n",
 561                                 zfcp_get_busid_by_adapter(adapter));
 562                 break;
 563         case FSF_PSQ_LINK_NO_FCP:
 564                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 565                                 "(adjacent node on link does not support FCP)\n",
 566                                 zfcp_get_busid_by_adapter(adapter));
 567                 break;
 568         case FSF_PSQ_LINK_FIRMWARE_UPDATE:
 569                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 570                                 "(firmware update in progress)\n",
 571                                 zfcp_get_busid_by_adapter(adapter));
 572                         break;
 573         case FSF_PSQ_LINK_INVALID_WWPN:
 574                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 575                                 "(duplicate or invalid WWPN detected)\n",
 576                                 zfcp_get_busid_by_adapter(adapter));
 577                 break;
 578         case FSF_PSQ_LINK_NO_NPIV_SUPPORT:
 579                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 580                                 "(no support for NPIV by Fabric)\n",
 581                                 zfcp_get_busid_by_adapter(adapter));
 582                 break;
 583         case FSF_PSQ_LINK_NO_FCP_RESOURCES:
 584                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 585                                 "(out of resource in FCP daughtercard)\n",
 586                                 zfcp_get_busid_by_adapter(adapter));
 587                 break;
 588         case FSF_PSQ_LINK_NO_FABRIC_RESOURCES:
 589                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 590                                 "(out of resource in Fabric)\n",
 591                                 zfcp_get_busid_by_adapter(adapter));
 592                 break;
 593         case FSF_PSQ_LINK_FABRIC_LOGIN_UNABLE:
 594                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 595                                 "(unable to Fabric login)\n",
 596                                 zfcp_get_busid_by_adapter(adapter));
 597                 break;
 598         case FSF_PSQ_LINK_WWPN_ASSIGNMENT_CORRUPTED:
 599                 ZFCP_LOG_NORMAL("WWPN assignment file corrupted on adapter %s\n",
 600                                 zfcp_get_busid_by_adapter(adapter));
 601                 break;
 602         case FSF_PSQ_LINK_MODE_TABLE_CURRUPTED:
 603                 ZFCP_LOG_NORMAL("Mode table corrupted on adapter %s\n",
 604                                 zfcp_get_busid_by_adapter(adapter));
 605                 break;
 606         case FSF_PSQ_LINK_NO_WWPN_ASSIGNMENT:
 607                 ZFCP_LOG_NORMAL("No WWPN for assignment table on adapter %s\n",
 608                                 zfcp_get_busid_by_adapter(adapter));
 609                 break;
 610         default:
 611                 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
 612                                 "(warning: unknown reason code %d)\n",
 613                                 zfcp_get_busid_by_adapter(adapter),
 614                                 link_down->error_code);
 615         }
 616
 617         if (adapter->connection_features & FSF_FEATURE_NPIV_MODE)
 618                 ZFCP_LOG_DEBUG("Debug information to link down: "
 619                                "primary_status=0x%02x "
 620                                "ioerr_code=0x%02x "
 621                                "action_code=0x%02x "
 622                                "reason_code=0x%02x "
 623                                "explanation_code=0x%02x "
 624                                "vendor_specific_code=0x%02x\n",
 625                                 link_down->primary_status,
 626                                 link_down->ioerr_code,
 627                                 link_down->action_code,
 628                                 link_down->reason_code,
 629                                 link_down->explanation_code,
 630                                 link_down->vendor_specific_code);
 631
 632  out:
 633         zfcp_erp_adapter_failed(adapter);
 634 }
 635
 636 /*
 637  * function:    zfcp_fsf_req_dispatch
 638  *
 639  * purpose:     calls the appropriate command specific handler
 640  *
 641  * returns:
 642  */
 643 static int
 644 zfcp_fsf_req_dispatch(struct zfcp_fsf_req *fsf_req)
 645 {
 646         struct zfcp_erp_action *erp_action = fsf_req->erp_action;
 647         struct zfcp_adapter *adapter = fsf_req->adapter;
 648         int retval = 0;
 649
 650
 651         switch (fsf_req->fsf_command) {
 652
 653         case FSF_QTCB_FCP_CMND:
 654                 zfcp_fsf_send_fcp_command_handler(fsf_req);
 655                 break;
 656
 657         case FSF_QTCB_ABORT_FCP_CMND:
 658                 zfcp_fsf_abort_fcp_command_handler(fsf_req);
 659                 break;
 660
 661         case FSF_QTCB_SEND_GENERIC:
 662                 zfcp_fsf_send_ct_handler(fsf_req);
 663                 break;
 664
 665         case FSF_QTCB_OPEN_PORT_WITH_DID:
 666                 zfcp_fsf_open_port_handler(fsf_req);
 667                 break;
 668
 669         case FSF_QTCB_OPEN_LUN:
 670                 zfcp_fsf_open_unit_handler(fsf_req);
 671                 break;
 672
 673         case FSF_QTCB_CLOSE_LUN:
 674                 zfcp_fsf_close_unit_handler(fsf_req);
 675                 break;
 676
 677         case FSF_QTCB_CLOSE_PORT:
 678                 zfcp_fsf_close_port_handler(fsf_req);
 679                 break;
 680
 681         case FSF_QTCB_CLOSE_PHYSICAL_PORT:
 682                 zfcp_fsf_close_physical_port_handler(fsf_req);
 683                 break;
 684
 685         case FSF_QTCB_EXCHANGE_CONFIG_DATA:
 686                 zfcp_fsf_exchange_config_data_handler(fsf_req);
 687                 break;
 688
 689         case FSF_QTCB_EXCHANGE_PORT_DATA:
 690                 zfcp_fsf_exchange_port_data_handler(fsf_req);
 691                 break;
 692
 693         case FSF_QTCB_SEND_ELS:
 694                 zfcp_fsf_send_els_handler(fsf_req);
 695                 break;
 696
 697         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
 698                 zfcp_fsf_control_file_handler(fsf_req);
 699                 break;
 700
 701         case FSF_QTCB_UPLOAD_CONTROL_FILE:
 702                 zfcp_fsf_control_file_handler(fsf_req);
 703                 break;
 704
 705         default:
 706                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
 707                 ZFCP_LOG_NORMAL("bug: Command issued by the device driver is "
 708                                 "not supported by the adapter %s\n",
 709                                 zfcp_get_busid_by_adapter(adapter));
 710                 if (fsf_req->fsf_command != fsf_req->qtcb->header.fsf_command)
 711                         ZFCP_LOG_NORMAL
 712                             ("bug: Command issued by the device driver differs "
 713                              "from the command returned by the adapter %s "
 714                              "(debug info 0x%x, 0x%x).\n",
 715                              zfcp_get_busid_by_adapter(adapter),
 716                              fsf_req->fsf_command,
 717                              fsf_req->qtcb->header.fsf_command);
 718         }
 719
 720         if (!erp_action)
 721                 return retval;
 722
 723         zfcp_erp_async_handler(erp_action, 0);
 724
 725         return retval;
 726 }
 727
 728 /*
 729  * function:    zfcp_fsf_status_read
 730  *
 731  * purpose:     initiates a Status Read command at the specified adapter
 732  *
 733  * returns:
 734  */
 735 int
 736 zfcp_fsf_status_read(struct zfcp_adapter *adapter, int req_flags)
 737 {
 738         struct zfcp_fsf_req *fsf_req;
 739         struct fsf_status_read_buffer *status_buffer;
 740         unsigned long lock_flags;
 741         volatile struct qdio_buffer_element *sbale;
 742         int retval = 0;
 743
 744         /* setup new FSF request */
 745         retval = zfcp_fsf_req_create(adapter, FSF_QTCB_UNSOLICITED_STATUS,
 746                                      req_flags | ZFCP_REQ_NO_QTCB,
 747                                      adapter->pool.fsf_req_status_read,
 748                                      &lock_flags, &fsf_req);
 749         if (retval < 0) {
 750                 ZFCP_LOG_INFO("error: Could not create unsolicited status "
 751                               "buffer for adapter %s.\n",
 752                               zfcp_get_busid_by_adapter(adapter));
 753                 goto failed_req_create;
 754         }
 755
 756         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
 757         sbale[0].flags |= SBAL_FLAGS0_TYPE_STATUS;
 758         sbale[2].flags |= SBAL_FLAGS_LAST_ENTRY;
 759         fsf_req->sbale_curr = 2;
 760
 761         status_buffer =
 762                 mempool_alloc(adapter->pool.data_status_read, GFP_ATOMIC);
 763         if (!status_buffer) {
 764                 ZFCP_LOG_NORMAL("bug: could not get some buffer\n");
 765                 goto failed_buf;
 766         }
 767         memset(status_buffer, 0, sizeof (struct fsf_status_read_buffer));
 768         fsf_req->data = (unsigned long) status_buffer;
 769
 770         /* insert pointer to respective buffer */
 771         sbale = zfcp_qdio_sbale_curr(fsf_req);
 772         sbale->addr = (void *) status_buffer;
 773         sbale->length = sizeof(struct fsf_status_read_buffer);
 774
 775         retval = zfcp_fsf_req_send(fsf_req);
 776         if (retval) {
 777                 ZFCP_LOG_DEBUG("error: Could not set-up unsolicited status "
 778                                "environment.\n");
 779                 goto failed_req_send;
 780         }
 781
 782         ZFCP_LOG_TRACE("Status Read request initiated (adapter%s)\n",
 783                        zfcp_get_busid_by_adapter(adapter));
 784         goto out;
 785
 786  failed_req_send:
 787         mempool_free(status_buffer, adapter->pool.data_status_read);
 788
 789  failed_buf:
 790         zfcp_fsf_req_free(fsf_req);
 791  failed_req_create:
 792         zfcp_hba_dbf_event_fsf_unsol("fail", adapter, NULL);
 793  out:
 794         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
 795         return retval;
 796 }
 797
 798 static int
 799 zfcp_fsf_status_read_port_closed(struct zfcp_fsf_req *fsf_req)
 800 {
 801         struct fsf_status_read_buffer *status_buffer;
 802         struct zfcp_adapter *adapter;
 803         struct zfcp_port *port;
 804         unsigned long flags;
 805
 806         status_buffer = (struct fsf_status_read_buffer *) fsf_req->data;
 807         adapter = fsf_req->adapter;
 808
 809         read_lock_irqsave(&zfcp_data.config_lock, flags);
 810         list_for_each_entry(port, &adapter->port_list_head, list)
 811             if (port->d_id == (status_buffer->d_id & ZFCP_DID_MASK))
 812                 break;
 813         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
 814
 815         if (!port || (port->d_id != (status_buffer->d_id & ZFCP_DID_MASK))) {
 816                 ZFCP_LOG_NORMAL("bug: Reopen port indication received for "
 817                                 "nonexisting port with d_id 0x%06x on "
 818                                 "adapter %s. Ignored.\n",
 819                                 status_buffer->d_id & ZFCP_DID_MASK,
 820                                 zfcp_get_busid_by_adapter(adapter));
 821                 goto out;
 822         }
 823
 824         switch (status_buffer->status_subtype) {
 825
 826         case FSF_STATUS_READ_SUB_CLOSE_PHYS_PORT:
 827                 debug_text_event(adapter->erp_dbf, 3, "unsol_pc_phys:");
 828                 zfcp_erp_port_reopen(port, 0);
 829                 break;
 830
 831         case FSF_STATUS_READ_SUB_ERROR_PORT:
 832                 debug_text_event(adapter->erp_dbf, 1, "unsol_pc_err:");
 833                 zfcp_erp_port_shutdown(port, 0);
 834                 break;
 835
 836         default:
 837                 debug_text_event(adapter->erp_dbf, 0, "unsol_unk_sub:");
 838                 debug_exception(adapter->erp_dbf, 0,
 839                                 &status_buffer->status_subtype, sizeof (u32));
 840                 ZFCP_LOG_NORMAL("bug: Undefined status subtype received "
 841                                 "for a reopen indication on port with "
 842                                 "d_id 0x%06x on the adapter %s. "
 843                                 "Ignored. (debug info 0x%x)\n",
 844                                 status_buffer->d_id,
 845                                 zfcp_get_busid_by_adapter(adapter),
 846                                 status_buffer->status_subtype);
 847         }
 848  out:
 849         return 0;
 850 }
 851
 852 /*
 853  * function:    zfcp_fsf_status_read_handler
 854  *
 855  * purpose:     is called for finished Open Port command
 856  *
 857  * returns:
 858  */
 859 static int
 860 zfcp_fsf_status_read_handler(struct zfcp_fsf_req *fsf_req)
 861 {
 862         int retval = 0;
 863         struct zfcp_adapter *adapter = fsf_req->adapter;
 864         struct fsf_status_read_buffer *status_buffer =
 865                 (struct fsf_status_read_buffer *) fsf_req->data;
 866         struct fsf_bit_error_payload *fsf_bit_error;
 867
 868         if (fsf_req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
 869                 zfcp_hba_dbf_event_fsf_unsol("dism", adapter, status_buffer);
 870                 mempool_free(status_buffer, adapter->pool.data_status_read);
 871                 zfcp_fsf_req_free(fsf_req);
 872                 goto out;
 873         }
 874
 875         zfcp_hba_dbf_event_fsf_unsol("read", adapter, status_buffer);
 876
 877         switch (status_buffer->status_type) {
 878
 879         case FSF_STATUS_READ_PORT_CLOSED:
 880                 zfcp_fsf_status_read_port_closed(fsf_req);
 881                 break;
 882
 883         case FSF_STATUS_READ_INCOMING_ELS:
 884                 zfcp_fsf_incoming_els(fsf_req);
 885                 break;
 886
 887         case FSF_STATUS_READ_SENSE_DATA_AVAIL:
 888                 ZFCP_LOG_INFO("unsolicited sense data received (adapter %s)\n",
 889                               zfcp_get_busid_by_adapter(adapter));
 890                 break;
 891
 892         case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
 893                 fsf_bit_error = (struct fsf_bit_error_payload *)
 894                         status_buffer->payload;
 895                 ZFCP_LOG_NORMAL("Warning: bit error threshold data "
 896                     "received (adapter %s, "
 897                     "link failures = %i, loss of sync errors = %i, "
 898                     "loss of signal errors = %i, "
 899                     "primitive sequence errors = %i, "
 900                     "invalid transmission word errors = %i, "
 901                     "CRC errors = %i)\n",
 902                     zfcp_get_busid_by_adapter(adapter),
 903                     fsf_bit_error->link_failure_error_count,
 904                     fsf_bit_error->loss_of_sync_error_count,
 905                     fsf_bit_error->loss_of_signal_error_count,
 906                     fsf_bit_error->primitive_sequence_error_count,
 907                     fsf_bit_error->invalid_transmission_word_error_count,
 908                     fsf_bit_error->crc_error_count);
 909                 ZFCP_LOG_INFO("Additional bit error threshold data "
 910                     "(adapter %s, "
 911                     "primitive sequence event time-outs = %i, "
 912                     "elastic buffer overrun errors = %i, "
 913                     "advertised receive buffer-to-buffer credit = %i, "
 914                     "current receice buffer-to-buffer credit = %i, "
 915                     "advertised transmit buffer-to-buffer credit = %i, "
 916                     "current transmit buffer-to-buffer credit = %i)\n",
 917                     zfcp_get_busid_by_adapter(adapter),
 918                     fsf_bit_error->primitive_sequence_event_timeout_count,
 919                     fsf_bit_error->elastic_buffer_overrun_error_count,
 920                     fsf_bit_error->advertised_receive_b2b_credit,
 921                     fsf_bit_error->current_receive_b2b_credit,
 922                     fsf_bit_error->advertised_transmit_b2b_credit,
 923                     fsf_bit_error->current_transmit_b2b_credit);
 924                 break;
 925
 926         case FSF_STATUS_READ_LINK_DOWN:
 927                 switch (status_buffer->status_subtype) {
 928                 case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
 929                         ZFCP_LOG_INFO("Physical link to adapter %s is down\n",
 930                                       zfcp_get_busid_by_adapter(adapter));
 931                         zfcp_fsf_link_down_info_eval(adapter,
 932                                 (struct fsf_link_down_info *)
 933                                 &status_buffer->payload);
 934                         break;
 935                 case FSF_STATUS_READ_SUB_FDISC_FAILED:
 936                         ZFCP_LOG_INFO("Local link to adapter %s is down "
 937                                       "due to failed FDISC login\n",
 938                                       zfcp_get_busid_by_adapter(adapter));
 939                         zfcp_fsf_link_down_info_eval(adapter,
 940                                 (struct fsf_link_down_info *)
 941                                 &status_buffer->payload);
 942                         break;
 943                 case FSF_STATUS_READ_SUB_FIRMWARE_UPDATE:
 944                         ZFCP_LOG_INFO("Local link to adapter %s is down "
 945                                       "due to firmware update on adapter\n",
 946                                       zfcp_get_busid_by_adapter(adapter));
 947                         zfcp_fsf_link_down_info_eval(adapter, NULL);
 948                         break;
 949                 default:
 950                         ZFCP_LOG_INFO("Local link to adapter %s is down "
 951                                       "due to unknown reason\n",
 952                                       zfcp_get_busid_by_adapter(adapter));
 953                         zfcp_fsf_link_down_info_eval(adapter, NULL);
 954                 };
 955                 break;
 956
 957         case FSF_STATUS_READ_LINK_UP:
 958                 ZFCP_LOG_NORMAL("Local link to adapter %s was replugged. "
 959                                 "Restarting operations on this adapter\n",
 960                                 zfcp_get_busid_by_adapter(adapter));
 961                 /* All ports should be marked as ready to run again */
 962                 zfcp_erp_modify_adapter_status(adapter,
 963                                                ZFCP_STATUS_COMMON_RUNNING,
 964                                                ZFCP_SET);
 965                 zfcp_erp_adapter_reopen(adapter,
 966                                         ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED
 967                                         | ZFCP_STATUS_COMMON_ERP_FAILED);
 968                 break;
 969
 970         case FSF_STATUS_READ_NOTIFICATION_LOST:
 971                 ZFCP_LOG_NORMAL("Unsolicited status notification(s) lost: "
 972                                 "adapter %s%s%s%s%s%s%s%s%s\n",
 973                                 zfcp_get_busid_by_adapter(adapter),
 974                                 (status_buffer->status_subtype &
 975                                         FSF_STATUS_READ_SUB_INCOMING_ELS) ?
 976                                         ", incoming ELS" : "",
 977                                 (status_buffer->status_subtype &
 978                                         FSF_STATUS_READ_SUB_SENSE_DATA) ?
 979                                         ", sense data" : "",
 980                                 (status_buffer->status_subtype &
 981                                         FSF_STATUS_READ_SUB_LINK_STATUS) ?
 982                                         ", link status change" : "",
 983                                 (status_buffer->status_subtype &
 984                                         FSF_STATUS_READ_SUB_PORT_CLOSED) ?
 985                                         ", port close" : "",
 986                                 (status_buffer->status_subtype &
 987                                         FSF_STATUS_READ_SUB_BIT_ERROR_THRESHOLD) ?
 988                                         ", bit error exception" : "",
 989                                 (status_buffer->status_subtype &
 990                                         FSF_STATUS_READ_SUB_ACT_UPDATED) ?
 991                                         ", ACT update" : "",
 992                                 (status_buffer->status_subtype &
 993                                         FSF_STATUS_READ_SUB_ACT_HARDENED) ?
 994                                         ", ACT hardening" : "",
 995                                 (status_buffer->status_subtype &
 996                                         FSF_STATUS_READ_SUB_FEATURE_UPDATE_ALERT) ?
 997                                         ", adapter feature change" : "");
 998
 999                 if (status_buffer->status_subtype &
1000                     FSF_STATUS_READ_SUB_ACT_UPDATED)
1001                         zfcp_erp_adapter_access_changed(adapter);
1002                 break;
1003
1004         case FSF_STATUS_READ_CFDC_UPDATED:
1005                 ZFCP_LOG_NORMAL("CFDC has been updated on the adapter %s\n",
1006                               zfcp_get_busid_by_adapter(adapter));
1007                 zfcp_erp_adapter_access_changed(adapter);
1008                 break;
1009
1010         case FSF_STATUS_READ_CFDC_HARDENED:
1011                 switch (status_buffer->status_subtype) {
1012                 case FSF_STATUS_READ_SUB_CFDC_HARDENED_ON_SE:
1013                         ZFCP_LOG_NORMAL("CFDC of adapter %s saved on SE\n",
1014                                       zfcp_get_busid_by_adapter(adapter));
1015                         break;
1016                 case FSF_STATUS_READ_SUB_CFDC_HARDENED_ON_SE2:
1017                         ZFCP_LOG_NORMAL("CFDC of adapter %s has been copied "
1018                                       "to the secondary SE\n",
1019                                 zfcp_get_busid_by_adapter(adapter));
1020                         break;
1021                 default:
1022                         ZFCP_LOG_NORMAL("CFDC of adapter %s has been hardened\n",
1023                                       zfcp_get_busid_by_adapter(adapter));
1024                 }
1025                 break;
1026
1027         case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
1028                 debug_text_event(adapter->erp_dbf, 2, "unsol_features:");
1029                 ZFCP_LOG_INFO("List of supported features on adapter %s has "
1030                               "been changed from 0x%08X to 0x%08X\n",
1031                               zfcp_get_busid_by_adapter(adapter),
1032                               *(u32*) (status_buffer->payload + 4),
1033                               *(u32*) (status_buffer->payload));
1034                 adapter->adapter_features = *(u32*) status_buffer->payload;
1035                 break;
1036
1037         default:
1038                 ZFCP_LOG_NORMAL("warning: An unsolicited status packet of unknown "
1039                                 "type was received (debug info 0x%x)\n",
1040                                 status_buffer->status_type);
1041                 ZFCP_LOG_DEBUG("Dump of status_read_buffer %p:\n",
1042                                status_buffer);
1043                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
1044                               (char *) status_buffer,
1045                               sizeof (struct fsf_status_read_buffer));
1046                 break;
1047         }
1048         mempool_free(status_buffer, adapter->pool.data_status_read);
1049         zfcp_fsf_req_free(fsf_req);
1050         /*
1051          * recycle buffer and start new request repeat until outbound
1052          * queue is empty or adapter shutdown is requested
1053          */
1054         /*
1055          * FIXME(qdio):
1056          * we may wait in the req_create for 5s during shutdown, so
1057          * qdio_cleanup will have to wait at least that long before returning
1058          * with failure to allow us a proper cleanup under all circumstances
1059          */
1060         /*
1061          * FIXME:
1062          * allocation failure possible? (Is this code needed?)
1063          */
1064         retval = zfcp_fsf_status_read(adapter, 0);
1065         if (retval < 0) {
1066                 ZFCP_LOG_INFO("Failed to create unsolicited status read "
1067                               "request for the adapter %s.\n",
1068                               zfcp_get_busid_by_adapter(adapter));
1069                 /* temporary fix to avoid status read buffer shortage */
1070                 adapter->status_read_failed++;
1071                 if ((ZFCP_STATUS_READS_RECOM - adapter->status_read_failed)
1072                     < ZFCP_STATUS_READ_FAILED_THRESHOLD) {
1073                         ZFCP_LOG_INFO("restart adapter %s due to status read "
1074                                       "buffer shortage\n",
1075                                       zfcp_get_busid_by_adapter(adapter));
1076                         zfcp_erp_adapter_reopen(adapter, 0);
1077                 }
1078         }
1079  out:
1080         return retval;
1081 }
1082
1083 /*
1084  * function:    zfcp_fsf_abort_fcp_command
1085  *
1086  * purpose:     tells FSF to abort a running SCSI command
1087  *
1088  * returns:     address of initiated FSF request
1089  *              NULL - request could not be initiated
1090  *
1091  * FIXME(design): should be watched by a timeout !!!
1092  * FIXME(design) shouldn't this be modified to return an int
1093  *               also...don't know how though
1094  */
1095 struct zfcp_fsf_req *
1096 zfcp_fsf_abort_fcp_command(unsigned long old_req_id,
1097                            struct zfcp_adapter *adapter,
1098                            struct zfcp_unit *unit, int req_flags)
1099 {
1100         volatile struct qdio_buffer_element *sbale;
1101         struct zfcp_fsf_req *fsf_req = NULL;
1102         unsigned long lock_flags;
1103         int retval = 0;
1104
1105         /* setup new FSF request */
1106         retval = zfcp_fsf_req_create(adapter, FSF_QTCB_ABORT_FCP_CMND,
1107                                      req_flags, adapter->pool.fsf_req_abort,
1108                                      &lock_flags, &fsf_req);
1109         if (retval < 0) {
1110                 ZFCP_LOG_INFO("error: Failed to create an abort command "
1111                               "request for lun 0x%016Lx on port 0x%016Lx "
1112                               "on adapter %s.\n",
1113                               unit->fcp_lun,
1114                               unit->port->wwpn,
1115                               zfcp_get_busid_by_adapter(adapter));
1116                 goto out;
1117         }
1118
1119         if (unlikely(!atomic_test_mask(ZFCP_STATUS_COMMON_UNBLOCKED,
1120                         &unit->status)))
1121                 goto unit_blocked;
1122
1123         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1124         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
1125         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
1126
1127         fsf_req->data = (unsigned long) unit;
1128
1129         /* set handles of unit and its parent port in QTCB */
1130         fsf_req->qtcb->header.lun_handle = unit->handle;
1131         fsf_req->qtcb->header.port_handle = unit->port->handle;
1132
1133         /* set handle of request which should be aborted */
1134         fsf_req->qtcb->bottom.support.req_handle = (u64) old_req_id;
1135
1136         zfcp_fsf_start_timer(fsf_req, ZFCP_SCSI_ER_TIMEOUT);
1137         retval = zfcp_fsf_req_send(fsf_req);
1138         if (!retval)
1139                 goto out;
1140
1141  unit_blocked:
1142                 zfcp_fsf_req_free(fsf_req);
1143                 fsf_req = NULL;
1144
1145  out:
1146         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
1147         return fsf_req;
1148 }
1149
1150 /*
1151  * function:    zfcp_fsf_abort_fcp_command_handler
1152  *
1153  * purpose:     is called for finished Abort FCP Command request
1154  *
1155  * returns:
1156  */
1157 static int
1158 zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *new_fsf_req)
1159 {
1160         int retval = -EINVAL;
1161         struct zfcp_unit *unit;
1162         union fsf_status_qual *fsf_stat_qual =
1163                 &new_fsf_req->qtcb->header.fsf_status_qual;
1164
1165         if (new_fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
1166                 /* do not set ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED */
1167                 goto skip_fsfstatus;
1168         }
1169
1170         unit = (struct zfcp_unit *) new_fsf_req->data;
1171
1172         /* evaluate FSF status in QTCB */
1173         switch (new_fsf_req->qtcb->header.fsf_status) {
1174
1175         case FSF_PORT_HANDLE_NOT_VALID:
1176                 if (fsf_stat_qual->word[0] != fsf_stat_qual->word[1]) {
1177                         debug_text_event(new_fsf_req->adapter->erp_dbf, 3,
1178                                          "fsf_s_phand_nv0");
1179                         /*
1180                          * In this case a command that was sent prior to a port
1181                          * reopen was aborted (handles are different). This is
1182                          * fine.
1183                          */
1184                 } else {
1185                         ZFCP_LOG_INFO("Temporary port identifier 0x%x for "
1186                                       "port 0x%016Lx on adapter %s invalid. "
1187                                       "This may happen occasionally.\n",
1188                                       unit->port->handle,
1189                                       unit->port->wwpn,
1190                                       zfcp_get_busid_by_unit(unit));
1191                         ZFCP_LOG_INFO("status qualifier:\n");
1192                         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1193                                       (char *) &new_fsf_req->qtcb->header.
1194                                       fsf_status_qual,
1195                                       sizeof (union fsf_status_qual));
1196                         /* Let's hope this sorts out the mess */
1197                         debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1198                                          "fsf_s_phand_nv1");
1199                         zfcp_erp_adapter_reopen(unit->port->adapter, 0);
1200                         new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1201                 }
1202                 break;
1203
1204         case FSF_LUN_HANDLE_NOT_VALID:
1205                 if (fsf_stat_qual->word[0] != fsf_stat_qual->word[1]) {
1206                         debug_text_event(new_fsf_req->adapter->erp_dbf, 3,
1207                                          "fsf_s_lhand_nv0");
1208                         /*
1209                          * In this case a command that was sent prior to a unit
1210                          * reopen was aborted (handles are different).
1211                          * This is fine.
1212                          */
1213                 } else {
1214                         ZFCP_LOG_INFO
1215                             ("Warning: Temporary LUN identifier 0x%x of LUN "
1216                              "0x%016Lx on port 0x%016Lx on adapter %s is "
1217                              "invalid. This may happen in rare cases. "
1218                              "Trying to re-establish link.\n",
1219                              unit->handle,
1220                              unit->fcp_lun,
1221                              unit->port->wwpn,
1222                              zfcp_get_busid_by_unit(unit));
1223                         ZFCP_LOG_DEBUG("Status qualifier data:\n");
1224                         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
1225                                       (char *) &new_fsf_req->qtcb->header.
1226                                       fsf_status_qual,
1227                                       sizeof (union fsf_status_qual));
1228                         /* Let's hope this sorts out the mess */
1229                         debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1230                                          "fsf_s_lhand_nv1");
1231                         zfcp_erp_port_reopen(unit->port, 0);
1232                         new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1233                 }
1234                 break;
1235
1236         case FSF_FCP_COMMAND_DOES_NOT_EXIST:
1237                 retval = 0;
1238                 debug_text_event(new_fsf_req->adapter->erp_dbf, 3,
1239                                  "fsf_s_no_exist");
1240                 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED;
1241                 break;
1242
1243         case FSF_PORT_BOXED:
1244                 ZFCP_LOG_INFO("Remote port 0x%016Lx on adapter %s needs to "
1245                               "be reopened\n", unit->port->wwpn,
1246                               zfcp_get_busid_by_unit(unit));
1247                 debug_text_event(new_fsf_req->adapter->erp_dbf, 2,
1248                                  "fsf_s_pboxed");
1249                 zfcp_erp_port_boxed(unit->port);
1250                 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
1251                     | ZFCP_STATUS_FSFREQ_RETRY;
1252                 break;
1253
1254         case FSF_LUN_BOXED:
1255                 ZFCP_LOG_INFO(
1256                         "unit 0x%016Lx on port 0x%016Lx on adapter %s needs "
1257                         "to be reopened\n",
1258                         unit->fcp_lun, unit->port->wwpn,
1259                         zfcp_get_busid_by_unit(unit));
1260                 debug_text_event(new_fsf_req->adapter->erp_dbf, 1, "fsf_s_lboxed");
1261                 zfcp_erp_unit_boxed(unit);
1262                 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
1263                         | ZFCP_STATUS_FSFREQ_RETRY;
1264                 break;
1265
1266         case FSF_ADAPTER_STATUS_AVAILABLE:
1267                 switch (new_fsf_req->qtcb->header.fsf_status_qual.word[0]) {
1268                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1269                         debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1270                                          "fsf_sq_ltest");
1271                         zfcp_test_link(unit->port);
1272                         new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1273                         break;
1274                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1275                         /* SCSI stack will escalate */
1276                         debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1277                                          "fsf_sq_ulp");
1278                         new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1279                         break;
1280                 default:
1281                         ZFCP_LOG_NORMAL
1282                             ("bug: Wrong status qualifier 0x%x arrived.\n",
1283                              new_fsf_req->qtcb->header.fsf_status_qual.word[0]);
1284                         debug_text_event(new_fsf_req->adapter->erp_dbf, 0,
1285                                          "fsf_sq_inval:");
1286                         debug_exception(new_fsf_req->adapter->erp_dbf, 0,
1287                                         &new_fsf_req->qtcb->header.
1288                                         fsf_status_qual.word[0], sizeof (u32));
1289                         break;
1290                 }
1291                 break;
1292
1293         case FSF_GOOD:
1294                 retval = 0;
1295                 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED;
1296                 break;
1297
1298         default:
1299                 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
1300                                 "(debug info 0x%x)\n",
1301                                 new_fsf_req->qtcb->header.fsf_status);
1302                 debug_text_event(new_fsf_req->adapter->erp_dbf, 0,
1303                                  "fsf_s_inval:");
1304                 debug_exception(new_fsf_req->adapter->erp_dbf, 0,
1305                                 &new_fsf_req->qtcb->header.fsf_status,
1306                                 sizeof (u32));
1307                 break;
1308         }
1309  skip_fsfstatus:
1310         return retval;
1311 }
1312
1313 /**
1314  * zfcp_use_one_sbal - checks whether req buffer and resp bother each fit into
1315  *      one SBALE
1316  * Two scatter-gather lists are passed, one for the reqeust and one for the
1317  * response.
1318  */
1319 static inline int
1320 zfcp_use_one_sbal(struct scatterlist *req, int req_count,
1321                   struct scatterlist *resp, int resp_count)
1322 {
1323         return ((req_count == 1) &&
1324                 (resp_count == 1) &&
1325                 (((unsigned long) zfcp_sg_to_address(&req[0]) &
1326                   PAGE_MASK) ==
1327                  ((unsigned long) (zfcp_sg_to_address(&req[0]) +
1328                                    req[0].length - 1) & PAGE_MASK)) &&
1329                 (((unsigned long) zfcp_sg_to_address(&resp[0]) &
1330                   PAGE_MASK) ==
1331                  ((unsigned long) (zfcp_sg_to_address(&resp[0]) +
1332                                    resp[0].length - 1) & PAGE_MASK)));
1333 }
1334
1335 /**
1336  * zfcp_fsf_send_ct - initiate a Generic Service request (FC-GS)
1337  * @ct: pointer to struct zfcp_send_ct which conatins all needed data for
1338  *      the request
1339  * @pool: pointer to memory pool, if non-null this pool is used to allocate
1340  *      a struct zfcp_fsf_req
1341  * @erp_action: pointer to erp_action, if non-null the Generic Service request
1342  *      is sent within error recovery
1343  */
1344 int
1345 zfcp_fsf_send_ct(struct zfcp_send_ct *ct, mempool_t *pool,
1346                  struct zfcp_erp_action *erp_action)
1347 {
1348         volatile struct qdio_buffer_element *sbale;
1349         struct zfcp_port *port;
1350         struct zfcp_adapter *adapter;
1351         struct zfcp_fsf_req *fsf_req;
1352         unsigned long lock_flags;
1353         int bytes;
1354         int ret = 0;
1355
1356         port = ct->port;
1357         adapter = port->adapter;
1358
1359         ret = zfcp_fsf_req_create(adapter, FSF_QTCB_SEND_GENERIC,
1360                                   ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
1361                                   pool, &lock_flags, &fsf_req);
1362         if (ret < 0) {
1363                 ZFCP_LOG_INFO("error: Could not create CT request (FC-GS) for "
1364                               "adapter: %s\n",
1365                               zfcp_get_busid_by_adapter(adapter));
1366                 goto failed_req;
1367         }
1368
1369         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1370         if (zfcp_use_one_sbal(ct->req, ct->req_count,
1371                               ct->resp, ct->resp_count)){
1372                 /* both request buffer and response buffer
1373                    fit into one sbale each */
1374                 sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE_READ;
1375                 sbale[2].addr = zfcp_sg_to_address(&ct->req[0]);
1376                 sbale[2].length = ct->req[0].length;
1377                 sbale[3].addr = zfcp_sg_to_address(&ct->resp[0]);
1378                 sbale[3].length = ct->resp[0].length;
1379                 sbale[3].flags |= SBAL_FLAGS_LAST_ENTRY;
1380         } else if (adapter->adapter_features &
1381                    FSF_FEATURE_ELS_CT_CHAINED_SBALS) {
1382                 /* try to use chained SBALs */
1383                 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1384                                                 SBAL_FLAGS0_TYPE_WRITE_READ,
1385                                                 ct->req, ct->req_count,
1386                                                 ZFCP_MAX_SBALS_PER_CT_REQ);
1387                 if (bytes <= 0) {
1388                         ZFCP_LOG_INFO("error: creation of CT request failed "
1389                                       "on adapter %s\n",
1390                                       zfcp_get_busid_by_adapter(adapter));
1391                         if (bytes == 0)
1392                                 ret = -ENOMEM;
1393                         else
1394                                 ret = bytes;
1395
1396                         goto failed_send;
1397                 }
1398                 fsf_req->qtcb->bottom.support.req_buf_length = bytes;
1399                 fsf_req->sbale_curr = ZFCP_LAST_SBALE_PER_SBAL;
1400                 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1401                                                 SBAL_FLAGS0_TYPE_WRITE_READ,
1402                                                 ct->resp, ct->resp_count,
1403                                                 ZFCP_MAX_SBALS_PER_CT_REQ);
1404                 if (bytes <= 0) {
1405                         ZFCP_LOG_INFO("error: creation of CT request failed "
1406                                       "on adapter %s\n",
1407                                       zfcp_get_busid_by_adapter(adapter));
1408                         if (bytes == 0)
1409                                 ret = -ENOMEM;
1410                         else
1411                                 ret = bytes;
1412
1413                         goto failed_send;
1414                 }
1415                 fsf_req->qtcb->bottom.support.resp_buf_length = bytes;
1416         } else {
1417                 /* reject send generic request */
1418                 ZFCP_LOG_INFO(
1419                         "error: microcode does not support chained SBALs,"
1420                         "CT request too big (adapter %s)\n",
1421                         zfcp_get_busid_by_adapter(adapter));
1422                 ret = -EOPNOTSUPP;
1423                 goto failed_send;
1424         }
1425
1426         /* settings in QTCB */
1427         fsf_req->qtcb->header.port_handle = port->handle;
1428         fsf_req->qtcb->bottom.support.service_class =
1429                 ZFCP_FC_SERVICE_CLASS_DEFAULT;
1430         fsf_req->qtcb->bottom.support.timeout = ct->timeout;
1431         fsf_req->data = (unsigned long) ct;
1432
1433         zfcp_san_dbf_event_ct_request(fsf_req);
1434
1435         if (erp_action) {
1436                 erp_action->fsf_req = fsf_req;
1437                 fsf_req->erp_action = erp_action;
1438                 zfcp_erp_start_timer(fsf_req);
1439         } else
1440                 zfcp_fsf_start_timer(fsf_req, ZFCP_FSF_REQUEST_TIMEOUT);
1441
1442         ret = zfcp_fsf_req_send(fsf_req);
1443         if (ret) {
1444                 ZFCP_LOG_DEBUG("error: initiation of CT request failed "
1445                                "(adapter %s, port 0x%016Lx)\n",
1446                                zfcp_get_busid_by_adapter(adapter), port->wwpn);
1447                 goto failed_send;
1448         }
1449
1450         ZFCP_LOG_DEBUG("CT request initiated (adapter %s, port 0x%016Lx)\n",
1451                        zfcp_get_busid_by_adapter(adapter), port->wwpn);
1452         goto out;
1453
1454  failed_send:
1455         zfcp_fsf_req_free(fsf_req);
1456         if (erp_action != NULL) {
1457                 erp_action->fsf_req = NULL;
1458         }
1459  failed_req:
1460  out:
1461         write_unlock_irqrestore(&adapter->request_queue.queue_lock,
1462                                 lock_flags);
1463         return ret;
1464 }
1465
1466 /**
1467  * zfcp_fsf_send_ct_handler - handler for Generic Service requests
1468  * @fsf_req: pointer to struct zfcp_fsf_req
1469  *
1470  * Data specific for the Generic Service request is passed using
1471  * fsf_req->data. There we find the pointer to struct zfcp_send_ct.
1472  * Usually a specific handler for the CT request is called which is
1473  * found in this structure.
1474  */
1475 static int
1476 zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *fsf_req)
1477 {
1478         struct zfcp_port *port;
1479         struct zfcp_adapter *adapter;
1480         struct zfcp_send_ct *send_ct;
1481         struct fsf_qtcb_header *header;
1482         struct fsf_qtcb_bottom_support *bottom;
1483         int retval = -EINVAL;
1484         u16 subtable, rule, counter;
1485
1486         adapter = fsf_req->adapter;
1487         send_ct = (struct zfcp_send_ct *) fsf_req->data;
1488         port = send_ct->port;
1489         header = &fsf_req->qtcb->header;
1490         bottom = &fsf_req->qtcb->bottom.support;
1491
1492         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
1493                 goto skip_fsfstatus;
1494
1495         /* evaluate FSF status in QTCB */
1496         switch (header->fsf_status) {
1497
1498         case FSF_GOOD:
1499                 zfcp_san_dbf_event_ct_response(fsf_req);
1500                 retval = 0;
1501                 break;
1502
1503         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
1504                 ZFCP_LOG_INFO("error: adapter %s does not support fc "
1505                               "class %d.\n",
1506                               zfcp_get_busid_by_port(port),
1507                               ZFCP_FC_SERVICE_CLASS_DEFAULT);
1508                 /* stop operation for this adapter */
1509                 debug_text_exception(adapter->erp_dbf, 0, "fsf_s_class_nsup");
1510                 zfcp_erp_adapter_shutdown(adapter, 0);
1511                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1512                 break;
1513
1514         case FSF_ADAPTER_STATUS_AVAILABLE:
1515                 switch (header->fsf_status_qual.word[0]){
1516                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1517                         /* reopening link to port */
1518                         debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ltest");
1519                         zfcp_test_link(port);
1520                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1521                         break;
1522                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1523                         /* ERP strategy will escalate */
1524                         debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ulp");
1525                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1526                         break;
1527                 default:
1528                         ZFCP_LOG_INFO("bug: Wrong status qualifier 0x%x "
1529                                       "arrived.\n",
1530                                       header->fsf_status_qual.word[0]);
1531                         break;
1532                 }
1533                 break;
1534
1535         case FSF_ACCESS_DENIED:
1536                 ZFCP_LOG_NORMAL("access denied, cannot send generic service "
1537                                 "command (adapter %s, port d_id=0x%06x)\n",
1538                                 zfcp_get_busid_by_port(port), port->d_id);
1539                 for (counter = 0; counter < 2; counter++) {
1540                         subtable = header->fsf_status_qual.halfword[counter * 2];
1541                         rule = header->fsf_status_qual.halfword[counter * 2 + 1];
1542                         switch (subtable) {
1543                         case FSF_SQ_CFDC_SUBTABLE_OS:
1544                         case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
1545                         case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
1546                         case FSF_SQ_CFDC_SUBTABLE_LUN:
1547                                 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
1548                                         zfcp_act_subtable_type[subtable], rule);
1549                                 break;
1550                         }
1551                 }
1552                 debug_text_event(adapter->erp_dbf, 1, "fsf_s_access");
1553                 zfcp_erp_port_access_denied(port);
1554                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1555                 break;
1556
1557         case FSF_GENERIC_COMMAND_REJECTED:
1558                 ZFCP_LOG_INFO("generic service command rejected "
1559                               "(adapter %s, port d_id=0x%06x)\n",
1560                               zfcp_get_busid_by_port(port), port->d_id);
1561                 ZFCP_LOG_INFO("status qualifier:\n");
1562                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1563                               (char *) &header->fsf_status_qual,
1564                               sizeof (union fsf_status_qual));
1565                 debug_text_event(adapter->erp_dbf, 1, "fsf_s_gcom_rej");
1566                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1567                 break;
1568
1569         case FSF_PORT_HANDLE_NOT_VALID:
1570                 ZFCP_LOG_DEBUG("Temporary port identifier 0x%x for port "
1571                                "0x%016Lx on adapter %s invalid. This may "
1572                                "happen occasionally.\n", port->handle,
1573                                port->wwpn, zfcp_get_busid_by_port(port));
1574                 ZFCP_LOG_INFO("status qualifier:\n");
1575                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1576                               (char *) &header->fsf_status_qual,
1577                               sizeof (union fsf_status_qual));
1578                 debug_text_event(adapter->erp_dbf, 1, "fsf_s_phandle_nv");
1579                 zfcp_erp_adapter_reopen(adapter, 0);
1580                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1581                 break;
1582
1583         case FSF_PORT_BOXED:
1584                 ZFCP_LOG_INFO("port needs to be reopened "
1585                               "(adapter %s, port d_id=0x%06x)\n",
1586                               zfcp_get_busid_by_port(port), port->d_id);
1587                 debug_text_event(adapter->erp_dbf, 2, "fsf_s_pboxed");
1588                 zfcp_erp_port_boxed(port);
1589                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
1590                     | ZFCP_STATUS_FSFREQ_RETRY;
1591                 break;
1592
1593         /* following states should never occure, all cases avoided
1594            in zfcp_fsf_send_ct - but who knows ... */
1595         case FSF_PAYLOAD_SIZE_MISMATCH:
1596                 ZFCP_LOG_INFO("payload size mismatch (adapter: %s, "
1597                               "req_buf_length=%d, resp_buf_length=%d)\n",
1598                               zfcp_get_busid_by_adapter(adapter),
1599                               bottom->req_buf_length, bottom->resp_buf_length);
1600                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1601                 break;
1602         case FSF_REQUEST_SIZE_TOO_LARGE:
1603                 ZFCP_LOG_INFO("request size too large (adapter: %s, "
1604                               "req_buf_length=%d)\n",
1605                               zfcp_get_busid_by_adapter(adapter),
1606                               bottom->req_buf_length);
1607                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1608                 break;
1609         case FSF_RESPONSE_SIZE_TOO_LARGE:
1610                 ZFCP_LOG_INFO("response size too large (adapter: %s, "
1611                               "resp_buf_length=%d)\n",
1612                               zfcp_get_busid_by_adapter(adapter),
1613                               bottom->resp_buf_length);
1614                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1615                 break;
1616         case FSF_SBAL_MISMATCH:
1617                 ZFCP_LOG_INFO("SBAL mismatch (adapter: %s, req_buf_length=%d, "
1618                               "resp_buf_length=%d)\n",
1619                               zfcp_get_busid_by_adapter(adapter),
1620                               bottom->req_buf_length, bottom->resp_buf_length);
1621                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1622                 break;
1623
1624        default:
1625                 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
1626                                 "(debug info 0x%x)\n", header->fsf_status);
1627                 debug_text_event(adapter->erp_dbf, 0, "fsf_sq_inval:");
1628                 debug_exception(adapter->erp_dbf, 0,
1629                                 &header->fsf_status_qual.word[0], sizeof (u32));
1630                 break;
1631         }
1632
1633 skip_fsfstatus:
1634         send_ct->status = retval;
1635
1636         if (send_ct->handler != NULL)
1637                 send_ct->handler(send_ct->handler_data);
1638
1639         return retval;
1640 }
1641
1642 /**
1643  * zfcp_fsf_send_els - initiate an ELS command (FC-FS)
1644  * @els: pointer to struct zfcp_send_els which contains all needed data for
1645  *      the command.
1646  */
1647 int
1648 zfcp_fsf_send_els(struct zfcp_send_els *els)
1649 {
1650         volatile struct qdio_buffer_element *sbale;
1651         struct zfcp_fsf_req *fsf_req;
1652         u32 d_id;
1653         struct zfcp_adapter *adapter;
1654         unsigned long lock_flags;
1655         int bytes;
1656         int ret = 0;
1657
1658         d_id = els->d_id;
1659         adapter = els->adapter;
1660
1661         ret = zfcp_fsf_req_create(adapter, FSF_QTCB_SEND_ELS,
1662                                   ZFCP_REQ_AUTO_CLEANUP,
1663                                   NULL, &lock_flags, &fsf_req);
1664         if (ret < 0) {
1665                 ZFCP_LOG_INFO("error: creation of ELS request failed "
1666                               "(adapter %s, port d_id: 0x%06x)\n",
1667                               zfcp_get_busid_by_adapter(adapter), d_id);
1668                 goto failed_req;
1669         }
1670
1671         if (unlikely(!atomic_test_mask(ZFCP_STATUS_COMMON_UNBLOCKED,
1672                         &els->port->status))) {
1673                 ret = -EBUSY;
1674                 goto port_blocked;
1675         }
1676
1677         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1678         if (zfcp_use_one_sbal(els->req, els->req_count,
1679                               els->resp, els->resp_count)){
1680                 /* both request buffer and response buffer
1681                    fit into one sbale each */
1682                 sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE_READ;
1683                 sbale[2].addr = zfcp_sg_to_address(&els->req[0]);
1684                 sbale[2].length = els->req[0].length;
1685                 sbale[3].addr = zfcp_sg_to_address(&els->resp[0]);
1686                 sbale[3].length = els->resp[0].length;
1687                 sbale[3].flags |= SBAL_FLAGS_LAST_ENTRY;
1688         } else if (adapter->adapter_features &
1689                    FSF_FEATURE_ELS_CT_CHAINED_SBALS) {
1690                 /* try to use chained SBALs */
1691                 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1692                                                 SBAL_FLAGS0_TYPE_WRITE_READ,
1693                                                 els->req, els->req_count,
1694                                                 ZFCP_MAX_SBALS_PER_ELS_REQ);
1695                 if (bytes <= 0) {
1696                         ZFCP_LOG_INFO("error: creation of ELS request failed "
1697                                       "(adapter %s, port d_id: 0x%06x)\n",
1698                                       zfcp_get_busid_by_adapter(adapter), d_id);
1699                         if (bytes == 0) {
1700                                 ret = -ENOMEM;
1701                         } else {
1702                                 ret = bytes;
1703                         }
1704                         goto failed_send;
1705                 }
1706                 fsf_req->qtcb->bottom.support.req_buf_length = bytes;
1707                 fsf_req->sbale_curr = ZFCP_LAST_SBALE_PER_SBAL;
1708                 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1709                                                 SBAL_FLAGS0_TYPE_WRITE_READ,
1710                                                 els->resp, els->resp_count,
1711                                                 ZFCP_MAX_SBALS_PER_ELS_REQ);
1712                 if (bytes <= 0) {
1713                         ZFCP_LOG_INFO("error: creation of ELS request failed "
1714                                       "(adapter %s, port d_id: 0x%06x)\n",
1715                                       zfcp_get_busid_by_adapter(adapter), d_id);
1716                         if (bytes == 0) {
1717                                 ret = -ENOMEM;
1718                         } else {
1719                                 ret = bytes;
1720                         }
1721                         goto failed_send;
1722                 }
1723                 fsf_req->qtcb->bottom.support.resp_buf_length = bytes;
1724         } else {
1725                 /* reject request */
1726                 ZFCP_LOG_INFO("error: microcode does not support chained SBALs"
1727                               ", ELS request too big (adapter %s, "
1728                               "port d_id: 0x%06x)\n",
1729                               zfcp_get_busid_by_adapter(adapter), d_id);
1730                 ret = -EOPNOTSUPP;
1731                 goto failed_send;
1732         }
1733
1734         /* settings in QTCB */
1735         fsf_req->qtcb->bottom.support.d_id = d_id;
1736         fsf_req->qtcb->bottom.support.service_class =
1737                 ZFCP_FC_SERVICE_CLASS_DEFAULT;
1738         fsf_req->qtcb->bottom.support.timeout = ZFCP_ELS_TIMEOUT;
1739         fsf_req->data = (unsigned long) els;
1740
1741         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1742
1743         zfcp_san_dbf_event_els_request(fsf_req);
1744
1745         zfcp_fsf_start_timer(fsf_req, ZFCP_FSF_REQUEST_TIMEOUT);
1746         ret = zfcp_fsf_req_send(fsf_req);
1747         if (ret) {
1748                 ZFCP_LOG_DEBUG("error: initiation of ELS request failed "
1749                                "(adapter %s, port d_id: 0x%06x)\n",
1750                                zfcp_get_busid_by_adapter(adapter), d_id);
1751                 goto failed_send;
1752         }
1753
1754         ZFCP_LOG_DEBUG("ELS request initiated (adapter %s, port d_id: "
1755                        "0x%06x)\n", zfcp_get_busid_by_adapter(adapter), d_id);
1756         goto out;
1757
1758  port_blocked:
1759  failed_send:
1760         zfcp_fsf_req_free(fsf_req);
1761
1762  failed_req:
1763  out:
1764         write_unlock_irqrestore(&adapter->request_queue.queue_lock,
1765                                 lock_flags);
1766
1767         return ret;
1768 }
1769
1770 /**
1771  * zfcp_fsf_send_els_handler - handler for ELS commands
1772  * @fsf_req: pointer to struct zfcp_fsf_req
1773  *
1774  * Data specific for the ELS command is passed using
1775  * fsf_req->data. There we find the pointer to struct zfcp_send_els.
1776  * Usually a specific handler for the ELS command is called which is
1777  * found in this structure.
1778  */
1779 static int zfcp_fsf_send_els_handler(struct zfcp_fsf_req *fsf_req)
1780 {
1781         struct zfcp_adapter *adapter;
1782         struct zfcp_port *port;
1783         u32 d_id;
1784         struct fsf_qtcb_header *header;
1785         struct fsf_qtcb_bottom_support *bottom;
1786         struct zfcp_send_els *send_els;
1787         int retval = -EINVAL;
1788         u16 subtable, rule, counter;
1789
1790         send_els = (struct zfcp_send_els *) fsf_req->data;
1791         adapter = send_els->adapter;
1792         port = send_els->port;
1793         d_id = send_els->d_id;
1794         header = &fsf_req->qtcb->header;
1795         bottom = &fsf_req->qtcb->bottom.support;
1796
1797         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
1798                 goto skip_fsfstatus;
1799
1800         switch (header->fsf_status) {
1801
1802         case FSF_GOOD:
1803                 zfcp_san_dbf_event_els_response(fsf_req);
1804                 retval = 0;
1805                 break;
1806
1807         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
1808                 ZFCP_LOG_INFO("error: adapter %s does not support fc "
1809                               "class %d.\n",
1810                               zfcp_get_busid_by_adapter(adapter),
1811                               ZFCP_FC_SERVICE_CLASS_DEFAULT);
1812                 /* stop operation for this adapter */
1813                 debug_text_exception(adapter->erp_dbf, 0, "fsf_s_class_nsup");
1814                 zfcp_erp_adapter_shutdown(adapter, 0);
1815                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1816                 break;
1817
1818         case FSF_ADAPTER_STATUS_AVAILABLE:
1819                 switch (header->fsf_status_qual.word[0]){
1820                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1821                         debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ltest");
1822                         if (port && (send_els->ls_code != ZFCP_LS_ADISC))
1823                                 zfcp_test_link(port);
1824                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1825                         break;
1826                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1827                         debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ulp");
1828                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1829                         retval =
1830                           zfcp_handle_els_rjt(header->fsf_status_qual.word[1],
1831                                               (struct zfcp_ls_rjt_par *)
1832                                               &header->fsf_status_qual.word[2]);
1833                         break;
1834                 case FSF_SQ_RETRY_IF_POSSIBLE:
1835                         debug_text_event(adapter->erp_dbf, 1, "fsf_sq_retry");
1836                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1837                         break;
1838                 default:
1839                         ZFCP_LOG_INFO("bug: Wrong status qualifier 0x%x\n",
1840                                       header->fsf_status_qual.word[0]);
1841                         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1842                                 (char*)header->fsf_status_qual.word, 16);
1843                 }
1844                 break;
1845
1846         case FSF_ELS_COMMAND_REJECTED:
1847                 ZFCP_LOG_INFO("ELS has been rejected because command filter "
1848                               "prohibited sending "
1849                               "(adapter: %s, port d_id: 0x%06x)\n",
1850                               zfcp_get_busid_by_adapter(adapter), d_id);
1851
1852                 break;
1853
1854         case FSF_PAYLOAD_SIZE_MISMATCH:
1855                 ZFCP_LOG_INFO(
1856                         "ELS request size and ELS response size must be either "
1857                         "both 0, or both greater than 0 "
1858                         "(adapter: %s, req_buf_length=%d resp_buf_length=%d)\n",
1859                         zfcp_get_busid_by_adapter(adapter),
1860                         bottom->req_buf_length,
1861                         bottom->resp_buf_length);
1862                 break;
1863
1864         case FSF_REQUEST_SIZE_TOO_LARGE:
1865                 ZFCP_LOG_INFO(
1866                         "Length of the ELS request buffer, "
1867                         "specified in QTCB bottom, "
1868                         "exceeds the size of the buffers "
1869                         "that have been allocated for ELS request data "
1870                         "(adapter: %s, req_buf_length=%d)\n",
1871                         zfcp_get_busid_by_adapter(adapter),
1872                         bottom->req_buf_length);
1873                 break;
1874
1875         case FSF_RESPONSE_SIZE_TOO_LARGE:
1876                 ZFCP_LOG_INFO(
1877                         "Length of the ELS response buffer, "
1878                         "specified in QTCB bottom, "
1879                         "exceeds the size of the buffers "
1880                         "that have been allocated for ELS response data "
1881                         "(adapter: %s, resp_buf_length=%d)\n",
1882                         zfcp_get_busid_by_adapter(adapter),
1883                         bottom->resp_buf_length);
1884                 break;
1885
1886         case FSF_SBAL_MISMATCH:
1887                 /* should never occure, avoided in zfcp_fsf_send_els */
1888                 ZFCP_LOG_INFO("SBAL mismatch (adapter: %s, req_buf_length=%d, "
1889                               "resp_buf_length=%d)\n",
1890                               zfcp_get_busid_by_adapter(adapter),
1891                               bottom->req_buf_length, bottom->resp_buf_length);
1892                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1893                 break;
1894
1895         case FSF_ACCESS_DENIED:
1896                 ZFCP_LOG_NORMAL("access denied, cannot send ELS command "
1897                                 "(adapter %s, port d_id=0x%06x)\n",
1898                                 zfcp_get_busid_by_adapter(adapter), d_id);
1899                 for (counter = 0; counter < 2; counter++) {
1900                         subtable = header->fsf_status_qual.halfword[counter * 2];
1901                         rule = header->fsf_status_qual.halfword[counter * 2 + 1];
1902                         switch (subtable) {
1903                         case FSF_SQ_CFDC_SUBTABLE_OS:
1904                         case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
1905                         case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
1906                         case FSF_SQ_CFDC_SUBTABLE_LUN:
1907                                 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
1908                                         zfcp_act_subtable_type[subtable], rule);
1909                                 break;
1910                         }
1911                 }
1912                 debug_text_event(adapter->erp_dbf, 1, "fsf_s_access");
1913                 if (port != NULL)
1914                         zfcp_erp_port_access_denied(port);
1915                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1916                 break;
1917
1918         default:
1919                 ZFCP_LOG_NORMAL(
1920                         "bug: An unknown FSF Status was presented "
1921                         "(adapter: %s, fsf_status=0x%08x)\n",
1922                         zfcp_get_busid_by_adapter(adapter),
1923                         header->fsf_status);
1924                 debug_text_event(adapter->erp_dbf, 0, "fsf_sq_inval");
1925                 debug_exception(adapter->erp_dbf, 0,
1926                         &header->fsf_status_qual.word[0], sizeof(u32));
1927                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1928                 break;
1929         }
1930
1931 skip_fsfstatus:
1932         send_els->status = retval;
1933
1934         if (send_els->handler)
1935                 send_els->handler(send_els->handler_data);
1936
1937         return retval;
1938 }
1939
1940 int
1941 zfcp_fsf_exchange_config_data(struct zfcp_erp_action *erp_action)
1942 {
1943         volatile struct qdio_buffer_element *sbale;
1944         struct zfcp_fsf_req *fsf_req;
1945         struct zfcp_adapter *adapter = erp_action->adapter;
1946         unsigned long lock_flags;
1947         int retval;
1948
1949         /* setup new FSF request */
1950         retval = zfcp_fsf_req_create(adapter,
1951                                      FSF_QTCB_EXCHANGE_CONFIG_DATA,
1952                                      ZFCP_REQ_AUTO_CLEANUP,
1953                                      adapter->pool.fsf_req_erp,
1954                                      &lock_flags, &fsf_req);
1955         if (retval) {
1956                 ZFCP_LOG_INFO("error: Could not create exchange configuration "
1957                               "data request for adapter %s.\n",
1958                               zfcp_get_busid_by_adapter(adapter));
1959                 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
1960                                         lock_flags);
1961                 return retval;
1962         }
1963
1964         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1965         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
1966         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
1967
1968         fsf_req->qtcb->bottom.config.feature_selection =
1969                         FSF_FEATURE_CFDC |
1970                         FSF_FEATURE_LUN_SHARING |
1971                         FSF_FEATURE_NOTIFICATION_LOST |
1972                         FSF_FEATURE_UPDATE_ALERT;
1973         fsf_req->erp_action = erp_action;
1974         erp_action->fsf_req = fsf_req;
1975
1976         zfcp_erp_start_timer(fsf_req);
1977         retval = zfcp_fsf_req_send(fsf_req);
1978         write_unlock_irqrestore(&adapter->request_queue.queue_lock,
1979                                 lock_flags);
1980         if (retval) {
1981                 ZFCP_LOG_INFO("error: Could not send exchange configuration "
1982                               "data command on the adapter %s\n",
1983                               zfcp_get_busid_by_adapter(adapter));
1984                 zfcp_fsf_req_free(fsf_req);
1985                 erp_action->fsf_req = NULL;
1986         }
1987         else
1988                 ZFCP_LOG_DEBUG("exchange configuration data request initiated "
1989                                "(adapter %s)\n",
1990                                zfcp_get_busid_by_adapter(adapter));
1991
1992         return retval;
1993 }
1994
1995 int
1996 zfcp_fsf_exchange_config_data_sync(struct zfcp_adapter *adapter,
1997                                 struct fsf_qtcb_bottom_config *data)
1998 {
1999         volatile struct qdio_buffer_element *sbale;
2000         struct zfcp_fsf_req *fsf_req;
2001         unsigned long lock_flags;
2002         int retval;
2003
2004         /* setup new FSF request */
2005         retval = zfcp_fsf_req_create(adapter, FSF_QTCB_EXCHANGE_CONFIG_DATA,
2006                                      0, NULL, &lock_flags, &fsf_req);
2007         if (retval) {
2008                 ZFCP_LOG_INFO("error: Could not create exchange configuration "
2009                               "data request for adapter %s.\n",
2010                               zfcp_get_busid_by_adapter(adapter));
2011                 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
2012                                         lock_flags);
2013                 return retval;
2014         }
2015
2016         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
2017         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2018         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2019
2020         fsf_req->qtcb->bottom.config.feature_selection =
2021                         FSF_FEATURE_CFDC |
2022                         FSF_FEATURE_LUN_SHARING |
2023                         FSF_FEATURE_NOTIFICATION_LOST |
2024                         FSF_FEATURE_UPDATE_ALERT;
2025
2026         if (data)
2027                 fsf_req->data = (unsigned long) data;
2028
2029         zfcp_fsf_start_timer(fsf_req, ZFCP_FSF_REQUEST_TIMEOUT);
2030         retval = zfcp_fsf_req_send(fsf_req);
2031         write_unlock_irqrestore(&adapter->request_queue.queue_lock,
2032                                 lock_flags);
2033         if (retval)
2034                 ZFCP_LOG_INFO("error: Could not send exchange configuration "
2035                               "data command on the adapter %s\n",
2036                               zfcp_get_busid_by_adapter(adapter));
2037         else
2038                 wait_event(fsf_req->completion_wq,
2039                            fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
2040
2041         zfcp_fsf_req_free(fsf_req);
2042
2043         return retval;
2044 }
2045
2046 /**
2047  * zfcp_fsf_exchange_config_evaluate
2048  * @fsf_req: fsf_req which belongs to xchg config data request
2049  * @xchg_ok: specifies if xchg config data was incomplete or complete (0/1)
2050  *
2051  * returns: -EIO on error, 0 otherwise
2052  */
2053 static int
2054 zfcp_fsf_exchange_config_evaluate(struct zfcp_fsf_req *fsf_req, int xchg_ok)
2055 {
2056         struct fsf_qtcb_bottom_config *bottom;
2057         struct zfcp_adapter *adapter = fsf_req->adapter;
2058         struct Scsi_Host *shost = adapter->scsi_host;
2059
2060         bottom = &fsf_req->qtcb->bottom.config;
2061         ZFCP_LOG_DEBUG("low/high QTCB version 0x%x/0x%x of FSF\n",
2062                        bottom->low_qtcb_version, bottom->high_qtcb_version);
2063         adapter->fsf_lic_version = bottom->lic_version;
2064         adapter->adapter_features = bottom->adapter_features;
2065         adapter->connection_features = bottom->connection_features;
2066         adapter->peer_wwpn = 0;
2067         adapter->peer_wwnn = 0;
2068         adapter->peer_d_id = 0;
2069
2070         if (xchg_ok) {
2071
2072                 if (fsf_req->data)
2073                         memcpy((struct fsf_qtcb_bottom_config *) fsf_req->data,
2074                                 bottom, sizeof (struct fsf_qtcb_bottom_config));
2075
2076                 fc_host_node_name(shost) = bottom->nport_serv_param.wwnn;
2077                 fc_host_port_name(shost) = bottom->nport_serv_param.wwpn;
2078                 fc_host_port_id(shost) = bottom->s_id & ZFCP_DID_MASK;
2079                 fc_host_speed(shost) = bottom->fc_link_speed;
2080                 fc_host_supported_classes(shost) =
2081                                 FC_COS_CLASS2 | FC_COS_CLASS3;
2082                 adapter->hydra_version = bottom->adapter_type;
2083                 if (fc_host_permanent_port_name(shost) == -1)
2084                         fc_host_permanent_port_name(shost) =
2085                                 fc_host_port_name(shost);
2086                 if (bottom->fc_topology == FSF_TOPO_P2P) {
2087                         adapter->peer_d_id = bottom->peer_d_id & ZFCP_DID_MASK;
2088                         adapter->peer_wwpn = bottom->plogi_payload.wwpn;
2089                         adapter->peer_wwnn = bottom->plogi_payload.wwnn;
2090                         fc_host_port_type(shost) = FC_PORTTYPE_PTP;
2091                 } else if (bottom->fc_topology == FSF_TOPO_FABRIC)
2092                         fc_host_port_type(shost) = FC_PORTTYPE_NPORT;
2093                 else if (bottom->fc_topology == FSF_TOPO_AL)
2094                         fc_host_port_type(shost) = FC_PORTTYPE_NLPORT;
2095                 else
2096                         fc_host_port_type(shost) = FC_PORTTYPE_UNKNOWN;
2097         } else {
2098                 fc_host_node_name(shost) = 0;
2099                 fc_host_port_name(shost) = 0;
2100                 fc_host_port_id(shost) = 0;
2101                 fc_host_speed(shost) = FC_PORTSPEED_UNKNOWN;
2102                 fc_host_port_type(shost) = FC_PORTTYPE_UNKNOWN;
2103                 adapter->hydra_version = 0;
2104         }
2105
2106         if (adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT) {
2107                 adapter->hardware_version = bottom->hardware_version;
2108                 memcpy(fc_host_serial_number(shost), bottom->serial_number,
2109                        min(FC_SERIAL_NUMBER_SIZE, 17));
2110                 EBCASC(fc_host_serial_number(shost),
2111                        min(FC_SERIAL_NUMBER_SIZE, 17));
2112         }
2113
2114         ZFCP_LOG_NORMAL("The adapter %s reported the following "
2115                         "characteristics:\n"
2116                         "WWNN 0x%016Lx, "
2117                         "WWPN 0x%016Lx, "
2118                         "S_ID 0x%06x,\n"
2119                         "adapter version 0x%x, "
2120                         "LIC version 0x%x, "
2121                         "FC link speed %d Gb/s\n",
2122                         zfcp_get_busid_by_adapter(adapter),
2123                         (wwn_t) fc_host_node_name(shost),
2124                         (wwn_t) fc_host_port_name(shost),
2125                         fc_host_port_id(shost),
2126                         adapter->hydra_version,
2127                         adapter->fsf_lic_version,
2128                         fc_host_speed(shost));
2129         if (ZFCP_QTCB_VERSION < bottom->low_qtcb_version) {
2130                 ZFCP_LOG_NORMAL("error: the adapter %s "
2131                                 "only supports newer control block "
2132                                 "versions in comparison to this device "
2133                                 "driver (try updated device driver)\n",
2134                                 zfcp_get_busid_by_adapter(adapter));
2135                 debug_text_event(adapter->erp_dbf, 0, "low_qtcb_ver");
2136                 zfcp_erp_adapter_shutdown(adapter, 0);
2137                 return -EIO;
2138         }
2139         if (ZFCP_QTCB_VERSION > bottom->high_qtcb_version) {
2140                 ZFCP_LOG_NORMAL("error: the adapter %s "
2141                                 "only supports older control block "
2142                                 "versions than this device driver uses"
2143                                 "(consider a microcode upgrade)\n",
2144                                 zfcp_get_busid_by_adapter(adapter));
2145                 debug_text_event(adapter->erp_dbf, 0, "high_qtcb_ver");
2146                 zfcp_erp_adapter_shutdown(adapter, 0);
2147                 return -EIO;
2148         }
2149         return 0;
2150 }
2151
2152 /**
2153  * function:    zfcp_fsf_exchange_config_data_handler
2154  *
2155  * purpose:     is called for finished Exchange Configuration Data command
2156  *
2157  * returns:
2158  */
2159 static int
2160 zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *fsf_req)
2161 {
2162         struct fsf_qtcb_bottom_config *bottom;
2163         struct zfcp_adapter *adapter = fsf_req->adapter;
2164         struct fsf_qtcb *qtcb = fsf_req->qtcb;
2165
2166         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
2167                 return -EIO;
2168
2169         switch (qtcb->header.fsf_status) {
2170
2171         case FSF_GOOD:
2172                 if (zfcp_fsf_exchange_config_evaluate(fsf_req, 1))
2173                         return -EIO;
2174
2175                 switch (fc_host_port_type(adapter->scsi_host)) {
2176                 case FC_PORTTYPE_PTP:
2177                         ZFCP_LOG_NORMAL("Point-to-Point fibrechannel "
2178                                         "configuration detected at adapter %s\n"
2179                                         "Peer WWNN 0x%016llx, "
2180                                         "peer WWPN 0x%016llx, "
2181                                         "peer d_id 0x%06x\n",
2182                                         zfcp_get_busid_by_adapter(adapter),
2183                                         adapter->peer_wwnn,
2184                                         adapter->peer_wwpn,
2185                                         adapter->peer_d_id);
2186                         debug_text_event(fsf_req->adapter->erp_dbf, 0,
2187                                         "top-p-to-p");
2188                         break;
2189                 case FC_PORTTYPE_NLPORT:
2190                         ZFCP_LOG_NORMAL("error: Arbitrated loop fibrechannel "
2191                                         "topology detected at adapter %s "
2192                                         "unsupported, shutting down adapter\n",
2193                                         zfcp_get_busid_by_adapter(adapter));
2194                         debug_text_event(fsf_req->adapter->erp_dbf, 0,
2195                                          "top-al");
2196                         zfcp_erp_adapter_shutdown(adapter, 0);
2197                         return -EIO;
2198                 case FC_PORTTYPE_NPORT:
2199                         ZFCP_LOG_NORMAL("Switched fabric fibrechannel "
2200                                         "network detected at adapter %s.\n",
2201                                         zfcp_get_busid_by_adapter(adapter));
2202                         break;
2203                 default:
2204                         ZFCP_LOG_NORMAL("bug: The fibrechannel topology "
2205                                         "reported by the exchange "
2206                                         "configuration command for "
2207                                         "the adapter %s is not "
2208                                         "of a type known to the zfcp "
2209                                         "driver, shutting down adapter\n",
2210                                         zfcp_get_busid_by_adapter(adapter));
2211                         debug_text_exception(fsf_req->adapter->erp_dbf, 0,
2212                                              "unknown-topo");
2213                         zfcp_erp_adapter_shutdown(adapter, 0);
2214                         return -EIO;
2215                 }
2216                 bottom = &qtcb->bottom.config;
2217                 if (bottom->max_qtcb_size < sizeof(struct fsf_qtcb)) {
2218                         ZFCP_LOG_NORMAL("bug: Maximum QTCB size (%d bytes) "
2219                                         "allowed by the adapter %s "
2220                                         "is lower than the minimum "
2221                                         "required by the driver (%ld bytes).\n",
2222                                         bottom->max_qtcb_size,
2223                                         zfcp_get_busid_by_adapter(adapter),
2224                                         sizeof(struct fsf_qtcb));
2225                         debug_text_event(fsf_req->adapter->erp_dbf, 0,
2226                                          "qtcb-size");
2227                         debug_event(fsf_req->adapter->erp_dbf, 0,
2228                                     &bottom->max_qtcb_size, sizeof (u32));
2229                         zfcp_erp_adapter_shutdown(adapter, 0);
2230                         return -EIO;
2231                 }
2232                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
2233                                 &adapter->status);
2234                 break;
2235         case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
2236                 debug_text_event(adapter->erp_dbf, 0, "xchg-inco");
2237
2238                 if (zfcp_fsf_exchange_config_evaluate(fsf_req, 0))
2239                         return -EIO;
2240
2241                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
2242                                 &adapter->status);
2243
2244                 zfcp_fsf_link_down_info_eval(adapter,
2245                         &qtcb->header.fsf_status_qual.link_down_info);
2246                 break;
2247         default:
2248                 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf-stat-ng");
2249                 debug_event(fsf_req->adapter->erp_dbf, 0,
2250                             &fsf_req->qtcb->header.fsf_status, sizeof(u32));
2251                 zfcp_erp_adapter_shutdown(adapter, 0);
2252                 return -EIO;
2253         }
2254         return 0;
2255 }
2256
2257 /**
2258  * zfcp_fsf_exchange_port_data - request information about local port
2259  * @erp_action: ERP action for the adapter for which port data is requested
2260  */
2261 int
2262 zfcp_fsf_exchange_port_data(struct zfcp_erp_action *erp_action)
2263 {
2264         volatile struct qdio_buffer_element *sbale;
2265         struct zfcp_fsf_req *fsf_req;
2266         struct zfcp_adapter *adapter = erp_action->adapter;
2267         unsigned long lock_flags;
2268         int retval;
2269
2270         if (!(adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT)) {
2271                 ZFCP_LOG_INFO("error: exchange port data "
2272                               "command not supported by adapter %s\n",
2273                               zfcp_get_busid_by_adapter(adapter));
2274                 return -EOPNOTSUPP;
2275         }
2276
2277         /* setup new FSF request */
2278         retval = zfcp_fsf_req_create(adapter, FSF_QTCB_EXCHANGE_PORT_DATA,
2279                                      ZFCP_REQ_AUTO_CLEANUP,
2280                                      adapter->pool.fsf_req_erp,
2281                                      &lock_flags, &fsf_req);
2282         if (retval) {
2283                 ZFCP_LOG_INFO("error: Out of resources. Could not create an "
2284                               "exchange port data request for "
2285                               "the adapter %s.\n",
2286                               zfcp_get_busid_by_adapter(adapter));
2287                 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
2288                                         lock_flags);
2289                 return retval;
2290         }
2291
2292         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
2293         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2294         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2295
2296         erp_action->fsf_req = fsf_req;
2297         fsf_req->erp_action = erp_action;
2298         zfcp_erp_start_timer(fsf_req);
2299
2300         retval = zfcp_fsf_req_send(fsf_req);
2301         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
2302
2303         if (retval) {
2304                 ZFCP_LOG_INFO("error: Could not send an exchange port data "
2305                               "command on the adapter %s\n",
2306                               zfcp_get_busid_by_adapter(adapter));
2307                 zfcp_fsf_req_free(fsf_req);
2308                 erp_action->fsf_req = NULL;
2309         }
2310         else
2311                 ZFCP_LOG_DEBUG("exchange port data request initiated "
2312                                "(adapter %s)\n",
2313                                zfcp_get_busid_by_adapter(adapter));
2314         return retval;
2315 }
2316
2317
2318 /**
2319  * zfcp_fsf_exchange_port_data_sync - request information about local port
2320  * and wait until information is ready
2321  */
2322 int
2323 zfcp_fsf_exchange_port_data_sync(struct zfcp_adapter *adapter,
2324                                 struct fsf_qtcb_bottom_port *data)
2325 {
2326         volatile struct qdio_buffer_element *sbale;
2327         struct zfcp_fsf_req *fsf_req;
2328         unsigned long lock_flags;
2329         int retval;
2330
2331         if (!(adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT)) {
2332                 ZFCP_LOG_INFO("error: exchange port data "
2333                               "command not supported by adapter %s\n",
2334                               zfcp_get_busid_by_adapter(adapter));
2335                 return -EOPNOTSUPP;
2336         }
2337
2338         /* setup new FSF request */
2339         retval = zfcp_fsf_req_create(adapter, FSF_QTCB_EXCHANGE_PORT_DATA,
2340                                 0, NULL, &lock_flags, &fsf_req);
2341         if (retval) {
2342                 ZFCP_LOG_INFO("error: Out of resources. Could not create an "
2343                               "exchange port data request for "
2344                               "the adapter %s.\n",
2345                               zfcp_get_busid_by_adapter(adapter));
2346                 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
2347                                         lock_flags);
2348                 return retval;
2349         }
2350
2351         if (data)
2352                 fsf_req->data = (unsigned long) data;
2353
2354         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
2355         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2356         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2357
2358         zfcp_fsf_start_timer(fsf_req, ZFCP_FSF_REQUEST_TIMEOUT);
2359         retval = zfcp_fsf_req_send(fsf_req);
2360         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
2361
2362         if (retval)
2363                 ZFCP_LOG_INFO("error: Could not send an exchange port data "
2364                               "command on the adapter %s\n",
2365                               zfcp_get_busid_by_adapter(adapter));
2366         else
2367                 wait_event(fsf_req->completion_wq,
2368                            fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
2369
2370         zfcp_fsf_req_free(fsf_req);
2371
2372         return retval;
2373 }
2374
2375 /**
2376  * zfcp_fsf_exchange_port_evaluate
2377  * @fsf_req: fsf_req which belongs to xchg port data request
2378  * @xchg_ok: specifies if xchg port data was incomplete or complete (0/1)
2379  */
2380 static void
2381 zfcp_fsf_exchange_port_evaluate(struct zfcp_fsf_req *fsf_req, int xchg_ok)
2382 {
2383         struct zfcp_adapter *adapter;
2384         struct fsf_qtcb_bottom_port *bottom;
2385         struct Scsi_Host *shost;
2386
2387         adapter = fsf_req->adapter;
2388         bottom = &fsf_req->qtcb->bottom.port;
2389         shost = adapter->scsi_host;
2390
2391         if (fsf_req->data)
2392                 memcpy((struct fsf_qtcb_bottom_port*) fsf_req->data, bottom,
2393                         sizeof(struct fsf_qtcb_bottom_port));
2394
2395         if (adapter->connection_features & FSF_FEATURE_NPIV_MODE)
2396                 fc_host_permanent_port_name(shost) = bottom->wwpn;
2397         else
2398                 fc_host_permanent_port_name(shost) = fc_host_port_name(shost);
2399         fc_host_maxframe_size(shost) = bottom->maximum_frame_size;
2400         fc_host_supported_speeds(shost) = bottom->supported_speed;
2401 }
2402
2403 /**
2404  * zfcp_fsf_exchange_port_data_handler - handler for exchange_port_data request
2405  * @fsf_req: pointer to struct zfcp_fsf_req
2406  */
2407 static void
2408 zfcp_fsf_exchange_port_data_handler(struct zfcp_fsf_req *fsf_req)
2409 {
2410         struct zfcp_adapter *adapter;
2411         struct fsf_qtcb *qtcb;
2412
2413         adapter = fsf_req->adapter;
2414         qtcb = fsf_req->qtcb;
2415
2416         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
2417                 return;
2418
2419         switch (qtcb->header.fsf_status) {
2420         case FSF_GOOD:
2421                 zfcp_fsf_exchange_port_evaluate(fsf_req, 1);
2422                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XPORT_OK, &adapter->status);
2423                 break;
2424         case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
2425                 zfcp_fsf_exchange_port_evaluate(fsf_req, 0);
2426                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XPORT_OK, &adapter->status);
2427                 zfcp_fsf_link_down_info_eval(adapter,
2428                         &qtcb->header.fsf_status_qual.link_down_info);
2429                 break;
2430         default:
2431                 debug_text_event(adapter->erp_dbf, 0, "xchg-port-ng");
2432                 debug_event(adapter->erp_dbf, 0,
2433                             &fsf_req->qtcb->header.fsf_status, sizeof(u32));
2434         }
2435 }
2436
2437
2438 /*
2439  * function:    zfcp_fsf_open_port
2440  *
2441  * purpose:
2442  *
2443  * returns:     address of initiated FSF request
2444  *              NULL - request could not be initiated
2445  */
2446 int
2447 zfcp_fsf_open_port(struct zfcp_erp_action *erp_action)
2448 {
2449         volatile struct qdio_buffer_element *sbale;
2450         struct zfcp_fsf_req *fsf_req;
2451         unsigned long lock_flags;
2452         int retval = 0;
2453
2454         /* setup new FSF request */
2455         retval = zfcp_fsf_req_create(erp_action->adapter,
2456                                      FSF_QTCB_OPEN_PORT_WITH_DID,
2457                                      ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
2458                                      erp_action->adapter->pool.fsf_req_erp,
2459                                      &lock_flags, &fsf_req);
2460         if (retval < 0) {
2461                 ZFCP_LOG_INFO("error: Could not create open port request "
2462                               "for port 0x%016Lx on adapter %s.\n",
2463                               erp_action->port->wwpn,
2464                               zfcp_get_busid_by_adapter(erp_action->adapter));
2465                 goto out;
2466         }
2467
2468         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
2469         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2470         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2471
2472         fsf_req->qtcb->bottom.support.d_id = erp_action->port->d_id;
2473         atomic_set_mask(ZFCP_STATUS_COMMON_OPENING, &erp_action->port->status);
2474         fsf_req->data = (unsigned long) erp_action->port;
2475         fsf_req->erp_action = erp_action;
2476         erp_action->fsf_req = fsf_req;
2477
2478         zfcp_erp_start_timer(fsf_req);
2479         retval = zfcp_fsf_req_send(fsf_req);
2480         if (retval) {
2481                 ZFCP_LOG_INFO("error: Could not send open port request for "
2482                               "port 0x%016Lx on adapter %s.\n",
2483                               erp_action->port->wwpn,
2484                               zfcp_get_busid_by_adapter(erp_action->adapter));
2485                 zfcp_fsf_req_free(fsf_req);
2486                 erp_action->fsf_req = NULL;
2487                 goto out;
2488         }
2489
2490         ZFCP_LOG_DEBUG("open port request initiated "
2491                        "(adapter %s,  port 0x%016Lx)\n",
2492                        zfcp_get_busid_by_adapter(erp_action->adapter),
2493                        erp_action->port->wwpn);
2494  out:
2495         write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
2496                                 lock_flags);
2497         return retval;
2498 }
2499
2500 /*
2501  * function:    zfcp_fsf_open_port_handler
2502  *
2503  * purpose:     is called for finished Open Port command
2504  *
2505  * returns:
2506  */
2507 static int
2508 zfcp_fsf_open_port_handler(struct zfcp_fsf_req *fsf_req)
2509 {
2510         int retval = -EINVAL;
2511         struct zfcp_port *port;
2512         struct fsf_plogi *plogi;
2513         struct fsf_qtcb_header *header;
2514         u16 subtable, rule, counter;
2515
2516         port = (struct zfcp_port *) fsf_req->data;
2517         header = &fsf_req->qtcb->header;
2518
2519         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
2520                 /* don't change port status in our bookkeeping */
2521                 goto skip_fsfstatus;
2522         }
2523
2524         /* evaluate FSF status in QTCB */
2525         switch (header->fsf_status) {
2526
2527         case FSF_PORT_ALREADY_OPEN:
2528                 ZFCP_LOG_NORMAL("bug: remote port 0x%016Lx on adapter %s "
2529                                 "is already open.\n",
2530                                 port->wwpn, zfcp_get_busid_by_port(port));
2531                 debug_text_exception(fsf_req->adapter->erp_dbf, 0,
2532                                      "fsf_s_popen");
2533                 /*
2534                  * This is a bug, however operation should continue normally
2535                  * if it is simply ignored
2536                  */
2537                 break;
2538
2539         case FSF_ACCESS_DENIED:
2540                 ZFCP_LOG_NORMAL("Access denied, cannot open port 0x%016Lx "
2541                                 "on adapter %s\n",
2542                                 port->wwpn, zfcp_get_busid_by_port(port));
2543                 for (counter = 0; counter < 2; counter++) {
2544                         subtable = header->fsf_status_qual.halfword[counter * 2];
2545                         rule = header->fsf_status_qual.halfword[counter * 2 + 1];
2546                         switch (subtable) {
2547                         case FSF_SQ_CFDC_SUBTABLE_OS:
2548                         case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
2549                         case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
2550                         case FSF_SQ_CFDC_SUBTABLE_LUN:
2551                                 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
2552                                         zfcp_act_subtable_type[subtable], rule);
2553                                 break;
2554                         }
2555                 }
2556                 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_access");
2557                 zfcp_erp_port_access_denied(port);
2558                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2559                 break;
2560
2561         case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
2562                 ZFCP_LOG_INFO("error: The FSF adapter is out of resources. "
2563                               "The remote port 0x%016Lx on adapter %s "
2564                               "could not be opened. Disabling it.\n",
2565                               port->wwpn, zfcp_get_busid_by_port(port));
2566                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2567                                  "fsf_s_max_ports");
2568                 zfcp_erp_port_failed(port);
2569                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2570                 break;
2571
2572         case FSF_ADAPTER_STATUS_AVAILABLE:
2573                 switch (header->fsf_status_qual.word[0]) {
2574                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
2575                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
2576                                          "fsf_sq_ltest");
2577                         /* ERP strategy will escalate */
2578                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2579                         break;
2580                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
2581                         /* ERP strategy will escalate */
2582                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
2583                                          "fsf_sq_ulp");
2584                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2585                         break;
2586                 case FSF_SQ_NO_RETRY_POSSIBLE:
2587                         ZFCP_LOG_NORMAL("The remote port 0x%016Lx on "
2588                                         "adapter %s could not be opened. "
2589                                         "Disabling it.\n",
2590                                         port->wwpn,
2591                                         zfcp_get_busid_by_port(port));
2592                         debug_text_exception(fsf_req->adapter->erp_dbf, 0,
2593                                              "fsf_sq_no_retry");
2594                         zfcp_erp_port_failed(port);
2595                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2596                         break;
2597                 default:
2598                         ZFCP_LOG_NORMAL
2599                             ("bug: Wrong status qualifier 0x%x arrived.\n",
2600                              header->fsf_status_qual.word[0]);
2601                         debug_text_event(fsf_req->adapter->erp_dbf, 0,
2602                                          "fsf_sq_inval:");
2603                         debug_exception(
2604                                 fsf_req->adapter->erp_dbf, 0,
2605                                 &header->fsf_status_qual.word[0],
2606                                 sizeof (u32));
2607                         break;
2608                 }
2609                 break;
2610
2611         case FSF_GOOD:
2612                 /* save port handle assigned by FSF */
2613                 port->handle = header->port_handle;
2614                 ZFCP_LOG_INFO("The remote port 0x%016Lx via adapter %s "
2615                               "was opened, it's port handle is 0x%x\n",
2616                               port->wwpn, zfcp_get_busid_by_port(port),
2617                               port->handle);
2618                 /* mark port as open */
2619                 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN |
2620                                 ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
2621                 atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
2622                                   ZFCP_STATUS_COMMON_ACCESS_BOXED,
2623                                   &port->status);
2624                 retval = 0;
2625                 /* check whether D_ID has changed during open */
2626                 /*
2627                  * FIXME: This check is not airtight, as the FCP channel does
2628                  * not monitor closures of target port connections caused on
2629                  * the remote side. Thus, they might miss out on invalidating
2630                  * locally cached WWPNs (and other N_Port parameters) of gone
2631                  * target ports. So, our heroic attempt to make things safe
2632                  * could be undermined by 'open port' response data tagged with
2633                  * obsolete WWPNs. Another reason to monitor potential
2634                  * connection closures ourself at least (by interpreting
2635                  * incoming ELS' and unsolicited status). It just crosses my
2636                  * mind that one should be able to cross-check by means of
2637                  * another GID_PN straight after a port has been opened.
2638                  * Alternately, an ADISC/PDISC ELS should suffice, as well.
2639                  */
2640                 plogi = (struct fsf_plogi *) fsf_req->qtcb->bottom.support.els;
2641                 if (!atomic_test_mask(ZFCP_STATUS_PORT_NO_WWPN, &port->status))
2642                 {
2643                         if (fsf_req->qtcb->bottom.support.els1_length <
2644                             sizeof (struct fsf_plogi)) {
2645                                 ZFCP_LOG_INFO(
2646                                         "warning: insufficient length of "
2647                                         "PLOGI payload (%i)\n",
2648                                         fsf_req->qtcb->bottom.support.els1_length);
2649                                 debug_text_event(fsf_req->adapter->erp_dbf, 0,
2650                                                  "fsf_s_short_plogi:");
2651                                 /* skip sanity check and assume wwpn is ok */
2652                         } else {
2653                                 if (plogi->serv_param.wwpn != port->wwpn) {
2654                                         ZFCP_LOG_INFO("warning: d_id of port "
2655                                                       "0x%016Lx changed during "
2656                                                       "open\n", port->wwpn);
2657                                         debug_text_event(
2658                                                 fsf_req->adapter->erp_dbf, 0,
2659                                                 "fsf_s_did_change:");
2660                                         atomic_clear_mask(
2661                                                 ZFCP_STATUS_PORT_DID_DID,
2662                                                 &port->status);
2663                                 } else {
2664                                         port->wwnn = plogi->serv_param.wwnn;
2665                                         zfcp_plogi_evaluate(port, plogi);
2666                                 }
2667                         }
2668                 }
2669                 break;
2670
2671         case FSF_UNKNOWN_OP_SUBTYPE:
2672                 /* should never occure, subtype not set in zfcp_fsf_open_port */
2673                 ZFCP_LOG_INFO("unknown operation subtype (adapter: %s, "
2674                               "op_subtype=0x%x)\n",
2675                               zfcp_get_busid_by_port(port),
2676                               fsf_req->qtcb->bottom.support.operation_subtype);
2677                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2678                 break;
2679
2680         default:
2681                 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
2682                                 "(debug info 0x%x)\n",
2683                                 header->fsf_status);
2684                 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
2685                 debug_exception(fsf_req->adapter->erp_dbf, 0,
2686                                 &header->fsf_status, sizeof (u32));
2687                 break;
2688         }
2689
2690  skip_fsfstatus:
2691         atomic_clear_mask(ZFCP_STATUS_COMMON_OPENING, &port->status);
2692         return retval;
2693 }
2694
2695 /*
2696  * function:    zfcp_fsf_close_port
2697  *
2698  * purpose:     submit FSF command "close port"
2699  *
2700  * returns:     address of initiated FSF request
2701  *              NULL - request could not be initiated
2702  */
2703 int
2704 zfcp_fsf_close_port(struct zfcp_erp_action *erp_action)
2705 {
2706         volatile struct qdio_buffer_element *sbale;
2707         struct zfcp_fsf_req *fsf_req;
2708         unsigned long lock_flags;
2709         int retval = 0;
2710
2711         /* setup new FSF request */
2712         retval = zfcp_fsf_req_create(erp_action->adapter,
2713                                      FSF_QTCB_CLOSE_PORT,
2714                                      ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
2715                                      erp_action->adapter->pool.fsf_req_erp,
2716                                      &lock_flags, &fsf_req);
2717         if (retval < 0) {
2718                 ZFCP_LOG_INFO("error: Could not create a close port request "
2719                               "for port 0x%016Lx on adapter %s.\n",
2720                               erp_action->port->wwpn,
2721                               zfcp_get_busid_by_adapter(erp_action->adapter));
2722                 goto out;
2723         }
2724
2725         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
2726         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2727         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2728
2729         atomic_set_mask(ZFCP_STATUS_COMMON_CLOSING, &erp_action->port->status);
2730         fsf_req->data = (unsigned long) erp_action->port;
2731         fsf_req->erp_action = erp_action;
2732         fsf_req->qtcb->header.port_handle = erp_action->port->handle;
2733         fsf_req->erp_action = erp_action;
2734         erp_action->fsf_req = fsf_req;
2735
2736         zfcp_erp_start_timer(fsf_req);
2737         retval = zfcp_fsf_req_send(fsf_req);
2738         if (retval) {
2739                 ZFCP_LOG_INFO("error: Could not send a close port request for "
2740                               "port 0x%016Lx on adapter %s.\n",
2741                               erp_action->port->wwpn,
2742                               zfcp_get_busid_by_adapter(erp_action->adapter));
2743                 zfcp_fsf_req_free(fsf_req);
2744                 erp_action->fsf_req = NULL;
2745                 goto out;
2746         }
2747
2748         ZFCP_LOG_TRACE("close port request initiated "
2749                        "(adapter %s, port 0x%016Lx)\n",
2750                        zfcp_get_busid_by_adapter(erp_action->adapter),
2751                        erp_action->port->wwpn);
2752  out:
2753         write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
2754                                 lock_flags);
2755         return retval;
2756 }
2757
2758 /*
2759  * function:    zfcp_fsf_close_port_handler
2760  *
2761  * purpose:     is called for finished Close Port FSF command
2762  *
2763  * returns:
2764  */
2765 static int
2766 zfcp_fsf_close_port_handler(struct zfcp_fsf_req *fsf_req)
2767 {
2768         int retval = -EINVAL;
2769         struct zfcp_port *port;
2770
2771         port = (struct zfcp_port *) fsf_req->data;
2772
2773         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
2774                 /* don't change port status in our bookkeeping */
2775                 goto skip_fsfstatus;
2776         }
2777
2778         /* evaluate FSF status in QTCB */
2779         switch (fsf_req->qtcb->header.fsf_status) {
2780
2781         case FSF_PORT_HANDLE_NOT_VALID:
2782                 ZFCP_LOG_INFO("Temporary port identifier 0x%x for port "
2783                               "0x%016Lx on adapter %s invalid. This may happen "
2784                               "occasionally.\n", port->handle,
2785                               port->wwpn, zfcp_get_busid_by_port(port));
2786                 ZFCP_LOG_DEBUG("status qualifier:\n");
2787                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
2788                               (char *) &fsf_req->qtcb->header.fsf_status_qual,
2789                               sizeof (union fsf_status_qual));
2790                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2791                                  "fsf_s_phand_nv");
2792                 zfcp_erp_adapter_reopen(port->adapter, 0);
2793                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2794                 break;
2795
2796         case FSF_ADAPTER_STATUS_AVAILABLE:
2797                 /* Note: FSF has actually closed the port in this case.
2798                  * The status code is just daft. Fingers crossed for a change
2799                  */
2800                 retval = 0;
2801                 break;
2802
2803         case FSF_GOOD:
2804                 ZFCP_LOG_TRACE("remote port 0x016%Lx on adapter %s closed, "
2805                                "port handle 0x%x\n", port->wwpn,
2806                                zfcp_get_busid_by_port(port), port->handle);
2807                 zfcp_erp_modify_port_status(port,
2808                                             ZFCP_STATUS_COMMON_OPEN,
2809                                             ZFCP_CLEAR);
2810                 retval = 0;
2811                 break;
2812
2813         default:
2814                 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
2815                                 "(debug info 0x%x)\n",
2816                                 fsf_req->qtcb->header.fsf_status);
2817                 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
2818                 debug_exception(fsf_req->adapter->erp_dbf, 0,
2819                                 &fsf_req->qtcb->header.fsf_status,
2820                                 sizeof (u32));
2821                 break;
2822         }
2823
2824  skip_fsfstatus:
2825         atomic_clear_mask(ZFCP_STATUS_COMMON_CLOSING, &port->status);
2826         return retval;
2827 }
2828
2829 /*
2830  * function:    zfcp_fsf_close_physical_port
2831  *
2832  * purpose:     submit FSF command "close physical port"
2833  *
2834  * returns:     address of initiated FSF request
2835  *              NULL - request could not be initiated
2836  */
2837 int
2838 zfcp_fsf_close_physical_port(struct zfcp_erp_action *erp_action)
2839 {
2840         volatile struct qdio_buffer_element *sbale;
2841         struct zfcp_fsf_req *fsf_req;
2842         unsigned long lock_flags;
2843         int retval = 0;
2844
2845         /* setup new FSF request */
2846         retval = zfcp_fsf_req_create(erp_action->adapter,
2847                                      FSF_QTCB_CLOSE_PHYSICAL_PORT,
2848                                      ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
2849                                      erp_action->adapter->pool.fsf_req_erp,
2850                                      &lock_flags, &fsf_req);
2851         if (retval < 0) {
2852                 ZFCP_LOG_INFO("error: Could not create close physical port "
2853                               "request (adapter %s, port 0x%016Lx)\n",
2854                               zfcp_get_busid_by_adapter(erp_action->adapter),
2855                               erp_action->port->wwpn);
2856
2857                 goto out;
2858         }
2859
2860         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
2861         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2862         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2863
2864         /* mark port as being closed */
2865         atomic_set_mask(ZFCP_STATUS_PORT_PHYS_CLOSING,
2866                         &erp_action->port->status);
2867         /* save a pointer to this port */
2868         fsf_req->data = (unsigned long) erp_action->port;
2869         fsf_req->qtcb->header.port_handle = erp_action->port->handle;
2870         fsf_req->erp_action = erp_action;
2871         erp_action->fsf_req = fsf_req;
2872
2873         zfcp_erp_start_timer(fsf_req);
2874         retval = zfcp_fsf_req_send(fsf_req);
2875         if (retval) {
2876                 ZFCP_LOG_INFO("error: Could not send close physical port "
2877                               "request (adapter %s, port 0x%016Lx)\n",
2878                               zfcp_get_busid_by_adapter(erp_action->adapter),
2879                               erp_action->port->wwpn);
2880                 zfcp_fsf_req_free(fsf_req);
2881                 erp_action->fsf_req = NULL;
2882                 goto out;
2883         }
2884
2885         ZFCP_LOG_TRACE("close physical port request initiated "
2886                        "(adapter %s, port 0x%016Lx)\n",
2887                        zfcp_get_busid_by_adapter(erp_action->adapter),
2888                        erp_action->port->wwpn);
2889  out:
2890         write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
2891                                 lock_flags);
2892         return retval;
2893 }
2894
2895 /*
2896  * function:    zfcp_fsf_close_physical_port_handler
2897  *
2898  * purpose:     is called for finished Close Physical Port FSF command
2899  *
2900  * returns:
2901  */
2902 static int
2903 zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *fsf_req)
2904 {
2905         int retval = -EINVAL;
2906         struct zfcp_port *port;
2907         struct zfcp_unit *unit;
2908         struct fsf_qtcb_header *header;
2909         u16 subtable, rule, counter;
2910
2911         port = (struct zfcp_port *) fsf_req->data;
2912         header = &fsf_req->qtcb->header;
2913
2914         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
2915                 /* don't change port status in our bookkeeping */
2916                 goto skip_fsfstatus;
2917         }
2918
2919         /* evaluate FSF status in QTCB */
2920         switch (header->fsf_status) {
2921
2922         case FSF_PORT_HANDLE_NOT_VALID:
2923                 ZFCP_LOG_INFO("Temporary port identifier 0x%x invalid"
2924                               "(adapter %s, port 0x%016Lx). "
2925                               "This may happen occasionally.\n",
2926                               port->handle,
2927                               zfcp_get_busid_by_port(port),
2928                               port->wwpn);
2929                 ZFCP_LOG_DEBUG("status qualifier:\n");
2930                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
2931                               (char *) &header->fsf_status_qual,
2932                               sizeof (union fsf_status_qual));
2933                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2934                                  "fsf_s_phand_nv");
2935                 zfcp_erp_adapter_reopen(port->adapter, 0);
2936                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2937                 break;
2938
2939         case FSF_ACCESS_DENIED:
2940                 ZFCP_LOG_NORMAL("Access denied, cannot close "
2941                                 "physical port 0x%016Lx on adapter %s\n",
2942                                 port->wwpn, zfcp_get_busid_by_port(port));
2943                 for (counter = 0; counter < 2; counter++) {
2944                         subtable = header->fsf_status_qual.halfword[counter * 2];
2945                         rule = header->fsf_status_qual.halfword[counter * 2 + 1];
2946                         switch (subtable) {
2947                         case FSF_SQ_CFDC_SUBTABLE_OS:
2948                         case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
2949                         case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
2950                         case FSF_SQ_CFDC_SUBTABLE_LUN:
2951                                 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
2952                                         zfcp_act_subtable_type[subtable], rule);
2953                                 break;
2954                         }
2955                 }
2956                 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_access");
2957                 zfcp_erp_port_access_denied(port);
2958                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2959                 break;
2960
2961         case FSF_PORT_BOXED:
2962                 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter "
2963                                "%s needs to be reopened but it was attempted "
2964                                "to close it physically.\n",
2965                                port->wwpn,
2966                                zfcp_get_busid_by_port(port));
2967                 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_pboxed");
2968                 zfcp_erp_port_boxed(port);
2969                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
2970                         ZFCP_STATUS_FSFREQ_RETRY;
2971
2972                 /* can't use generic zfcp_erp_modify_port_status because
2973                  * ZFCP_STATUS_COMMON_OPEN must not be reset for the port */
2974                 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
2975                 list_for_each_entry(unit, &port->unit_list_head, list)
2976                         atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
2977                                           &unit->status);
2978                 break;
2979
2980         case FSF_ADAPTER_STATUS_AVAILABLE:
2981                 switch (header->fsf_status_qual.word[0]) {
2982                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
2983                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
2984                                          "fsf_sq_ltest");
2985                         /* This will now be escalated by ERP */
2986                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2987                         break;
2988                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
2989                         /* ERP strategy will escalate */
2990                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
2991                                          "fsf_sq_ulp");
2992                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2993                         break;
2994                 default:
2995                         ZFCP_LOG_NORMAL
2996                             ("bug: Wrong status qualifier 0x%x arrived.\n",
2997                              header->fsf_status_qual.word[0]);
2998                         debug_text_event(fsf_req->adapter->erp_dbf, 0,
2999                                          "fsf_sq_inval:");
3000                         debug_exception(
3001                                 fsf_req->adapter->erp_dbf, 0,
3002                                 &header->fsf_status_qual.word[0], sizeof (u32));
3003                         break;
3004                 }
3005                 break;
3006
3007         case FSF_GOOD:
3008                 ZFCP_LOG_DEBUG("Remote port 0x%016Lx via adapter %s "
3009                                "physically closed, port handle 0x%x\n",
3010                                port->wwpn,
3011                                zfcp_get_busid_by_port(port), port->handle);
3012                 /* can't use generic zfcp_erp_modify_port_status because
3013                  * ZFCP_STATUS_COMMON_OPEN must not be reset for the port
3014                  */
3015                 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
3016                 list_for_each_entry(unit, &port->unit_list_head, list)
3017                     atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
3018                 retval = 0;
3019                 break;
3020
3021         default:
3022                 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
3023                                 "(debug info 0x%x)\n",
3024                                 header->fsf_status);
3025                 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
3026                 debug_exception(fsf_req->adapter->erp_dbf, 0,
3027                                 &header->fsf_status, sizeof (u32));
3028                 break;
3029         }
3030
3031  skip_fsfstatus:
3032         atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_CLOSING, &port->status);
3033         return retval;
3034 }
3035
3036 /*
3037  * function:    zfcp_fsf_open_unit
3038  *
3039  * purpose:
3040  *
3041  * returns:
3042  *
3043  * assumptions: This routine does not check whether the associated
3044  *              remote port has already been opened. This should be
3045  *              done by calling routines. Otherwise some status
3046  *              may be presented by FSF
3047  */
3048 int
3049 zfcp_fsf_open_unit(struct zfcp_erp_action *erp_action)
3050 {
3051         volatile struct qdio_buffer_element *sbale;
3052         struct zfcp_fsf_req *fsf_req;
3053         unsigned long lock_flags;
3054         int retval = 0;
3055
3056         /* setup new FSF request */
3057         retval = zfcp_fsf_req_create(erp_action->adapter,
3058                                      FSF_QTCB_OPEN_LUN,
3059                                      ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
3060                                      erp_action->adapter->pool.fsf_req_erp,
3061                                      &lock_flags, &fsf_req);
3062         if (retval < 0) {
3063                 ZFCP_LOG_INFO("error: Could not create open unit request for "
3064                               "unit 0x%016Lx on port 0x%016Lx on adapter %s.\n",
3065                               erp_action->unit->fcp_lun,
3066                               erp_action->unit->port->wwpn,
3067                               zfcp_get_busid_by_adapter(erp_action->adapter));
3068                 goto out;
3069         }
3070
3071         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
3072         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
3073         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
3074
3075         fsf_req->qtcb->header.port_handle = erp_action->port->handle;
3076         fsf_req->qtcb->bottom.support.fcp_lun = erp_action->unit->fcp_lun;
3077         if (!(erp_action->adapter->connection_features & FSF_FEATURE_NPIV_MODE))
3078                 fsf_req->qtcb->bottom.support.option =
3079                         FSF_OPEN_LUN_SUPPRESS_BOXING;
3080         atomic_set_mask(ZFCP_STATUS_COMMON_OPENING, &erp_action->unit->status);
3081         fsf_req->data = (unsigned long) erp_action->unit;
3082         fsf_req->erp_action = erp_action;
3083         erp_action->fsf_req = fsf_req;
3084
3085         zfcp_erp_start_timer(fsf_req);
3086         retval = zfcp_fsf_req_send(erp_action->fsf_req);
3087         if (retval) {
3088                 ZFCP_LOG_INFO("error: Could not send an open unit request "
3089                               "on the adapter %s, port 0x%016Lx for "
3090                               "unit 0x%016Lx\n",
3091                               zfcp_get_busid_by_adapter(erp_action->adapter),
3092                               erp_action->port->wwpn,
3093                               erp_action->unit->fcp_lun);
3094                 zfcp_fsf_req_free(fsf_req);
3095                 erp_action->fsf_req = NULL;
3096                 goto out;
3097         }
3098
3099         ZFCP_LOG_TRACE("Open LUN request initiated (adapter %s, "
3100                        "port 0x%016Lx, unit 0x%016Lx)\n",
3101                        zfcp_get_busid_by_adapter(erp_action->adapter),
3102                        erp_action->port->wwpn, erp_action->unit->fcp_lun);
3103  out:
3104         write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
3105                                 lock_flags);
3106         return retval;
3107 }
3108
3109 /*
3110  * function:    zfcp_fsf_open_unit_handler
3111  *
3112  * purpose:     is called for finished Open LUN command
3113  *
3114  * returns:
3115  */
3116 static int
3117 zfcp_fsf_open_unit_handler(struct zfcp_fsf_req *fsf_req)
3118 {
3119         int retval = -EINVAL;
3120         struct zfcp_adapter *adapter;
3121         struct zfcp_unit *unit;
3122         struct fsf_qtcb_header *header;
3123         struct fsf_qtcb_bottom_support *bottom;
3124         struct fsf_queue_designator *queue_designator;
3125         u16 subtable, rule, counter;
3126         int exclusive, readwrite;
3127
3128         unit = (struct zfcp_unit *) fsf_req->data;
3129
3130         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
3131                 /* don't change unit status in our bookkeeping */
3132                 goto skip_fsfstatus;
3133         }
3134
3135         adapter = fsf_req->adapter;
3136         header = &fsf_req->qtcb->header;
3137         bottom = &fsf_req->qtcb->bottom.support;
3138         queue_designator = &header->fsf_status_qual.fsf_queue_designator;
3139
3140         atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
3141                           ZFCP_STATUS_COMMON_ACCESS_BOXED |
3142                           ZFCP_STATUS_UNIT_SHARED |
3143                           ZFCP_STATUS_UNIT_READONLY,
3144                           &unit->status);
3145
3146         /* evaluate FSF status in QTCB */
3147         switch (header->fsf_status) {
3148
3149         case FSF_PORT_HANDLE_NOT_VALID:
3150                 ZFCP_LOG_INFO("Temporary port identifier 0x%x "
3151                               "for port 0x%016Lx on adapter %s invalid "
3152                               "This may happen occasionally\n",
3153                               unit->port->handle,
3154                               unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3155                 ZFCP_LOG_DEBUG("status qualifier:\n");
3156                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3157                               (char *) &header->fsf_status_qual,
3158                               sizeof (union fsf_status_qual));
3159                 debug_text_event(adapter->erp_dbf, 1, "fsf_s_ph_nv");
3160                 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3161                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3162                 break;
3163
3164         case FSF_LUN_ALREADY_OPEN:
3165                 ZFCP_LOG_NORMAL("bug: Attempted to open unit 0x%016Lx on "
3166                                 "remote port 0x%016Lx on adapter %s twice.\n",
3167                                 unit->fcp_lun,
3168                                 unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3169                 debug_text_exception(adapter->erp_dbf, 0,
3170                                      "fsf_s_uopen");
3171                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3172                 break;
3173
3174         case FSF_ACCESS_DENIED:
3175                 ZFCP_LOG_NORMAL("Access denied, cannot open unit 0x%016Lx on "
3176                                 "remote port 0x%016Lx on adapter %s\n",
3177                                 unit->fcp_lun, unit->port->wwpn,
3178                                 zfcp_get_busid_by_unit(unit));
3179                 for (counter = 0; counter < 2; counter++) {
3180                         subtable = header->fsf_status_qual.halfword[counter * 2];
3181                         rule = header->fsf_status_qual.halfword[counter * 2 + 1];
3182                         switch (subtable) {
3183                         case FSF_SQ_CFDC_SUBTABLE_OS:
3184                         case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
3185                         case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
3186                         case FSF_SQ_CFDC_SUBTABLE_LUN:
3187                                 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
3188                                         zfcp_act_subtable_type[subtable], rule);
3189                                 break;
3190                         }
3191                 }
3192                 debug_text_event(adapter->erp_dbf, 1, "fsf_s_access");
3193                 zfcp_erp_unit_access_denied(unit);
3194                 atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
3195                 atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
3196                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3197                 break;
3198
3199         case FSF_PORT_BOXED:
3200                 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter %s "
3201                                "needs to be reopened\n",
3202                                unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3203                 debug_text_event(adapter->erp_dbf, 2, "fsf_s_pboxed");
3204                 zfcp_erp_port_boxed(unit->port);
3205                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
3206                         ZFCP_STATUS_FSFREQ_RETRY;
3207                 break;
3208
3209         case FSF_LUN_SHARING_VIOLATION:
3210                 if (header->fsf_status_qual.word[0] != 0) {
3211                         ZFCP_LOG_NORMAL("FCP-LUN 0x%Lx at the remote port "
3212                                         "with WWPN 0x%Lx "
3213                                         "connected to the adapter %s "
3214                                         "is already in use in LPAR%d, CSS%d\n",
3215                                         unit->fcp_lun,
3216                                         unit->port->wwpn,
3217                                         zfcp_get_busid_by_unit(unit),
3218                                         queue_designator->hla,
3219                                         queue_designator->cssid);
3220                 } else {
3221                         subtable = header->fsf_status_qual.halfword[4];
3222                         rule = header->fsf_status_qual.halfword[5];
3223                         switch (subtable) {
3224                         case FSF_SQ_CFDC_SUBTABLE_OS:
3225                         case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
3226                         case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
3227                         case FSF_SQ_CFDC_SUBTABLE_LUN:
3228                                 ZFCP_LOG_NORMAL("Access to FCP-LUN 0x%Lx at the "
3229                                                 "remote port with WWPN 0x%Lx "
3230                                                 "connected to the adapter %s "
3231                                                 "is denied (%s rule %d)\n",
3232                                                 unit->fcp_lun,
3233                                                 unit->port->wwpn,
3234                                                 zfcp_get_busid_by_unit(unit),
3235                                                 zfcp_act_subtable_type[subtable],
3236                                                 rule);
3237                                 break;
3238                         }
3239                 }
3240                 ZFCP_LOG_DEBUG("status qualifier:\n");
3241                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3242                               (char *) &header->fsf_status_qual,
3243                               sizeof (union fsf_status_qual));
3244                 debug_text_event(adapter->erp_dbf, 2,
3245                                  "fsf_s_l_sh_vio");
3246                 zfcp_erp_unit_access_denied(unit);
3247                 atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
3248                 atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
3249                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3250                 break;
3251
3252         case FSF_MAXIMUM_NUMBER_OF_LUNS_EXCEEDED:
3253                 ZFCP_LOG_INFO("error: The adapter ran out of resources. "
3254                               "There is no handle (temporary port identifier) "
3255                               "available for unit 0x%016Lx on port 0x%016Lx "
3256                               "on adapter %s\n",
3257                               unit->fcp_lun,
3258                               unit->port->wwpn,
3259                               zfcp_get_busid_by_unit(unit));
3260                 debug_text_event(adapter->erp_dbf, 1,
3261                                  "fsf_s_max_units");
3262                 zfcp_erp_unit_failed(unit);
3263                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3264                 break;
3265
3266         case FSF_ADAPTER_STATUS_AVAILABLE:
3267                 switch (header->fsf_status_qual.word[0]) {
3268                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
3269                         /* Re-establish link to port */
3270                         debug_text_event(adapter->erp_dbf, 1,
3271                                          "fsf_sq_ltest");
3272                         zfcp_test_link(unit->port);
3273                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3274                         break;
3275                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
3276                         /* ERP strategy will escalate */
3277                         debug_text_event(adapter->erp_dbf, 1,
3278                                          "fsf_sq_ulp");
3279                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3280                         break;
3281                 default:
3282                         ZFCP_LOG_NORMAL
3283                             ("bug: Wrong status qualifier 0x%x arrived.\n",
3284                              header->fsf_status_qual.word[0]);
3285                         debug_text_event(adapter->erp_dbf, 0,
3286                                          "fsf_sq_inval:");
3287                         debug_exception(adapter->erp_dbf, 0,
3288                                         &header->fsf_status_qual.word[0],
3289                                 sizeof (u32));
3290                 }
3291                 break;
3292
3293         case FSF_INVALID_COMMAND_OPTION:
3294                 ZFCP_LOG_NORMAL(
3295                         "Invalid option 0x%x has been specified "
3296                         "in QTCB bottom sent to the adapter %s\n",
3297                         bottom->option,
3298                         zfcp_get_busid_by_adapter(adapter));
3299                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3300                 retval = -EINVAL;
3301                 break;
3302
3303         case FSF_GOOD:
3304                 /* save LUN handle assigned by FSF */
3305                 unit->handle = header->lun_handle;
3306                 ZFCP_LOG_TRACE("unit 0x%016Lx on remote port 0x%016Lx on "
3307                                "adapter %s opened, port handle 0x%x\n",
3308                                unit->fcp_lun,
3309                                unit->port->wwpn,
3310                                zfcp_get_busid_by_unit(unit),
3311                                unit->handle);
3312                 /* mark unit as open */
3313                 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
3314
3315                 if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE) &&
3316                     (adapter->adapter_features & FSF_FEATURE_LUN_SHARING) &&
3317                     (adapter->ccw_device->id.dev_model != ZFCP_DEVICE_MODEL_PRIV)) {
3318                         exclusive = (bottom->lun_access_info &
3319                                         FSF_UNIT_ACCESS_EXCLUSIVE);
3320                         readwrite = (bottom->lun_access_info &
3321                                         FSF_UNIT_ACCESS_OUTBOUND_TRANSFER);
3322
3323                         if (!exclusive)
3324                                 atomic_set_mask(ZFCP_STATUS_UNIT_SHARED,
3325                                                 &unit->status);
3326
3327                         if (!readwrite) {
3328                                 atomic_set_mask(ZFCP_STATUS_UNIT_READONLY,
3329                                                 &unit->status);
3330                                 ZFCP_LOG_NORMAL("read-only access for unit "
3331                                                 "(adapter %s, wwpn=0x%016Lx, "
3332                                                 "fcp_lun=0x%016Lx)\n",
3333                                                 zfcp_get_busid_by_unit(unit),
3334                                                 unit->port->wwpn,
3335                                                 unit->fcp_lun);
3336                         }
3337
3338                         if (exclusive && !readwrite) {
3339                                 ZFCP_LOG_NORMAL("exclusive access of read-only "
3340                                                 "unit not supported\n");
3341                                 zfcp_erp_unit_failed(unit);
3342                                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3343                                 zfcp_erp_unit_shutdown(unit, 0);
3344                         } else if (!exclusive && readwrite) {
3345                                 ZFCP_LOG_NORMAL("shared access of read-write "
3346                                                 "unit not supported\n");
3347                                 zfcp_erp_unit_failed(unit);
3348                                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3349                                 zfcp_erp_unit_shutdown(unit, 0);
3350                         }
3351                 }
3352
3353                 retval = 0;
3354                 break;
3355
3356         default:
3357                 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
3358                                 "(debug info 0x%x)\n",
3359                                 header->fsf_status);
3360                 debug_text_event(adapter->erp_dbf, 0, "fsf_s_inval:");
3361                 debug_exception(adapter->erp_dbf, 0,
3362                                 &header->fsf_status, sizeof (u32));
3363                 break;
3364         }
3365
3366  skip_fsfstatus:
3367         atomic_clear_mask(ZFCP_STATUS_COMMON_OPENING, &unit->status);
3368         return retval;
3369 }
3370
3371 /*
3372  * function:    zfcp_fsf_close_unit
3373  *
3374  * purpose:
3375  *
3376  * returns:     address of fsf_req - request successfully initiated
3377  *              NULL -
3378  *
3379  * assumptions: This routine does not check whether the associated
3380  *              remote port/lun has already been opened. This should be
3381  *              done by calling routines. Otherwise some status
3382  *              may be presented by FSF
3383  */
3384 int
3385 zfcp_fsf_close_unit(struct zfcp_erp_action *erp_action)
3386 {
3387         volatile struct qdio_buffer_element *sbale;
3388         struct zfcp_fsf_req *fsf_req;
3389         unsigned long lock_flags;
3390         int retval = 0;
3391
3392         /* setup new FSF request */
3393         retval = zfcp_fsf_req_create(erp_action->adapter,
3394                                      FSF_QTCB_CLOSE_LUN,
3395                                      ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
3396                                      erp_action->adapter->pool.fsf_req_erp,
3397                                      &lock_flags, &fsf_req);
3398         if (retval < 0) {
3399                 ZFCP_LOG_INFO("error: Could not create close unit request for "
3400                               "unit 0x%016Lx on port 0x%016Lx on adapter %s.\n",
3401                               erp_action->unit->fcp_lun,
3402                               erp_action->port->wwpn,
3403                               zfcp_get_busid_by_adapter(erp_action->adapter));
3404                 goto out;
3405         }
3406
3407         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
3408         sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
3409         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
3410
3411         fsf_req->qtcb->header.port_handle = erp_action->port->handle;
3412         fsf_req->qtcb->header.lun_handle = erp_action->unit->handle;
3413         atomic_set_mask(ZFCP_STATUS_COMMON_CLOSING, &erp_action->unit->status);
3414         fsf_req->data = (unsigned long) erp_action->unit;
3415         fsf_req->erp_action = erp_action;
3416         erp_action->fsf_req = fsf_req;
3417
3418         zfcp_erp_start_timer(fsf_req);
3419         retval = zfcp_fsf_req_send(erp_action->fsf_req);
3420         if (retval) {
3421                 ZFCP_LOG_INFO("error: Could not send a close unit request for "
3422                               "unit 0x%016Lx on port 0x%016Lx onadapter %s.\n",
3423                               erp_action->unit->fcp_lun,
3424                               erp_action->port->wwpn,
3425                               zfcp_get_busid_by_adapter(erp_action->adapter));
3426                 zfcp_fsf_req_free(fsf_req);
3427                 erp_action->fsf_req = NULL;
3428                 goto out;
3429         }
3430
3431         ZFCP_LOG_TRACE("Close LUN request initiated (adapter %s, "
3432                        "port 0x%016Lx, unit 0x%016Lx)\n",
3433                        zfcp_get_busid_by_adapter(erp_action->adapter),
3434                        erp_action->port->wwpn, erp_action->unit->fcp_lun);
3435  out:
3436         write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
3437                                 lock_flags);
3438         return retval;
3439 }
3440
3441 /*
3442  * function:    zfcp_fsf_close_unit_handler
3443  *
3444  * purpose:     is called for finished Close LUN FSF command
3445  *
3446  * returns:
3447  */
3448 static int
3449 zfcp_fsf_close_unit_handler(struct zfcp_fsf_req *fsf_req)
3450 {
3451         int retval = -EINVAL;
3452         struct zfcp_unit *unit;
3453
3454         unit = (struct zfcp_unit *) fsf_req->data;
3455
3456         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
3457                 /* don't change unit status in our bookkeeping */
3458                 goto skip_fsfstatus;
3459         }
3460
3461         /* evaluate FSF status in QTCB */
3462         switch (fsf_req->qtcb->header.fsf_status) {
3463
3464         case FSF_PORT_HANDLE_NOT_VALID:
3465                 ZFCP_LOG_INFO("Temporary port identifier 0x%x for port "
3466                               "0x%016Lx on adapter %s invalid. This may "
3467                               "happen in rare circumstances\n",
3468                               unit->port->handle,
3469                               unit->port->wwpn,
3470                               zfcp_get_busid_by_unit(unit));
3471                 ZFCP_LOG_DEBUG("status qualifier:\n");
3472                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3473                               (char *) &fsf_req->qtcb->header.fsf_status_qual,
3474                               sizeof (union fsf_status_qual));
3475                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3476                                  "fsf_s_phand_nv");
3477                 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3478                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3479                 break;
3480
3481         case FSF_LUN_HANDLE_NOT_VALID:
3482                 ZFCP_LOG_INFO("Temporary LUN identifier 0x%x of unit "
3483                               "0x%016Lx on port 0x%016Lx on adapter %s is "
3484                               "invalid. This may happen occasionally.\n",
3485                               unit->handle,
3486                               unit->fcp_lun,
3487                               unit->port->wwpn,
3488                               zfcp_get_busid_by_unit(unit));
3489                 ZFCP_LOG_DEBUG("Status qualifier data:\n");
3490                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3491                               (char *) &fsf_req->qtcb->header.fsf_status_qual,
3492                               sizeof (union fsf_status_qual));
3493                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3494                                  "fsf_s_lhand_nv");
3495                 zfcp_erp_port_reopen(unit->port, 0);
3496                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3497                 break;
3498
3499         case FSF_PORT_BOXED:
3500                 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter %s "
3501                                "needs to be reopened\n",
3502                                unit->port->wwpn,
3503                                zfcp_get_busid_by_unit(unit));
3504                 debug_text_event(fsf_req->adapter->erp_dbf, 2, "fsf_s_pboxed");
3505                 zfcp_erp_port_boxed(unit->port);
3506                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
3507                         ZFCP_STATUS_FSFREQ_RETRY;
3508                 break;
3509
3510         case FSF_ADAPTER_STATUS_AVAILABLE:
3511                 switch (fsf_req->qtcb->header.fsf_status_qual.word[0]) {
3512                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
3513                         /* re-establish link to port */
3514                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
3515                                          "fsf_sq_ltest");
3516                         zfcp_test_link(unit->port);
3517                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3518                         break;
3519                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
3520                         /* ERP strategy will escalate */
3521                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
3522                                          "fsf_sq_ulp");
3523                         fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3524                         break;
3525                 default:
3526                         ZFCP_LOG_NORMAL
3527                             ("bug: Wrong status qualifier 0x%x arrived.\n",
3528                              fsf_req->qtcb->header.fsf_status_qual.word[0]);
3529                         debug_text_event(fsf_req->adapter->erp_dbf, 0,
3530                                          "fsf_sq_inval:");
3531                         debug_exception(
3532                                 fsf_req->adapter->erp_dbf, 0,
3533                                 &fsf_req->qtcb->header.fsf_status_qual.word[0],
3534                                 sizeof (u32));
3535                         break;
3536                 }
3537                 break;
3538
3539         case FSF_GOOD:
3540                 ZFCP_LOG_TRACE("unit 0x%016Lx on port 0x%016Lx on adapter %s "
3541                                "closed, port handle 0x%x\n",
3542                                unit->fcp_lun,
3543                                unit->port->wwpn,
3544                                zfcp_get_busid_by_unit(unit),
3545                                unit->handle);
3546                 /* mark unit as closed */
3547                 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
3548                 retval = 0;
3549                 break;
3550
3551         default:
3552                 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
3553                                 "(debug info 0x%x)\n",
3554                                 fsf_req->qtcb->header.fsf_status);
3555                 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
3556                 debug_exception(fsf_req->adapter->erp_dbf, 0,
3557                                 &fsf_req->qtcb->header.fsf_status,
3558                                 sizeof (u32));
3559                 break;
3560         }
3561
3562  skip_fsfstatus:
3563         atomic_clear_mask(ZFCP_STATUS_COMMON_CLOSING, &unit->status);
3564         return retval;
3565 }
3566
3567 /**
3568  * zfcp_fsf_send_fcp_command_task - initiate an FCP command (for a SCSI command)
3569  * @adapter: adapter where scsi command is issued
3570  * @unit: unit where command is sent to
3571  * @scsi_cmnd: scsi command to be sent
3572  * @timer: timer to be started when request is initiated
3573  * @req_flags: flags for fsf_request
3574  */
3575 int
3576 zfcp_fsf_send_fcp_command_task(struct zfcp_adapter *adapter,
3577                                struct zfcp_unit *unit,
3578                                struct scsi_cmnd * scsi_cmnd,
3579                                int use_timer, int req_flags)
3580 {
3581         struct zfcp_fsf_req *fsf_req = NULL;
3582         struct fcp_cmnd_iu *fcp_cmnd_iu;
3583         unsigned int sbtype;
3584         unsigned long lock_flags;
3585         int real_bytes = 0;
3586         int retval = 0;
3587         int mask;
3588
3589         /* setup new FSF request */
3590         retval = zfcp_fsf_req_create(adapter, FSF_QTCB_FCP_CMND, req_flags,
3591                                      adapter->pool.fsf_req_scsi,
3592                                      &lock_flags, &fsf_req);
3593         if (unlikely(retval < 0)) {
3594                 ZFCP_LOG_DEBUG("error: Could not create FCP command request "
3595                                "for unit 0x%016Lx on port 0x%016Lx on "
3596                                "adapter %s\n",
3597                                unit->fcp_lun,
3598                                unit->port->wwpn,
3599                                zfcp_get_busid_by_adapter(adapter));
3600                 goto failed_req_create;
3601         }
3602
3603         if (unlikely(!atomic_test_mask(ZFCP_STATUS_COMMON_UNBLOCKED,
3604                         &unit->status))) {
3605                 retval = -EBUSY;
3606                 goto unit_blocked;
3607         }
3608
3609         zfcp_unit_get(unit);
3610         fsf_req->unit = unit;
3611
3612         /* associate FSF request with SCSI request (for look up on abort) */
3613         scsi_cmnd->host_scribble = (unsigned char *) fsf_req->req_id;
3614
3615         /* associate SCSI command with FSF request */
3616         fsf_req->data = (unsigned long) scsi_cmnd;
3617
3618         /* set handles of unit and its parent port in QTCB */
3619         fsf_req->qtcb->header.lun_handle = unit->handle;
3620         fsf_req->qtcb->header.port_handle = unit->port->handle;
3621
3622         /* FSF does not define the structure of the FCP_CMND IU */
3623         fcp_cmnd_iu = (struct fcp_cmnd_iu *)
3624             &(fsf_req->qtcb->bottom.io.fcp_cmnd);
3625
3626         /*
3627          * set depending on data direction:
3628          *      data direction bits in SBALE (SB Type)
3629          *      data direction bits in QTCB
3630          *      data direction bits in FCP_CMND IU
3631          */
3632         switch (scsi_cmnd->sc_data_direction) {
3633         case DMA_NONE:
3634                 fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
3635                 /*
3636                  * FIXME(qdio):
3637                  * what is the correct type for commands
3638                  * without 'real' data buffers?
3639                  */
3640                 sbtype = SBAL_FLAGS0_TYPE_READ;
3641                 break;
3642         case DMA_FROM_DEVICE:
3643                 fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_READ;
3644                 sbtype = SBAL_FLAGS0_TYPE_READ;
3645                 fcp_cmnd_iu->rddata = 1;
3646                 break;
3647         case DMA_TO_DEVICE:
3648                 fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_WRITE;
3649                 sbtype = SBAL_FLAGS0_TYPE_WRITE;
3650                 fcp_cmnd_iu->wddata = 1;
3651                 break;
3652         case DMA_BIDIRECTIONAL:
3653         default:
3654                 /*
3655                  * dummy, catch this condition earlier
3656                  * in zfcp_scsi_queuecommand
3657                  */
3658                 goto failed_scsi_cmnd;
3659         }
3660
3661         /* set FC service class in QTCB (3 per default) */
3662         fsf_req->qtcb->bottom.io.service_class = ZFCP_FC_SERVICE_CLASS_DEFAULT;
3663
3664         /* set FCP_LUN in FCP_CMND IU in QTCB */
3665         fcp_cmnd_iu->fcp_lun = unit->fcp_lun;
3666
3667         mask = ZFCP_STATUS_UNIT_READONLY | ZFCP_STATUS_UNIT_SHARED;
3668
3669         /* set task attributes in FCP_CMND IU in QTCB */
3670         if (likely((scsi_cmnd->device->simple_tags) ||
3671                    (atomic_test_mask(mask, &unit->status))))
3672                 fcp_cmnd_iu->task_attribute = SIMPLE_Q;
3673         else
3674                 fcp_cmnd_iu->task_attribute = UNTAGGED;
3675
3676         /* set additional length of FCP_CDB in FCP_CMND IU in QTCB, if needed */
3677         if (unlikely(scsi_cmnd->cmd_len > FCP_CDB_LENGTH)) {
3678                 fcp_cmnd_iu->add_fcp_cdb_length
3679                     = (scsi_cmnd->cmd_len - FCP_CDB_LENGTH) >> 2;
3680                 ZFCP_LOG_TRACE("SCSI CDB length is 0x%x, "
3681                                "additional FCP_CDB length is 0x%x "
3682                                "(shifted right 2 bits)\n",
3683                                scsi_cmnd->cmd_len,
3684                                fcp_cmnd_iu->add_fcp_cdb_length);
3685         }
3686         /*
3687          * copy SCSI CDB (including additional length, if any) to
3688          * FCP_CDB in FCP_CMND IU in QTCB
3689          */
3690         memcpy(fcp_cmnd_iu->fcp_cdb, scsi_cmnd->cmnd, scsi_cmnd->cmd_len);
3691
3692         /* FCP CMND IU length in QTCB */
3693         fsf_req->qtcb->bottom.io.fcp_cmnd_length =
3694                 sizeof (struct fcp_cmnd_iu) +
3695                 fcp_cmnd_iu->add_fcp_cdb_length + sizeof (fcp_dl_t);
3696
3697         /* generate SBALEs from data buffer */
3698         real_bytes = zfcp_qdio_sbals_from_scsicmnd(fsf_req, sbtype, scsi_cmnd);
3699         if (unlikely(real_bytes < 0)) {
3700                 if (fsf_req->sbal_number < ZFCP_MAX_SBALS_PER_REQ) {
3701                         ZFCP_LOG_DEBUG(
3702                                 "Data did not fit into available buffer(s), "
3703                                "waiting for more...\n");
3704                         retval = -EIO;
3705                 } else {
3706                         ZFCP_LOG_NORMAL("error: No truncation implemented but "
3707                                         "required. Shutting down unit "
3708                                         "(adapter %s, port 0x%016Lx, "
3709                                         "unit 0x%016Lx)\n",
3710                                         zfcp_get_busid_by_unit(unit),
3711                                         unit->port->wwpn,
3712                                         unit->fcp_lun);
3713                         zfcp_erp_unit_shutdown(unit, 0);
3714                         retval = -EINVAL;
3715                 }
3716                 goto no_fit;
3717         }
3718
3719         /* set length of FCP data length in FCP_CMND IU in QTCB */
3720         zfcp_set_fcp_dl(fcp_cmnd_iu, real_bytes);
3721
3722         ZFCP_LOG_DEBUG("Sending SCSI command:\n");
3723         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3724                       (char *) scsi_cmnd->cmnd, scsi_cmnd->cmd_len);
3725
3726         if (use_timer)
3727                 zfcp_fsf_start_timer(fsf_req, ZFCP_FSF_REQUEST_TIMEOUT);
3728
3729         retval = zfcp_fsf_req_send(fsf_req);
3730         if (unlikely(retval < 0)) {
3731                 ZFCP_LOG_INFO("error: Could not send FCP command request "
3732                               "on adapter %s, port 0x%016Lx, unit 0x%016Lx\n",
3733                               zfcp_get_busid_by_adapter(adapter),
3734                               unit->port->wwpn,
3735                               unit->fcp_lun);
3736                 goto send_failed;
3737         }
3738
3739         ZFCP_LOG_TRACE("Send FCP Command initiated (adapter %s, "
3740                        "port 0x%016Lx, unit 0x%016Lx)\n",
3741                        zfcp_get_busid_by_adapter(adapter),
3742                        unit->port->wwpn,
3743                        unit->fcp_lun);
3744         goto success;
3745
3746  send_failed:
3747  no_fit:
3748  failed_scsi_cmnd:
3749  unit_blocked:
3750         zfcp_unit_put(unit);
3751         zfcp_fsf_req_free(fsf_req);
3752         fsf_req = NULL;
3753         scsi_cmnd->host_scribble = NULL;
3754  success:
3755  failed_req_create:
3756         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
3757         return retval;
3758 }
3759
3760 struct zfcp_fsf_req *
3761 zfcp_fsf_send_fcp_command_task_management(struct zfcp_adapter *adapter,
3762                                           struct zfcp_unit *unit,
3763                                           u8 tm_flags, int req_flags)
3764 {
3765         struct zfcp_fsf_req *fsf_req = NULL;
3766         int retval = 0;
3767         struct fcp_cmnd_iu *fcp_cmnd_iu;
3768         unsigned long lock_flags;
3769         volatile struct qdio_buffer_element *sbale;
3770
3771         /* setup new FSF request */
3772         retval = zfcp_fsf_req_create(adapter, FSF_QTCB_FCP_CMND, req_flags,
3773                                      adapter->pool.fsf_req_scsi,
3774                                      &lock_flags, &fsf_req);
3775         if (retval < 0) {
3776                 ZFCP_LOG_INFO("error: Could not create FCP command (task "
3777                               "management) request for adapter %s, port "
3778                               " 0x%016Lx, unit 0x%016Lx.\n",
3779                               zfcp_get_busid_by_adapter(adapter),
3780                               unit->port->wwpn, unit->fcp_lun);
3781                 goto out;
3782         }
3783
3784         if (unlikely(!atomic_test_mask(ZFCP_STATUS_COMMON_UNBLOCKED,
3785                         &unit->status)))
3786                 goto unit_blocked;
3787
3788         /*
3789          * Used to decide on proper handler in the return path,
3790          * could be either zfcp_fsf_send_fcp_command_task_handler or
3791          * zfcp_fsf_send_fcp_command_task_management_handler */
3792
3793         fsf_req->status |= ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT;
3794
3795         /*
3796          * hold a pointer to the unit being target of this
3797          * task management request
3798          */
3799         fsf_req->data = (unsigned long) unit;
3800
3801         /* set FSF related fields in QTCB */
3802         fsf_req->qtcb->header.lun_handle = unit->handle;
3803         fsf_req->qtcb->header.port_handle = unit->port->handle;
3804         fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
3805         fsf_req->qtcb->bottom.io.service_class = ZFCP_FC_SERVICE_CLASS_DEFAULT;
3806         fsf_req->qtcb->bottom.io.fcp_cmnd_length =
3807                 sizeof (struct fcp_cmnd_iu) + sizeof (fcp_dl_t);
3808
3809         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
3810         sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE;
3811         sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
3812
3813         /* set FCP related fields in FCP_CMND IU in QTCB */
3814         fcp_cmnd_iu = (struct fcp_cmnd_iu *)
3815                 &(fsf_req->qtcb->bottom.io.fcp_cmnd);
3816         fcp_cmnd_iu->fcp_lun = unit->fcp_lun;
3817         fcp_cmnd_iu->task_management_flags = tm_flags;
3818
3819         zfcp_fsf_start_timer(fsf_req, ZFCP_SCSI_ER_TIMEOUT);
3820         retval = zfcp_fsf_req_send(fsf_req);
3821         if (!retval)
3822                 goto out;
3823
3824  unit_blocked:
3825         zfcp_fsf_req_free(fsf_req);
3826         fsf_req = NULL;
3827
3828  out:
3829         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
3830         return fsf_req;
3831 }
3832
3833 /*
3834  * function:    zfcp_fsf_send_fcp_command_handler
3835  *
3836  * purpose:     is called for finished Send FCP Command
3837  *
3838  * returns:
3839  */
3840 static int
3841 zfcp_fsf_send_fcp_command_handler(struct zfcp_fsf_req *fsf_req)
3842 {
3843         int retval = -EINVAL;
3844         struct zfcp_unit *unit;
3845         struct fsf_qtcb_header *header;
3846         u16 subtable, rule, counter;
3847
3848         header = &fsf_req->qtcb->header;
3849
3850         if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT))
3851                 unit = (struct zfcp_unit *) fsf_req->data;
3852         else
3853                 unit = fsf_req->unit;
3854
3855         if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
3856                 /* go directly to calls of special handlers */
3857                 goto skip_fsfstatus;
3858         }
3859
3860         /* evaluate FSF status in QTCB */
3861         switch (header->fsf_status) {
3862
3863         case FSF_PORT_HANDLE_NOT_VALID:
3864                 ZFCP_LOG_INFO("Temporary port identifier 0x%x for port "
3865                               "0x%016Lx on adapter %s invalid\n",
3866                               unit->port->handle,
3867                               unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3868                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3869                               (char *) &header->fsf_status_qual,
3870                               sizeof (union fsf_status_qual));
3871                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3872                                  "fsf_s_phand_nv");
3873                 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3874                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3875                 break;
3876
3877         case FSF_LUN_HANDLE_NOT_VALID:
3878                 ZFCP_LOG_INFO("Temporary LUN identifier 0x%x for unit "
3879                               "0x%016Lx on port 0x%016Lx on adapter %s is "
3880                               "invalid. This may happen occasionally.\n",
3881                               unit->handle,
3882                               unit->fcp_lun,
3883                               unit->port->wwpn,
3884                               zfcp_get_busid_by_unit(unit));
3885                 ZFCP_LOG_NORMAL("Status qualifier data:\n");
3886                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
3887                               (char *) &header->fsf_status_qual,
3888                               sizeof (union fsf_status_qual));
3889                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3890                                  "fsf_s_uhand_nv");
3891                 zfcp_erp_port_reopen(unit->port, 0);
3892                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3893                 break;
3894
3895         case FSF_HANDLE_MISMATCH:
3896                 ZFCP_LOG_NORMAL("bug: The port handle 0x%x has changed "
3897                                 "unexpectedly. (adapter %s, port 0x%016Lx, "
3898                                 "unit 0x%016Lx)\n",
3899                                 unit->port->handle,
3900                                 zfcp_get_busid_by_unit(unit),
3901                                 unit->port->wwpn,
3902                                 unit->fcp_lun);
3903                 ZFCP_LOG_NORMAL("status qualifier:\n");
3904                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
3905                               (char *) &header->fsf_status_qual,
3906                               sizeof (union fsf_status_qual));
3907                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3908                                  "fsf_s_hand_mis");
3909                 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3910                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3911                 break;
3912
3913         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
3914                 ZFCP_LOG_INFO("error: adapter %s does not support fc "
3915                               "class %d.\n",
3916                               zfcp_get_busid_by_unit(unit),
3917                               ZFCP_FC_SERVICE_CLASS_DEFAULT);
3918                 /* stop operation for this adapter */
3919                 debug_text_exception(fsf_req->adapter->erp_dbf, 0,
3920                                      "fsf_s_class_nsup");
3921                 zfcp_erp_adapter_shutdown(unit->port->adapter, 0);
3922                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3923                 break;
3924
3925         case FSF_FCPLUN_NOT_VALID:
3926                 ZFCP_LOG_NORMAL("bug: unit 0x%016Lx on port 0x%016Lx on "
3927                                 "adapter %s does not have correct unit "
3928                                 "handle 0x%x\n",
3929                                 unit->fcp_lun,
3930                                 unit->port->wwpn,
3931                                 zfcp_get_busid_by_unit(unit),
3932                                 unit->handle);
3933                 ZFCP_LOG_DEBUG("status qualifier:\n");
3934                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3935                               (char *) &header->fsf_status_qual,
3936                               sizeof (union fsf_status_qual));
3937                 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3938                                  "fsf_s_fcp_lun_nv");
3939                 zfcp_erp_port_reopen(unit->port, 0);
3940                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3941                 break;
3942
3943         case FSF_ACCESS_DENIED:
3944                 ZFCP_LOG_NORMAL("Access denied, cannot send FCP command to "
3945                                 "unit 0x%016Lx on port 0x%016Lx on "
3946                                 "adapter %s\n", unit->fcp_lun, unit->port->wwpn,
3947                                 zfcp_get_busid_by_unit(unit));
3948                 for (counter = 0; counter < 2; counter++) {
3949                         subtable = header->fsf_status_qual.halfword[counter * 2];
3950                         rule = header->fsf_status_qual.halfword[counter * 2 + 1];
3951                         switch (subtable) {
3952                         case FSF_SQ_CFDC_SUBTABLE_OS:
3953                         case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
3954                         case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
3955                         case FSF_SQ_CFDC_SUBTABLE_LUN:
3956                                 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
3957                                         zfcp_act_subtable_type[subtable], rule);
3958                                 break;
3959                         }
3960                 }
3961                 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_access");
3962                 zfcp_erp_unit_access_denied(unit);
3963                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3964                 break;
3965
3966         case FSF_DIRECTION_INDICATOR_NOT_VALID:
3967                 ZFCP_LOG_INFO("bug: Invalid data direction given for unit "
3968                               "0x%016Lx on port 0x%016Lx on adapter %s "
3969                               "(debug info %d)\n",
3970                               unit->fcp_lun,
3971                               unit->port->wwpn,
3972                               zfcp_get_busid_by_unit(unit),
3973                               fsf_req->qtcb->bottom.io.data_direction);
3974                 /* stop operation for this adapter */
3975                 debug_text_event(fsf_req->adapter->erp_dbf, 0,
3976                                  "fsf_s_dir_ind_nv");
3977                 zfcp_erp_adapter_shutdown(unit->port->adapter, 0);
3978                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3979                 break;
3980
3981         case FSF_CMND_LENGTH_NOT_VALID:
3982                 ZFCP_LOG_NORMAL
3983                     ("bug: An invalid control-data-block length field "
3984                      "was found in a command for unit 0x%016Lx on port "
3985                      "0x%016Lx on adapter %s " "(debug info %d)\n",
3986                      unit->fcp_lun, unit->port->wwpn,
3987                      zfcp_get_busid_by_unit(unit),
3988                      fsf_req->qtcb->bottom.io.fcp_cmnd_length);
3989                 /* stop operation for this adapter */
3990                 debug_text_event(fsf_req->adapter->erp_dbf, 0,
3991                                  "fsf_s_cmd_len_nv");
3992                 zfcp_erp_adapter_shutdown(unit->port->adapter, 0);
3993                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3994                 break;
3995
3996         case FSF_PORT_BOXED:
3997                 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter %s "
3998                                "needs to be reopened\n",
3999                                unit->port->wwpn, zfcp_get_busid_by_unit(unit));
4000                 debug_text_event(fsf_req->adapter->erp_dbf, 2, "fsf_s_pboxed");
4001                 zfcp_erp_port_boxed(unit->port);
4002                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
4003                         ZFCP_STATUS_FSFREQ_RETRY;
4004                 break;
4005
4006         case FSF_LUN_BOXED:
4007                 ZFCP_LOG_NORMAL("unit needs to be reopened (adapter %s, "
4008                                 "wwpn=0x%016Lx, fcp_lun=0x%016Lx)\n",
4009                                 zfcp_get_busid_by_unit(unit),
4010                                 unit->port->wwpn, unit->fcp_lun);
4011                 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_lboxed");
4012                 zfcp_erp_unit_boxed(unit);
4013                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
4014                         | ZFCP_STATUS_FSFREQ_RETRY;
4015                 break;
4016
4017         case FSF_ADAPTER_STATUS_AVAILABLE:
4018                 switch (header->fsf_status_qual.word[0]) {
4019                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
4020                         /* re-establish link to port */
4021                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
4022                                          "fsf_sq_ltest");
4023                         zfcp_test_link(unit->port);
4024                         break;
4025                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
4026                         /* FIXME(hw) need proper specs for proper action */
4027                         /* let scsi stack deal with retries and escalation */
4028                         debug_text_event(fsf_req->adapter->erp_dbf, 1,
4029                                          "fsf_sq_ulp");
4030                         break;
4031                 default:
4032                         ZFCP_LOG_NORMAL
4033                             ("Unknown status qualifier 0x%x arrived.\n",
4034                              header->fsf_status_qual.word[0]);
4035                         debug_text_event(fsf_req->adapter->erp_dbf, 0,
4036                                          "fsf_sq_inval:");
4037                         debug_exception(fsf_req->adapter->erp_dbf, 0,
4038                                         &header->fsf_status_qual.word[0],
4039                                         sizeof(u32));
4040                         break;
4041                 }
4042                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4043                 break;
4044
4045         case FSF_GOOD:
4046                 break;
4047
4048         case FSF_FCP_RSP_AVAILABLE:
4049                 break;
4050
4051         default:
4052                 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
4053                 debug_exception(fsf_req->adapter->erp_dbf, 0,
4054                                 &header->fsf_status, sizeof(u32));
4055                 break;
4056         }
4057
4058  skip_fsfstatus:
4059         if (fsf_req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT) {
4060                 retval =
4061                     zfcp_fsf_send_fcp_command_task_management_handler(fsf_req);
4062         } else {
4063                 retval = zfcp_fsf_send_fcp_command_task_handler(fsf_req);
4064                 fsf_req->unit = NULL;
4065                 zfcp_unit_put(unit);
4066         }
4067         return retval;
4068 }
4069
4070 /*
4071  * function:    zfcp_fsf_send_fcp_command_task_handler
4072  *
4073  * purpose:     evaluates FCP_RSP IU
4074  *
4075  * returns:
4076  */
4077 static int
4078 zfcp_fsf_send_fcp_command_task_handler(struct zfcp_fsf_req *fsf_req)
4079 {
4080         int retval = 0;
4081         struct scsi_cmnd *scpnt;
4082         struct fcp_rsp_iu *fcp_rsp_iu = (struct fcp_rsp_iu *)
4083             &(fsf_req->qtcb->bottom.io.fcp_rsp);
4084         struct fcp_cmnd_iu *fcp_cmnd_iu = (struct fcp_cmnd_iu *)
4085             &(fsf_req->qtcb->bottom.io.fcp_cmnd);
4086         u32 sns_len;
4087         char *fcp_rsp_info = zfcp_get_fcp_rsp_info_ptr(fcp_rsp_iu);
4088         unsigned long flags;
4089         struct zfcp_unit *unit = fsf_req->unit;
4090
4091         read_lock_irqsave(&fsf_req->adapter->abort_lock, flags);
4092         scpnt = (struct scsi_cmnd *) fsf_req->data;
4093         if (unlikely(!scpnt)) {
4094                 ZFCP_LOG_DEBUG
4095                     ("Command with fsf_req %p is not associated to "
4096                      "a scsi command anymore. Aborted?\n", fsf_req);
4097                 goto out;
4098         }
4099         if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ABORTED)) {
4100                 /* FIXME: (design) mid-layer should handle DID_ABORT like
4101                  *        DID_SOFT_ERROR by retrying the request for devices
4102                  *        that allow retries.
4103                  */
4104                 ZFCP_LOG_DEBUG("Setting DID_SOFT_ERROR and SUGGEST_RETRY\n");
4105                 set_host_byte(&scpnt->result, DID_SOFT_ERROR);
4106                 set_driver_byte(&scpnt->result, SUGGEST_RETRY);
4107                 goto skip_fsfstatus;
4108         }
4109
4110         if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
4111                 ZFCP_LOG_DEBUG("Setting DID_ERROR\n");
4112                 set_host_byte(&scpnt->result, DID_ERROR);
4113                 goto skip_fsfstatus;
4114         }
4115
4116         /* set message byte of result in SCSI command */
4117         scpnt->result |= COMMAND_COMPLETE << 8;
4118
4119         /*
4120          * copy SCSI status code of FCP_STATUS of FCP_RSP IU to status byte
4121          * of result in SCSI command
4122          */
4123         scpnt->result |= fcp_rsp_iu->scsi_status;
4124         if (unlikely(fcp_rsp_iu->scsi_status)) {
4125                 /* DEBUG */
4126                 ZFCP_LOG_DEBUG("status for SCSI Command:\n");
4127                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4128                               scpnt->cmnd, scpnt->cmd_len);
4129                 ZFCP_LOG_DEBUG("SCSI status code 0x%x\n",
4130                                 fcp_rsp_iu->scsi_status);
4131                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4132                               (void *) fcp_rsp_iu, sizeof (struct fcp_rsp_iu));
4133                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4134                               zfcp_get_fcp_sns_info_ptr(fcp_rsp_iu),
4135                               fcp_rsp_iu->fcp_sns_len);
4136         }
4137
4138         /* check FCP_RSP_INFO */
4139         if (unlikely(fcp_rsp_iu->validity.bits.fcp_rsp_len_valid)) {
4140                 ZFCP_LOG_DEBUG("rsp_len is valid\n");
4141                 switch (fcp_rsp_info[3]) {
4142                 case RSP_CODE_GOOD:
4143                         /* ok, continue */
4144                         ZFCP_LOG_TRACE("no failure or Task Management "
4145                                        "Function complete\n");
4146                         set_host_byte(&scpnt->result, DID_OK);
4147                         break;
4148                 case RSP_CODE_LENGTH_MISMATCH:
4149                         /* hardware bug */
4150                         ZFCP_LOG_NORMAL("bug: FCP response code indictates "
4151                                         "that the fibrechannel protocol data "
4152                                         "length differs from the burst length. "
4153                                         "The problem occured on unit 0x%016Lx "
4154                                         "on port 0x%016Lx on adapter %s",
4155                                         unit->fcp_lun,
4156                                         unit->port->wwpn,
4157                                         zfcp_get_busid_by_unit(unit));
4158                         /* dump SCSI CDB as prepared by zfcp */
4159                         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4160                                       (char *) &fsf_req->qtcb->
4161                                       bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4162                         set_host_byte(&scpnt->result, DID_ERROR);
4163                         goto skip_fsfstatus;
4164                 case RSP_CODE_FIELD_INVALID:
4165                         /* driver or hardware bug */
4166                         ZFCP_LOG_NORMAL("bug: FCP response code indictates "
4167                                         "that the fibrechannel protocol data "
4168                                         "fields were incorrectly set up. "
4169                                         "The problem occured on the unit "
4170                                         "0x%016Lx on port 0x%016Lx on "
4171                                         "adapter %s",
4172                                         unit->fcp_lun,
4173                                         unit->port->wwpn,
4174                                         zfcp_get_busid_by_unit(unit));
4175                         /* dump SCSI CDB as prepared by zfcp */
4176                         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4177                                       (char *) &fsf_req->qtcb->
4178                                       bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4179                         set_host_byte(&scpnt->result, DID_ERROR);
4180                         goto skip_fsfstatus;
4181                 case RSP_CODE_RO_MISMATCH:
4182                         /* hardware bug */
4183                         ZFCP_LOG_NORMAL("bug: The FCP response code indicates "
4184                                         "that conflicting  values for the "
4185                                         "fibrechannel payload offset from the "
4186                                         "header were found. "
4187                                         "The problem occured on unit 0x%016Lx "
4188                                         "on port 0x%016Lx on adapter %s.\n",
4189                                         unit->fcp_lun,
4190                                         unit->port->wwpn,
4191                                         zfcp_get_busid_by_unit(unit));
4192                         /* dump SCSI CDB as prepared by zfcp */
4193                         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4194                                       (char *) &fsf_req->qtcb->
4195                                       bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4196                         set_host_byte(&scpnt->result, DID_ERROR);
4197                         goto skip_fsfstatus;
4198                 default:
4199                         ZFCP_LOG_NORMAL("bug: An invalid FCP response "
4200                                         "code was detected for a command. "
4201                                         "The problem occured on the unit "
4202                                         "0x%016Lx on port 0x%016Lx on "
4203                                         "adapter %s (debug info 0x%x)\n",
4204                                         unit->fcp_lun,
4205                                         unit->port->wwpn,
4206                                         zfcp_get_busid_by_unit(unit),
4207                                         fcp_rsp_info[3]);
4208                         /* dump SCSI CDB as prepared by zfcp */
4209                         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4210                                       (char *) &fsf_req->qtcb->
4211                                       bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4212                         set_host_byte(&scpnt->result, DID_ERROR);
4213                         goto skip_fsfstatus;
4214                 }
4215         }
4216
4217         /* check for sense data */
4218         if (unlikely(fcp_rsp_iu->validity.bits.fcp_sns_len_valid)) {
4219                 sns_len = FSF_FCP_RSP_SIZE -
4220                     sizeof (struct fcp_rsp_iu) + fcp_rsp_iu->fcp_rsp_len;
4221                 ZFCP_LOG_TRACE("room for %i bytes sense data in QTCB\n",
4222                                sns_len);
4223                 sns_len = min(sns_len, (u32) SCSI_SENSE_BUFFERSIZE);
4224                 ZFCP_LOG_TRACE("room for %i bytes sense data in SCSI command\n",
4225                                SCSI_SENSE_BUFFERSIZE);
4226                 sns_len = min(sns_len, fcp_rsp_iu->fcp_sns_len);
4227                 ZFCP_LOG_TRACE("scpnt->result =0x%x, command was:\n",
4228                                scpnt->result);
4229                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE,
4230                               (void *) &scpnt->cmnd, scpnt->cmd_len);
4231
4232                 ZFCP_LOG_TRACE("%i bytes sense data provided by FCP\n",
4233                                fcp_rsp_iu->fcp_sns_len);
4234                 memcpy(scpnt->sense_buffer,
4235                        zfcp_get_fcp_sns_info_ptr(fcp_rsp_iu), sns_len);
4236                 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE,
4237                               (void *)scpnt->sense_buffer, sns_len);
4238         }
4239
4240         /* check for overrun */
4241         if (unlikely(fcp_rsp_iu->validity.bits.fcp_resid_over)) {
4242                 ZFCP_LOG_INFO("A data overrun was detected for a command. "
4243                               "unit 0x%016Lx, port 0x%016Lx, adapter %s. "
4244                               "The response data length is "
4245                               "%d, the original length was %d.\n",
4246                               unit->fcp_lun,
4247                               unit->port->wwpn,
4248                               zfcp_get_busid_by_unit(unit),
4249                               fcp_rsp_iu->fcp_resid,
4250                               (int) zfcp_get_fcp_dl(fcp_cmnd_iu));
4251         }
4252
4253         /* check for underrun */
4254         if (unlikely(fcp_rsp_iu->validity.bits.fcp_resid_under)) {
4255                 ZFCP_LOG_INFO("A data underrun was detected for a command. "
4256                               "unit 0x%016Lx, port 0x%016Lx, adapter %s. "
4257                               "The response data length is "
4258                               "%d, the original length was %d.\n",
4259                               unit->fcp_lun,
4260                               unit->port->wwpn,
4261                               zfcp_get_busid_by_unit(unit),
4262                               fcp_rsp_iu->fcp_resid,
4263                               (int) zfcp_get_fcp_dl(fcp_cmnd_iu));
4264
4265                 scsi_set_resid(scpnt, fcp_rsp_iu->fcp_resid);
4266                 if (scsi_bufflen(scpnt) - scsi_get_resid(scpnt) <
4267                     scpnt->underflow)
4268                         set_host_byte(&scpnt->result, DID_ERROR);
4269         }
4270
4271  skip_fsfstatus:
4272         ZFCP_LOG_DEBUG("scpnt->result =0x%x\n", scpnt->result);
4273
4274         if (scpnt->result != 0)
4275                 zfcp_scsi_dbf_event_result("erro", 3, fsf_req->adapter, scpnt, fsf_req);
4276         else if (scpnt->retries > 0)
4277                 zfcp_scsi_dbf_event_result("retr", 4, fsf_req->adapter, scpnt, fsf_req);
4278         else
4279                 zfcp_scsi_dbf_event_result("norm", 6, fsf_req->adapter, scpnt, fsf_req);
4280
4281         /* cleanup pointer (need this especially for abort) */
4282         scpnt->host_scribble = NULL;
4283
4284         /* always call back */
4285         (scpnt->scsi_done) (scpnt);
4286
4287         /*
4288          * We must hold this lock until scsi_done has been called.
4289          * Otherwise we may call scsi_done after abort regarding this
4290          * command has completed.
4291          * Note: scsi_done must not block!
4292          */
4293  out:
4294         read_unlock_irqrestore(&fsf_req->adapter->abort_lock, flags);
4295         return retval;
4296 }
4297
4298 /*
4299  * function:    zfcp_fsf_send_fcp_command_task_management_handler
4300  *
4301  * purpose:     evaluates FCP_RSP IU
4302  *
4303  * returns:
4304  */
4305 static int
4306 zfcp_fsf_send_fcp_command_task_management_handler(struct zfcp_fsf_req *fsf_req)
4307 {
4308         int retval = 0;
4309         struct fcp_rsp_iu *fcp_rsp_iu = (struct fcp_rsp_iu *)
4310             &(fsf_req->qtcb->bottom.io.fcp_rsp);
4311         char *fcp_rsp_info = zfcp_get_fcp_rsp_info_ptr(fcp_rsp_iu);
4312         struct zfcp_unit *unit = (struct zfcp_unit *) fsf_req->data;
4313
4314         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
4315                 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
4316                 goto skip_fsfstatus;
4317         }
4318
4319         /* check FCP_RSP_INFO */
4320         switch (fcp_rsp_info[3]) {
4321         case RSP_CODE_GOOD:
4322                 /* ok, continue */
4323                 ZFCP_LOG_DEBUG("no failure or Task Management "
4324                                "Function complete\n");
4325                 break;
4326         case RSP_CODE_TASKMAN_UNSUPP:
4327                 ZFCP_LOG_NORMAL("bug: A reuested task management function "
4328                                 "is not supported on the target device "
4329                                 "unit 0x%016Lx, port 0x%016Lx, adapter %s\n ",
4330                                 unit->fcp_lun,
4331                                 unit->port->wwpn,
4332                                 zfcp_get_busid_by_unit(unit));
4333                 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCNOTSUPP;
4334                 break;
4335         case RSP_CODE_TASKMAN_FAILED:
4336                 ZFCP_LOG_NORMAL("bug: A reuested task management function "
4337                                 "failed to complete successfully. "
4338                                 "unit 0x%016Lx, port 0x%016Lx, adapter %s.\n",
4339                                 unit->fcp_lun,
4340                                 unit->port->wwpn,
4341                                 zfcp_get_busid_by_unit(unit));
4342                 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
4343                 break;
4344         default:
4345                 ZFCP_LOG_NORMAL("bug: An invalid FCP response "
4346                                 "code was detected for a command. "
4347                                 "unit 0x%016Lx, port 0x%016Lx, adapter %s "
4348                                 "(debug info 0x%x)\n",
4349                                 unit->fcp_lun,
4350                                 unit->port->wwpn,
4351                                 zfcp_get_busid_by_unit(unit),
4352                                 fcp_rsp_info[3]);
4353                 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
4354         }
4355
4356       skip_fsfstatus:
4357         return retval;
4358 }
4359
4360
4361 /*
4362  * function:    zfcp_fsf_control_file
4363  *
4364  * purpose:     Initiator of the control file upload/download FSF requests
4365  *
4366  * returns:     0           - FSF request is successfuly created and queued
4367  *              -EOPNOTSUPP - The FCP adapter does not have Control File support
4368  *              -EINVAL     - Invalid direction specified
4369  *              -ENOMEM     - Insufficient memory
4370  *              -EPERM      - Cannot create FSF request or place it in QDIO queue
4371  */
4372 int
4373 zfcp_fsf_control_file(struct zfcp_adapter *adapter,
4374                       struct zfcp_fsf_req **fsf_req_ptr,
4375                       u32 fsf_command,
4376                       u32 option,
4377                       struct zfcp_sg_list *sg_list)
4378 {
4379         struct zfcp_fsf_req *fsf_req;
4380         struct fsf_qtcb_bottom_support *bottom;
4381         volatile struct qdio_buffer_element *sbale;
4382         unsigned long lock_flags;
4383         int req_flags = 0;
4384         int direction;
4385         int retval = 0;
4386
4387         if (!(adapter->adapter_features & FSF_FEATURE_CFDC)) {
4388                 ZFCP_LOG_INFO("cfdc not supported (adapter %s)\n",
4389                               zfcp_get_busid_by_adapter(adapter));
4390                 retval = -EOPNOTSUPP;
4391                 goto out;
4392         }
4393
4394         switch (fsf_command) {
4395
4396         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
4397                 direction = SBAL_FLAGS0_TYPE_WRITE;
4398                 if ((option != FSF_CFDC_OPTION_FULL_ACCESS) &&
4399                     (option != FSF_CFDC_OPTION_RESTRICTED_ACCESS))
4400                         req_flags = ZFCP_WAIT_FOR_SBAL;
4401                 break;
4402
4403         case FSF_QTCB_UPLOAD_CONTROL_FILE:
4404                 direction = SBAL_FLAGS0_TYPE_READ;
4405                 break;
4406
4407         default:
4408                 ZFCP_LOG_INFO("Invalid FSF command code 0x%08x\n", fsf_command);
4409                 retval = -EINVAL;
4410                 goto out;
4411         }
4412
4413         retval = zfcp_fsf_req_create(adapter, fsf_command, req_flags,
4414                                      NULL, &lock_flags, &fsf_req);
4415         if (retval < 0) {
4416                 ZFCP_LOG_INFO("error: Could not create FSF request for the "
4417                               "adapter %s\n",
4418                         zfcp_get_busid_by_adapter(adapter));
4419                 retval = -EPERM;
4420                 goto unlock_queue_lock;
4421         }
4422
4423         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
4424         sbale[0].flags |= direction;
4425
4426         bottom = &fsf_req->qtcb->bottom.support;
4427         bottom->operation_subtype = FSF_CFDC_OPERATION_SUBTYPE;
4428         bottom->option = option;
4429
4430         if (sg_list->count > 0) {
4431                 int bytes;
4432
4433                 bytes = zfcp_qdio_sbals_from_sg(fsf_req, direction,
4434                                                 sg_list->sg, sg_list->count,
4435                                                 ZFCP_MAX_SBALS_PER_REQ);
4436                 if (bytes != ZFCP_CFDC_MAX_CONTROL_FILE_SIZE) {
4437                         ZFCP_LOG_INFO(
4438                                 "error: Could not create sufficient number of "
4439                                 "SBALS for an FSF request to the adapter %s\n",
4440                                 zfcp_get_busid_by_adapter(adapter));
4441                         retval = -ENOMEM;
4442                         goto free_fsf_req;
4443                 }
4444         } else
4445                 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
4446
4447         zfcp_fsf_start_timer(fsf_req, ZFCP_FSF_REQUEST_TIMEOUT);
4448         retval = zfcp_fsf_req_send(fsf_req);
4449         if (retval < 0) {
4450                 ZFCP_LOG_INFO("initiation of cfdc up/download failed"
4451                               "(adapter %s)\n",
4452                               zfcp_get_busid_by_adapter(adapter));
4453                 retval = -EPERM;
4454                 goto free_fsf_req;
4455         }
4456         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
4457
4458         ZFCP_LOG_NORMAL("Control file %s FSF request has been sent to the "
4459                         "adapter %s\n",
4460                         fsf_command == FSF_QTCB_DOWNLOAD_CONTROL_FILE ?
4461                         "download" : "upload",
4462                         zfcp_get_busid_by_adapter(adapter));
4463
4464         wait_event(fsf_req->completion_wq,
4465                    fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
4466
4467         *fsf_req_ptr = fsf_req;
4468         goto out;
4469
4470  free_fsf_req:
4471         zfcp_fsf_req_free(fsf_req);
4472  unlock_queue_lock:
4473         write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
4474  out:
4475         return retval;
4476 }
4477
4478
4479 /*
4480  * function:    zfcp_fsf_control_file_handler
4481  *
4482  * purpose:     Handler of the control file upload/download FSF requests
4483  *
4484  * returns:     0       - FSF request successfuly processed
4485  *              -EAGAIN - Operation has to be repeated because of a temporary problem
4486  *              -EACCES - There is no permission to execute an operation
4487  *              -EPERM  - The control file is not in a right format
4488  *              -EIO    - There is a problem with the FCP adapter
4489  *              -EINVAL - Invalid operation
4490  *              -EFAULT - User space memory I/O operation fault
4491  */
4492 static int
4493 zfcp_fsf_control_file_handler(struct zfcp_fsf_req *fsf_req)
4494 {
4495         struct zfcp_adapter *adapter = fsf_req->adapter;
4496         struct fsf_qtcb_header *header = &fsf_req->qtcb->header;
4497         struct fsf_qtcb_bottom_support *bottom = &fsf_req->qtcb->bottom.support;
4498         int retval = 0;
4499
4500         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
4501                 retval = -EINVAL;
4502                 goto skip_fsfstatus;
4503         }
4504
4505         switch (header->fsf_status) {
4506
4507         case FSF_GOOD:
4508                 ZFCP_LOG_NORMAL(
4509                         "The FSF request has been successfully completed "
4510                         "on the adapter %s\n",
4511                         zfcp_get_busid_by_adapter(adapter));
4512                 break;
4513
4514         case FSF_OPERATION_PARTIALLY_SUCCESSFUL:
4515                 if (bottom->operation_subtype == FSF_CFDC_OPERATION_SUBTYPE) {
4516                         switch (header->fsf_status_qual.word[0]) {
4517
4518                         case FSF_SQ_CFDC_HARDENED_ON_SE:
4519                                 ZFCP_LOG_NORMAL(
4520                                         "CFDC on the adapter %s has being "
4521                                         "hardened on primary and secondary SE\n",
4522                                         zfcp_get_busid_by_adapter(adapter));
4523                                 break;
4524
4525                         case FSF_SQ_CFDC_COULD_NOT_HARDEN_ON_SE:
4526                                 ZFCP_LOG_NORMAL(
4527                                         "CFDC of the adapter %s could not "
4528                                         "be saved on the SE\n",
4529                                         zfcp_get_busid_by_adapter(adapter));
4530                                 break;
4531
4532                         case FSF_SQ_CFDC_COULD_NOT_HARDEN_ON_SE2:
4533                                 ZFCP_LOG_NORMAL(
4534                                         "CFDC of the adapter %s could not "
4535                                         "be copied to the secondary SE\n",
4536                                         zfcp_get_busid_by_adapter(adapter));
4537                                 break;
4538
4539                         default:
4540                                 ZFCP_LOG_NORMAL(
4541                                         "CFDC could not be hardened "
4542                                         "on the adapter %s\n",
4543                                         zfcp_get_busid_by_adapter(adapter));
4544                         }
4545                 }
4546                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4547                 retval = -EAGAIN;
4548                 break;
4549
4550         case FSF_AUTHORIZATION_FAILURE:
4551                 ZFCP_LOG_NORMAL(
4552                         "Adapter %s does not accept privileged commands\n",
4553                         zfcp_get_busid_by_adapter(adapter));
4554                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4555                 retval = -EACCES;
4556                 break;
4557
4558         case FSF_CFDC_ERROR_DETECTED:
4559                 ZFCP_LOG_NORMAL(
4560                         "Error at position %d in the CFDC, "
4561                         "CFDC is discarded by the adapter %s\n",
4562                         header->fsf_status_qual.word[0],
4563                         zfcp_get_busid_by_adapter(adapter));
4564                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4565                 retval = -EPERM;
4566                 break;
4567
4568         case FSF_CONTROL_FILE_UPDATE_ERROR:
4569                 ZFCP_LOG_NORMAL(
4570                         "Adapter %s cannot harden the control file, "
4571                         "file is discarded\n",
4572                         zfcp_get_busid_by_adapter(adapter));
4573                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4574                 retval = -EIO;
4575                 break;
4576
4577         case FSF_CONTROL_FILE_TOO_LARGE:
4578                 ZFCP_LOG_NORMAL(
4579                         "Control file is too large, file is discarded "
4580                         "by the adapter %s\n",
4581                         zfcp_get_busid_by_adapter(adapter));
4582                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4583                 retval = -EIO;
4584                 break;
4585
4586         case FSF_ACCESS_CONFLICT_DETECTED:
4587                 if (bottom->operation_subtype == FSF_CFDC_OPERATION_SUBTYPE)
4588                         ZFCP_LOG_NORMAL(
4589                                 "CFDC has been discarded by the adapter %s, "
4590                                 "because activation would impact "
4591                                 "%d active connection(s)\n",
4592                                 zfcp_get_busid_by_adapter(adapter),
4593                                 header->fsf_status_qual.word[0]);
4594                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4595                 retval = -EIO;
4596                 break;
4597
4598         case FSF_CONFLICTS_OVERRULED:
4599                 if (bottom->operation_subtype == FSF_CFDC_OPERATION_SUBTYPE)
4600                         ZFCP_LOG_NORMAL(
4601                                 "CFDC has been activated on the adapter %s, "
4602                                 "but activation has impacted "
4603                                 "%d active connection(s)\n",
4604                                 zfcp_get_busid_by_adapter(adapter),
4605                                 header->fsf_status_qual.word[0]);
4606                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4607                 retval = -EIO;
4608                 break;
4609
4610         case FSF_UNKNOWN_OP_SUBTYPE:
4611                 ZFCP_LOG_NORMAL("unknown operation subtype (adapter: %s, "
4612                                 "op_subtype=0x%x)\n",
4613                                 zfcp_get_busid_by_adapter(adapter),
4614                                 bottom->operation_subtype);
4615                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4616                 retval = -EINVAL;
4617                 break;
4618
4619         case FSF_INVALID_COMMAND_OPTION:
4620                 ZFCP_LOG_NORMAL(
4621                         "Invalid option 0x%x has been specified "
4622                         "in QTCB bottom sent to the adapter %s\n",
4623                         bottom->option,
4624                         zfcp_get_busid_by_adapter(adapter));
4625                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4626                 retval = -EINVAL;
4627                 break;
4628
4629         default:
4630                 ZFCP_LOG_NORMAL(
4631                         "bug: An unknown/unexpected FSF status 0x%08x "
4632                         "was presented on the adapter %s\n",
4633                         header->fsf_status,
4634                         zfcp_get_busid_by_adapter(adapter));
4635                 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_sq_inval");
4636                 debug_exception(fsf_req->adapter->erp_dbf, 0,
4637                         &header->fsf_status_qual.word[0], sizeof(u32));
4638                 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4639                 retval = -EINVAL;
4640                 break;
4641         }
4642
4643 skip_fsfstatus:
4644         return retval;
4645 }
4646
4647 static inline int
4648 zfcp_fsf_req_sbal_check(unsigned long *flags,
4649                         struct zfcp_qdio_queue *queue, int needed)
4650 {
4651         write_lock_irqsave(&queue->queue_lock, *flags);
4652         if (likely(atomic_read(&queue->free_count) >= needed))
4653                 return 1;
4654         write_unlock_irqrestore(&queue->queue_lock, *flags);
4655         return 0;
4656 }
4657
4658 /*
4659  * set qtcb pointer in fsf_req and initialize QTCB
4660  */
4661 static void
4662 zfcp_fsf_req_qtcb_init(struct zfcp_fsf_req *fsf_req)
4663 {
4664         if (likely(fsf_req->qtcb != NULL)) {
4665                 fsf_req->qtcb->prefix.req_seq_no =
4666                         fsf_req->adapter->fsf_req_seq_no;
4667                 fsf_req->qtcb->prefix.req_id = fsf_req->req_id;
4668                 fsf_req->qtcb->prefix.ulp_info = ZFCP_ULP_INFO_VERSION;
4669                 fsf_req->qtcb->prefix.qtcb_type =
4670                         fsf_qtcb_type[fsf_req->fsf_command];
4671                 fsf_req->qtcb->prefix.qtcb_version = ZFCP_QTCB_VERSION;
4672                 fsf_req->qtcb->header.req_handle = fsf_req->req_id;
4673                 fsf_req->qtcb->header.fsf_command = fsf_req->fsf_command;
4674         }
4675 }
4676
4677 /**
4678  * zfcp_fsf_req_sbal_get - try to get one SBAL in the request queue
4679  * @adapter: adapter for which request queue is examined
4680  * @req_flags: flags indicating whether to wait for needed SBAL or not
4681  * @lock_flags: lock_flags if queue_lock is taken
4682  * Return: 0 on success, otherwise -EIO, or -ERESTARTSYS
4683  * Locks: lock adapter->request_queue->queue_lock on success
4684  */
4685 static int
4686 zfcp_fsf_req_sbal_get(struct zfcp_adapter *adapter, int req_flags,
4687                       unsigned long *lock_flags)
4688 {
4689         long ret;
4690         struct zfcp_qdio_queue *req_queue = &adapter->request_queue;
4691
4692         if (unlikely(req_flags & ZFCP_WAIT_FOR_SBAL)) {
4693                 ret = wait_event_interruptible_timeout(adapter->request_wq,
4694                         zfcp_fsf_req_sbal_check(lock_flags, req_queue, 1),
4695                                                        ZFCP_SBAL_TIMEOUT);
4696                 if (ret < 0)
4697                         return ret;
4698                 if (!ret)
4699                         return -EIO;
4700         } else if (!zfcp_fsf_req_sbal_check(lock_flags, req_queue, 1))
4701                 return -EIO;
4702
4703         return 0;
4704 }
4705
4706 /*
4707  * function:    zfcp_fsf_req_create
4708  *
4709  * purpose:     create an FSF request at the specified adapter and
4710  *              setup common fields
4711  *
4712  * returns:     -ENOMEM if there was insufficient memory for a request
4713  *              -EIO if no qdio buffers could be allocate to the request
4714  *              -EINVAL/-EPERM on bug conditions in req_dequeue
4715  *              0 in success
4716  *
4717  * note:        The created request is returned by reference.
4718  *
4719  * locks:       lock of concerned request queue must not be held,
4720  *              but is held on completion (write, irqsave)
4721  */
4722 int
4723 zfcp_fsf_req_create(struct zfcp_adapter *adapter, u32 fsf_cmd, int req_flags,
4724                     mempool_t *pool, unsigned long *lock_flags,
4725                     struct zfcp_fsf_req **fsf_req_p)
4726 {
4727         volatile struct qdio_buffer_element *sbale;
4728         struct zfcp_fsf_req *fsf_req = NULL;
4729         int ret = 0;
4730         struct zfcp_qdio_queue *req_queue = &adapter->request_queue;
4731
4732         /* allocate new FSF request */
4733         fsf_req = zfcp_fsf_req_alloc(pool, req_flags);
4734         if (unlikely(NULL == fsf_req)) {
4735                 ZFCP_LOG_DEBUG("error: Could not put an FSF request into "
4736                                "the outbound (send) queue.\n");
4737                 ret = -ENOMEM;
4738                 goto failed_fsf_req;
4739         }
4740
4741         fsf_req->adapter = adapter;
4742         fsf_req->fsf_command = fsf_cmd;
4743         INIT_LIST_HEAD(&fsf_req->list);
4744         init_timer(&fsf_req->timer);
4745
4746         /* initialize waitqueue which may be used to wait on
4747            this request completion */
4748         init_waitqueue_head(&fsf_req->completion_wq);
4749
4750         ret = zfcp_fsf_req_sbal_get(adapter, req_flags, lock_flags);
4751         if (ret < 0)
4752                 goto failed_sbals;
4753
4754         /* this is serialized (we are holding req_queue-lock of adapter) */
4755         if (adapter->req_no == 0)
4756                 adapter->req_no++;
4757         fsf_req->req_id = adapter->req_no++;
4758
4759         zfcp_fsf_req_qtcb_init(fsf_req);
4760
4761         /*
4762          * We hold queue_lock here. Check if QDIOUP is set and let request fail
4763          * if it is not set (see also *_open_qdio and *_close_qdio).
4764          */
4765
4766         if (!atomic_test_mask(ZFCP_STATUS_ADAPTER_QDIOUP, &adapter->status)) {
4767                 write_unlock_irqrestore(&req_queue->queue_lock, *lock_flags);
4768                 ret = -EIO;
4769                 goto failed_sbals;
4770         }
4771
4772         if (fsf_req->qtcb) {
4773                 fsf_req->seq_no = adapter->fsf_req_seq_no;
4774                 fsf_req->qtcb->prefix.req_seq_no = adapter->fsf_req_seq_no;
4775         }
4776         fsf_req->sbal_number = 1;
4777         fsf_req->sbal_first = req_queue->free_index;
4778         fsf_req->sbal_curr = req_queue->free_index;
4779         fsf_req->sbale_curr = 1;
4780
4781         if (likely(req_flags & ZFCP_REQ_AUTO_CLEANUP)) {
4782                 fsf_req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
4783         }
4784
4785         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
4786
4787         /* setup common SBALE fields */
4788         sbale[0].addr = (void *) fsf_req->req_id;
4789         sbale[0].flags |= SBAL_FLAGS0_COMMAND;
4790         if (likely(fsf_req->qtcb != NULL)) {
4791                 sbale[1].addr = (void *) fsf_req->qtcb;
4792                 sbale[1].length = sizeof(struct fsf_qtcb);
4793         }
4794
4795         ZFCP_LOG_TRACE("got %i free BUFFERs starting at index %i\n",
4796                        fsf_req->sbal_number, fsf_req->sbal_first);
4797
4798         goto success;
4799
4800  failed_sbals:
4801 /* dequeue new FSF request previously enqueued */
4802         zfcp_fsf_req_free(fsf_req);
4803         fsf_req = NULL;
4804
4805  failed_fsf_req:
4806         write_lock_irqsave(&req_queue->queue_lock, *lock_flags);
4807  success:
4808         *fsf_req_p = fsf_req;
4809         return ret;
4810 }
4811
4812 /*
4813  * function:    zfcp_fsf_req_send
4814  *
4815  * purpose:     start transfer of FSF request via QDIO
4816  *
4817  * returns:     0 - request transfer succesfully started
4818  *              !0 - start of request transfer failed
4819  */
4820 static int zfcp_fsf_req_send(struct zfcp_fsf_req *fsf_req)
4821 {
4822         struct zfcp_adapter *adapter;
4823         struct zfcp_qdio_queue *req_queue;
4824         volatile struct qdio_buffer_element *sbale;
4825         int inc_seq_no;
4826         int new_distance_from_int;
4827         u64 dbg_tmp[2];
4828         int retval = 0;
4829
4830         adapter = fsf_req->adapter;
4831         req_queue = &adapter->request_queue,
4832
4833
4834         /* FIXME(debug): remove it later */
4835         sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_first, 0);
4836         ZFCP_LOG_DEBUG("SBALE0 flags=0x%x\n", sbale[0].flags);
4837         ZFCP_LOG_TRACE("HEX DUMP OF SBALE1 PAYLOAD:\n");
4838         ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE, (char *) sbale[1].addr,
4839                       sbale[1].length);
4840
4841         /* put allocated FSF request into hash table */
4842         spin_lock(&adapter->req_list_lock);
4843         zfcp_reqlist_add(adapter, fsf_req);
4844         spin_unlock(&adapter->req_list_lock);
4845
4846         inc_seq_no = (fsf_req->qtcb != NULL);
4847
4848         ZFCP_LOG_TRACE("request queue of adapter %s: "
4849                        "next free SBAL is %i, %i free SBALs\n",
4850                        zfcp_get_busid_by_adapter(adapter),
4851                        req_queue->free_index,
4852                        atomic_read(&req_queue->free_count));
4853
4854         ZFCP_LOG_DEBUG("calling do_QDIO adapter %s, flags=0x%x, queue_no=%i, "
4855                        "index_in_queue=%i, count=%i, buffers=%p\n",
4856                        zfcp_get_busid_by_adapter(adapter),
4857                        QDIO_FLAG_SYNC_OUTPUT,
4858                        0, fsf_req->sbal_first, fsf_req->sbal_number,
4859                        &req_queue->buffer[fsf_req->sbal_first]);
4860
4861         /*
4862          * adjust the number of free SBALs in request queue as well as
4863          * position of first one
4864          */
4865         atomic_sub(fsf_req->sbal_number, &req_queue->free_count);
4866         ZFCP_LOG_TRACE("free_count=%d\n", atomic_read(&req_queue->free_count));
4867         req_queue->free_index += fsf_req->sbal_number;    /* increase */
4868         req_queue->free_index %= QDIO_MAX_BUFFERS_PER_Q;  /* wrap if needed */
4869         new_distance_from_int = zfcp_qdio_determine_pci(req_queue, fsf_req);
4870
4871         fsf_req->issued = get_clock();
4872
4873         retval = do_QDIO(adapter->ccw_device,
4874                          QDIO_FLAG_SYNC_OUTPUT,
4875                          0, fsf_req->sbal_first, fsf_req->sbal_number, NULL);
4876
4877         dbg_tmp[0] = (unsigned long) sbale[0].addr;
4878         dbg_tmp[1] = (u64) retval;
4879         debug_event(adapter->erp_dbf, 4, (void *) dbg_tmp, 16);
4880
4881         if (unlikely(retval)) {
4882                 /* Queues are down..... */
4883                 retval = -EIO;
4884                 del_timer(&fsf_req->timer);
4885                 spin_lock(&adapter->req_list_lock);
4886                 zfcp_reqlist_remove(adapter, fsf_req);
4887                 spin_unlock(&adapter->req_list_lock);
4888                 /* undo changes in request queue made for this request */
4889                 zfcp_qdio_zero_sbals(req_queue->buffer,
4890                                      fsf_req->sbal_first, fsf_req->sbal_number);
4891                 atomic_add(fsf_req->sbal_number, &req_queue->free_count);
4892                 req_queue->free_index -= fsf_req->sbal_number;
4893                 req_queue->free_index += QDIO_MAX_BUFFERS_PER_Q;
4894                 req_queue->free_index %= QDIO_MAX_BUFFERS_PER_Q; /* wrap */
4895                 zfcp_erp_adapter_reopen(adapter, 0);
4896         } else {
4897                 req_queue->distance_from_int = new_distance_from_int;
4898                 /*
4899                  * increase FSF sequence counter -
4900                  * this must only be done for request successfully enqueued to
4901                  * QDIO this rejected requests may be cleaned up by calling
4902                  * routines  resulting in missing sequence counter values
4903                  * otherwise,
4904                  */
4905
4906                 /* Don't increase for unsolicited status */
4907                 if (inc_seq_no)
4908                         adapter->fsf_req_seq_no++;
4909
4910                 /* count FSF requests pending */
4911                 atomic_inc(&adapter->reqs_active);
4912         }
4913         return retval;
4914 }
4915
4916 #undef ZFCP_LOG_AREA