drivers/s390/scsi/zfcp_dbf.c

   1 /*
   2  * zfcp device driver
   3  *
   4  * Debug traces for zfcp.
   5  *
   6  * Copyright IBM Corporation 2002, 2009
   7  */
   8
   9 #define KMSG_COMPONENT "zfcp"
  10 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
  11
  12 #include <linux/ctype.h>
  13 #include <linux/slab.h>
  14 #include <asm/debug.h>
  15 #include "zfcp_dbf.h"
  16 #include "zfcp_ext.h"
  17 #include "zfcp_fc.h"
  18
  19 static u32 dbfsize = 4;
  20
  21 module_param(dbfsize, uint, 0400);
  22 MODULE_PARM_DESC(dbfsize,
  23                  "number of pages for each debug feature area (default 4)");
  24
  25 static void zfcp_dbf_hexdump(debug_info_t *dbf, void *to, int to_len,
  26                              int level, char *from, int from_len)
  27 {
  28         int offset;
  29         struct zfcp_dbf_dump *dump = to;
  30         int room = to_len - sizeof(*dump);
  31
  32         for (offset = 0; offset < from_len; offset += dump->size) {
  33                 memset(to, 0, to_len);
  34                 strncpy(dump->tag, "dump", ZFCP_DBF_TAG_SIZE);
  35                 dump->total_size = from_len;
  36                 dump->offset = offset;
  37                 dump->size = min(from_len - offset, room);
  38                 memcpy(dump->data, from + offset, dump->size);
  39                 debug_event(dbf, level, dump, dump->size + sizeof(*dump));
  40         }
  41 }
  42
  43 static void zfcp_dbf_tag(char **p, const char *label, const char *tag)
  44 {
  45         int i;
  46
  47         *p += sprintf(*p, "%-24s", label);
  48         for (i = 0; i < ZFCP_DBF_TAG_SIZE; i++)
  49                 *p += sprintf(*p, "%c", tag[i]);
  50         *p += sprintf(*p, "\n");
  51 }
  52
  53 static void zfcp_dbf_outs(char **buf, const char *s1, const char *s2)
  54 {
  55         *buf += sprintf(*buf, "%-24s%s\n", s1, s2);
  56 }
  57
  58 static void zfcp_dbf_out(char **buf, const char *s, const char *format, ...)
  59 {
  60         va_list arg;
  61
  62         *buf += sprintf(*buf, "%-24s", s);
  63         va_start(arg, format);
  64         *buf += vsprintf(*buf, format, arg);
  65         va_end(arg);
  66         *buf += sprintf(*buf, "\n");
  67 }
  68
  69 static void zfcp_dbf_outd(char **p, const char *label, char *buffer,
  70                           int buflen, int offset, int total_size)
  71 {
  72         if (!offset)
  73                 *p += sprintf(*p, "%-24s  ", label);
  74         while (buflen--) {
  75                 if (offset > 0) {
  76                         if ((offset % 32) == 0)
  77                                 *p += sprintf(*p, "\n%-24c  ", ' ');
  78                         else if ((offset % 4) == 0)
  79                                 *p += sprintf(*p, " ");
  80                 }
  81                 *p += sprintf(*p, "%02x", *buffer++);
  82                 if (++offset == total_size) {
  83                         *p += sprintf(*p, "\n");
  84                         break;
  85                 }
  86         }
  87         if (!total_size)
  88                 *p += sprintf(*p, "\n");
  89 }
  90
  91 static int zfcp_dbf_view_header(debug_info_t *id, struct debug_view *view,
  92                                 int area, debug_entry_t *entry, char *out_buf)
  93 {
  94         struct zfcp_dbf_dump *dump = (struct zfcp_dbf_dump *)DEBUG_DATA(entry);
  95         struct timespec t;
  96         char *p = out_buf;
  97
  98         if (strncmp(dump->tag, "dump", ZFCP_DBF_TAG_SIZE) != 0) {
  99                 stck_to_timespec(entry->id.stck, &t);
 100                 zfcp_dbf_out(&p, "timestamp", "%011lu:%06lu",
 101                              t.tv_sec, t.tv_nsec);
 102                 zfcp_dbf_out(&p, "cpu", "%02i", entry->id.fields.cpuid);
 103         } else  {
 104                 zfcp_dbf_outd(&p, "", dump->data, dump->size, dump->offset,
 105                               dump->total_size);
 106                 if ((dump->offset + dump->size) == dump->total_size)
 107                         p += sprintf(p, "\n");
 108         }
 109         return p - out_buf;
 110 }
 111
 112 void _zfcp_dbf_hba_fsf_response(const char *tag2, int level,
 113                                 struct zfcp_fsf_req *fsf_req,
 114                                 struct zfcp_dbf *dbf)
 115 {
 116         struct fsf_qtcb *qtcb = fsf_req->qtcb;
 117         union fsf_prot_status_qual *prot_status_qual =
 118                                         &qtcb->prefix.prot_status_qual;
 119         union fsf_status_qual *fsf_status_qual = &qtcb->header.fsf_status_qual;
 120         struct scsi_cmnd *scsi_cmnd;
 121         struct zfcp_port *port;
 122         struct zfcp_unit *unit;
 123         struct zfcp_send_els *send_els;
 124         struct zfcp_dbf_hba_record *rec = &dbf->hba_buf;
 125         struct zfcp_dbf_hba_record_response *response = &rec->u.response;
 126         unsigned long flags;
 127
 128         spin_lock_irqsave(&dbf->hba_lock, flags);
 129         memset(rec, 0, sizeof(*rec));
 130         strncpy(rec->tag, "resp", ZFCP_DBF_TAG_SIZE);
 131         strncpy(rec->tag2, tag2, ZFCP_DBF_TAG_SIZE);
 132
 133         response->fsf_command = fsf_req->fsf_command;
 134         response->fsf_reqid = fsf_req->req_id;
 135         response->fsf_seqno = fsf_req->seq_no;
 136         response->fsf_issued = fsf_req->issued;
 137         response->fsf_prot_status = qtcb->prefix.prot_status;
 138         response->fsf_status = qtcb->header.fsf_status;
 139         memcpy(response->fsf_prot_status_qual,
 140                prot_status_qual, FSF_PROT_STATUS_QUAL_SIZE);
 141         memcpy(response->fsf_status_qual,
 142                fsf_status_qual, FSF_STATUS_QUALIFIER_SIZE);
 143         response->fsf_req_status = fsf_req->status;
 144         response->sbal_first = fsf_req->qdio_req.sbal_first;
 145         response->sbal_last = fsf_req->qdio_req.sbal_last;
 146         response->sbal_response = fsf_req->qdio_req.sbal_response;
 147         response->pool = fsf_req->pool != NULL;
 148         response->erp_action = (unsigned long)fsf_req->erp_action;
 149
 150         switch (fsf_req->fsf_command) {
 151         case FSF_QTCB_FCP_CMND:
 152                 if (fsf_req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT)
 153                         break;
 154                 scsi_cmnd = (struct scsi_cmnd *)fsf_req->data;
 155                 if (scsi_cmnd) {
 156                         response->u.fcp.cmnd = (unsigned long)scsi_cmnd;
 157                         response->u.fcp.serial = scsi_cmnd->serial_number;
 158                 }
 159                 break;
 160
 161         case FSF_QTCB_OPEN_PORT_WITH_DID:
 162         case FSF_QTCB_CLOSE_PORT:
 163         case FSF_QTCB_CLOSE_PHYSICAL_PORT:
 164                 port = (struct zfcp_port *)fsf_req->data;
 165                 response->u.port.wwpn = port->wwpn;
 166                 response->u.port.d_id = port->d_id;
 167                 response->u.port.port_handle = qtcb->header.port_handle;
 168                 break;
 169
 170         case FSF_QTCB_OPEN_LUN:
 171         case FSF_QTCB_CLOSE_LUN:
 172                 unit = (struct zfcp_unit *)fsf_req->data;
 173                 port = unit->port;
 174                 response->u.unit.wwpn = port->wwpn;
 175                 response->u.unit.fcp_lun = unit->fcp_lun;
 176                 response->u.unit.port_handle = qtcb->header.port_handle;
 177                 response->u.unit.lun_handle = qtcb->header.lun_handle;
 178                 break;
 179
 180         case FSF_QTCB_SEND_ELS:
 181                 send_els = (struct zfcp_send_els *)fsf_req->data;
 182                 response->u.els.d_id = ntoh24(qtcb->bottom.support.d_id);
 183                 break;
 184
 185         case FSF_QTCB_ABORT_FCP_CMND:
 186         case FSF_QTCB_SEND_GENERIC:
 187         case FSF_QTCB_EXCHANGE_CONFIG_DATA:
 188         case FSF_QTCB_EXCHANGE_PORT_DATA:
 189         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
 190         case FSF_QTCB_UPLOAD_CONTROL_FILE:
 191                 break;
 192         }
 193
 194         debug_event(dbf->hba, level, rec, sizeof(*rec));
 195
 196         /* have fcp channel microcode fixed to use as little as possible */
 197         if (fsf_req->fsf_command != FSF_QTCB_FCP_CMND) {
 198                 /* adjust length skipping trailing zeros */
 199                 char *buf = (char *)qtcb + qtcb->header.log_start;
 200                 int len = qtcb->header.log_length;
 201                 for (; len && !buf[len - 1]; len--);
 202                 zfcp_dbf_hexdump(dbf->hba, rec, sizeof(*rec), level, buf,
 203                                  len);
 204         }
 205
 206         spin_unlock_irqrestore(&dbf->hba_lock, flags);
 207 }
 208
 209 void _zfcp_dbf_hba_fsf_unsol(const char *tag, int level, struct zfcp_dbf *dbf,
 210                              struct fsf_status_read_buffer *status_buffer)
 211 {
 212         struct zfcp_dbf_hba_record *rec = &dbf->hba_buf;
 213         unsigned long flags;
 214
 215         spin_lock_irqsave(&dbf->hba_lock, flags);
 216         memset(rec, 0, sizeof(*rec));
 217         strncpy(rec->tag, "stat", ZFCP_DBF_TAG_SIZE);
 218         strncpy(rec->tag2, tag, ZFCP_DBF_TAG_SIZE);
 219
 220         rec->u.status.failed = atomic_read(&dbf->adapter->stat_miss);
 221         if (status_buffer != NULL) {
 222                 rec->u.status.status_type = status_buffer->status_type;
 223                 rec->u.status.status_subtype = status_buffer->status_subtype;
 224                 memcpy(&rec->u.status.queue_designator,
 225                        &status_buffer->queue_designator,
 226                        sizeof(struct fsf_queue_designator));
 227
 228                 switch (status_buffer->status_type) {
 229                 case FSF_STATUS_READ_SENSE_DATA_AVAIL:
 230                         rec->u.status.payload_size =
 231                             ZFCP_DBF_UNSOL_PAYLOAD_SENSE_DATA_AVAIL;
 232                         break;
 233
 234                 case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
 235                         rec->u.status.payload_size =
 236                             ZFCP_DBF_UNSOL_PAYLOAD_BIT_ERROR_THRESHOLD;
 237                         break;
 238
 239                 case FSF_STATUS_READ_LINK_DOWN:
 240                         switch (status_buffer->status_subtype) {
 241                         case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
 242                         case FSF_STATUS_READ_SUB_FDISC_FAILED:
 243                                 rec->u.status.payload_size =
 244                                         sizeof(struct fsf_link_down_info);
 245                         }
 246                         break;
 247
 248                 case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
 249                         rec->u.status.payload_size =
 250                             ZFCP_DBF_UNSOL_PAYLOAD_FEATURE_UPDATE_ALERT;
 251                         break;
 252                 }
 253                 memcpy(&rec->u.status.payload,
 254                        &status_buffer->payload, rec->u.status.payload_size);
 255         }
 256
 257         debug_event(dbf->hba, level, rec, sizeof(*rec));
 258         spin_unlock_irqrestore(&dbf->hba_lock, flags);
 259 }
 260
 261 /**
 262  * zfcp_dbf_hba_qdio - trace event for QDIO related failure
 263  * @qdio: qdio structure affected by this QDIO related event
 264  * @qdio_error: as passed by qdio module
 265  * @sbal_index: first buffer with error condition, as passed by qdio module
 266  * @sbal_count: number of buffers affected, as passed by qdio module
 267  */
 268 void zfcp_dbf_hba_qdio(struct zfcp_dbf *dbf, unsigned int qdio_error,
 269                        int sbal_index, int sbal_count)
 270 {
 271         struct zfcp_dbf_hba_record *r = &dbf->hba_buf;
 272         unsigned long flags;
 273
 274         spin_lock_irqsave(&dbf->hba_lock, flags);
 275         memset(r, 0, sizeof(*r));
 276         strncpy(r->tag, "qdio", ZFCP_DBF_TAG_SIZE);
 277         r->u.qdio.qdio_error = qdio_error;
 278         r->u.qdio.sbal_index = sbal_index;
 279         r->u.qdio.sbal_count = sbal_count;
 280         debug_event(dbf->hba, 0, r, sizeof(*r));
 281         spin_unlock_irqrestore(&dbf->hba_lock, flags);
 282 }
 283
 284 /**
 285  * zfcp_dbf_hba_berr - trace event for bit error threshold
 286  * @dbf: dbf structure affected by this QDIO related event
 287  * @req: fsf request
 288  */
 289 void zfcp_dbf_hba_berr(struct zfcp_dbf *dbf, struct zfcp_fsf_req *req)
 290 {
 291         struct zfcp_dbf_hba_record *r = &dbf->hba_buf;
 292         struct fsf_status_read_buffer *sr_buf = req->data;
 293         struct fsf_bit_error_payload *err = &sr_buf->payload.bit_error;
 294         unsigned long flags;
 295
 296         spin_lock_irqsave(&dbf->hba_lock, flags);
 297         memset(r, 0, sizeof(*r));
 298         strncpy(r->tag, "berr", ZFCP_DBF_TAG_SIZE);
 299         memcpy(&r->u.berr, err, sizeof(struct fsf_bit_error_payload));
 300         debug_event(dbf->hba, 0, r, sizeof(*r));
 301         spin_unlock_irqrestore(&dbf->hba_lock, flags);
 302 }
 303 static void zfcp_dbf_hba_view_response(char **p,
 304                                        struct zfcp_dbf_hba_record_response *r)
 305 {
 306         struct timespec t;
 307
 308         zfcp_dbf_out(p, "fsf_command", "0x%08x", r->fsf_command);
 309         zfcp_dbf_out(p, "fsf_reqid", "0x%0Lx", r->fsf_reqid);
 310         zfcp_dbf_out(p, "fsf_seqno", "0x%08x", r->fsf_seqno);
 311         stck_to_timespec(r->fsf_issued, &t);
 312         zfcp_dbf_out(p, "fsf_issued", "%011lu:%06lu", t.tv_sec, t.tv_nsec);
 313         zfcp_dbf_out(p, "fsf_prot_status", "0x%08x", r->fsf_prot_status);
 314         zfcp_dbf_out(p, "fsf_status", "0x%08x", r->fsf_status);
 315         zfcp_dbf_outd(p, "fsf_prot_status_qual", r->fsf_prot_status_qual,
 316                       FSF_PROT_STATUS_QUAL_SIZE, 0, FSF_PROT_STATUS_QUAL_SIZE);
 317         zfcp_dbf_outd(p, "fsf_status_qual", r->fsf_status_qual,
 318                       FSF_STATUS_QUALIFIER_SIZE, 0, FSF_STATUS_QUALIFIER_SIZE);
 319         zfcp_dbf_out(p, "fsf_req_status", "0x%08x", r->fsf_req_status);
 320         zfcp_dbf_out(p, "sbal_first", "0x%02x", r->sbal_first);
 321         zfcp_dbf_out(p, "sbal_last", "0x%02x", r->sbal_last);
 322         zfcp_dbf_out(p, "sbal_response", "0x%02x", r->sbal_response);
 323         zfcp_dbf_out(p, "pool", "0x%02x", r->pool);
 324
 325         switch (r->fsf_command) {
 326         case FSF_QTCB_FCP_CMND:
 327                 if (r->fsf_req_status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT)
 328                         break;
 329                 zfcp_dbf_out(p, "scsi_cmnd", "0x%0Lx", r->u.fcp.cmnd);
 330                 zfcp_dbf_out(p, "scsi_serial", "0x%016Lx", r->u.fcp.serial);
 331                 *p += sprintf(*p, "\n");
 332                 break;
 333
 334         case FSF_QTCB_OPEN_PORT_WITH_DID:
 335         case FSF_QTCB_CLOSE_PORT:
 336         case FSF_QTCB_CLOSE_PHYSICAL_PORT:
 337                 zfcp_dbf_out(p, "wwpn", "0x%016Lx", r->u.port.wwpn);
 338                 zfcp_dbf_out(p, "d_id", "0x%06x", r->u.port.d_id);
 339                 zfcp_dbf_out(p, "port_handle", "0x%08x", r->u.port.port_handle);
 340                 break;
 341
 342         case FSF_QTCB_OPEN_LUN:
 343         case FSF_QTCB_CLOSE_LUN:
 344                 zfcp_dbf_out(p, "wwpn", "0x%016Lx", r->u.unit.wwpn);
 345                 zfcp_dbf_out(p, "fcp_lun", "0x%016Lx", r->u.unit.fcp_lun);
 346                 zfcp_dbf_out(p, "port_handle", "0x%08x", r->u.unit.port_handle);
 347                 zfcp_dbf_out(p, "lun_handle", "0x%08x", r->u.unit.lun_handle);
 348                 break;
 349
 350         case FSF_QTCB_SEND_ELS:
 351                 zfcp_dbf_out(p, "d_id", "0x%06x", r->u.els.d_id);
 352                 break;
 353
 354         case FSF_QTCB_ABORT_FCP_CMND:
 355         case FSF_QTCB_SEND_GENERIC:
 356         case FSF_QTCB_EXCHANGE_CONFIG_DATA:
 357         case FSF_QTCB_EXCHANGE_PORT_DATA:
 358         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
 359         case FSF_QTCB_UPLOAD_CONTROL_FILE:
 360                 break;
 361         }
 362 }
 363
 364 static void zfcp_dbf_hba_view_status(char **p,
 365                                      struct zfcp_dbf_hba_record_status *r)
 366 {
 367         zfcp_dbf_out(p, "failed", "0x%02x", r->failed);
 368         zfcp_dbf_out(p, "status_type", "0x%08x", r->status_type);
 369         zfcp_dbf_out(p, "status_subtype", "0x%08x", r->status_subtype);
 370         zfcp_dbf_outd(p, "queue_designator", (char *)&r->queue_designator,
 371                       sizeof(struct fsf_queue_designator), 0,
 372                       sizeof(struct fsf_queue_designator));
 373         zfcp_dbf_outd(p, "payload", (char *)&r->payload, r->payload_size, 0,
 374                       r->payload_size);
 375 }
 376
 377 static void zfcp_dbf_hba_view_qdio(char **p, struct zfcp_dbf_hba_record_qdio *r)
 378 {
 379         zfcp_dbf_out(p, "qdio_error", "0x%08x", r->qdio_error);
 380         zfcp_dbf_out(p, "sbal_index", "0x%02x", r->sbal_index);
 381         zfcp_dbf_out(p, "sbal_count", "0x%02x", r->sbal_count);
 382 }
 383
 384 static void zfcp_dbf_hba_view_berr(char **p, struct fsf_bit_error_payload *r)
 385 {
 386         zfcp_dbf_out(p, "link_failures", "%d", r->link_failure_error_count);
 387         zfcp_dbf_out(p, "loss_of_sync_err", "%d", r->loss_of_sync_error_count);
 388         zfcp_dbf_out(p, "loss_of_sig_err", "%d", r->loss_of_signal_error_count);
 389         zfcp_dbf_out(p, "prim_seq_err", "%d",
 390                      r->primitive_sequence_error_count);
 391         zfcp_dbf_out(p, "inval_trans_word_err", "%d",
 392                      r->invalid_transmission_word_error_count);
 393         zfcp_dbf_out(p, "CRC_errors", "%d", r->crc_error_count);
 394         zfcp_dbf_out(p, "prim_seq_event_to", "%d",
 395                      r->primitive_sequence_event_timeout_count);
 396         zfcp_dbf_out(p, "elast_buf_overrun_err", "%d",
 397                      r->elastic_buffer_overrun_error_count);
 398         zfcp_dbf_out(p, "adv_rec_buf2buf_cred", "%d",
 399                      r->advertised_receive_b2b_credit);
 400         zfcp_dbf_out(p, "curr_rec_buf2buf_cred", "%d",
 401                      r->current_receive_b2b_credit);
 402         zfcp_dbf_out(p, "adv_trans_buf2buf_cred", "%d",
 403                      r->advertised_transmit_b2b_credit);
 404         zfcp_dbf_out(p, "curr_trans_buf2buf_cred", "%d",
 405                      r->current_transmit_b2b_credit);
 406 }
 407
 408 static int zfcp_dbf_hba_view_format(debug_info_t *id, struct debug_view *view,
 409                                     char *out_buf, const char *in_buf)
 410 {
 411         struct zfcp_dbf_hba_record *r = (struct zfcp_dbf_hba_record *)in_buf;
 412         char *p = out_buf;
 413
 414         if (strncmp(r->tag, "dump", ZFCP_DBF_TAG_SIZE) == 0)
 415                 return 0;
 416
 417         zfcp_dbf_tag(&p, "tag", r->tag);
 418         if (isalpha(r->tag2[0]))
 419                 zfcp_dbf_tag(&p, "tag2", r->tag2);
 420
 421         if (strncmp(r->tag, "resp", ZFCP_DBF_TAG_SIZE) == 0)
 422                 zfcp_dbf_hba_view_response(&p, &r->u.response);
 423         else if (strncmp(r->tag, "stat", ZFCP_DBF_TAG_SIZE) == 0)
 424                 zfcp_dbf_hba_view_status(&p, &r->u.status);
 425         else if (strncmp(r->tag, "qdio", ZFCP_DBF_TAG_SIZE) == 0)
 426                 zfcp_dbf_hba_view_qdio(&p, &r->u.qdio);
 427         else if (strncmp(r->tag, "berr", ZFCP_DBF_TAG_SIZE) == 0)
 428                 zfcp_dbf_hba_view_berr(&p, &r->u.berr);
 429
 430         if (strncmp(r->tag, "resp", ZFCP_DBF_TAG_SIZE) != 0)
 431                 p += sprintf(p, "\n");
 432         return p - out_buf;
 433 }
 434
 435 static struct debug_view zfcp_dbf_hba_view = {
 436         .name = "structured",
 437         .header_proc = zfcp_dbf_view_header,
 438         .format_proc = zfcp_dbf_hba_view_format,
 439 };
 440
 441 static const char *zfcp_dbf_rec_tags[] = {
 442         [ZFCP_REC_DBF_ID_THREAD] = "thread",
 443         [ZFCP_REC_DBF_ID_TARGET] = "target",
 444         [ZFCP_REC_DBF_ID_TRIGGER] = "trigger",
 445         [ZFCP_REC_DBF_ID_ACTION] = "action",
 446 };
 447
 448 static int zfcp_dbf_rec_view_format(debug_info_t *id, struct debug_view *view,
 449                                     char *buf, const char *_rec)
 450 {
 451         struct zfcp_dbf_rec_record *r = (struct zfcp_dbf_rec_record *)_rec;
 452         char *p = buf;
 453         char hint[ZFCP_DBF_ID_SIZE + 1];
 454
 455         memcpy(hint, r->id2, ZFCP_DBF_ID_SIZE);
 456         hint[ZFCP_DBF_ID_SIZE] = 0;
 457         zfcp_dbf_outs(&p, "tag", zfcp_dbf_rec_tags[r->id]);
 458         zfcp_dbf_outs(&p, "hint", hint);
 459         switch (r->id) {
 460         case ZFCP_REC_DBF_ID_THREAD:
 461                 zfcp_dbf_out(&p, "total", "%d", r->u.thread.total);
 462                 zfcp_dbf_out(&p, "ready", "%d", r->u.thread.ready);
 463                 zfcp_dbf_out(&p, "running", "%d", r->u.thread.running);
 464                 break;
 465         case ZFCP_REC_DBF_ID_TARGET:
 466                 zfcp_dbf_out(&p, "reference", "0x%016Lx", r->u.target.ref);
 467                 zfcp_dbf_out(&p, "status", "0x%08x", r->u.target.status);
 468                 zfcp_dbf_out(&p, "erp_count", "%d", r->u.target.erp_count);
 469                 zfcp_dbf_out(&p, "d_id", "0x%06x", r->u.target.d_id);
 470                 zfcp_dbf_out(&p, "wwpn", "0x%016Lx", r->u.target.wwpn);
 471                 zfcp_dbf_out(&p, "fcp_lun", "0x%016Lx", r->u.target.fcp_lun);
 472                 break;
 473         case ZFCP_REC_DBF_ID_TRIGGER:
 474                 zfcp_dbf_out(&p, "reference", "0x%016Lx", r->u.trigger.ref);
 475                 zfcp_dbf_out(&p, "erp_action", "0x%016Lx", r->u.trigger.action);
 476                 zfcp_dbf_out(&p, "requested", "%d", r->u.trigger.want);
 477                 zfcp_dbf_out(&p, "executed", "%d", r->u.trigger.need);
 478                 zfcp_dbf_out(&p, "wwpn", "0x%016Lx", r->u.trigger.wwpn);
 479                 zfcp_dbf_out(&p, "fcp_lun", "0x%016Lx", r->u.trigger.fcp_lun);
 480                 zfcp_dbf_out(&p, "adapter_status", "0x%08x", r->u.trigger.as);
 481                 zfcp_dbf_out(&p, "port_status", "0x%08x", r->u.trigger.ps);
 482                 zfcp_dbf_out(&p, "unit_status", "0x%08x", r->u.trigger.us);
 483                 break;
 484         case ZFCP_REC_DBF_ID_ACTION:
 485                 zfcp_dbf_out(&p, "erp_action", "0x%016Lx", r->u.action.action);
 486                 zfcp_dbf_out(&p, "fsf_req", "0x%016Lx", r->u.action.fsf_req);
 487                 zfcp_dbf_out(&p, "status", "0x%08Lx", r->u.action.status);
 488                 zfcp_dbf_out(&p, "step", "0x%08Lx", r->u.action.step);
 489                 break;
 490         }
 491         p += sprintf(p, "\n");
 492         return p - buf;
 493 }
 494
 495 static struct debug_view zfcp_dbf_rec_view = {
 496         .name = "structured",
 497         .header_proc = zfcp_dbf_view_header,
 498         .format_proc = zfcp_dbf_rec_view_format,
 499 };
 500
 501 /**
 502  * zfcp_dbf_rec_thread - trace event related to recovery thread operation
 503  * @id2: identifier for event
 504  * @dbf: reference to dbf structure
 505  * This function assumes that the caller is holding erp_lock.
 506  */
 507 void zfcp_dbf_rec_thread(char *id2, struct zfcp_dbf *dbf)
 508 {
 509         struct zfcp_adapter *adapter = dbf->adapter;
 510         struct zfcp_dbf_rec_record *r = &dbf->rec_buf;
 511         unsigned long flags = 0;
 512         struct list_head *entry;
 513         unsigned ready = 0, running = 0, total;
 514
 515         list_for_each(entry, &adapter->erp_ready_head)
 516                 ready++;
 517         list_for_each(entry, &adapter->erp_running_head)
 518                 running++;
 519         total = adapter->erp_total_count;
 520
 521         spin_lock_irqsave(&dbf->rec_lock, flags);
 522         memset(r, 0, sizeof(*r));
 523         r->id = ZFCP_REC_DBF_ID_THREAD;
 524         memcpy(r->id2, id2, ZFCP_DBF_ID_SIZE);
 525         r->u.thread.total = total;
 526         r->u.thread.ready = ready;
 527         r->u.thread.running = running;
 528         debug_event(dbf->rec, 6, r, sizeof(*r));
 529         spin_unlock_irqrestore(&dbf->rec_lock, flags);
 530 }
 531
 532 /**
 533  * zfcp_dbf_rec_thread - trace event related to recovery thread operation
 534  * @id2: identifier for event
 535  * @adapter: adapter
 536  * This function assumes that the caller does not hold erp_lock.
 537  */
 538 void zfcp_dbf_rec_thread_lock(char *id2, struct zfcp_dbf *dbf)
 539 {
 540         struct zfcp_adapter *adapter = dbf->adapter;
 541         unsigned long flags;
 542
 543         read_lock_irqsave(&adapter->erp_lock, flags);
 544         zfcp_dbf_rec_thread(id2, dbf);
 545         read_unlock_irqrestore(&adapter->erp_lock, flags);
 546 }
 547
 548 static void zfcp_dbf_rec_target(char *id2, void *ref, struct zfcp_dbf *dbf,
 549                                 atomic_t *status, atomic_t *erp_count, u64 wwpn,
 550                                 u32 d_id, u64 fcp_lun)
 551 {
 552         struct zfcp_dbf_rec_record *r = &dbf->rec_buf;
 553         unsigned long flags;
 554
 555         spin_lock_irqsave(&dbf->rec_lock, flags);
 556         memset(r, 0, sizeof(*r));
 557         r->id = ZFCP_REC_DBF_ID_TARGET;
 558         memcpy(r->id2, id2, ZFCP_DBF_ID_SIZE);
 559         r->u.target.ref = (unsigned long)ref;
 560         r->u.target.status = atomic_read(status);
 561         r->u.target.wwpn = wwpn;
 562         r->u.target.d_id = d_id;
 563         r->u.target.fcp_lun = fcp_lun;
 564         r->u.target.erp_count = atomic_read(erp_count);
 565         debug_event(dbf->rec, 3, r, sizeof(*r));
 566         spin_unlock_irqrestore(&dbf->rec_lock, flags);
 567 }
 568
 569 /**
 570  * zfcp_dbf_rec_adapter - trace event for adapter state change
 571  * @id: identifier for trigger of state change
 572  * @ref: additional reference (e.g. request)
 573  * @dbf: reference to dbf structure
 574  */
 575 void zfcp_dbf_rec_adapter(char *id, void *ref, struct zfcp_dbf *dbf)
 576 {
 577         struct zfcp_adapter *adapter = dbf->adapter;
 578
 579         zfcp_dbf_rec_target(id, ref, dbf, &adapter->status,
 580                             &adapter->erp_counter, 0, 0,
 581                             ZFCP_DBF_INVALID_LUN);
 582 }
 583
 584 /**
 585  * zfcp_dbf_rec_port - trace event for port state change
 586  * @id: identifier for trigger of state change
 587  * @ref: additional reference (e.g. request)
 588  * @port: port
 589  */
 590 void zfcp_dbf_rec_port(char *id, void *ref, struct zfcp_port *port)
 591 {
 592         struct zfcp_dbf *dbf = port->adapter->dbf;
 593
 594         zfcp_dbf_rec_target(id, ref, dbf, &port->status,
 595                             &port->erp_counter, port->wwpn, port->d_id,
 596                             ZFCP_DBF_INVALID_LUN);
 597 }
 598
 599 /**
 600  * zfcp_dbf_rec_unit - trace event for unit state change
 601  * @id: identifier for trigger of state change
 602  * @ref: additional reference (e.g. request)
 603  * @unit: unit
 604  */
 605 void zfcp_dbf_rec_unit(char *id, void *ref, struct zfcp_unit *unit)
 606 {
 607         struct zfcp_port *port = unit->port;
 608         struct zfcp_dbf *dbf = port->adapter->dbf;
 609
 610         zfcp_dbf_rec_target(id, ref, dbf, &unit->status,
 611                                   &unit->erp_counter, port->wwpn, port->d_id,
 612                                   unit->fcp_lun);
 613 }
 614
 615 /**
 616  * zfcp_dbf_rec_trigger - trace event for triggered error recovery
 617  * @id2: identifier for error recovery trigger
 618  * @ref: additional reference (e.g. request)
 619  * @want: originally requested error recovery action
 620  * @need: error recovery action actually initiated
 621  * @action: address of error recovery action struct
 622  * @adapter: adapter
 623  * @port: port
 624  * @unit: unit
 625  */
 626 void zfcp_dbf_rec_trigger(char *id2, void *ref, u8 want, u8 need, void *action,
 627                           struct zfcp_adapter *adapter, struct zfcp_port *port,
 628                           struct zfcp_unit *unit)
 629 {
 630         struct zfcp_dbf *dbf = adapter->dbf;
 631         struct zfcp_dbf_rec_record *r = &dbf->rec_buf;
 632         unsigned long flags;
 633
 634         spin_lock_irqsave(&dbf->rec_lock, flags);
 635         memset(r, 0, sizeof(*r));
 636         r->id = ZFCP_REC_DBF_ID_TRIGGER;
 637         memcpy(r->id2, id2, ZFCP_DBF_ID_SIZE);
 638         r->u.trigger.ref = (unsigned long)ref;
 639         r->u.trigger.want = want;
 640         r->u.trigger.need = need;
 641         r->u.trigger.action = (unsigned long)action;
 642         r->u.trigger.as = atomic_read(&adapter->status);
 643         if (port) {
 644                 r->u.trigger.ps = atomic_read(&port->status);
 645                 r->u.trigger.wwpn = port->wwpn;
 646         }
 647         if (unit)
 648                 r->u.trigger.us = atomic_read(&unit->status);
 649         r->u.trigger.fcp_lun = unit ? unit->fcp_lun : ZFCP_DBF_INVALID_LUN;
 650         debug_event(dbf->rec, action ? 1 : 4, r, sizeof(*r));
 651         spin_unlock_irqrestore(&dbf->rec_lock, flags);
 652 }
 653
 654 /**
 655  * zfcp_dbf_rec_action - trace event showing progress of recovery action
 656  * @id2: identifier
 657  * @erp_action: error recovery action struct pointer
 658  */
 659 void zfcp_dbf_rec_action(char *id2, struct zfcp_erp_action *erp_action)
 660 {
 661         struct zfcp_dbf *dbf = erp_action->adapter->dbf;
 662         struct zfcp_dbf_rec_record *r = &dbf->rec_buf;
 663         unsigned long flags;
 664
 665         spin_lock_irqsave(&dbf->rec_lock, flags);
 666         memset(r, 0, sizeof(*r));
 667         r->id = ZFCP_REC_DBF_ID_ACTION;
 668         memcpy(r->id2, id2, ZFCP_DBF_ID_SIZE);
 669         r->u.action.action = (unsigned long)erp_action;
 670         r->u.action.status = erp_action->status;
 671         r->u.action.step = erp_action->step;
 672         r->u.action.fsf_req = erp_action->fsf_req_id;
 673         debug_event(dbf->rec, 5, r, sizeof(*r));
 674         spin_unlock_irqrestore(&dbf->rec_lock, flags);
 675 }
 676
 677 /**
 678  * zfcp_dbf_san_ct_request - trace event for issued CT request
 679  * @fsf_req: request containing issued CT data
 680  * @d_id: destination id where ct request is sent to
 681  */
 682 void zfcp_dbf_san_ct_request(struct zfcp_fsf_req *fsf_req, u32 d_id)
 683 {
 684         struct zfcp_fsf_ct_els *ct = (struct zfcp_fsf_ct_els *)fsf_req->data;
 685         struct zfcp_adapter *adapter = fsf_req->adapter;
 686         struct zfcp_dbf *dbf = adapter->dbf;
 687         struct fc_ct_hdr *hdr = sg_virt(ct->req);
 688         struct zfcp_dbf_san_record *r = &dbf->san_buf;
 689         struct zfcp_dbf_san_record_ct_request *oct = &r->u.ct_req;
 690         int level = 3;
 691         unsigned long flags;
 692
 693         spin_lock_irqsave(&dbf->san_lock, flags);
 694         memset(r, 0, sizeof(*r));
 695         strncpy(r->tag, "octc", ZFCP_DBF_TAG_SIZE);
 696         r->fsf_reqid = fsf_req->req_id;
 697         r->fsf_seqno = fsf_req->seq_no;
 698         oct->d_id = d_id;
 699         oct->cmd_req_code = hdr->ct_cmd;
 700         oct->revision = hdr->ct_rev;
 701         oct->gs_type = hdr->ct_fs_type;
 702         oct->gs_subtype = hdr->ct_fs_subtype;
 703         oct->options = hdr->ct_options;
 704         oct->max_res_size = hdr->ct_mr_size;
 705         oct->len = min((int)ct->req->length - (int)sizeof(struct fc_ct_hdr),
 706                        ZFCP_DBF_SAN_MAX_PAYLOAD);
 707         debug_event(dbf->san, level, r, sizeof(*r));
 708         zfcp_dbf_hexdump(dbf->san, r, sizeof(*r), level,
 709                          (void *)hdr + sizeof(struct fc_ct_hdr), oct->len);
 710         spin_unlock_irqrestore(&dbf->san_lock, flags);
 711 }
 712
 713 /**
 714  * zfcp_dbf_san_ct_response - trace event for completion of CT request
 715  * @fsf_req: request containing CT response
 716  */
 717 void zfcp_dbf_san_ct_response(struct zfcp_fsf_req *fsf_req)
 718 {
 719         struct zfcp_fsf_ct_els *ct = (struct zfcp_fsf_ct_els *)fsf_req->data;
 720         struct zfcp_adapter *adapter = fsf_req->adapter;
 721         struct fc_ct_hdr *hdr = sg_virt(ct->resp);
 722         struct zfcp_dbf *dbf = adapter->dbf;
 723         struct zfcp_dbf_san_record *r = &dbf->san_buf;
 724         struct zfcp_dbf_san_record_ct_response *rct = &r->u.ct_resp;
 725         int level = 3;
 726         unsigned long flags;
 727
 728         spin_lock_irqsave(&dbf->san_lock, flags);
 729         memset(r, 0, sizeof(*r));
 730         strncpy(r->tag, "rctc", ZFCP_DBF_TAG_SIZE);
 731         r->fsf_reqid = fsf_req->req_id;
 732         r->fsf_seqno = fsf_req->seq_no;
 733         rct->cmd_rsp_code = hdr->ct_cmd;
 734         rct->revision = hdr->ct_rev;
 735         rct->reason_code = hdr->ct_reason;
 736         rct->expl = hdr->ct_explan;
 737         rct->vendor_unique = hdr->ct_vendor;
 738         rct->max_res_size = hdr->ct_mr_size;
 739         rct->len = min((int)ct->resp->length - (int)sizeof(struct fc_ct_hdr),
 740                        ZFCP_DBF_SAN_MAX_PAYLOAD);
 741         debug_event(dbf->san, level, r, sizeof(*r));
 742         zfcp_dbf_hexdump(dbf->san, r, sizeof(*r), level,
 743                          (void *)hdr + sizeof(struct fc_ct_hdr), rct->len);
 744         spin_unlock_irqrestore(&dbf->san_lock, flags);
 745 }
 746
 747 static void zfcp_dbf_san_els(const char *tag, int level,
 748                              struct zfcp_fsf_req *fsf_req, u32 d_id,
 749                              void *buffer, int buflen)
 750 {
 751         struct zfcp_adapter *adapter = fsf_req->adapter;
 752         struct zfcp_dbf *dbf = adapter->dbf;
 753         struct zfcp_dbf_san_record *rec = &dbf->san_buf;
 754         unsigned long flags;
 755
 756         spin_lock_irqsave(&dbf->san_lock, flags);
 757         memset(rec, 0, sizeof(*rec));
 758         strncpy(rec->tag, tag, ZFCP_DBF_TAG_SIZE);
 759         rec->fsf_reqid = fsf_req->req_id;
 760         rec->fsf_seqno = fsf_req->seq_no;
 761         rec->u.els.d_id = d_id;
 762         debug_event(dbf->san, level, rec, sizeof(*rec));
 763         zfcp_dbf_hexdump(dbf->san, rec, sizeof(*rec), level,
 764                          buffer, min(buflen, ZFCP_DBF_SAN_MAX_PAYLOAD));
 765         spin_unlock_irqrestore(&dbf->san_lock, flags);
 766 }
 767
 768 /**
 769  * zfcp_dbf_san_els_request - trace event for issued ELS
 770  * @fsf_req: request containing issued ELS
 771  */
 772 void zfcp_dbf_san_els_request(struct zfcp_fsf_req *fsf_req)
 773 {
 774         struct zfcp_fsf_ct_els *els = (struct zfcp_fsf_ct_els *)fsf_req->data;
 775         u32 d_id = ntoh24(fsf_req->qtcb->bottom.support.d_id);
 776
 777         zfcp_dbf_san_els("oels", 2, fsf_req, d_id,
 778                          sg_virt(els->req), els->req->length);
 779 }
 780
 781 /**
 782  * zfcp_dbf_san_els_response - trace event for completed ELS
 783  * @fsf_req: request containing ELS response
 784  */
 785 void zfcp_dbf_san_els_response(struct zfcp_fsf_req *fsf_req)
 786 {
 787         struct zfcp_fsf_ct_els *els = (struct zfcp_fsf_ct_els *)fsf_req->data;
 788         u32 d_id = ntoh24(fsf_req->qtcb->bottom.support.d_id);
 789
 790         zfcp_dbf_san_els("rels", 2, fsf_req, d_id,
 791                                sg_virt(els->resp), els->resp->length);
 792 }
 793
 794 /**
 795  * zfcp_dbf_san_incoming_els - trace event for incomig ELS
 796  * @fsf_req: request containing unsolicited status buffer with incoming ELS
 797  */
 798 void zfcp_dbf_san_incoming_els(struct zfcp_fsf_req *fsf_req)
 799 {
 800         struct fsf_status_read_buffer *buf =
 801                         (struct fsf_status_read_buffer *)fsf_req->data;
 802         int length = (int)buf->length -
 803                      (int)((void *)&buf->payload - (void *)buf);
 804
 805         zfcp_dbf_san_els("iels", 1, fsf_req, ntoh24(buf->d_id),
 806                                (void *)buf->payload.data, length);
 807 }
 808
 809 static int zfcp_dbf_san_view_format(debug_info_t *id, struct debug_view *view,
 810                                     char *out_buf, const char *in_buf)
 811 {
 812         struct zfcp_dbf_san_record *r = (struct zfcp_dbf_san_record *)in_buf;
 813         char *p = out_buf;
 814
 815         if (strncmp(r->tag, "dump", ZFCP_DBF_TAG_SIZE) == 0)
 816                 return 0;
 817
 818         zfcp_dbf_tag(&p, "tag", r->tag);
 819         zfcp_dbf_out(&p, "fsf_reqid", "0x%0Lx", r->fsf_reqid);
 820         zfcp_dbf_out(&p, "fsf_seqno", "0x%08x", r->fsf_seqno);
 821
 822         if (strncmp(r->tag, "octc", ZFCP_DBF_TAG_SIZE) == 0) {
 823                 struct zfcp_dbf_san_record_ct_request *ct = &r->u.ct_req;
 824                 zfcp_dbf_out(&p, "d_id", "0x%06x", ct->d_id);
 825                 zfcp_dbf_out(&p, "cmd_req_code", "0x%04x", ct->cmd_req_code);
 826                 zfcp_dbf_out(&p, "revision", "0x%02x", ct->revision);
 827                 zfcp_dbf_out(&p, "gs_type", "0x%02x", ct->gs_type);
 828                 zfcp_dbf_out(&p, "gs_subtype", "0x%02x", ct->gs_subtype);
 829                 zfcp_dbf_out(&p, "options", "0x%02x", ct->options);
 830                 zfcp_dbf_out(&p, "max_res_size", "0x%04x", ct->max_res_size);
 831         } else if (strncmp(r->tag, "rctc", ZFCP_DBF_TAG_SIZE) == 0) {
 832                 struct zfcp_dbf_san_record_ct_response *ct = &r->u.ct_resp;
 833                 zfcp_dbf_out(&p, "cmd_rsp_code", "0x%04x", ct->cmd_rsp_code);
 834                 zfcp_dbf_out(&p, "revision", "0x%02x", ct->revision);
 835                 zfcp_dbf_out(&p, "reason_code", "0x%02x", ct->reason_code);
 836                 zfcp_dbf_out(&p, "reason_code_expl", "0x%02x", ct->expl);
 837                 zfcp_dbf_out(&p, "vendor_unique", "0x%02x", ct->vendor_unique);
 838                 zfcp_dbf_out(&p, "max_res_size", "0x%04x", ct->max_res_size);
 839         } else if (strncmp(r->tag, "oels", ZFCP_DBF_TAG_SIZE) == 0 ||
 840                    strncmp(r->tag, "rels", ZFCP_DBF_TAG_SIZE) == 0 ||
 841                    strncmp(r->tag, "iels", ZFCP_DBF_TAG_SIZE) == 0) {
 842                 struct zfcp_dbf_san_record_els *els = &r->u.els;
 843                 zfcp_dbf_out(&p, "d_id", "0x%06x", els->d_id);
 844         }
 845         return p - out_buf;
 846 }
 847
 848 static struct debug_view zfcp_dbf_san_view = {
 849         .name = "structured",
 850         .header_proc = zfcp_dbf_view_header,
 851         .format_proc = zfcp_dbf_san_view_format,
 852 };
 853
 854 void _zfcp_dbf_scsi(const char *tag, const char *tag2, int level,
 855                     struct zfcp_dbf *dbf, struct scsi_cmnd *scsi_cmnd,
 856                     struct zfcp_fsf_req *fsf_req, unsigned long old_req_id)
 857 {
 858         struct zfcp_dbf_scsi_record *rec = &dbf->scsi_buf;
 859         struct zfcp_dbf_dump *dump = (struct zfcp_dbf_dump *)rec;
 860         unsigned long flags;
 861         struct fcp_resp_with_ext *fcp_rsp;
 862         struct fcp_resp_rsp_info *fcp_rsp_info = NULL;
 863         char *fcp_sns_info = NULL;
 864         int offset = 0, buflen = 0;
 865
 866         spin_lock_irqsave(&dbf->scsi_lock, flags);
 867         do {
 868                 memset(rec, 0, sizeof(*rec));
 869                 if (offset == 0) {
 870                         strncpy(rec->tag, tag, ZFCP_DBF_TAG_SIZE);
 871                         strncpy(rec->tag2, tag2, ZFCP_DBF_TAG_SIZE);
 872                         if (scsi_cmnd != NULL) {
 873                                 if (scsi_cmnd->device) {
 874                                         rec->scsi_id = scsi_cmnd->device->id;
 875                                         rec->scsi_lun = scsi_cmnd->device->lun;
 876                                 }
 877                                 rec->scsi_result = scsi_cmnd->result;
 878                                 rec->scsi_cmnd = (unsigned long)scsi_cmnd;
 879                                 rec->scsi_serial = scsi_cmnd->serial_number;
 880                                 memcpy(rec->scsi_opcode, scsi_cmnd->cmnd,
 881                                         min((int)scsi_cmnd->cmd_len,
 882                                                 ZFCP_DBF_SCSI_OPCODE));
 883                                 rec->scsi_retries = scsi_cmnd->retries;
 884                                 rec->scsi_allowed = scsi_cmnd->allowed;
 885                         }
 886                         if (fsf_req != NULL) {
 887                                 fcp_rsp = (struct fcp_resp_with_ext *)
 888                                         &(fsf_req->qtcb->bottom.io.fcp_rsp);
 889                                 fcp_rsp_info = (struct fcp_resp_rsp_info *)
 890                                         &fcp_rsp[1];
 891                                 fcp_sns_info = (char *) &fcp_rsp[1];
 892                                 if (fcp_rsp->resp.fr_flags & FCP_RSP_LEN_VAL)
 893                                         fcp_sns_info += fcp_rsp->ext.fr_sns_len;
 894
 895                                 rec->rsp_validity = fcp_rsp->resp.fr_flags;
 896                                 rec->rsp_scsi_status = fcp_rsp->resp.fr_status;
 897                                 rec->rsp_resid = fcp_rsp->ext.fr_resid;
 898                                 if (fcp_rsp->resp.fr_flags & FCP_RSP_LEN_VAL)
 899                                         rec->rsp_code = fcp_rsp_info->rsp_code;
 900                                 if (fcp_rsp->resp.fr_flags & FCP_SNS_LEN_VAL) {
 901                                         buflen = min(fcp_rsp->ext.fr_sns_len,
 902                                            (u32)ZFCP_DBF_SCSI_MAX_FCP_SNS_INFO);
 903                                         rec->sns_info_len = buflen;
 904                                         memcpy(rec->sns_info, fcp_sns_info,
 905                                                min(buflen,
 906                                                    ZFCP_DBF_SCSI_FCP_SNS_INFO));
 907                                         offset += min(buflen,
 908                                                       ZFCP_DBF_SCSI_FCP_SNS_INFO);
 909                                 }
 910
 911                                 rec->fsf_reqid = fsf_req->req_id;
 912                                 rec->fsf_seqno = fsf_req->seq_no;
 913                                 rec->fsf_issued = fsf_req->issued;
 914                         }
 915                         rec->old_fsf_reqid = old_req_id;
 916                 } else {
 917                         strncpy(dump->tag, "dump", ZFCP_DBF_TAG_SIZE);
 918                         dump->total_size = buflen;
 919                         dump->offset = offset;
 920                         dump->size = min(buflen - offset,
 921                                          (int)sizeof(struct
 922                                                      zfcp_dbf_scsi_record) -
 923                                          (int)sizeof(struct zfcp_dbf_dump));
 924                         memcpy(dump->data, fcp_sns_info + offset, dump->size);
 925                         offset += dump->size;
 926                 }
 927                 debug_event(dbf->scsi, level, rec, sizeof(*rec));
 928         } while (offset < buflen);
 929         spin_unlock_irqrestore(&dbf->scsi_lock, flags);
 930 }
 931
 932 static int zfcp_dbf_scsi_view_format(debug_info_t *id, struct debug_view *view,
 933                                      char *out_buf, const char *in_buf)
 934 {
 935         struct zfcp_dbf_scsi_record *r = (struct zfcp_dbf_scsi_record *)in_buf;
 936         struct timespec t;
 937         char *p = out_buf;
 938
 939         if (strncmp(r->tag, "dump", ZFCP_DBF_TAG_SIZE) == 0)
 940                 return 0;
 941
 942         zfcp_dbf_tag(&p, "tag", r->tag);
 943         zfcp_dbf_tag(&p, "tag2", r->tag2);
 944         zfcp_dbf_out(&p, "scsi_id", "0x%08x", r->scsi_id);
 945         zfcp_dbf_out(&p, "scsi_lun", "0x%08x", r->scsi_lun);
 946         zfcp_dbf_out(&p, "scsi_result", "0x%08x", r->scsi_result);
 947         zfcp_dbf_out(&p, "scsi_cmnd", "0x%0Lx", r->scsi_cmnd);
 948         zfcp_dbf_out(&p, "scsi_serial", "0x%016Lx", r->scsi_serial);
 949         zfcp_dbf_outd(&p, "scsi_opcode", r->scsi_opcode, ZFCP_DBF_SCSI_OPCODE,
 950                       0, ZFCP_DBF_SCSI_OPCODE);
 951         zfcp_dbf_out(&p, "scsi_retries", "0x%02x", r->scsi_retries);
 952         zfcp_dbf_out(&p, "scsi_allowed", "0x%02x", r->scsi_allowed);
 953         if (strncmp(r->tag, "abrt", ZFCP_DBF_TAG_SIZE) == 0)
 954                 zfcp_dbf_out(&p, "old_fsf_reqid", "0x%0Lx", r->old_fsf_reqid);
 955         zfcp_dbf_out(&p, "fsf_reqid", "0x%0Lx", r->fsf_reqid);
 956         zfcp_dbf_out(&p, "fsf_seqno", "0x%08x", r->fsf_seqno);
 957         stck_to_timespec(r->fsf_issued, &t);
 958         zfcp_dbf_out(&p, "fsf_issued", "%011lu:%06lu", t.tv_sec, t.tv_nsec);
 959
 960         if (strncmp(r->tag, "rslt", ZFCP_DBF_TAG_SIZE) == 0) {
 961                 zfcp_dbf_out(&p, "fcp_rsp_validity", "0x%02x", r->rsp_validity);
 962                 zfcp_dbf_out(&p, "fcp_rsp_scsi_status", "0x%02x",
 963                              r->rsp_scsi_status);
 964                 zfcp_dbf_out(&p, "fcp_rsp_resid", "0x%08x", r->rsp_resid);
 965                 zfcp_dbf_out(&p, "fcp_rsp_code", "0x%08x", r->rsp_code);
 966                 zfcp_dbf_out(&p, "fcp_sns_info_len", "0x%08x", r->sns_info_len);
 967                 zfcp_dbf_outd(&p, "fcp_sns_info", r->sns_info,
 968                               min((int)r->sns_info_len,
 969                               ZFCP_DBF_SCSI_FCP_SNS_INFO), 0,
 970                               r->sns_info_len);
 971         }
 972         p += sprintf(p, "\n");
 973         return p - out_buf;
 974 }
 975
 976 static struct debug_view zfcp_dbf_scsi_view = {
 977         .name = "structured",
 978         .header_proc = zfcp_dbf_view_header,
 979         .format_proc = zfcp_dbf_scsi_view_format,
 980 };
 981
 982 static debug_info_t *zfcp_dbf_reg(const char *name, int level,
 983                                   struct debug_view *view, int size)
 984 {
 985         struct debug_info *d;
 986
 987         d = debug_register(name, dbfsize, level, size);
 988         if (!d)
 989                 return NULL;
 990
 991         debug_register_view(d, &debug_hex_ascii_view);
 992         debug_register_view(d, view);
 993         debug_set_level(d, level);
 994
 995         return d;
 996 }
 997
 998 /**
 999  * zfcp_adapter_debug_register - registers debug feature for an adapter
1000  * @adapter: pointer to adapter for which debug features should be registered
1001  * return: -ENOMEM on error, 0 otherwise
1002  */
1003 int zfcp_dbf_adapter_register(struct zfcp_adapter *adapter)
1004 {
1005         char dbf_name[DEBUG_MAX_NAME_LEN];
1006         struct zfcp_dbf *dbf;
1007
1008         dbf = kmalloc(sizeof(struct zfcp_dbf), GFP_KERNEL);
1009         if (!dbf)
1010                 return -ENOMEM;
1011
1012         dbf->adapter = adapter;
1013
1014         spin_lock_init(&dbf->hba_lock);
1015         spin_lock_init(&dbf->san_lock);
1016         spin_lock_init(&dbf->scsi_lock);
1017         spin_lock_init(&dbf->rec_lock);
1018
1019         /* debug feature area which records recovery activity */
1020         sprintf(dbf_name, "zfcp_%s_rec", dev_name(&adapter->ccw_device->dev));
1021         dbf->rec = zfcp_dbf_reg(dbf_name, 3, &zfcp_dbf_rec_view,
1022                                 sizeof(struct zfcp_dbf_rec_record));
1023         if (!dbf->rec)
1024                 goto err_out;
1025
1026         /* debug feature area which records HBA (FSF and QDIO) conditions */
1027         sprintf(dbf_name, "zfcp_%s_hba", dev_name(&adapter->ccw_device->dev));
1028         dbf->hba = zfcp_dbf_reg(dbf_name, 3, &zfcp_dbf_hba_view,
1029                                 sizeof(struct zfcp_dbf_hba_record));
1030         if (!dbf->hba)
1031                 goto err_out;
1032
1033         /* debug feature area which records SAN command failures and recovery */
1034         sprintf(dbf_name, "zfcp_%s_san", dev_name(&adapter->ccw_device->dev));
1035         dbf->san = zfcp_dbf_reg(dbf_name, 6, &zfcp_dbf_san_view,
1036                                 sizeof(struct zfcp_dbf_san_record));
1037         if (!dbf->san)
1038                 goto err_out;
1039
1040         /* debug feature area which records SCSI command failures and recovery */
1041         sprintf(dbf_name, "zfcp_%s_scsi", dev_name(&adapter->ccw_device->dev));
1042         dbf->scsi = zfcp_dbf_reg(dbf_name, 3, &zfcp_dbf_scsi_view,
1043                                  sizeof(struct zfcp_dbf_scsi_record));
1044         if (!dbf->scsi)
1045                 goto err_out;
1046
1047         adapter->dbf = dbf;
1048         return 0;
1049
1050 err_out:
1051         zfcp_dbf_adapter_unregister(dbf);
1052         return -ENOMEM;
1053 }
1054
1055 /**
1056  * zfcp_adapter_debug_unregister - unregisters debug feature for an adapter
1057  * @dbf: pointer to dbf for which debug features should be unregistered
1058  */
1059 void zfcp_dbf_adapter_unregister(struct zfcp_dbf *dbf)
1060 {
1061         if (!dbf)
1062                 return;
1063         debug_unregister(dbf->scsi);
1064         debug_unregister(dbf->san);
1065         debug_unregister(dbf->hba);
1066         debug_unregister(dbf->rec);
1067         dbf->adapter->dbf = NULL;
1068         kfree(dbf);
1069 }
1070