]> err.no Git - linux-2.6/blob - drivers/s390/scsi/zfcp_dbf.c
[SCSI] zfcp: Trace all triggers of error recovery activity
[linux-2.6] / drivers / s390 / scsi / zfcp_dbf.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 <linux/ctype.h>
23 #include <asm/debug.h>
24 #include "zfcp_ext.h"
25
26 static u32 dbfsize = 4;
27
28 module_param(dbfsize, uint, 0400);
29 MODULE_PARM_DESC(dbfsize,
30                  "number of pages for each debug feature area (default 4)");
31
32 #define ZFCP_LOG_AREA                   ZFCP_LOG_AREA_OTHER
33
34 static void zfcp_dbf_hexdump(debug_info_t *dbf, void *to, int to_len,
35                              int level, char *from, int from_len)
36 {
37         int offset;
38         struct zfcp_dbf_dump *dump = to;
39         int room = to_len - sizeof(*dump);
40
41         for (offset = 0; offset < from_len; offset += dump->size) {
42                 memset(to, 0, to_len);
43                 strncpy(dump->tag, "dump", ZFCP_DBF_TAG_SIZE);
44                 dump->total_size = from_len;
45                 dump->offset = offset;
46                 dump->size = min(from_len - offset, room);
47                 memcpy(dump->data, from + offset, dump->size);
48                 debug_event(dbf, level, dump, dump->size);
49         }
50 }
51
52 static int
53 zfcp_dbf_stck(char *out_buf, const char *label, unsigned long long stck)
54 {
55         unsigned long long sec;
56         struct timespec dbftime;
57         int len = 0;
58
59         stck -= 0x8126d60e46000000LL - (0x3c26700LL * 1000000 * 4096);
60         sec = stck >> 12;
61         do_div(sec, 1000000);
62         dbftime.tv_sec = sec;
63         stck -= (sec * 1000000) << 12;
64         dbftime.tv_nsec = ((stck * 1000) >> 12);
65         len += sprintf(out_buf + len, "%-24s%011lu:%06lu\n",
66                        label, dbftime.tv_sec, dbftime.tv_nsec);
67
68         return len;
69 }
70
71 static int zfcp_dbf_tag(char *out_buf, const char *label, const char *tag)
72 {
73         int len = 0, i;
74
75         len += sprintf(out_buf + len, "%-24s", label);
76         for (i = 0; i < ZFCP_DBF_TAG_SIZE; i++)
77                 len += sprintf(out_buf + len, "%c", tag[i]);
78         len += sprintf(out_buf + len, "\n");
79
80         return len;
81 }
82
83 static int
84 zfcp_dbf_view(char *out_buf, const char *label, const char *format, ...)
85 {
86         va_list arg;
87         int len = 0;
88
89         len += sprintf(out_buf + len, "%-24s", label);
90         va_start(arg, format);
91         len += vsprintf(out_buf + len, format, arg);
92         va_end(arg);
93         len += sprintf(out_buf + len, "\n");
94
95         return len;
96 }
97
98 static void zfcp_dbf_outs(char **buf, const char *s1, const char *s2)
99 {
100         *buf += sprintf(*buf, "%-24s%s\n", s1, s2);
101 }
102
103 static void zfcp_dbf_out(char **buf, const char *s, const char *format, ...)
104 {
105         va_list arg;
106
107         *buf += sprintf(*buf, "%-24s", s);
108         va_start(arg, format);
109         *buf += vsprintf(*buf, format, arg);
110         va_end(arg);
111         *buf += sprintf(*buf, "\n");
112 }
113
114 static int
115 zfcp_dbf_view_dump(char *out_buf, const char *label,
116                    char *buffer, int buflen, int offset, int total_size)
117 {
118         int len = 0;
119
120         if (offset == 0)
121                 len += sprintf(out_buf + len, "%-24s  ", label);
122
123         while (buflen--) {
124                 if (offset > 0) {
125                         if ((offset % 32) == 0)
126                                 len += sprintf(out_buf + len, "\n%-24c  ", ' ');
127                         else if ((offset % 4) == 0)
128                                 len += sprintf(out_buf + len, " ");
129                 }
130                 len += sprintf(out_buf + len, "%02x", *buffer++);
131                 if (++offset == total_size) {
132                         len += sprintf(out_buf + len, "\n");
133                         break;
134                 }
135         }
136
137         if (total_size == 0)
138                 len += sprintf(out_buf + len, "\n");
139
140         return len;
141 }
142
143 static int
144 zfcp_dbf_view_header(debug_info_t * id, struct debug_view *view, int area,
145                      debug_entry_t * entry, char *out_buf)
146 {
147         struct zfcp_dbf_dump *dump = (struct zfcp_dbf_dump *)DEBUG_DATA(entry);
148         int len = 0;
149
150         if (strncmp(dump->tag, "dump", ZFCP_DBF_TAG_SIZE) != 0) {
151                 len += zfcp_dbf_stck(out_buf + len, "timestamp",
152                                      entry->id.stck);
153                 len += zfcp_dbf_view(out_buf + len, "cpu", "%02i",
154                                      entry->id.fields.cpuid);
155         } else {
156                 len += zfcp_dbf_view_dump(out_buf + len, NULL,
157                                           dump->data,
158                                           dump->size,
159                                           dump->offset, dump->total_size);
160                 if ((dump->offset + dump->size) == dump->total_size)
161                         len += sprintf(out_buf + len, "\n");
162         }
163
164         return len;
165 }
166
167 void zfcp_hba_dbf_event_fsf_response(struct zfcp_fsf_req *fsf_req)
168 {
169         struct zfcp_adapter *adapter = fsf_req->adapter;
170         struct fsf_qtcb *qtcb = fsf_req->qtcb;
171         union fsf_prot_status_qual *prot_status_qual =
172             &qtcb->prefix.prot_status_qual;
173         union fsf_status_qual *fsf_status_qual = &qtcb->header.fsf_status_qual;
174         struct scsi_cmnd *scsi_cmnd;
175         struct zfcp_port *port;
176         struct zfcp_unit *unit;
177         struct zfcp_send_els *send_els;
178         struct zfcp_hba_dbf_record *rec = &adapter->hba_dbf_buf;
179         struct zfcp_hba_dbf_record_response *response = &rec->type.response;
180         int level;
181         unsigned long flags;
182
183         spin_lock_irqsave(&adapter->hba_dbf_lock, flags);
184         memset(rec, 0, sizeof(struct zfcp_hba_dbf_record));
185         strncpy(rec->tag, "resp", ZFCP_DBF_TAG_SIZE);
186
187         if ((qtcb->prefix.prot_status != FSF_PROT_GOOD) &&
188             (qtcb->prefix.prot_status != FSF_PROT_FSF_STATUS_PRESENTED)) {
189                 strncpy(rec->tag2, "perr", ZFCP_DBF_TAG_SIZE);
190                 level = 1;
191         } else if (qtcb->header.fsf_status != FSF_GOOD) {
192                 strncpy(rec->tag2, "ferr", ZFCP_DBF_TAG_SIZE);
193                 level = 1;
194         } else if ((fsf_req->fsf_command == FSF_QTCB_OPEN_PORT_WITH_DID) ||
195                    (fsf_req->fsf_command == FSF_QTCB_OPEN_LUN)) {
196                 strncpy(rec->tag2, "open", ZFCP_DBF_TAG_SIZE);
197                 level = 4;
198         } else if (qtcb->header.log_length) {
199                 strncpy(rec->tag2, "qtcb", ZFCP_DBF_TAG_SIZE);
200                 level = 5;
201         } else {
202                 strncpy(rec->tag2, "norm", ZFCP_DBF_TAG_SIZE);
203                 level = 6;
204         }
205
206         response->fsf_command = fsf_req->fsf_command;
207         response->fsf_reqid = (unsigned long)fsf_req;
208         response->fsf_seqno = fsf_req->seq_no;
209         response->fsf_issued = fsf_req->issued;
210         response->fsf_prot_status = qtcb->prefix.prot_status;
211         response->fsf_status = qtcb->header.fsf_status;
212         memcpy(response->fsf_prot_status_qual,
213                prot_status_qual, FSF_PROT_STATUS_QUAL_SIZE);
214         memcpy(response->fsf_status_qual,
215                fsf_status_qual, FSF_STATUS_QUALIFIER_SIZE);
216         response->fsf_req_status = fsf_req->status;
217         response->sbal_first = fsf_req->sbal_first;
218         response->sbal_curr = fsf_req->sbal_curr;
219         response->sbal_last = fsf_req->sbal_last;
220         response->pool = fsf_req->pool != NULL;
221         response->erp_action = (unsigned long)fsf_req->erp_action;
222
223         switch (fsf_req->fsf_command) {
224         case FSF_QTCB_FCP_CMND:
225                 if (fsf_req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT)
226                         break;
227                 scsi_cmnd = (struct scsi_cmnd *)fsf_req->data;
228                 if (scsi_cmnd != NULL) {
229                         response->data.send_fcp.scsi_cmnd
230                             = (unsigned long)scsi_cmnd;
231                         response->data.send_fcp.scsi_serial
232                             = scsi_cmnd->serial_number;
233                 }
234                 break;
235
236         case FSF_QTCB_OPEN_PORT_WITH_DID:
237         case FSF_QTCB_CLOSE_PORT:
238         case FSF_QTCB_CLOSE_PHYSICAL_PORT:
239                 port = (struct zfcp_port *)fsf_req->data;
240                 response->data.port.wwpn = port->wwpn;
241                 response->data.port.d_id = port->d_id;
242                 response->data.port.port_handle = qtcb->header.port_handle;
243                 break;
244
245         case FSF_QTCB_OPEN_LUN:
246         case FSF_QTCB_CLOSE_LUN:
247                 unit = (struct zfcp_unit *)fsf_req->data;
248                 port = unit->port;
249                 response->data.unit.wwpn = port->wwpn;
250                 response->data.unit.fcp_lun = unit->fcp_lun;
251                 response->data.unit.port_handle = qtcb->header.port_handle;
252                 response->data.unit.lun_handle = qtcb->header.lun_handle;
253                 break;
254
255         case FSF_QTCB_SEND_ELS:
256                 send_els = (struct zfcp_send_els *)fsf_req->data;
257                 response->data.send_els.d_id = qtcb->bottom.support.d_id;
258                 response->data.send_els.ls_code = send_els->ls_code >> 24;
259                 break;
260
261         case FSF_QTCB_ABORT_FCP_CMND:
262         case FSF_QTCB_SEND_GENERIC:
263         case FSF_QTCB_EXCHANGE_CONFIG_DATA:
264         case FSF_QTCB_EXCHANGE_PORT_DATA:
265         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
266         case FSF_QTCB_UPLOAD_CONTROL_FILE:
267                 break;
268         }
269
270         debug_event(adapter->hba_dbf, level,
271                     rec, sizeof(struct zfcp_hba_dbf_record));
272
273         /* have fcp channel microcode fixed to use as little as possible */
274         if (fsf_req->fsf_command != FSF_QTCB_FCP_CMND) {
275                 /* adjust length skipping trailing zeros */
276                 char *buf = (char *)qtcb + qtcb->header.log_start;
277                 int len = qtcb->header.log_length;
278                 for (; len && !buf[len - 1]; len--);
279                 zfcp_dbf_hexdump(adapter->hba_dbf, rec, sizeof(*rec), level,
280                                  buf, len);
281         }
282
283         spin_unlock_irqrestore(&adapter->hba_dbf_lock, flags);
284 }
285
286 void
287 zfcp_hba_dbf_event_fsf_unsol(const char *tag, struct zfcp_adapter *adapter,
288                              struct fsf_status_read_buffer *status_buffer)
289 {
290         struct zfcp_hba_dbf_record *rec = &adapter->hba_dbf_buf;
291         unsigned long flags;
292
293         spin_lock_irqsave(&adapter->hba_dbf_lock, flags);
294         memset(rec, 0, sizeof(struct zfcp_hba_dbf_record));
295         strncpy(rec->tag, "stat", ZFCP_DBF_TAG_SIZE);
296         strncpy(rec->tag2, tag, ZFCP_DBF_TAG_SIZE);
297
298         rec->type.status.failed = adapter->status_read_failed;
299         if (status_buffer != NULL) {
300                 rec->type.status.status_type = status_buffer->status_type;
301                 rec->type.status.status_subtype = status_buffer->status_subtype;
302                 memcpy(&rec->type.status.queue_designator,
303                        &status_buffer->queue_designator,
304                        sizeof(struct fsf_queue_designator));
305
306                 switch (status_buffer->status_type) {
307                 case FSF_STATUS_READ_SENSE_DATA_AVAIL:
308                         rec->type.status.payload_size =
309                             ZFCP_DBF_UNSOL_PAYLOAD_SENSE_DATA_AVAIL;
310                         break;
311
312                 case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
313                         rec->type.status.payload_size =
314                             ZFCP_DBF_UNSOL_PAYLOAD_BIT_ERROR_THRESHOLD;
315                         break;
316
317                 case FSF_STATUS_READ_LINK_DOWN:
318                         switch (status_buffer->status_subtype) {
319                         case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
320                         case FSF_STATUS_READ_SUB_FDISC_FAILED:
321                                 rec->type.status.payload_size =
322                                         sizeof(struct fsf_link_down_info);
323                         }
324                         break;
325
326                 case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
327                         rec->type.status.payload_size =
328                             ZFCP_DBF_UNSOL_PAYLOAD_FEATURE_UPDATE_ALERT;
329                         break;
330                 }
331                 memcpy(&rec->type.status.payload,
332                        &status_buffer->payload, rec->type.status.payload_size);
333         }
334
335         debug_event(adapter->hba_dbf, 2,
336                     rec, sizeof(struct zfcp_hba_dbf_record));
337         spin_unlock_irqrestore(&adapter->hba_dbf_lock, flags);
338 }
339
340 void
341 zfcp_hba_dbf_event_qdio(struct zfcp_adapter *adapter, unsigned int status,
342                         unsigned int qdio_error, unsigned int siga_error,
343                         int sbal_index, int sbal_count)
344 {
345         struct zfcp_hba_dbf_record *rec = &adapter->hba_dbf_buf;
346         unsigned long flags;
347
348         spin_lock_irqsave(&adapter->hba_dbf_lock, flags);
349         memset(rec, 0, sizeof(struct zfcp_hba_dbf_record));
350         strncpy(rec->tag, "qdio", ZFCP_DBF_TAG_SIZE);
351         rec->type.qdio.status = status;
352         rec->type.qdio.qdio_error = qdio_error;
353         rec->type.qdio.siga_error = siga_error;
354         rec->type.qdio.sbal_index = sbal_index;
355         rec->type.qdio.sbal_count = sbal_count;
356         debug_event(adapter->hba_dbf, 0,
357                     rec, sizeof(struct zfcp_hba_dbf_record));
358         spin_unlock_irqrestore(&adapter->hba_dbf_lock, flags);
359 }
360
361 static int
362 zfcp_hba_dbf_view_response(char *out_buf,
363                            struct zfcp_hba_dbf_record_response *rec)
364 {
365         int len = 0;
366
367         len += zfcp_dbf_view(out_buf + len, "fsf_command", "0x%08x",
368                              rec->fsf_command);
369         len += zfcp_dbf_view(out_buf + len, "fsf_reqid", "0x%0Lx",
370                              rec->fsf_reqid);
371         len += zfcp_dbf_view(out_buf + len, "fsf_seqno", "0x%08x",
372                              rec->fsf_seqno);
373         len += zfcp_dbf_stck(out_buf + len, "fsf_issued", rec->fsf_issued);
374         len += zfcp_dbf_view(out_buf + len, "fsf_prot_status", "0x%08x",
375                              rec->fsf_prot_status);
376         len += zfcp_dbf_view(out_buf + len, "fsf_status", "0x%08x",
377                              rec->fsf_status);
378         len += zfcp_dbf_view_dump(out_buf + len, "fsf_prot_status_qual",
379                                   rec->fsf_prot_status_qual,
380                                   FSF_PROT_STATUS_QUAL_SIZE,
381                                   0, FSF_PROT_STATUS_QUAL_SIZE);
382         len += zfcp_dbf_view_dump(out_buf + len, "fsf_status_qual",
383                                   rec->fsf_status_qual,
384                                   FSF_STATUS_QUALIFIER_SIZE,
385                                   0, FSF_STATUS_QUALIFIER_SIZE);
386         len += zfcp_dbf_view(out_buf + len, "fsf_req_status", "0x%08x",
387                              rec->fsf_req_status);
388         len += zfcp_dbf_view(out_buf + len, "sbal_first", "0x%02x",
389                              rec->sbal_first);
390         len += zfcp_dbf_view(out_buf + len, "sbal_curr", "0x%02x",
391                              rec->sbal_curr);
392         len += zfcp_dbf_view(out_buf + len, "sbal_last", "0x%02x",
393                              rec->sbal_last);
394         len += zfcp_dbf_view(out_buf + len, "pool", "0x%02x", rec->pool);
395
396         switch (rec->fsf_command) {
397         case FSF_QTCB_FCP_CMND:
398                 if (rec->fsf_req_status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT)
399                         break;
400                 len += zfcp_dbf_view(out_buf + len, "scsi_cmnd", "0x%0Lx",
401                                      rec->data.send_fcp.scsi_cmnd);
402                 len += zfcp_dbf_view(out_buf + len, "scsi_serial", "0x%016Lx",
403                                      rec->data.send_fcp.scsi_serial);
404                 break;
405
406         case FSF_QTCB_OPEN_PORT_WITH_DID:
407         case FSF_QTCB_CLOSE_PORT:
408         case FSF_QTCB_CLOSE_PHYSICAL_PORT:
409                 len += zfcp_dbf_view(out_buf + len, "wwpn", "0x%016Lx",
410                                      rec->data.port.wwpn);
411                 len += zfcp_dbf_view(out_buf + len, "d_id", "0x%06x",
412                                      rec->data.port.d_id);
413                 len += zfcp_dbf_view(out_buf + len, "port_handle", "0x%08x",
414                                      rec->data.port.port_handle);
415                 break;
416
417         case FSF_QTCB_OPEN_LUN:
418         case FSF_QTCB_CLOSE_LUN:
419                 len += zfcp_dbf_view(out_buf + len, "wwpn", "0x%016Lx",
420                                      rec->data.unit.wwpn);
421                 len += zfcp_dbf_view(out_buf + len, "fcp_lun", "0x%016Lx",
422                                      rec->data.unit.fcp_lun);
423                 len += zfcp_dbf_view(out_buf + len, "port_handle", "0x%08x",
424                                      rec->data.unit.port_handle);
425                 len += zfcp_dbf_view(out_buf + len, "lun_handle", "0x%08x",
426                                      rec->data.unit.lun_handle);
427                 break;
428
429         case FSF_QTCB_SEND_ELS:
430                 len += zfcp_dbf_view(out_buf + len, "d_id", "0x%06x",
431                                      rec->data.send_els.d_id);
432                 len += zfcp_dbf_view(out_buf + len, "ls_code", "0x%02x",
433                                      rec->data.send_els.ls_code);
434                 break;
435
436         case FSF_QTCB_ABORT_FCP_CMND:
437         case FSF_QTCB_SEND_GENERIC:
438         case FSF_QTCB_EXCHANGE_CONFIG_DATA:
439         case FSF_QTCB_EXCHANGE_PORT_DATA:
440         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
441         case FSF_QTCB_UPLOAD_CONTROL_FILE:
442                 break;
443         }
444
445         return len;
446 }
447
448 static int
449 zfcp_hba_dbf_view_status(char *out_buf, struct zfcp_hba_dbf_record_status *rec)
450 {
451         int len = 0;
452
453         len += zfcp_dbf_view(out_buf + len, "failed", "0x%02x", rec->failed);
454         len += zfcp_dbf_view(out_buf + len, "status_type", "0x%08x",
455                              rec->status_type);
456         len += zfcp_dbf_view(out_buf + len, "status_subtype", "0x%08x",
457                              rec->status_subtype);
458         len += zfcp_dbf_view_dump(out_buf + len, "queue_designator",
459                                   (char *)&rec->queue_designator,
460                                   sizeof(struct fsf_queue_designator),
461                                   0, sizeof(struct fsf_queue_designator));
462         len += zfcp_dbf_view_dump(out_buf + len, "payload",
463                                   (char *)&rec->payload,
464                                   rec->payload_size, 0, rec->payload_size);
465
466         return len;
467 }
468
469 static int
470 zfcp_hba_dbf_view_qdio(char *out_buf, struct zfcp_hba_dbf_record_qdio *rec)
471 {
472         int len = 0;
473
474         len += zfcp_dbf_view(out_buf + len, "status", "0x%08x", rec->status);
475         len += zfcp_dbf_view(out_buf + len, "qdio_error", "0x%08x",
476                              rec->qdio_error);
477         len += zfcp_dbf_view(out_buf + len, "siga_error", "0x%08x",
478                              rec->siga_error);
479         len += zfcp_dbf_view(out_buf + len, "sbal_index", "0x%02x",
480                              rec->sbal_index);
481         len += zfcp_dbf_view(out_buf + len, "sbal_count", "0x%02x",
482                              rec->sbal_count);
483
484         return len;
485 }
486
487 static int
488 zfcp_hba_dbf_view_format(debug_info_t * id, struct debug_view *view,
489                          char *out_buf, const char *in_buf)
490 {
491         struct zfcp_hba_dbf_record *rec = (struct zfcp_hba_dbf_record *)in_buf;
492         int len = 0;
493
494         if (strncmp(rec->tag, "dump", ZFCP_DBF_TAG_SIZE) == 0)
495                 return 0;
496
497         len += zfcp_dbf_tag(out_buf + len, "tag", rec->tag);
498         if (isalpha(rec->tag2[0]))
499                 len += zfcp_dbf_tag(out_buf + len, "tag2", rec->tag2);
500         if (strncmp(rec->tag, "resp", ZFCP_DBF_TAG_SIZE) == 0)
501                 len += zfcp_hba_dbf_view_response(out_buf + len,
502                                                   &rec->type.response);
503         else if (strncmp(rec->tag, "stat", ZFCP_DBF_TAG_SIZE) == 0)
504                 len += zfcp_hba_dbf_view_status(out_buf + len,
505                                                 &rec->type.status);
506         else if (strncmp(rec->tag, "qdio", ZFCP_DBF_TAG_SIZE) == 0)
507                 len += zfcp_hba_dbf_view_qdio(out_buf + len, &rec->type.qdio);
508
509         len += sprintf(out_buf + len, "\n");
510
511         return len;
512 }
513
514 static struct debug_view zfcp_hba_dbf_view = {
515         "structured",
516         NULL,
517         &zfcp_dbf_view_header,
518         &zfcp_hba_dbf_view_format,
519         NULL,
520         NULL
521 };
522
523 static const char *zfcp_rec_dbf_tags[] = {
524         [ZFCP_REC_DBF_ID_THREAD] = "thread",
525         [ZFCP_REC_DBF_ID_TARGET] = "target",
526         [ZFCP_REC_DBF_ID_TRIGGER] = "trigger",
527 };
528
529 static const char *zfcp_rec_dbf_ids[] = {
530         [1]     = "new",
531         [2]     = "ready",
532         [3]     = "kill",
533         [4]     = "down sleep",
534         [5]     = "down wakeup",
535         [6]     = "down sleep ecd",
536         [7]     = "down wakeup ecd",
537         [8]     = "down sleep epd",
538         [9]     = "down wakeup epd",
539         [10]    = "online",
540         [11]    = "operational",
541         [12]    = "scsi slave destroy",
542         [13]    = "propagate failed adapter",
543         [14]    = "propagate failed port",
544         [15]    = "block adapter",
545         [16]    = "unblock adapter",
546         [17]    = "block port",
547         [18]    = "unblock port",
548         [19]    = "block unit",
549         [20]    = "unblock unit",
550         [21]    = "unit recovery failed",
551         [22]    = "port recovery failed",
552         [23]    = "adapter recovery failed",
553         [24]    = "qdio queues down",
554         [25]    = "p2p failed",
555         [26]    = "nameserver lookup failed",
556         [27]    = "nameserver port failed",
557         [28]    = "link up",
558         [29]    = "link down",
559         [30]    = "link up status read",
560         [31]    = "open port failed",
561         [32]    = "open port failed",
562         [33]    = "close port",
563         [34]    = "open unit failed",
564         [35]    = "exclusive open unit failed",
565         [36]    = "shared open unit failed",
566         [37]    = "link down",
567         [38]    = "link down status read no link",
568         [39]    = "link down status read fdisc login",
569         [40]    = "link down status read firmware update",
570         [41]    = "link down status read unknown reason",
571         [42]    = "link down ecd incomplete",
572         [43]    = "link down epd incomplete",
573         [44]    = "sysfs adapter recovery",
574         [45]    = "sysfs port recovery",
575         [46]    = "sysfs unit recovery",
576         [47]    = "port boxed abort",
577         [48]    = "unit boxed abort",
578         [49]    = "port boxed ct",
579         [50]    = "port boxed close physical",
580         [51]    = "port boxed open unit",
581         [52]    = "port boxed close unit",
582         [53]    = "port boxed fcp",
583         [54]    = "unit boxed fcp",
584         [55]    = "port access denied ct",
585         [56]    = "port access denied els",
586         [57]    = "port access denied open port",
587         [58]    = "port access denied close physical",
588         [59]    = "unit access denied open unit",
589         [60]    = "shared unit access denied open unit",
590         [61]    = "unit access denied fcp",
591         [62]    = "request timeout",
592         [63]    = "adisc link test reject or timeout",
593         [64]    = "adisc link test d_id changed",
594         [65]    = "adisc link test failed",
595         [66]    = "recovery out of memory",
596         [67]    = "adapter recovery repeated after state change",
597         [68]    = "port recovery repeated after state change",
598         [69]    = "unit recovery repeated after state change",
599         [70]    = "port recovery follow-up after successful adapter recovery",
600         [71]    = "adapter recovery escalation after failed adapter recovery",
601         [72]    = "port recovery follow-up after successful physical port "
602                   "recovery",
603         [73]    = "adapter recovery escalation after failed physical port "
604                   "recovery",
605         [74]    = "unit recovery follow-up after successful port recovery",
606         [75]    = "physical port recovery escalation after failed port "
607                   "recovery",
608         [76]    = "port recovery escalation after failed unit recovery",
609         [77]    = "recovery opening nameserver port",
610         [78]    = "duplicate request id",
611         [79]    = "link down",
612         [80]    = "exclusive read-only unit access unsupported",
613         [81]    = "shared read-write unit access unsupported",
614         [82]    = "incoming rscn",
615         [83]    = "incoming plogi",
616         [84]    = "incoming logo",
617         [85]    = "online",
618         [86]    = "offline",
619         [87]    = "ccw device gone",
620         [88]    = "ccw device no path",
621         [89]    = "ccw device operational",
622         [90]    = "ccw device shutdown",
623         [91]    = "sysfs port addition",
624         [92]    = "sysfs port removal",
625         [93]    = "sysfs adapter recovery",
626         [94]    = "sysfs unit addition",
627         [95]    = "sysfs unit removal",
628         [96]    = "sysfs port recovery",
629         [97]    = "sysfs unit recovery",
630         [98]    = "sequence number mismatch",
631         [99]    = "link up",
632         [100]   = "error state",
633         [101]   = "status read physical port closed",
634         [102]   = "link up status read",
635         [103]   = "too many failed status read buffers",
636         [104]   = "port handle not valid abort",
637         [105]   = "lun handle not valid abort",
638         [106]   = "port handle not valid ct",
639         [107]   = "port handle not valid close port",
640         [108]   = "port handle not valid close physical port",
641         [109]   = "port handle not valid open unit",
642         [110]   = "port handle not valid close unit",
643         [111]   = "lun handle not valid close unit",
644         [112]   = "port handle not valid fcp",
645         [113]   = "lun handle not valid fcp",
646         [114]   = "handle mismatch fcp",
647         [115]   = "lun not valid fcp",
648         [116]   = "qdio send failed",
649         [117]   = "version mismatch",
650         [118]   = "incompatible qtcb type",
651         [119]   = "unknown protocol status",
652         [120]   = "unknown fsf command",
653         [121]   = "no recommendation for status qualifier",
654         [122]   = "status read physical port closed in error",
655         [123]   = "fc service class not supported ct",
656         [124]   = "fc service class not supported els",
657         [125]   = "need newer zfcp",
658         [126]   = "need newer microcode",
659         [127]   = "arbitrated loop not supported",
660         [128]   = "unknown topology",
661         [129]   = "qtcb size mismatch",
662         [130]   = "unknown fsf status ecd",
663         [131]   = "fcp request too big",
664         [132]   = "fc service class not supported fcp",
665         [133]   = "data direction not valid fcp",
666         [134]   = "command length not valid fcp",
667         [135]   = "status read act update",
668         [136]   = "status read cfdc update",
669         [137]   = "hbaapi port open",
670         [138]   = "hbaapi unit open",
671         [139]   = "hbaapi unit shutdown",
672         [140]   = "qdio error",
673         [141]   = "scsi host reset",
674 };
675
676 static int zfcp_rec_dbf_view_format(debug_info_t *id, struct debug_view *view,
677                                     char *buf, const char *_rec)
678 {
679         struct zfcp_rec_dbf_record *r = (struct zfcp_rec_dbf_record *)_rec;
680         char *p = buf;
681
682         zfcp_dbf_outs(&p, "tag", zfcp_rec_dbf_tags[r->id]);
683         zfcp_dbf_outs(&p, "hint", zfcp_rec_dbf_ids[r->id2]);
684         zfcp_dbf_out(&p, "id", "%d", r->id2);
685         switch (r->id) {
686         case ZFCP_REC_DBF_ID_THREAD:
687                 zfcp_dbf_out(&p, "sema", "%d", r->u.thread.sema);
688                 zfcp_dbf_out(&p, "total", "%d", r->u.thread.total);
689                 zfcp_dbf_out(&p, "ready", "%d", r->u.thread.ready);
690                 zfcp_dbf_out(&p, "running", "%d", r->u.thread.running);
691                 break;
692         case ZFCP_REC_DBF_ID_TARGET:
693                 zfcp_dbf_out(&p, "reference", "0x%016Lx", r->u.target.ref);
694                 zfcp_dbf_out(&p, "status", "0x%08x", r->u.target.status);
695                 zfcp_dbf_out(&p, "erp_count", "%d", r->u.target.erp_count);
696                 zfcp_dbf_out(&p, "d_id", "0x%06x", r->u.target.d_id);
697                 zfcp_dbf_out(&p, "wwpn", "0x%016Lx", r->u.target.wwpn);
698                 zfcp_dbf_out(&p, "fcp_lun", "0x%016Lx", r->u.target.fcp_lun);
699                 break;
700         case ZFCP_REC_DBF_ID_TRIGGER:
701                 zfcp_dbf_out(&p, "reference", "0x%016Lx", r->u.trigger.ref);
702                 zfcp_dbf_out(&p, "erp_action", "0x%016Lx", r->u.trigger.action);
703                 zfcp_dbf_out(&p, "requested", "%d", r->u.trigger.want);
704                 zfcp_dbf_out(&p, "executed", "%d", r->u.trigger.need);
705                 zfcp_dbf_out(&p, "wwpn", "0x%016Lx", r->u.trigger.wwpn);
706                 zfcp_dbf_out(&p, "fcp_lun", "0x%016Lx", r->u.trigger.fcp_lun);
707                 zfcp_dbf_out(&p, "adapter_status", "0x%08x", r->u.trigger.as);
708                 zfcp_dbf_out(&p, "port_status", "0x%08x", r->u.trigger.ps);
709                 zfcp_dbf_out(&p, "unit_status", "0x%08x", r->u.trigger.us);
710                 break;
711         }
712         sprintf(p, "\n");
713         return (p - buf) + 1;
714 }
715
716 static struct debug_view zfcp_rec_dbf_view = {
717         "structured",
718         NULL,
719         &zfcp_dbf_view_header,
720         &zfcp_rec_dbf_view_format,
721         NULL,
722         NULL
723 };
724
725 /**
726  * zfcp_rec_dbf_event_thread - trace event related to recovery thread operation
727  * @id2: identifier for event
728  * @adapter: adapter
729  * @lock: non-zero value indicates that erp_lock has not yet been acquired
730  */
731 void zfcp_rec_dbf_event_thread(u8 id2, struct zfcp_adapter *adapter, int lock)
732 {
733         struct zfcp_rec_dbf_record *r = &adapter->rec_dbf_buf;
734         unsigned long flags = 0;
735         struct list_head *entry;
736         unsigned ready = 0, running = 0, total;
737
738         if (lock)
739                 read_lock_irqsave(&adapter->erp_lock, flags);
740         list_for_each(entry, &adapter->erp_ready_head)
741                 ready++;
742         list_for_each(entry, &adapter->erp_running_head)
743                 running++;
744         total = adapter->erp_total_count;
745         if (lock)
746                 read_unlock_irqrestore(&adapter->erp_lock, flags);
747
748         spin_lock_irqsave(&adapter->rec_dbf_lock, flags);
749         memset(r, 0, sizeof(*r));
750         r->id = ZFCP_REC_DBF_ID_THREAD;
751         r->id2 = id2;
752         r->u.thread.sema = atomic_read(&adapter->erp_ready_sem.count);
753         r->u.thread.total = total;
754         r->u.thread.ready = ready;
755         r->u.thread.running = running;
756         debug_event(adapter->rec_dbf, 5, r, sizeof(*r));
757         spin_unlock_irqrestore(&adapter->rec_dbf_lock, flags);
758 }
759
760 static void zfcp_rec_dbf_event_target(u8 id2, u64 ref,
761                                       struct zfcp_adapter *adapter,
762                                       atomic_t *status, atomic_t *erp_count,
763                                       u64 wwpn, u32 d_id, u64 fcp_lun)
764 {
765         struct zfcp_rec_dbf_record *r = &adapter->rec_dbf_buf;
766         unsigned long flags;
767
768         spin_lock_irqsave(&adapter->rec_dbf_lock, flags);
769         memset(r, 0, sizeof(*r));
770         r->id = ZFCP_REC_DBF_ID_TARGET;
771         r->id2 = id2;
772         r->u.target.ref = ref;
773         r->u.target.status = atomic_read(status);
774         r->u.target.wwpn = wwpn;
775         r->u.target.d_id = d_id;
776         r->u.target.fcp_lun = fcp_lun;
777         r->u.target.erp_count = atomic_read(erp_count);
778         debug_event(adapter->rec_dbf, 3, r, sizeof(*r));
779         spin_unlock_irqrestore(&adapter->rec_dbf_lock, flags);
780 }
781
782 /**
783  * zfcp_rec_dbf_event_adapter - trace event for adapter state change
784  * @id: identifier for trigger of state change
785  * @ref: additional reference (e.g. request)
786  * @adapter: adapter
787  */
788 void zfcp_rec_dbf_event_adapter(u8 id, u64 ref, struct zfcp_adapter *adapter)
789 {
790         zfcp_rec_dbf_event_target(id, ref, adapter, &adapter->status,
791                                   &adapter->erp_counter, 0, 0, 0);
792 }
793
794 /**
795  * zfcp_rec_dbf_event_port - trace event for port state change
796  * @id: identifier for trigger of state change
797  * @ref: additional reference (e.g. request)
798  * @port: port
799  */
800 void zfcp_rec_dbf_event_port(u8 id, u64 ref, struct zfcp_port *port)
801 {
802         struct zfcp_adapter *adapter = port->adapter;
803
804         zfcp_rec_dbf_event_target(id, ref, adapter, &port->status,
805                                   &port->erp_counter, port->wwpn, port->d_id,
806                                   0);
807 }
808
809 /**
810  * zfcp_rec_dbf_event_unit - trace event for unit state change
811  * @id: identifier for trigger of state change
812  * @ref: additional reference (e.g. request)
813  * @unit: unit
814  */
815 void zfcp_rec_dbf_event_unit(u8 id, u64 ref, struct zfcp_unit *unit)
816 {
817         struct zfcp_port *port = unit->port;
818         struct zfcp_adapter *adapter = port->adapter;
819
820         zfcp_rec_dbf_event_target(id, ref, adapter, &unit->status,
821                                   &unit->erp_counter, port->wwpn, port->d_id,
822                                   unit->fcp_lun);
823 }
824
825 /**
826  * zfcp_rec_dbf_event_trigger - trace event for triggered error recovery
827  * @id2: identifier for error recovery trigger
828  * @ref: additional reference (e.g. request)
829  * @want: originally requested error recovery action
830  * @need: error recovery action actually initiated
831  * @action: address of error recovery action struct
832  * @adapter: adapter
833  * @port: port
834  * @unit: unit
835  */
836 void zfcp_rec_dbf_event_trigger(u8 id2, u64 ref, u8 want, u8 need, u64 action,
837                                 struct zfcp_adapter *adapter,
838                                 struct zfcp_port *port, struct zfcp_unit *unit)
839 {
840         struct zfcp_rec_dbf_record *r = &adapter->rec_dbf_buf;
841         unsigned long flags;
842
843         spin_lock_irqsave(&adapter->rec_dbf_lock, flags);
844         memset(r, 0, sizeof(*r));
845         r->id = ZFCP_REC_DBF_ID_TRIGGER;
846         r->id2 = id2;
847         r->u.trigger.ref = ref;
848         r->u.trigger.want = want;
849         r->u.trigger.need = need;
850         r->u.trigger.action = action;
851         r->u.trigger.as = atomic_read(&adapter->status);
852         if (port) {
853                 r->u.trigger.ps = atomic_read(&port->status);
854                 r->u.trigger.wwpn = port->wwpn;
855         }
856         if (unit) {
857                 r->u.trigger.us = atomic_read(&unit->status);
858                 r->u.trigger.fcp_lun = unit->fcp_lun;
859         }
860         debug_event(adapter->rec_dbf, action ? 1 : 4, r, sizeof(*r));
861         spin_unlock_irqrestore(&adapter->rec_dbf_lock, flags);
862 }
863
864 static void
865 _zfcp_san_dbf_event_common_ct(const char *tag, struct zfcp_fsf_req *fsf_req,
866                               u32 s_id, u32 d_id, void *buffer, int buflen)
867 {
868         struct zfcp_send_ct *send_ct = (struct zfcp_send_ct *)fsf_req->data;
869         struct zfcp_port *port = send_ct->port;
870         struct zfcp_adapter *adapter = port->adapter;
871         struct ct_hdr *header = (struct ct_hdr *)buffer;
872         struct zfcp_san_dbf_record *rec = &adapter->san_dbf_buf;
873         struct zfcp_san_dbf_record_ct *ct = &rec->type.ct;
874         unsigned long flags;
875
876         spin_lock_irqsave(&adapter->san_dbf_lock, flags);
877         memset(rec, 0, sizeof(struct zfcp_san_dbf_record));
878         strncpy(rec->tag, tag, ZFCP_DBF_TAG_SIZE);
879         rec->fsf_reqid = (unsigned long)fsf_req;
880         rec->fsf_seqno = fsf_req->seq_no;
881         rec->s_id = s_id;
882         rec->d_id = d_id;
883         if (strncmp(tag, "octc", ZFCP_DBF_TAG_SIZE) == 0) {
884                 ct->type.request.cmd_req_code = header->cmd_rsp_code;
885                 ct->type.request.revision = header->revision;
886                 ct->type.request.gs_type = header->gs_type;
887                 ct->type.request.gs_subtype = header->gs_subtype;
888                 ct->type.request.options = header->options;
889                 ct->type.request.max_res_size = header->max_res_size;
890         } else if (strncmp(tag, "rctc", ZFCP_DBF_TAG_SIZE) == 0) {
891                 ct->type.response.cmd_rsp_code = header->cmd_rsp_code;
892                 ct->type.response.revision = header->revision;
893                 ct->type.response.reason_code = header->reason_code;
894                 ct->type.response.reason_code_expl = header->reason_code_expl;
895                 ct->type.response.vendor_unique = header->vendor_unique;
896         }
897         ct->payload_size =
898             min(buflen - (int)sizeof(struct ct_hdr), ZFCP_DBF_CT_PAYLOAD);
899         memcpy(ct->payload, buffer + sizeof(struct ct_hdr), ct->payload_size);
900         debug_event(adapter->san_dbf, 3,
901                     rec, sizeof(struct zfcp_san_dbf_record));
902         spin_unlock_irqrestore(&adapter->san_dbf_lock, flags);
903 }
904
905 void zfcp_san_dbf_event_ct_request(struct zfcp_fsf_req *fsf_req)
906 {
907         struct zfcp_send_ct *ct = (struct zfcp_send_ct *)fsf_req->data;
908         struct zfcp_port *port = ct->port;
909         struct zfcp_adapter *adapter = port->adapter;
910
911         _zfcp_san_dbf_event_common_ct("octc", fsf_req,
912                                       fc_host_port_id(adapter->scsi_host),
913                                       port->d_id, zfcp_sg_to_address(ct->req),
914                                       ct->req->length);
915 }
916
917 void zfcp_san_dbf_event_ct_response(struct zfcp_fsf_req *fsf_req)
918 {
919         struct zfcp_send_ct *ct = (struct zfcp_send_ct *)fsf_req->data;
920         struct zfcp_port *port = ct->port;
921         struct zfcp_adapter *adapter = port->adapter;
922
923         _zfcp_san_dbf_event_common_ct("rctc", fsf_req, port->d_id,
924                                       fc_host_port_id(adapter->scsi_host),
925                                       zfcp_sg_to_address(ct->resp),
926                                       ct->resp->length);
927 }
928
929 static void
930 _zfcp_san_dbf_event_common_els(const char *tag, int level,
931                                struct zfcp_fsf_req *fsf_req, u32 s_id,
932                                u32 d_id, u8 ls_code, void *buffer, int buflen)
933 {
934         struct zfcp_adapter *adapter = fsf_req->adapter;
935         struct zfcp_san_dbf_record *rec = &adapter->san_dbf_buf;
936         unsigned long flags;
937
938         spin_lock_irqsave(&adapter->san_dbf_lock, flags);
939         memset(rec, 0, sizeof(struct zfcp_san_dbf_record));
940         strncpy(rec->tag, tag, ZFCP_DBF_TAG_SIZE);
941         rec->fsf_reqid = (unsigned long)fsf_req;
942         rec->fsf_seqno = fsf_req->seq_no;
943         rec->s_id = s_id;
944         rec->d_id = d_id;
945         rec->type.els.ls_code = ls_code;
946         debug_event(adapter->san_dbf, level, rec, sizeof(*rec));
947         zfcp_dbf_hexdump(adapter->san_dbf, rec, sizeof(*rec), level,
948                          buffer, min(buflen, ZFCP_DBF_ELS_MAX_PAYLOAD));
949         spin_unlock_irqrestore(&adapter->san_dbf_lock, flags);
950 }
951
952 void zfcp_san_dbf_event_els_request(struct zfcp_fsf_req *fsf_req)
953 {
954         struct zfcp_send_els *els = (struct zfcp_send_els *)fsf_req->data;
955
956         _zfcp_san_dbf_event_common_els("oels", 2, fsf_req,
957                                        fc_host_port_id(els->adapter->scsi_host),
958                                        els->d_id,
959                                        *(u8 *) zfcp_sg_to_address(els->req),
960                                        zfcp_sg_to_address(els->req),
961                                        els->req->length);
962 }
963
964 void zfcp_san_dbf_event_els_response(struct zfcp_fsf_req *fsf_req)
965 {
966         struct zfcp_send_els *els = (struct zfcp_send_els *)fsf_req->data;
967
968         _zfcp_san_dbf_event_common_els("rels", 2, fsf_req, els->d_id,
969                                        fc_host_port_id(els->adapter->scsi_host),
970                                        *(u8 *) zfcp_sg_to_address(els->req),
971                                        zfcp_sg_to_address(els->resp),
972                                        els->resp->length);
973 }
974
975 void zfcp_san_dbf_event_incoming_els(struct zfcp_fsf_req *fsf_req)
976 {
977         struct zfcp_adapter *adapter = fsf_req->adapter;
978         struct fsf_status_read_buffer *status_buffer =
979             (struct fsf_status_read_buffer *)fsf_req->data;
980         int length = (int)status_buffer->length -
981             (int)((void *)&status_buffer->payload - (void *)status_buffer);
982
983         _zfcp_san_dbf_event_common_els("iels", 1, fsf_req, status_buffer->d_id,
984                                        fc_host_port_id(adapter->scsi_host),
985                                        *(u8 *) status_buffer->payload,
986                                        (void *)status_buffer->payload, length);
987 }
988
989 static int
990 zfcp_san_dbf_view_format(debug_info_t * id, struct debug_view *view,
991                          char *out_buf, const char *in_buf)
992 {
993         struct zfcp_san_dbf_record *rec = (struct zfcp_san_dbf_record *)in_buf;
994         char *buffer = NULL;
995         int buflen = 0, total = 0;
996         int len = 0;
997
998         if (strncmp(rec->tag, "dump", ZFCP_DBF_TAG_SIZE) == 0)
999                 return 0;
1000
1001         len += zfcp_dbf_tag(out_buf + len, "tag", rec->tag);
1002         len += zfcp_dbf_view(out_buf + len, "fsf_reqid", "0x%0Lx",
1003                              rec->fsf_reqid);
1004         len += zfcp_dbf_view(out_buf + len, "fsf_seqno", "0x%08x",
1005                              rec->fsf_seqno);
1006         len += zfcp_dbf_view(out_buf + len, "s_id", "0x%06x", rec->s_id);
1007         len += zfcp_dbf_view(out_buf + len, "d_id", "0x%06x", rec->d_id);
1008
1009         if (strncmp(rec->tag, "octc", ZFCP_DBF_TAG_SIZE) == 0) {
1010                 len += zfcp_dbf_view(out_buf + len, "cmd_req_code", "0x%04x",
1011                                      rec->type.ct.type.request.cmd_req_code);
1012                 len += zfcp_dbf_view(out_buf + len, "revision", "0x%02x",
1013                                      rec->type.ct.type.request.revision);
1014                 len += zfcp_dbf_view(out_buf + len, "gs_type", "0x%02x",
1015                                      rec->type.ct.type.request.gs_type);
1016                 len += zfcp_dbf_view(out_buf + len, "gs_subtype", "0x%02x",
1017                                      rec->type.ct.type.request.gs_subtype);
1018                 len += zfcp_dbf_view(out_buf + len, "options", "0x%02x",
1019                                      rec->type.ct.type.request.options);
1020                 len += zfcp_dbf_view(out_buf + len, "max_res_size", "0x%04x",
1021                                      rec->type.ct.type.request.max_res_size);
1022                 total = rec->type.ct.payload_size;
1023                 buffer = rec->type.ct.payload;
1024                 buflen = min(total, ZFCP_DBF_CT_PAYLOAD);
1025         } else if (strncmp(rec->tag, "rctc", ZFCP_DBF_TAG_SIZE) == 0) {
1026                 len += zfcp_dbf_view(out_buf + len, "cmd_rsp_code", "0x%04x",
1027                                      rec->type.ct.type.response.cmd_rsp_code);
1028                 len += zfcp_dbf_view(out_buf + len, "revision", "0x%02x",
1029                                      rec->type.ct.type.response.revision);
1030                 len += zfcp_dbf_view(out_buf + len, "reason_code", "0x%02x",
1031                                      rec->type.ct.type.response.reason_code);
1032                 len +=
1033                     zfcp_dbf_view(out_buf + len, "reason_code_expl", "0x%02x",
1034                                   rec->type.ct.type.response.reason_code_expl);
1035                 len +=
1036                     zfcp_dbf_view(out_buf + len, "vendor_unique", "0x%02x",
1037                                   rec->type.ct.type.response.vendor_unique);
1038                 total = rec->type.ct.payload_size;
1039                 buffer = rec->type.ct.payload;
1040                 buflen = min(total, ZFCP_DBF_CT_PAYLOAD);
1041         } else if (strncmp(rec->tag, "oels", ZFCP_DBF_TAG_SIZE) == 0 ||
1042                    strncmp(rec->tag, "rels", ZFCP_DBF_TAG_SIZE) == 0 ||
1043                    strncmp(rec->tag, "iels", ZFCP_DBF_TAG_SIZE) == 0) {
1044                 len += zfcp_dbf_view(out_buf + len, "ls_code", "0x%02x",
1045                                      rec->type.els.ls_code);
1046                 total = rec->type.els.payload_size;
1047                 buffer = rec->type.els.payload;
1048                 buflen = min(total, ZFCP_DBF_ELS_PAYLOAD);
1049         }
1050
1051         len += zfcp_dbf_view_dump(out_buf + len, "payload",
1052                                   buffer, buflen, 0, total);
1053
1054         if (buflen == total)
1055                 len += sprintf(out_buf + len, "\n");
1056
1057         return len;
1058 }
1059
1060 static struct debug_view zfcp_san_dbf_view = {
1061         "structured",
1062         NULL,
1063         &zfcp_dbf_view_header,
1064         &zfcp_san_dbf_view_format,
1065         NULL,
1066         NULL
1067 };
1068
1069 static void
1070 _zfcp_scsi_dbf_event_common(const char *tag, const char *tag2, int level,
1071                             struct zfcp_adapter *adapter,
1072                             struct scsi_cmnd *scsi_cmnd,
1073                             struct zfcp_fsf_req *fsf_req,
1074                             unsigned long old_req_id)
1075 {
1076         struct zfcp_scsi_dbf_record *rec = &adapter->scsi_dbf_buf;
1077         struct zfcp_dbf_dump *dump = (struct zfcp_dbf_dump *)rec;
1078         unsigned long flags;
1079         struct fcp_rsp_iu *fcp_rsp;
1080         char *fcp_rsp_info = NULL, *fcp_sns_info = NULL;
1081         int offset = 0, buflen = 0;
1082
1083         spin_lock_irqsave(&adapter->scsi_dbf_lock, flags);
1084         do {
1085                 memset(rec, 0, sizeof(struct zfcp_scsi_dbf_record));
1086                 if (offset == 0) {
1087                         strncpy(rec->tag, tag, ZFCP_DBF_TAG_SIZE);
1088                         strncpy(rec->tag2, tag2, ZFCP_DBF_TAG_SIZE);
1089                         if (scsi_cmnd != NULL) {
1090                                 if (scsi_cmnd->device) {
1091                                         rec->scsi_id = scsi_cmnd->device->id;
1092                                         rec->scsi_lun = scsi_cmnd->device->lun;
1093                                 }
1094                                 rec->scsi_result = scsi_cmnd->result;
1095                                 rec->scsi_cmnd = (unsigned long)scsi_cmnd;
1096                                 rec->scsi_serial = scsi_cmnd->serial_number;
1097                                 memcpy(rec->scsi_opcode, &scsi_cmnd->cmnd,
1098                                         min((int)scsi_cmnd->cmd_len,
1099                                                 ZFCP_DBF_SCSI_OPCODE));
1100                                 rec->scsi_retries = scsi_cmnd->retries;
1101                                 rec->scsi_allowed = scsi_cmnd->allowed;
1102                         }
1103                         if (fsf_req != NULL) {
1104                                 fcp_rsp = (struct fcp_rsp_iu *)
1105                                     &(fsf_req->qtcb->bottom.io.fcp_rsp);
1106                                 fcp_rsp_info =
1107                                     zfcp_get_fcp_rsp_info_ptr(fcp_rsp);
1108                                 fcp_sns_info =
1109                                     zfcp_get_fcp_sns_info_ptr(fcp_rsp);
1110
1111                                 rec->type.fcp.rsp_validity =
1112                                     fcp_rsp->validity.value;
1113                                 rec->type.fcp.rsp_scsi_status =
1114                                     fcp_rsp->scsi_status;
1115                                 rec->type.fcp.rsp_resid = fcp_rsp->fcp_resid;
1116                                 if (fcp_rsp->validity.bits.fcp_rsp_len_valid)
1117                                         rec->type.fcp.rsp_code =
1118                                             *(fcp_rsp_info + 3);
1119                                 if (fcp_rsp->validity.bits.fcp_sns_len_valid) {
1120                                         buflen = min((int)fcp_rsp->fcp_sns_len,
1121                                                      ZFCP_DBF_SCSI_MAX_FCP_SNS_INFO);
1122                                         rec->type.fcp.sns_info_len = buflen;
1123                                         memcpy(rec->type.fcp.sns_info,
1124                                                fcp_sns_info,
1125                                                min(buflen,
1126                                                    ZFCP_DBF_SCSI_FCP_SNS_INFO));
1127                                         offset += min(buflen,
1128                                                       ZFCP_DBF_SCSI_FCP_SNS_INFO);
1129                                 }
1130
1131                                 rec->fsf_reqid = (unsigned long)fsf_req;
1132                                 rec->fsf_seqno = fsf_req->seq_no;
1133                                 rec->fsf_issued = fsf_req->issued;
1134                         }
1135                         rec->type.old_fsf_reqid = old_req_id;
1136                 } else {
1137                         strncpy(dump->tag, "dump", ZFCP_DBF_TAG_SIZE);
1138                         dump->total_size = buflen;
1139                         dump->offset = offset;
1140                         dump->size = min(buflen - offset,
1141                                          (int)sizeof(struct
1142                                                      zfcp_scsi_dbf_record) -
1143                                          (int)sizeof(struct zfcp_dbf_dump));
1144                         memcpy(dump->data, fcp_sns_info + offset, dump->size);
1145                         offset += dump->size;
1146                 }
1147                 debug_event(adapter->scsi_dbf, level,
1148                             rec, sizeof(struct zfcp_scsi_dbf_record));
1149         } while (offset < buflen);
1150         spin_unlock_irqrestore(&adapter->scsi_dbf_lock, flags);
1151 }
1152
1153 void
1154 zfcp_scsi_dbf_event_result(const char *tag, int level,
1155                            struct zfcp_adapter *adapter,
1156                            struct scsi_cmnd *scsi_cmnd,
1157                            struct zfcp_fsf_req *fsf_req)
1158 {
1159         _zfcp_scsi_dbf_event_common("rslt", tag, level,
1160                         adapter, scsi_cmnd, fsf_req, 0);
1161 }
1162
1163 void
1164 zfcp_scsi_dbf_event_abort(const char *tag, struct zfcp_adapter *adapter,
1165                           struct scsi_cmnd *scsi_cmnd,
1166                           struct zfcp_fsf_req *new_fsf_req,
1167                           unsigned long old_req_id)
1168 {
1169         _zfcp_scsi_dbf_event_common("abrt", tag, 1,
1170                         adapter, scsi_cmnd, new_fsf_req, old_req_id);
1171 }
1172
1173 void
1174 zfcp_scsi_dbf_event_devreset(const char *tag, u8 flag, struct zfcp_unit *unit,
1175                              struct scsi_cmnd *scsi_cmnd)
1176 {
1177         struct zfcp_adapter *adapter = unit->port->adapter;
1178
1179         _zfcp_scsi_dbf_event_common(flag == FCP_TARGET_RESET ? "trst" : "lrst",
1180                         tag, 1, adapter, scsi_cmnd, NULL, 0);
1181 }
1182
1183 static int
1184 zfcp_scsi_dbf_view_format(debug_info_t * id, struct debug_view *view,
1185                           char *out_buf, const char *in_buf)
1186 {
1187         struct zfcp_scsi_dbf_record *rec =
1188             (struct zfcp_scsi_dbf_record *)in_buf;
1189         int len = 0;
1190
1191         if (strncmp(rec->tag, "dump", ZFCP_DBF_TAG_SIZE) == 0)
1192                 return 0;
1193
1194         len += zfcp_dbf_tag(out_buf + len, "tag", rec->tag);
1195         len += zfcp_dbf_tag(out_buf + len, "tag2", rec->tag2);
1196         len += zfcp_dbf_view(out_buf + len, "scsi_id", "0x%08x", rec->scsi_id);
1197         len += zfcp_dbf_view(out_buf + len, "scsi_lun", "0x%08x",
1198                              rec->scsi_lun);
1199         len += zfcp_dbf_view(out_buf + len, "scsi_result", "0x%08x",
1200                              rec->scsi_result);
1201         len += zfcp_dbf_view(out_buf + len, "scsi_cmnd", "0x%0Lx",
1202                              rec->scsi_cmnd);
1203         len += zfcp_dbf_view(out_buf + len, "scsi_serial", "0x%016Lx",
1204                              rec->scsi_serial);
1205         len += zfcp_dbf_view_dump(out_buf + len, "scsi_opcode",
1206                                   rec->scsi_opcode,
1207                                   ZFCP_DBF_SCSI_OPCODE,
1208                                   0, ZFCP_DBF_SCSI_OPCODE);
1209         len += zfcp_dbf_view(out_buf + len, "scsi_retries", "0x%02x",
1210                              rec->scsi_retries);
1211         len += zfcp_dbf_view(out_buf + len, "scsi_allowed", "0x%02x",
1212                              rec->scsi_allowed);
1213         if (strncmp(rec->tag, "abrt", ZFCP_DBF_TAG_SIZE) == 0) {
1214                 len += zfcp_dbf_view(out_buf + len, "old_fsf_reqid", "0x%0Lx",
1215                                      rec->type.old_fsf_reqid);
1216         }
1217         len += zfcp_dbf_view(out_buf + len, "fsf_reqid", "0x%0Lx",
1218                              rec->fsf_reqid);
1219         len += zfcp_dbf_view(out_buf + len, "fsf_seqno", "0x%08x",
1220                              rec->fsf_seqno);
1221         len += zfcp_dbf_stck(out_buf + len, "fsf_issued", rec->fsf_issued);
1222         if (strncmp(rec->tag, "rslt", ZFCP_DBF_TAG_SIZE) == 0) {
1223                 len +=
1224                     zfcp_dbf_view(out_buf + len, "fcp_rsp_validity", "0x%02x",
1225                                   rec->type.fcp.rsp_validity);
1226                 len +=
1227                     zfcp_dbf_view(out_buf + len, "fcp_rsp_scsi_status",
1228                                   "0x%02x", rec->type.fcp.rsp_scsi_status);
1229                 len +=
1230                     zfcp_dbf_view(out_buf + len, "fcp_rsp_resid", "0x%08x",
1231                                   rec->type.fcp.rsp_resid);
1232                 len +=
1233                     zfcp_dbf_view(out_buf + len, "fcp_rsp_code", "0x%08x",
1234                                   rec->type.fcp.rsp_code);
1235                 len +=
1236                     zfcp_dbf_view(out_buf + len, "fcp_sns_info_len", "0x%08x",
1237                                   rec->type.fcp.sns_info_len);
1238                 len +=
1239                     zfcp_dbf_view_dump(out_buf + len, "fcp_sns_info",
1240                                        rec->type.fcp.sns_info,
1241                                        min((int)rec->type.fcp.sns_info_len,
1242                                            ZFCP_DBF_SCSI_FCP_SNS_INFO), 0,
1243                                        rec->type.fcp.sns_info_len);
1244         }
1245
1246         len += sprintf(out_buf + len, "\n");
1247
1248         return len;
1249 }
1250
1251 static struct debug_view zfcp_scsi_dbf_view = {
1252         "structured",
1253         NULL,
1254         &zfcp_dbf_view_header,
1255         &zfcp_scsi_dbf_view_format,
1256         NULL,
1257         NULL
1258 };
1259
1260 /**
1261  * zfcp_adapter_debug_register - registers debug feature for an adapter
1262  * @adapter: pointer to adapter for which debug features should be registered
1263  * return: -ENOMEM on error, 0 otherwise
1264  */
1265 int zfcp_adapter_debug_register(struct zfcp_adapter *adapter)
1266 {
1267         char dbf_name[DEBUG_MAX_NAME_LEN];
1268
1269         /* debug feature area which records recovery activity */
1270         sprintf(dbf_name, "zfcp_%s_erp", zfcp_get_busid_by_adapter(adapter));
1271         adapter->erp_dbf = debug_register(dbf_name, dbfsize, 2,
1272                                           sizeof(struct zfcp_erp_dbf_record));
1273         if (!adapter->erp_dbf)
1274                 goto failed;
1275         debug_register_view(adapter->erp_dbf, &debug_hex_ascii_view);
1276         debug_set_level(adapter->erp_dbf, 3);
1277
1278         /* debug feature area which records recovery activity */
1279         sprintf(dbf_name, "zfcp_%s_rec", zfcp_get_busid_by_adapter(adapter));
1280         adapter->rec_dbf = debug_register(dbf_name, dbfsize, 1,
1281                                           sizeof(struct zfcp_rec_dbf_record));
1282         if (!adapter->rec_dbf)
1283                 goto failed;
1284         debug_register_view(adapter->rec_dbf, &debug_hex_ascii_view);
1285         debug_register_view(adapter->rec_dbf, &zfcp_rec_dbf_view);
1286         debug_set_level(adapter->rec_dbf, 3);
1287
1288         /* debug feature area which records HBA (FSF and QDIO) conditions */
1289         sprintf(dbf_name, "zfcp_%s_hba", zfcp_get_busid_by_adapter(adapter));
1290         adapter->hba_dbf = debug_register(dbf_name, dbfsize, 1,
1291                                           sizeof(struct zfcp_hba_dbf_record));
1292         if (!adapter->hba_dbf)
1293                 goto failed;
1294         debug_register_view(adapter->hba_dbf, &debug_hex_ascii_view);
1295         debug_register_view(adapter->hba_dbf, &zfcp_hba_dbf_view);
1296         debug_set_level(adapter->hba_dbf, 3);
1297
1298         /* debug feature area which records SAN command failures and recovery */
1299         sprintf(dbf_name, "zfcp_%s_san", zfcp_get_busid_by_adapter(adapter));
1300         adapter->san_dbf = debug_register(dbf_name, dbfsize, 1,
1301                                           sizeof(struct zfcp_san_dbf_record));
1302         if (!adapter->san_dbf)
1303                 goto failed;
1304         debug_register_view(adapter->san_dbf, &debug_hex_ascii_view);
1305         debug_register_view(adapter->san_dbf, &zfcp_san_dbf_view);
1306         debug_set_level(adapter->san_dbf, 6);
1307
1308         /* debug feature area which records SCSI command failures and recovery */
1309         sprintf(dbf_name, "zfcp_%s_scsi", zfcp_get_busid_by_adapter(adapter));
1310         adapter->scsi_dbf = debug_register(dbf_name, dbfsize, 1,
1311                                            sizeof(struct zfcp_scsi_dbf_record));
1312         if (!adapter->scsi_dbf)
1313                 goto failed;
1314         debug_register_view(adapter->scsi_dbf, &debug_hex_ascii_view);
1315         debug_register_view(adapter->scsi_dbf, &zfcp_scsi_dbf_view);
1316         debug_set_level(adapter->scsi_dbf, 3);
1317
1318         return 0;
1319
1320  failed:
1321         zfcp_adapter_debug_unregister(adapter);
1322
1323         return -ENOMEM;
1324 }
1325
1326 /**
1327  * zfcp_adapter_debug_unregister - unregisters debug feature for an adapter
1328  * @adapter: pointer to adapter for which debug features should be unregistered
1329  */
1330 void zfcp_adapter_debug_unregister(struct zfcp_adapter *adapter)
1331 {
1332         debug_unregister(adapter->scsi_dbf);
1333         debug_unregister(adapter->san_dbf);
1334         debug_unregister(adapter->hba_dbf);
1335         debug_unregister(adapter->rec_dbf);
1336         debug_unregister(adapter->erp_dbf);
1337         adapter->scsi_dbf = NULL;
1338         adapter->san_dbf = NULL;
1339         adapter->hba_dbf = NULL;
1340         adapter->rec_dbf = NULL;
1341         adapter->erp_dbf = NULL;
1342 }
1343
1344 #undef ZFCP_LOG_AREA