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