zfcp_fsf.c 69.5 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
C
Christof Schmitt 已提交
2
 * zfcp device driver
L
Linus Torvalds 已提交
3
 *
C
Christof Schmitt 已提交
4
 * Implementation of FSF commands.
L
Linus Torvalds 已提交
5
 *
6
 * Copyright IBM Corporation 2002, 2010
L
Linus Torvalds 已提交
7 8
 */

9 10 11
#define KMSG_COMPONENT "zfcp"
#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt

S
Stefan Raspl 已提交
12
#include <linux/blktrace_api.h>
13
#include <linux/slab.h>
14
#include <scsi/fc/fc_els.h>
L
Linus Torvalds 已提交
15
#include "zfcp_ext.h"
16
#include "zfcp_fc.h"
17
#include "zfcp_dbf.h"
18
#include "zfcp_qdio.h"
19
#include "zfcp_reqlist.h"
L
Linus Torvalds 已提交
20

21 22 23
static void zfcp_fsf_request_timeout_handler(unsigned long data)
{
	struct zfcp_adapter *adapter = (struct zfcp_adapter *) data;
24
	zfcp_qdio_siosl(adapter);
25 26
	zfcp_erp_adapter_reopen(adapter, ZFCP_STATUS_COMMON_ERP_FAILED,
				"fsrth_1", NULL);
27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46
}

static void zfcp_fsf_start_timer(struct zfcp_fsf_req *fsf_req,
				 unsigned long timeout)
{
	fsf_req->timer.function = zfcp_fsf_request_timeout_handler;
	fsf_req->timer.data = (unsigned long) fsf_req->adapter;
	fsf_req->timer.expires = jiffies + timeout;
	add_timer(&fsf_req->timer);
}

static void zfcp_fsf_start_erp_timer(struct zfcp_fsf_req *fsf_req)
{
	BUG_ON(!fsf_req->erp_action);
	fsf_req->timer.function = zfcp_erp_timeout_handler;
	fsf_req->timer.data = (unsigned long) fsf_req->erp_action;
	fsf_req->timer.expires = jiffies + 30 * HZ;
	add_timer(&fsf_req->timer);
}

L
Linus Torvalds 已提交
47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
/* association between FSF command and FSF QTCB type */
static u32 fsf_qtcb_type[] = {
	[FSF_QTCB_FCP_CMND] =             FSF_IO_COMMAND,
	[FSF_QTCB_ABORT_FCP_CMND] =       FSF_SUPPORT_COMMAND,
	[FSF_QTCB_OPEN_PORT_WITH_DID] =   FSF_SUPPORT_COMMAND,
	[FSF_QTCB_OPEN_LUN] =             FSF_SUPPORT_COMMAND,
	[FSF_QTCB_CLOSE_LUN] =            FSF_SUPPORT_COMMAND,
	[FSF_QTCB_CLOSE_PORT] =           FSF_SUPPORT_COMMAND,
	[FSF_QTCB_CLOSE_PHYSICAL_PORT] =  FSF_SUPPORT_COMMAND,
	[FSF_QTCB_SEND_ELS] =             FSF_SUPPORT_COMMAND,
	[FSF_QTCB_SEND_GENERIC] =         FSF_SUPPORT_COMMAND,
	[FSF_QTCB_EXCHANGE_CONFIG_DATA] = FSF_CONFIG_COMMAND,
	[FSF_QTCB_EXCHANGE_PORT_DATA] =   FSF_PORT_COMMAND,
	[FSF_QTCB_DOWNLOAD_CONTROL_FILE] = FSF_SUPPORT_COMMAND,
	[FSF_QTCB_UPLOAD_CONTROL_FILE] =  FSF_SUPPORT_COMMAND
};

C
Christof Schmitt 已提交
64 65
static void zfcp_act_eval_err(struct zfcp_adapter *adapter, u32 table)
{
S
Swen Schillig 已提交
66
	u16 subtable = table >> 16;
C
Christof Schmitt 已提交
67
	u16 rule = table & 0xffff;
68
	const char *act_type[] = { "unknown", "OS", "WWPN", "DID", "LUN" };
C
Christof Schmitt 已提交
69

70
	if (subtable && subtable < ARRAY_SIZE(act_type))
C
Christof Schmitt 已提交
71
		dev_warn(&adapter->ccw_device->dev,
72 73
			 "Access denied according to ACT rule type %s, "
			 "rule %d\n", act_type[subtable], rule);
C
Christof Schmitt 已提交
74 75 76 77 78 79 80
}

static void zfcp_fsf_access_denied_port(struct zfcp_fsf_req *req,
					struct zfcp_port *port)
{
	struct fsf_qtcb_header *header = &req->qtcb->header;
	dev_warn(&req->adapter->ccw_device->dev,
81
		 "Access denied to port 0x%016Lx\n",
82
		 (unsigned long long)port->wwpn);
C
Christof Schmitt 已提交
83 84
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[0]);
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[1]);
85
	zfcp_erp_port_access_denied(port, "fspad_1", req);
C
Christof Schmitt 已提交
86 87 88
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
}

89 90
static void zfcp_fsf_access_denied_lun(struct zfcp_fsf_req *req,
				       struct scsi_device *sdev)
C
Christof Schmitt 已提交
91
{
92 93
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);

C
Christof Schmitt 已提交
94 95
	struct fsf_qtcb_header *header = &req->qtcb->header;
	dev_warn(&req->adapter->ccw_device->dev,
96 97 98
		 "Access denied to LUN 0x%016Lx on port 0x%016Lx\n",
		 (unsigned long long)zfcp_scsi_dev_lun(sdev),
		 (unsigned long long)zfcp_sdev->port->wwpn);
C
Christof Schmitt 已提交
99 100
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[0]);
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[1]);
101
	zfcp_erp_lun_access_denied(sdev, "fsadl_1", req);
C
Christof Schmitt 已提交
102 103 104 105 106
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
}

static void zfcp_fsf_class_not_supp(struct zfcp_fsf_req *req)
{
107 108
	dev_err(&req->adapter->ccw_device->dev, "FCP device not "
		"operational because of an unsupported FC class\n");
109
	zfcp_erp_adapter_shutdown(req->adapter, 0, "fscns_1", req);
C
Christof Schmitt 已提交
110 111 112
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
}

S
Swen Schillig 已提交
113 114 115
/**
 * zfcp_fsf_req_free - free memory used by fsf request
 * @fsf_req: pointer to struct zfcp_fsf_req
L
Linus Torvalds 已提交
116
 */
S
Swen Schillig 已提交
117
void zfcp_fsf_req_free(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
118
{
S
Swen Schillig 已提交
119
	if (likely(req->pool)) {
120 121
		if (likely(req->qtcb))
			mempool_free(req->qtcb, req->adapter->pool.qtcb_pool);
S
Swen Schillig 已提交
122
		mempool_free(req, req->pool);
123 124 125
		return;
	}

126 127 128
	if (likely(req->qtcb))
		kmem_cache_free(zfcp_data.qtcb_cache, req->qtcb);
	kfree(req);
L
Linus Torvalds 已提交
129 130
}

S
Swen Schillig 已提交
131
static void zfcp_fsf_status_read_port_closed(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
132
{
133
	unsigned long flags;
S
Swen Schillig 已提交
134 135 136
	struct fsf_status_read_buffer *sr_buf = req->data;
	struct zfcp_adapter *adapter = req->adapter;
	struct zfcp_port *port;
137
	int d_id = ntoh24(sr_buf->d_id);
L
Linus Torvalds 已提交
138

139 140
	read_lock_irqsave(&adapter->port_list_lock, flags);
	list_for_each_entry(port, &adapter->port_list, list)
S
Swen Schillig 已提交
141
		if (port->d_id == d_id) {
142
			zfcp_erp_port_reopen(port, 0, "fssrpc1", req);
143
			break;
S
Swen Schillig 已提交
144
		}
145
	read_unlock_irqrestore(&adapter->port_list_lock, flags);
L
Linus Torvalds 已提交
146 147
}

148
static void zfcp_fsf_link_down_info_eval(struct zfcp_fsf_req *req, char *id,
S
Swen Schillig 已提交
149
					 struct fsf_link_down_info *link_down)
150
{
S
Swen Schillig 已提交
151
	struct zfcp_adapter *adapter = req->adapter;
152

S
Swen Schillig 已提交
153
	if (atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED)
154 155 156
		return;

	atomic_set_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED, &adapter->status);
157

158
	zfcp_scsi_schedule_rports_block(adapter);
159

S
Swen Schillig 已提交
160
	if (!link_down)
161
		goto out;
162

163 164
	switch (link_down->error_code) {
	case FSF_PSQ_LINK_NO_LIGHT:
S
Swen Schillig 已提交
165
		dev_warn(&req->adapter->ccw_device->dev,
166 167
			 "There is no light signal from the local "
			 "fibre channel cable\n");
168 169
		break;
	case FSF_PSQ_LINK_WRAP_PLUG:
S
Swen Schillig 已提交
170
		dev_warn(&req->adapter->ccw_device->dev,
171 172
			 "There is a wrap plug instead of a fibre "
			 "channel cable\n");
173 174
		break;
	case FSF_PSQ_LINK_NO_FCP:
S
Swen Schillig 已提交
175
		dev_warn(&req->adapter->ccw_device->dev,
176 177
			 "The adjacent fibre channel node does not "
			 "support FCP\n");
178 179
		break;
	case FSF_PSQ_LINK_FIRMWARE_UPDATE:
S
Swen Schillig 已提交
180
		dev_warn(&req->adapter->ccw_device->dev,
181 182
			 "The FCP device is suspended because of a "
			 "firmware update\n");
C
Christof Schmitt 已提交
183
		break;
184
	case FSF_PSQ_LINK_INVALID_WWPN:
S
Swen Schillig 已提交
185
		dev_warn(&req->adapter->ccw_device->dev,
186 187
			 "The FCP device detected a WWPN that is "
			 "duplicate or not valid\n");
188 189
		break;
	case FSF_PSQ_LINK_NO_NPIV_SUPPORT:
S
Swen Schillig 已提交
190
		dev_warn(&req->adapter->ccw_device->dev,
191
			 "The fibre channel fabric does not support NPIV\n");
192 193
		break;
	case FSF_PSQ_LINK_NO_FCP_RESOURCES:
S
Swen Schillig 已提交
194
		dev_warn(&req->adapter->ccw_device->dev,
195
			 "The FCP adapter cannot support more NPIV ports\n");
196 197
		break;
	case FSF_PSQ_LINK_NO_FABRIC_RESOURCES:
S
Swen Schillig 已提交
198
		dev_warn(&req->adapter->ccw_device->dev,
199 200
			 "The adjacent switch cannot support "
			 "more NPIV ports\n");
201 202
		break;
	case FSF_PSQ_LINK_FABRIC_LOGIN_UNABLE:
S
Swen Schillig 已提交
203
		dev_warn(&req->adapter->ccw_device->dev,
204 205
			 "The FCP adapter could not log in to the "
			 "fibre channel fabric\n");
206 207
		break;
	case FSF_PSQ_LINK_WWPN_ASSIGNMENT_CORRUPTED:
S
Swen Schillig 已提交
208
		dev_warn(&req->adapter->ccw_device->dev,
209 210
			 "The WWPN assignment file on the FCP adapter "
			 "has been damaged\n");
211 212
		break;
	case FSF_PSQ_LINK_MODE_TABLE_CURRUPTED:
S
Swen Schillig 已提交
213
		dev_warn(&req->adapter->ccw_device->dev,
214 215
			 "The mode table on the FCP adapter "
			 "has been damaged\n");
216 217
		break;
	case FSF_PSQ_LINK_NO_WWPN_ASSIGNMENT:
S
Swen Schillig 已提交
218
		dev_warn(&req->adapter->ccw_device->dev,
219 220
			 "All NPIV ports on the FCP adapter have "
			 "been assigned\n");
221 222
		break;
	default:
S
Swen Schillig 已提交
223
		dev_warn(&req->adapter->ccw_device->dev,
224 225
			 "The link between the FCP adapter and "
			 "the FC fabric is down\n");
226
	}
S
Swen Schillig 已提交
227 228
out:
	zfcp_erp_adapter_failed(adapter, id, req);
229 230
}

S
Swen Schillig 已提交
231
static void zfcp_fsf_status_read_link_down(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
232
{
S
Swen Schillig 已提交
233 234 235
	struct fsf_status_read_buffer *sr_buf = req->data;
	struct fsf_link_down_info *ldi =
		(struct fsf_link_down_info *) &sr_buf->payload;
L
Linus Torvalds 已提交
236

S
Swen Schillig 已提交
237 238
	switch (sr_buf->status_subtype) {
	case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
239
		zfcp_fsf_link_down_info_eval(req, "fssrld1", ldi);
L
Linus Torvalds 已提交
240
		break;
S
Swen Schillig 已提交
241
	case FSF_STATUS_READ_SUB_FDISC_FAILED:
242
		zfcp_fsf_link_down_info_eval(req, "fssrld2", ldi);
L
Linus Torvalds 已提交
243
		break;
S
Swen Schillig 已提交
244
	case FSF_STATUS_READ_SUB_FIRMWARE_UPDATE:
245
		zfcp_fsf_link_down_info_eval(req, "fssrld3", NULL);
S
Swen Schillig 已提交
246 247
	};
}
L
Linus Torvalds 已提交
248

S
Swen Schillig 已提交
249 250 251 252
static void zfcp_fsf_status_read_handler(struct zfcp_fsf_req *req)
{
	struct zfcp_adapter *adapter = req->adapter;
	struct fsf_status_read_buffer *sr_buf = req->data;
L
Linus Torvalds 已提交
253

S
Swen Schillig 已提交
254
	if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
S
Swen Schillig 已提交
255
		zfcp_dbf_hba_fsf_unsol("dism", adapter->dbf, sr_buf);
256
		mempool_free(sr_buf, adapter->pool.status_read_data);
S
Swen Schillig 已提交
257 258 259
		zfcp_fsf_req_free(req);
		return;
	}
L
Linus Torvalds 已提交
260

S
Swen Schillig 已提交
261
	zfcp_dbf_hba_fsf_unsol("read", adapter->dbf, sr_buf);
L
Linus Torvalds 已提交
262

S
Swen Schillig 已提交
263 264 265
	switch (sr_buf->status_type) {
	case FSF_STATUS_READ_PORT_CLOSED:
		zfcp_fsf_status_read_port_closed(req);
L
Linus Torvalds 已提交
266
		break;
S
Swen Schillig 已提交
267 268
	case FSF_STATUS_READ_INCOMING_ELS:
		zfcp_fc_incoming_els(req);
L
Linus Torvalds 已提交
269
		break;
S
Swen Schillig 已提交
270
	case FSF_STATUS_READ_SENSE_DATA_AVAIL:
L
Linus Torvalds 已提交
271
		break;
S
Swen Schillig 已提交
272
	case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
273 274 275
		dev_warn(&adapter->ccw_device->dev,
			 "The error threshold for checksum statistics "
			 "has been exceeded\n");
S
Swen Schillig 已提交
276
		zfcp_dbf_hba_berr(adapter->dbf, req);
L
Linus Torvalds 已提交
277
		break;
S
Swen Schillig 已提交
278 279
	case FSF_STATUS_READ_LINK_DOWN:
		zfcp_fsf_status_read_link_down(req);
280
		zfcp_fc_enqueue_event(adapter, FCH_EVT_LINKDOWN, 0);
S
Swen Schillig 已提交
281 282 283
		break;
	case FSF_STATUS_READ_LINK_UP:
		dev_info(&adapter->ccw_device->dev,
284
			 "The local link has been restored\n");
S
Swen Schillig 已提交
285
		/* All ports should be marked as ready to run again */
286
		zfcp_erp_modify_adapter_status(adapter, "fssrh_1", NULL,
S
Swen Schillig 已提交
287 288 289 290 291
					       ZFCP_STATUS_COMMON_RUNNING,
					       ZFCP_SET);
		zfcp_erp_adapter_reopen(adapter,
					ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
					ZFCP_STATUS_COMMON_ERP_FAILED,
292
					"fssrh_2", req);
293 294
		zfcp_fc_enqueue_event(adapter, FCH_EVT_LINKUP, 0);

S
Swen Schillig 已提交
295 296 297
		break;
	case FSF_STATUS_READ_NOTIFICATION_LOST:
		if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_ACT_UPDATED)
298 299
			zfcp_erp_adapter_access_changed(adapter, "fssrh_3",
							req);
S
Swen Schillig 已提交
300
		if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_INCOMING_ELS)
301
			queue_work(adapter->work_queue, &adapter->scan_work);
S
Swen Schillig 已提交
302 303
		break;
	case FSF_STATUS_READ_CFDC_UPDATED:
304
		zfcp_erp_adapter_access_changed(adapter, "fssrh_4", req);
S
Swen Schillig 已提交
305 306 307
		break;
	case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
		adapter->adapter_features = sr_buf->payload.word[0];
L
Linus Torvalds 已提交
308 309 310
		break;
	}

311
	mempool_free(sr_buf, adapter->pool.status_read_data);
S
Swen Schillig 已提交
312
	zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
313

S
Swen Schillig 已提交
314
	atomic_inc(&adapter->stat_miss);
315
	queue_work(adapter->work_queue, &adapter->stat_work);
S
Swen Schillig 已提交
316
}
L
Linus Torvalds 已提交
317

S
Swen Schillig 已提交
318 319 320 321 322 323 324 325 326 327 328 329
static void zfcp_fsf_fsfstatus_qual_eval(struct zfcp_fsf_req *req)
{
	switch (req->qtcb->header.fsf_status_qual.word[0]) {
	case FSF_SQ_FCP_RSP_AVAILABLE:
	case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
	case FSF_SQ_NO_RETRY_POSSIBLE:
	case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
		return;
	case FSF_SQ_COMMAND_ABORTED:
		break;
	case FSF_SQ_NO_RECOM:
		dev_err(&req->adapter->ccw_device->dev,
330 331
			"The FCP adapter reported a problem "
			"that cannot be recovered\n");
332
		zfcp_qdio_siosl(req->adapter);
333
		zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfsqe1", req);
S
Swen Schillig 已提交
334 335 336 337
		break;
	}
	/* all non-return stats set FSFREQ_ERROR*/
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
338 339
}

S
Swen Schillig 已提交
340
static void zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
341
{
S
Swen Schillig 已提交
342 343
	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
		return;
L
Linus Torvalds 已提交
344

S
Swen Schillig 已提交
345 346 347
	switch (req->qtcb->header.fsf_status) {
	case FSF_UNKNOWN_COMMAND:
		dev_err(&req->adapter->ccw_device->dev,
348
			"The FCP adapter does not recognize the command 0x%x\n",
S
Swen Schillig 已提交
349
			req->qtcb->header.fsf_command);
350
		zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfse_1", req);
S
Swen Schillig 已提交
351 352 353 354 355 356 357
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		zfcp_fsf_fsfstatus_qual_eval(req);
		break;
	}
}
L
Linus Torvalds 已提交
358

S
Swen Schillig 已提交
359 360 361 362 363
static void zfcp_fsf_protstatus_eval(struct zfcp_fsf_req *req)
{
	struct zfcp_adapter *adapter = req->adapter;
	struct fsf_qtcb *qtcb = req->qtcb;
	union fsf_prot_status_qual *psq = &qtcb->prefix.prot_status_qual;
L
Linus Torvalds 已提交
364

S
Swen Schillig 已提交
365
	zfcp_dbf_hba_fsf_response(req);
L
Linus Torvalds 已提交
366

S
Swen Schillig 已提交
367
	if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
368
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
S
Swen Schillig 已提交
369 370
		return;
	}
L
Linus Torvalds 已提交
371

S
Swen Schillig 已提交
372 373 374 375 376 377
	switch (qtcb->prefix.prot_status) {
	case FSF_PROT_GOOD:
	case FSF_PROT_FSF_STATUS_PRESENTED:
		return;
	case FSF_PROT_QTCB_VERSION_ERROR:
		dev_err(&adapter->ccw_device->dev,
378 379 380
			"QTCB version 0x%x not supported by FCP adapter "
			"(0x%x to 0x%x)\n", FSF_QTCB_CURRENT_VERSION,
			psq->word[0], psq->word[1]);
381
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_1", req);
S
Swen Schillig 已提交
382 383 384
		break;
	case FSF_PROT_ERROR_STATE:
	case FSF_PROT_SEQ_NUMB_ERROR:
385
		zfcp_erp_adapter_reopen(adapter, 0, "fspse_2", req);
386
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
S
Swen Schillig 已提交
387 388 389
		break;
	case FSF_PROT_UNSUPP_QTCB_TYPE:
		dev_err(&adapter->ccw_device->dev,
390
			"The QTCB type is not supported by the FCP adapter\n");
391
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_3", req);
S
Swen Schillig 已提交
392 393 394 395 396 397 398
		break;
	case FSF_PROT_HOST_CONNECTION_INITIALIZING:
		atomic_set_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
				&adapter->status);
		break;
	case FSF_PROT_DUPLICATE_REQUEST_ID:
		dev_err(&adapter->ccw_device->dev,
399
			"0x%Lx is an ambiguous request identifier\n",
S
Swen Schillig 已提交
400
			(unsigned long long)qtcb->bottom.support.req_handle);
401
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_4", req);
S
Swen Schillig 已提交
402 403
		break;
	case FSF_PROT_LINK_DOWN:
404 405
		zfcp_fsf_link_down_info_eval(req, "fspse_5",
					     &psq->link_down_info);
406
		/* go through reopen to flush pending requests */
407
		zfcp_erp_adapter_reopen(adapter, 0, "fspse_6", req);
S
Swen Schillig 已提交
408 409 410
		break;
	case FSF_PROT_REEST_QUEUE:
		/* All ports should be marked as ready to run again */
411
		zfcp_erp_modify_adapter_status(adapter, "fspse_7", NULL,
S
Swen Schillig 已提交
412 413 414 415
					       ZFCP_STATUS_COMMON_RUNNING,
					       ZFCP_SET);
		zfcp_erp_adapter_reopen(adapter,
					ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
416 417
					ZFCP_STATUS_COMMON_ERP_FAILED,
					"fspse_8", req);
S
Swen Schillig 已提交
418 419 420
		break;
	default:
		dev_err(&adapter->ccw_device->dev,
421
			"0x%x is not a valid transfer protocol status\n",
S
Swen Schillig 已提交
422
			qtcb->prefix.prot_status);
423
		zfcp_qdio_siosl(adapter);
424
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_9", req);
S
Swen Schillig 已提交
425 426
	}
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
427 428
}

S
Swen Schillig 已提交
429 430 431 432 433 434 435 436 437
/**
 * zfcp_fsf_req_complete - process completion of a FSF request
 * @fsf_req: The FSF request that has been completed.
 *
 * When a request has been completed either from the FCP adapter,
 * or it has been dismissed due to a queue shutdown, this function
 * is called to process the completion status and trigger further
 * events related to the FSF request.
 */
438
static void zfcp_fsf_req_complete(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
439
{
S
Swen Schillig 已提交
440 441 442 443
	if (unlikely(req->fsf_command == FSF_QTCB_UNSOLICITED_STATUS)) {
		zfcp_fsf_status_read_handler(req);
		return;
	}
L
Linus Torvalds 已提交
444

S
Swen Schillig 已提交
445 446 447 448
	del_timer(&req->timer);
	zfcp_fsf_protstatus_eval(req);
	zfcp_fsf_fsfstatus_eval(req);
	req->handler(req);
L
Linus Torvalds 已提交
449

S
Swen Schillig 已提交
450
	if (req->erp_action)
451
		zfcp_erp_notify(req->erp_action, 0);
L
Linus Torvalds 已提交
452

S
Swen Schillig 已提交
453 454 455
	if (likely(req->status & ZFCP_STATUS_FSFREQ_CLEANUP))
		zfcp_fsf_req_free(req);
	else
456
		complete(&req->completion);
S
Swen Schillig 已提交
457
}
L
Linus Torvalds 已提交
458

459 460 461 462 463 464 465 466 467 468 469 470 471 472 473
/**
 * zfcp_fsf_req_dismiss_all - dismiss all fsf requests
 * @adapter: pointer to struct zfcp_adapter
 *
 * Never ever call this without shutting down the adapter first.
 * Otherwise the adapter would continue using and corrupting s390 storage.
 * Included BUG_ON() call to ensure this is done.
 * ERP is supposed to be the only user of this function.
 */
void zfcp_fsf_req_dismiss_all(struct zfcp_adapter *adapter)
{
	struct zfcp_fsf_req *req, *tmp;
	LIST_HEAD(remove_queue);

	BUG_ON(atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_QDIOUP);
474
	zfcp_reqlist_move(adapter->req_list, &remove_queue);
475 476 477 478 479 480 481 482

	list_for_each_entry_safe(req, tmp, &remove_queue, list) {
		list_del(&req->list);
		req->status |= ZFCP_STATUS_FSFREQ_DISMISSED;
		zfcp_fsf_req_complete(req);
	}
}

S
Swen Schillig 已提交
483 484
static int zfcp_fsf_exchange_config_evaluate(struct zfcp_fsf_req *req)
{
485
	struct fsf_qtcb_bottom_config *bottom = &req->qtcb->bottom.config;
S
Swen Schillig 已提交
486 487
	struct zfcp_adapter *adapter = req->adapter;
	struct Scsi_Host *shost = adapter->scsi_host;
488
	struct fc_els_flogi *nsp, *plogi;
L
Linus Torvalds 已提交
489

490 491 492 493 494
	/* adjust pointers for missing command code */
	nsp = (struct fc_els_flogi *) ((u8 *)&bottom->nport_serv_param
					- sizeof(u32));
	plogi = (struct fc_els_flogi *) ((u8 *)&bottom->plogi_payload
					- sizeof(u32));
L
Linus Torvalds 已提交
495

S
Swen Schillig 已提交
496 497 498
	if (req->data)
		memcpy(req->data, bottom, sizeof(*bottom));

499 500
	fc_host_port_name(shost) = nsp->fl_wwpn;
	fc_host_node_name(shost) = nsp->fl_wwnn;
501
	fc_host_port_id(shost) = ntoh24(bottom->s_id);
S
Swen Schillig 已提交
502 503 504 505
	fc_host_speed(shost) = bottom->fc_link_speed;
	fc_host_supported_classes(shost) = FC_COS_CLASS2 | FC_COS_CLASS3;

	adapter->hydra_version = bottom->adapter_type;
506
	adapter->timer_ticks = bottom->timer_interval & ZFCP_FSF_TIMER_INT_MASK;
507 508
	adapter->stat_read_buf_num = max(bottom->status_read_buf_num,
					 (u16)FSF_STATUS_READS_RECOM);
S
Swen Schillig 已提交
509 510 511 512 513 514

	if (fc_host_permanent_port_name(shost) == -1)
		fc_host_permanent_port_name(shost) = fc_host_port_name(shost);

	switch (bottom->fc_topology) {
	case FSF_TOPO_P2P:
515
		adapter->peer_d_id = ntoh24(bottom->peer_d_id);
516 517
		adapter->peer_wwpn = plogi->fl_wwpn;
		adapter->peer_wwnn = plogi->fl_wwnn;
S
Swen Schillig 已提交
518 519 520 521 522 523 524
		fc_host_port_type(shost) = FC_PORTTYPE_PTP;
		break;
	case FSF_TOPO_FABRIC:
		fc_host_port_type(shost) = FC_PORTTYPE_NPORT;
		break;
	case FSF_TOPO_AL:
		fc_host_port_type(shost) = FC_PORTTYPE_NLPORT;
525
		/* fall through */
S
Swen Schillig 已提交
526 527
	default:
		dev_err(&adapter->ccw_device->dev,
528 529
			"Unknown or unsupported arbitrated loop "
			"fibre channel topology detected\n");
530
		zfcp_erp_adapter_shutdown(adapter, 0, "fsece_1", req);
S
Swen Schillig 已提交
531
		return -EIO;
L
Linus Torvalds 已提交
532
	}
S
Swen Schillig 已提交
533

534 535
	zfcp_scsi_set_prot(adapter);

L
Linus Torvalds 已提交
536 537 538
	return 0;
}

S
Swen Schillig 已提交
539
static void zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *req)
C
Christof Schmitt 已提交
540 541
{
	struct zfcp_adapter *adapter = req->adapter;
S
Swen Schillig 已提交
542 543 544
	struct fsf_qtcb *qtcb = req->qtcb;
	struct fsf_qtcb_bottom_config *bottom = &qtcb->bottom.config;
	struct Scsi_Host *shost = adapter->scsi_host;
C
Christof Schmitt 已提交
545

S
Swen Schillig 已提交
546 547
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
		return;
L
Linus Torvalds 已提交
548

S
Swen Schillig 已提交
549 550 551 552 553 554
	adapter->fsf_lic_version = bottom->lic_version;
	adapter->adapter_features = bottom->adapter_features;
	adapter->connection_features = bottom->connection_features;
	adapter->peer_wwpn = 0;
	adapter->peer_wwnn = 0;
	adapter->peer_d_id = 0;
555

S
Swen Schillig 已提交
556 557 558 559
	switch (qtcb->header.fsf_status) {
	case FSF_GOOD:
		if (zfcp_fsf_exchange_config_evaluate(req))
			return;
L
Linus Torvalds 已提交
560

S
Swen Schillig 已提交
561 562
		if (bottom->max_qtcb_size < sizeof(struct fsf_qtcb)) {
			dev_err(&adapter->ccw_device->dev,
563 564 565
				"FCP adapter maximum QTCB size (%d bytes) "
				"is too small\n",
				bottom->max_qtcb_size);
566
			zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh1", req);
S
Swen Schillig 已提交
567 568 569 570
			return;
		}
		atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
				&adapter->status);
L
Linus Torvalds 已提交
571
		break;
S
Swen Schillig 已提交
572 573 574 575 576 577 578
	case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
		fc_host_node_name(shost) = 0;
		fc_host_port_name(shost) = 0;
		fc_host_port_id(shost) = 0;
		fc_host_speed(shost) = FC_PORTSPEED_UNKNOWN;
		fc_host_port_type(shost) = FC_PORTTYPE_UNKNOWN;
		adapter->hydra_version = 0;
L
Linus Torvalds 已提交
579

S
Swen Schillig 已提交
580 581
		atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
				&adapter->status);
L
Linus Torvalds 已提交
582

583
		zfcp_fsf_link_down_info_eval(req, "fsecdh2",
S
Swen Schillig 已提交
584
			&qtcb->header.fsf_status_qual.link_down_info);
L
Linus Torvalds 已提交
585
		break;
S
Swen Schillig 已提交
586
	default:
587
		zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh3", req);
S
Swen Schillig 已提交
588 589
		return;
	}
L
Linus Torvalds 已提交
590

S
Swen Schillig 已提交
591 592 593 594 595 596 597
	if (adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT) {
		adapter->hardware_version = bottom->hardware_version;
		memcpy(fc_host_serial_number(shost), bottom->serial_number,
		       min(FC_SERIAL_NUMBER_SIZE, 17));
		EBCASC(fc_host_serial_number(shost),
		       min(FC_SERIAL_NUMBER_SIZE, 17));
	}
L
Linus Torvalds 已提交
598

S
Swen Schillig 已提交
599 600
	if (FSF_QTCB_CURRENT_VERSION < bottom->low_qtcb_version) {
		dev_err(&adapter->ccw_device->dev,
601 602
			"The FCP adapter only supports newer "
			"control block versions\n");
603
		zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh4", req);
S
Swen Schillig 已提交
604 605 606 607
		return;
	}
	if (FSF_QTCB_CURRENT_VERSION > bottom->high_qtcb_version) {
		dev_err(&adapter->ccw_device->dev,
608 609
			"The FCP adapter only supports older "
			"control block versions\n");
610
		zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh5", req);
S
Swen Schillig 已提交
611 612
	}
}
L
Linus Torvalds 已提交
613

S
Swen Schillig 已提交
614 615 616 617 618
static void zfcp_fsf_exchange_port_evaluate(struct zfcp_fsf_req *req)
{
	struct zfcp_adapter *adapter = req->adapter;
	struct fsf_qtcb_bottom_port *bottom = &req->qtcb->bottom.port;
	struct Scsi_Host *shost = adapter->scsi_host;
L
Linus Torvalds 已提交
619

S
Swen Schillig 已提交
620 621
	if (req->data)
		memcpy(req->data, bottom, sizeof(*bottom));
622

623
	if (adapter->connection_features & FSF_FEATURE_NPIV_MODE) {
S
Swen Schillig 已提交
624
		fc_host_permanent_port_name(shost) = bottom->wwpn;
625 626
		fc_host_port_type(shost) = FC_PORTTYPE_NPIV;
	} else
S
Swen Schillig 已提交
627 628 629
		fc_host_permanent_port_name(shost) = fc_host_port_name(shost);
	fc_host_maxframe_size(shost) = bottom->maximum_frame_size;
	fc_host_supported_speeds(shost) = bottom->supported_speed;
630 631 632 633
	memcpy(fc_host_supported_fc4s(shost), bottom->supported_fc4_types,
	       FC_FC4_LIST_SIZE);
	memcpy(fc_host_active_fc4s(shost), bottom->active_fc4_types,
	       FC_FC4_LIST_SIZE);
S
Swen Schillig 已提交
634
}
L
Linus Torvalds 已提交
635

S
Swen Schillig 已提交
636 637 638 639 640 641 642 643 644 645 646 647 648
static void zfcp_fsf_exchange_port_data_handler(struct zfcp_fsf_req *req)
{
	struct fsf_qtcb *qtcb = req->qtcb;

	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
		return;

	switch (qtcb->header.fsf_status) {
	case FSF_GOOD:
		zfcp_fsf_exchange_port_evaluate(req);
		break;
	case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
		zfcp_fsf_exchange_port_evaluate(req);
649
		zfcp_fsf_link_down_info_eval(req, "fsepdh1",
S
Swen Schillig 已提交
650
			&qtcb->header.fsf_status_qual.link_down_info);
651
		break;
L
Linus Torvalds 已提交
652
	}
S
Swen Schillig 已提交
653
}
654

655
static struct zfcp_fsf_req *zfcp_fsf_alloc(mempool_t *pool)
S
Swen Schillig 已提交
656 657
{
	struct zfcp_fsf_req *req;
658 659 660 661 662 663 664

	if (likely(pool))
		req = mempool_alloc(pool, GFP_ATOMIC);
	else
		req = kmalloc(sizeof(*req), GFP_ATOMIC);

	if (unlikely(!req))
S
Swen Schillig 已提交
665
		return NULL;
666

S
Swen Schillig 已提交
667
	memset(req, 0, sizeof(*req));
668
	req->pool = pool;
S
Swen Schillig 已提交
669 670 671
	return req;
}

672
static struct fsf_qtcb *zfcp_qtcb_alloc(mempool_t *pool)
S
Swen Schillig 已提交
673
{
674
	struct fsf_qtcb *qtcb;
S
Swen Schillig 已提交
675 676 677 678

	if (likely(pool))
		qtcb = mempool_alloc(pool, GFP_ATOMIC);
	else
679 680
		qtcb = kmem_cache_alloc(zfcp_data.qtcb_cache, GFP_ATOMIC);

S
Swen Schillig 已提交
681 682 683 684
	if (unlikely(!qtcb))
		return NULL;

	memset(qtcb, 0, sizeof(*qtcb));
685
	return qtcb;
S
Swen Schillig 已提交
686 687
}

688
static struct zfcp_fsf_req *zfcp_fsf_req_create(struct zfcp_qdio *qdio,
689 690
						u32 fsf_cmd, u32 sbtype,
						mempool_t *pool)
L
Linus Torvalds 已提交
691
{
692
	struct zfcp_adapter *adapter = qdio->adapter;
693
	struct zfcp_fsf_req *req = zfcp_fsf_alloc(pool);
L
Linus Torvalds 已提交
694

S
Swen Schillig 已提交
695
	if (unlikely(!req))
696
		return ERR_PTR(-ENOMEM);
L
Linus Torvalds 已提交
697

S
Swen Schillig 已提交
698 699
	if (adapter->req_no == 0)
		adapter->req_no++;
L
Linus Torvalds 已提交
700

S
Swen Schillig 已提交
701 702
	INIT_LIST_HEAD(&req->list);
	init_timer(&req->timer);
703
	init_completion(&req->completion);
L
Linus Torvalds 已提交
704

S
Swen Schillig 已提交
705 706
	req->adapter = adapter;
	req->fsf_command = fsf_cmd;
707
	req->req_id = adapter->req_no;
S
Swen Schillig 已提交
708

709 710 711 712 713 714 715 716 717 718 719
	if (likely(fsf_cmd != FSF_QTCB_UNSOLICITED_STATUS)) {
		if (likely(pool))
			req->qtcb = zfcp_qtcb_alloc(adapter->pool.qtcb_pool);
		else
			req->qtcb = zfcp_qtcb_alloc(NULL);

		if (unlikely(!req->qtcb)) {
			zfcp_fsf_req_free(req);
			return ERR_PTR(-ENOMEM);
		}

720
		req->seq_no = adapter->fsf_req_seq_no;
721
		req->qtcb->prefix.req_seq_no = adapter->fsf_req_seq_no;
S
Swen Schillig 已提交
722 723 724 725 726 727 728 729
		req->qtcb->prefix.req_id = req->req_id;
		req->qtcb->prefix.ulp_info = 26;
		req->qtcb->prefix.qtcb_type = fsf_qtcb_type[req->fsf_command];
		req->qtcb->prefix.qtcb_version = FSF_QTCB_CURRENT_VERSION;
		req->qtcb->header.req_handle = req->req_id;
		req->qtcb->header.fsf_command = req->fsf_command;
	}

730 731 732
	zfcp_qdio_req_init(adapter->qdio, &req->qdio_req, req->req_id, sbtype,
			   req->qtcb, sizeof(struct fsf_qtcb));

S
Swen Schillig 已提交
733
	return req;
L
Linus Torvalds 已提交
734 735
}

S
Swen Schillig 已提交
736 737 738
static int zfcp_fsf_req_send(struct zfcp_fsf_req *req)
{
	struct zfcp_adapter *adapter = req->adapter;
739
	struct zfcp_qdio *qdio = adapter->qdio;
740
	int with_qtcb = (req->qtcb != NULL);
741
	int req_id = req->req_id;
S
Swen Schillig 已提交
742

743
	zfcp_reqlist_add(adapter->req_list, req);
S
Swen Schillig 已提交
744

745
	req->qdio_req.qdio_outb_usage = atomic_read(&qdio->req_q_free);
S
Swen Schillig 已提交
746
	req->issued = get_clock();
747
	if (zfcp_qdio_send(qdio, &req->qdio_req)) {
S
Swen Schillig 已提交
748
		del_timer(&req->timer);
749
		/* lookup request again, list might have changed */
750
		zfcp_reqlist_find_rm(adapter->req_list, req_id);
751
		zfcp_erp_adapter_reopen(adapter, 0, "fsrs__1", req);
S
Swen Schillig 已提交
752 753 754 755
		return -EIO;
	}

	/* Don't increase for unsolicited status */
756
	if (with_qtcb)
S
Swen Schillig 已提交
757
		adapter->fsf_req_seq_no++;
758
	adapter->req_no++;
S
Swen Schillig 已提交
759 760 761 762 763 764 765 766 767

	return 0;
}

/**
 * zfcp_fsf_status_read - send status read request
 * @adapter: pointer to struct zfcp_adapter
 * @req_flags: request flags
 * Returns: 0 on success, ERROR otherwise
L
Linus Torvalds 已提交
768
 */
769
int zfcp_fsf_status_read(struct zfcp_qdio *qdio)
L
Linus Torvalds 已提交
770
{
771
	struct zfcp_adapter *adapter = qdio->adapter;
S
Swen Schillig 已提交
772 773 774
	struct zfcp_fsf_req *req;
	struct fsf_status_read_buffer *sr_buf;
	int retval = -EIO;
L
Linus Torvalds 已提交
775

776
	spin_lock_irq(&qdio->req_q_lock);
777
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
778 779
		goto out;

780
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_UNSOLICITED_STATUS, 0,
781
				  adapter->pool.status_read_req);
782
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
783 784
		retval = PTR_ERR(req);
		goto out;
L
Linus Torvalds 已提交
785 786
	}

787
	sr_buf = mempool_alloc(adapter->pool.status_read_data, GFP_ATOMIC);
S
Swen Schillig 已提交
788 789 790 791 792 793
	if (!sr_buf) {
		retval = -ENOMEM;
		goto failed_buf;
	}
	memset(sr_buf, 0, sizeof(*sr_buf));
	req->data = sr_buf;
794 795 796

	zfcp_qdio_fill_next(qdio, &req->qdio_req, sr_buf, sizeof(*sr_buf));
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
797

S
Swen Schillig 已提交
798 799 800
	retval = zfcp_fsf_req_send(req);
	if (retval)
		goto failed_req_send;
L
Linus Torvalds 已提交
801

S
Swen Schillig 已提交
802 803 804
	goto out;

failed_req_send:
805
	mempool_free(sr_buf, adapter->pool.status_read_data);
S
Swen Schillig 已提交
806 807
failed_buf:
	zfcp_fsf_req_free(req);
S
Swen Schillig 已提交
808
	zfcp_dbf_hba_fsf_unsol("fail", adapter->dbf, NULL);
S
Swen Schillig 已提交
809
out:
810
	spin_unlock_irq(&qdio->req_q_lock);
S
Swen Schillig 已提交
811 812 813 814 815
	return retval;
}

static void zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *req)
{
816 817
	struct scsi_device *sdev = req->data;
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
S
Swen Schillig 已提交
818 819 820 821 822 823
	union fsf_status_qual *fsq = &req->qtcb->header.fsf_status_qual;

	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
		return;

	switch (req->qtcb->header.fsf_status) {
L
Linus Torvalds 已提交
824
	case FSF_PORT_HANDLE_NOT_VALID:
S
Swen Schillig 已提交
825
		if (fsq->word[0] == fsq->word[1]) {
826
			zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0,
827
						"fsafch1", req);
S
Swen Schillig 已提交
828
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
829 830 831
		}
		break;
	case FSF_LUN_HANDLE_NOT_VALID:
S
Swen Schillig 已提交
832
		if (fsq->word[0] == fsq->word[1]) {
833 834
			zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fsafch2",
					     req);
S
Swen Schillig 已提交
835
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
836 837 838
		}
		break;
	case FSF_FCP_COMMAND_DOES_NOT_EXIST:
S
Swen Schillig 已提交
839
		req->status |= ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED;
L
Linus Torvalds 已提交
840 841
		break;
	case FSF_PORT_BOXED:
842
		zfcp_erp_port_boxed(zfcp_sdev->port, "fsafch3", req);
843
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
844 845
		break;
	case FSF_LUN_BOXED:
846
		zfcp_erp_lun_boxed(sdev, "fsafch4", req);
847
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
848 849
                break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
S
Swen Schillig 已提交
850
		switch (fsq->word[0]) {
L
Linus Torvalds 已提交
851
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
852
			zfcp_fc_test_link(zfcp_sdev->port);
853
			/* fall through */
L
Linus Torvalds 已提交
854
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
855
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
856 857 858 859
			break;
		}
		break;
	case FSF_GOOD:
S
Swen Schillig 已提交
860
		req->status |= ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED;
L
Linus Torvalds 已提交
861 862 863 864 865
		break;
	}
}

/**
866 867
 * zfcp_fsf_abort_fcp_cmnd - abort running SCSI command
 * @scmnd: The SCSI command to abort
S
Swen Schillig 已提交
868
 * Returns: pointer to struct zfcp_fsf_req
L
Linus Torvalds 已提交
869 870
 */

871
struct zfcp_fsf_req *zfcp_fsf_abort_fcp_cmnd(struct scsi_cmnd *scmnd)
L
Linus Torvalds 已提交
872
{
S
Swen Schillig 已提交
873
	struct zfcp_fsf_req *req = NULL;
874 875 876 877
	struct scsi_device *sdev = scmnd->device;
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
	struct zfcp_qdio *qdio = zfcp_sdev->port->adapter->qdio;
	unsigned long old_req_id = (unsigned long) scmnd->host_scribble;
878

879
	spin_lock_irq(&qdio->req_q_lock);
880
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
881
		goto out;
882
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_ABORT_FCP_CMND,
883
				  SBAL_FLAGS0_TYPE_READ,
884
				  qdio->adapter->pool.scsi_abort);
885 886
	if (IS_ERR(req)) {
		req = NULL;
S
Swen Schillig 已提交
887
		goto out;
888
	}
889

890
	if (unlikely(!(atomic_read(&zfcp_sdev->status) &
S
Swen Schillig 已提交
891 892
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		goto out_error_free;
L
Linus Torvalds 已提交
893

894
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
895

896
	req->data = zfcp_sdev;
S
Swen Schillig 已提交
897
	req->handler = zfcp_fsf_abort_fcp_command_handler;
898 899
	req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
	req->qtcb->header.port_handle = zfcp_sdev->port->handle;
S
Swen Schillig 已提交
900 901 902 903 904 905 906 907 908 909
	req->qtcb->bottom.support.req_handle = (u64) old_req_id;

	zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
	if (!zfcp_fsf_req_send(req))
		goto out;

out_error_free:
	zfcp_fsf_req_free(req);
	req = NULL;
out:
910
	spin_unlock_irq(&qdio->req_q_lock);
S
Swen Schillig 已提交
911
	return req;
L
Linus Torvalds 已提交
912 913
}

S
Swen Schillig 已提交
914
static void zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
915
{
S
Swen Schillig 已提交
916
	struct zfcp_adapter *adapter = req->adapter;
917
	struct zfcp_fsf_ct_els *ct = req->data;
S
Swen Schillig 已提交
918
	struct fsf_qtcb_header *header = &req->qtcb->header;
L
Linus Torvalds 已提交
919

920
	ct->status = -EINVAL;
L
Linus Torvalds 已提交
921

S
Swen Schillig 已提交
922
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
L
Linus Torvalds 已提交
923 924 925 926
		goto skip_fsfstatus;

	switch (header->fsf_status) {
        case FSF_GOOD:
S
Swen Schillig 已提交
927
		zfcp_dbf_san_ct_response(req);
928
		ct->status = 0;
L
Linus Torvalds 已提交
929 930
		break;
        case FSF_SERVICE_CLASS_NOT_SUPPORTED:
S
Swen Schillig 已提交
931
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
932 933 934 935 936
		break;
        case FSF_ADAPTER_STATUS_AVAILABLE:
                switch (header->fsf_status_qual.word[0]){
                case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
                case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
937
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
938 939 940 941 942 943
			break;
                }
                break;
	case FSF_ACCESS_DENIED:
		break;
        case FSF_PORT_BOXED:
944
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
945
		break;
S
Swen Schillig 已提交
946
	case FSF_PORT_HANDLE_NOT_VALID:
947
		zfcp_erp_adapter_reopen(adapter, 0, "fsscth1", req);
948
		/* fall through */
S
Swen Schillig 已提交
949
	case FSF_GENERIC_COMMAND_REJECTED:
L
Linus Torvalds 已提交
950 951 952 953
	case FSF_PAYLOAD_SIZE_MISMATCH:
	case FSF_REQUEST_SIZE_TOO_LARGE:
	case FSF_RESPONSE_SIZE_TOO_LARGE:
	case FSF_SBAL_MISMATCH:
S
Swen Schillig 已提交
954
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
955 956 957 958
		break;
	}

skip_fsfstatus:
959 960
	if (ct->handler)
		ct->handler(ct->handler_data);
S
Swen Schillig 已提交
961
}
L
Linus Torvalds 已提交
962

963 964
static void zfcp_fsf_setup_ct_els_unchained(struct zfcp_qdio *qdio,
					    struct zfcp_qdio_req *q_req,
965 966 967
					    struct scatterlist *sg_req,
					    struct scatterlist *sg_resp)
{
968 969 970
	zfcp_qdio_fill_next(qdio, q_req, sg_virt(sg_req), sg_req->length);
	zfcp_qdio_fill_next(qdio, q_req, sg_virt(sg_resp), sg_resp->length);
	zfcp_qdio_set_sbale_last(qdio, q_req);
971 972
}

973 974
static int zfcp_fsf_setup_ct_els_sbals(struct zfcp_fsf_req *req,
				       struct scatterlist *sg_req,
975
				       struct scatterlist *sg_resp)
S
Swen Schillig 已提交
976
{
977 978
	struct zfcp_adapter *adapter = req->adapter;
	u32 feat = adapter->adapter_features;
S
Swen Schillig 已提交
979 980
	int bytes;

981
	if (!(feat & FSF_FEATURE_ELS_CT_CHAINED_SBALS)) {
982 983
		if (!zfcp_qdio_sg_one_sbale(sg_req) ||
		    !zfcp_qdio_sg_one_sbale(sg_resp))
984 985
			return -EOPNOTSUPP;

986 987
		zfcp_fsf_setup_ct_els_unchained(adapter->qdio, &req->qdio_req,
						sg_req, sg_resp);
988 989 990 991
		return 0;
	}

	/* use single, unchained SBAL if it can hold the request */
992
	if (zfcp_qdio_sg_one_sbale(sg_req) && zfcp_qdio_sg_one_sbale(sg_resp)) {
993 994
		zfcp_fsf_setup_ct_els_unchained(adapter->qdio, &req->qdio_req,
						sg_req, sg_resp);
995 996 997
		return 0;
	}

998
	bytes = zfcp_qdio_sbals_from_sg(adapter->qdio, &req->qdio_req, sg_req);
S
Swen Schillig 已提交
999
	if (bytes <= 0)
1000
		return -EIO;
1001
	zfcp_qdio_set_sbale_last(adapter->qdio, &req->qdio_req);
S
Swen Schillig 已提交
1002
	req->qtcb->bottom.support.req_buf_length = bytes;
1003
	zfcp_qdio_skip_to_last_sbale(&req->qdio_req);
S
Swen Schillig 已提交
1004

1005
	bytes = zfcp_qdio_sbals_from_sg(adapter->qdio, &req->qdio_req,
1006
					sg_resp);
1007
	req->qtcb->bottom.support.resp_buf_length = bytes;
S
Swen Schillig 已提交
1008
	if (bytes <= 0)
1009
		return -EIO;
1010
	zfcp_qdio_set_sbale_last(adapter->qdio, &req->qdio_req);
1011

1012 1013 1014 1015 1016 1017
	return 0;
}

static int zfcp_fsf_setup_ct_els(struct zfcp_fsf_req *req,
				 struct scatterlist *sg_req,
				 struct scatterlist *sg_resp,
1018
				 unsigned int timeout)
1019 1020 1021
{
	int ret;

1022
	ret = zfcp_fsf_setup_ct_els_sbals(req, sg_req, sg_resp);
1023 1024 1025
	if (ret)
		return ret;

1026
	/* common settings for ct/gs and els requests */
1027 1028
	if (timeout > 255)
		timeout = 255; /* max value accepted by hardware */
1029
	req->qtcb->bottom.support.service_class = FSF_CLASS_3;
1030 1031
	req->qtcb->bottom.support.timeout = timeout;
	zfcp_fsf_start_timer(req, (timeout + 10) * HZ);
S
Swen Schillig 已提交
1032 1033

	return 0;
L
Linus Torvalds 已提交
1034 1035 1036
}

/**
S
Swen Schillig 已提交
1037 1038 1039
 * zfcp_fsf_send_ct - initiate a Generic Service request (FC-GS)
 * @ct: pointer to struct zfcp_send_ct with data for request
 * @pool: if non-null this mempool is used to allocate struct zfcp_fsf_req
L
Linus Torvalds 已提交
1040
 */
1041
int zfcp_fsf_send_ct(struct zfcp_fc_wka_port *wka_port,
1042 1043
		     struct zfcp_fsf_ct_els *ct, mempool_t *pool,
		     unsigned int timeout)
L
Linus Torvalds 已提交
1044
{
1045
	struct zfcp_qdio *qdio = wka_port->adapter->qdio;
S
Swen Schillig 已提交
1046 1047
	struct zfcp_fsf_req *req;
	int ret = -EIO;
L
Linus Torvalds 已提交
1048

1049
	spin_lock_irq(&qdio->req_q_lock);
1050
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
1051
		goto out;
L
Linus Torvalds 已提交
1052

1053 1054
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_GENERIC,
				  SBAL_FLAGS0_TYPE_WRITE_READ, pool);
1055

1056
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1057 1058
		ret = PTR_ERR(req);
		goto out;
1059 1060
	}

1061
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1062
	ret = zfcp_fsf_setup_ct_els(req, ct->req, ct->resp, timeout);
C
Christof Schmitt 已提交
1063
	if (ret)
L
Linus Torvalds 已提交
1064 1065
		goto failed_send;

S
Swen Schillig 已提交
1066
	req->handler = zfcp_fsf_send_ct_handler;
1067
	req->qtcb->header.port_handle = wka_port->handle;
S
Swen Schillig 已提交
1068 1069
	req->data = ct;

1070
	zfcp_dbf_san_ct_request(req, wka_port->d_id);
L
Linus Torvalds 已提交
1071

S
Swen Schillig 已提交
1072 1073 1074
	ret = zfcp_fsf_req_send(req);
	if (ret)
		goto failed_send;
L
Linus Torvalds 已提交
1075

S
Swen Schillig 已提交
1076
	goto out;
L
Linus Torvalds 已提交
1077

S
Swen Schillig 已提交
1078 1079 1080
failed_send:
	zfcp_fsf_req_free(req);
out:
1081
	spin_unlock_irq(&qdio->req_q_lock);
S
Swen Schillig 已提交
1082
	return ret;
L
Linus Torvalds 已提交
1083 1084
}

S
Swen Schillig 已提交
1085
static void zfcp_fsf_send_els_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1086
{
1087
	struct zfcp_fsf_ct_els *send_els = req->data;
S
Swen Schillig 已提交
1088 1089
	struct zfcp_port *port = send_els->port;
	struct fsf_qtcb_header *header = &req->qtcb->header;
L
Linus Torvalds 已提交
1090

S
Swen Schillig 已提交
1091
	send_els->status = -EINVAL;
L
Linus Torvalds 已提交
1092

S
Swen Schillig 已提交
1093
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
L
Linus Torvalds 已提交
1094 1095 1096 1097
		goto skip_fsfstatus;

	switch (header->fsf_status) {
	case FSF_GOOD:
S
Swen Schillig 已提交
1098
		zfcp_dbf_san_els_response(req);
S
Swen Schillig 已提交
1099
		send_els->status = 0;
L
Linus Torvalds 已提交
1100 1101
		break;
	case FSF_SERVICE_CLASS_NOT_SUPPORTED:
S
Swen Schillig 已提交
1102
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
1103 1104 1105 1106 1107 1108
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]){
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
		case FSF_SQ_RETRY_IF_POSSIBLE:
S
Swen Schillig 已提交
1109
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1110 1111 1112 1113 1114 1115 1116 1117 1118
			break;
		}
		break;
	case FSF_ELS_COMMAND_REJECTED:
	case FSF_PAYLOAD_SIZE_MISMATCH:
	case FSF_REQUEST_SIZE_TOO_LARGE:
	case FSF_RESPONSE_SIZE_TOO_LARGE:
		break;
	case FSF_ACCESS_DENIED:
1119 1120
		if (port)
			zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1121
		break;
S
Swen Schillig 已提交
1122 1123 1124
	case FSF_SBAL_MISMATCH:
		/* should never occure, avoided in zfcp_fsf_send_els */
		/* fall through */
L
Linus Torvalds 已提交
1125
	default:
S
Swen Schillig 已提交
1126
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1127 1128 1129
		break;
	}
skip_fsfstatus:
H
Heiko Carstens 已提交
1130
	if (send_els->handler)
L
Linus Torvalds 已提交
1131
		send_els->handler(send_els->handler_data);
S
Swen Schillig 已提交
1132
}
L
Linus Torvalds 已提交
1133

S
Swen Schillig 已提交
1134 1135 1136 1137
/**
 * zfcp_fsf_send_els - initiate an ELS command (FC-FS)
 * @els: pointer to struct zfcp_send_els with data for the command
 */
1138
int zfcp_fsf_send_els(struct zfcp_adapter *adapter, u32 d_id,
1139
		      struct zfcp_fsf_ct_els *els, unsigned int timeout)
S
Swen Schillig 已提交
1140 1141
{
	struct zfcp_fsf_req *req;
1142
	struct zfcp_qdio *qdio = adapter->qdio;
S
Swen Schillig 已提交
1143 1144
	int ret = -EIO;

1145
	spin_lock_irq(&qdio->req_q_lock);
1146
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
1147
		goto out;
1148

1149 1150
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_ELS,
				  SBAL_FLAGS0_TYPE_WRITE_READ, NULL);
1151

1152
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1153 1154 1155 1156
		ret = PTR_ERR(req);
		goto out;
	}

1157
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1158 1159 1160 1161

	zfcp_qdio_sbal_limit(qdio, &req->qdio_req, 2);

	ret = zfcp_fsf_setup_ct_els(req, els->req, els->resp, timeout);
1162

S
Swen Schillig 已提交
1163 1164 1165
	if (ret)
		goto failed_send;

1166
	hton24(req->qtcb->bottom.support.d_id, d_id);
S
Swen Schillig 已提交
1167 1168 1169
	req->handler = zfcp_fsf_send_els_handler;
	req->data = els;

S
Swen Schillig 已提交
1170
	zfcp_dbf_san_els_request(req);
S
Swen Schillig 已提交
1171 1172 1173 1174 1175 1176 1177 1178 1179 1180

	ret = zfcp_fsf_req_send(req);
	if (ret)
		goto failed_send;

	goto out;

failed_send:
	zfcp_fsf_req_free(req);
out:
1181
	spin_unlock_irq(&qdio->req_q_lock);
S
Swen Schillig 已提交
1182
	return ret;
L
Linus Torvalds 已提交
1183 1184
}

S
Swen Schillig 已提交
1185
int zfcp_fsf_exchange_config_data(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1186
{
S
Swen Schillig 已提交
1187
	struct zfcp_fsf_req *req;
1188
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
1189 1190
	int retval = -EIO;

1191
	spin_lock_irq(&qdio->req_q_lock);
1192
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
1193
		goto out;
1194

1195
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA,
1196
				  SBAL_FLAGS0_TYPE_READ,
1197
				  qdio->adapter->pool.erp_req);
1198

1199
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1200 1201
		retval = PTR_ERR(req);
		goto out;
L
Linus Torvalds 已提交
1202 1203
	}

1204
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1205
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
1206

S
Swen Schillig 已提交
1207
	req->qtcb->bottom.config.feature_selection =
1208 1209
			FSF_FEATURE_CFDC |
			FSF_FEATURE_LUN_SHARING |
1210
			FSF_FEATURE_NOTIFICATION_LOST |
1211
			FSF_FEATURE_UPDATE_ALERT;
S
Swen Schillig 已提交
1212 1213
	req->erp_action = erp_action;
	req->handler = zfcp_fsf_exchange_config_data_handler;
1214
	erp_action->fsf_req_id = req->req_id;
L
Linus Torvalds 已提交
1215

1216
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1217
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1218
	if (retval) {
S
Swen Schillig 已提交
1219
		zfcp_fsf_req_free(req);
1220
		erp_action->fsf_req_id = 0;
L
Linus Torvalds 已提交
1221
	}
S
Swen Schillig 已提交
1222
out:
1223
	spin_unlock_irq(&qdio->req_q_lock);
1224 1225
	return retval;
}
L
Linus Torvalds 已提交
1226

1227
int zfcp_fsf_exchange_config_data_sync(struct zfcp_qdio *qdio,
S
Swen Schillig 已提交
1228
				       struct fsf_qtcb_bottom_config *data)
1229
{
S
Swen Schillig 已提交
1230 1231 1232
	struct zfcp_fsf_req *req = NULL;
	int retval = -EIO;

1233
	spin_lock_irq(&qdio->req_q_lock);
1234
	if (zfcp_qdio_sbal_get(qdio))
1235
		goto out_unlock;
S
Swen Schillig 已提交
1236

1237 1238
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA,
				  SBAL_FLAGS0_TYPE_READ, NULL);
1239

1240
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1241
		retval = PTR_ERR(req);
1242
		goto out_unlock;
1243 1244
	}

1245
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
S
Swen Schillig 已提交
1246
	req->handler = zfcp_fsf_exchange_config_data_handler;
1247

S
Swen Schillig 已提交
1248
	req->qtcb->bottom.config.feature_selection =
1249 1250 1251 1252 1253 1254
			FSF_FEATURE_CFDC |
			FSF_FEATURE_LUN_SHARING |
			FSF_FEATURE_NOTIFICATION_LOST |
			FSF_FEATURE_UPDATE_ALERT;

	if (data)
S
Swen Schillig 已提交
1255
		req->data = data;
1256

S
Swen Schillig 已提交
1257 1258
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
1259
	spin_unlock_irq(&qdio->req_q_lock);
C
Christof Schmitt 已提交
1260
	if (!retval)
1261
		wait_for_completion(&req->completion);
1262

S
Swen Schillig 已提交
1263
	zfcp_fsf_req_free(req);
1264
	return retval;
1265

1266
out_unlock:
1267
	spin_unlock_irq(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1268 1269 1270 1271 1272
	return retval;
}

/**
 * zfcp_fsf_exchange_port_data - request information about local port
1273
 * @erp_action: ERP action for the adapter for which port data is requested
S
Swen Schillig 已提交
1274
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1275
 */
S
Swen Schillig 已提交
1276
int zfcp_fsf_exchange_port_data(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1277
{
1278
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
1279 1280
	struct zfcp_fsf_req *req;
	int retval = -EIO;
L
Linus Torvalds 已提交
1281

1282
	if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1283
		return -EOPNOTSUPP;
L
Linus Torvalds 已提交
1284

1285
	spin_lock_irq(&qdio->req_q_lock);
1286
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
1287
		goto out;
1288

1289
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA,
1290
				  SBAL_FLAGS0_TYPE_READ,
1291
				  qdio->adapter->pool.erp_req);
1292

1293
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1294 1295
		retval = PTR_ERR(req);
		goto out;
1296 1297
	}

1298
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1299
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
1300

S
Swen Schillig 已提交
1301 1302
	req->handler = zfcp_fsf_exchange_port_data_handler;
	req->erp_action = erp_action;
1303
	erp_action->fsf_req_id = req->req_id;
1304

1305
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1306
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1307
	if (retval) {
S
Swen Schillig 已提交
1308
		zfcp_fsf_req_free(req);
1309
		erp_action->fsf_req_id = 0;
1310
	}
S
Swen Schillig 已提交
1311
out:
1312
	spin_unlock_irq(&qdio->req_q_lock);
1313 1314 1315 1316 1317
	return retval;
}

/**
 * zfcp_fsf_exchange_port_data_sync - request information about local port
1318
 * @qdio: pointer to struct zfcp_qdio
S
Swen Schillig 已提交
1319 1320
 * @data: pointer to struct fsf_qtcb_bottom_port
 * Returns: 0 on success, error otherwise
1321
 */
1322
int zfcp_fsf_exchange_port_data_sync(struct zfcp_qdio *qdio,
S
Swen Schillig 已提交
1323
				     struct fsf_qtcb_bottom_port *data)
1324
{
S
Swen Schillig 已提交
1325 1326
	struct zfcp_fsf_req *req = NULL;
	int retval = -EIO;
1327

1328
	if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1329 1330
		return -EOPNOTSUPP;

1331
	spin_lock_irq(&qdio->req_q_lock);
1332
	if (zfcp_qdio_sbal_get(qdio))
1333
		goto out_unlock;
S
Swen Schillig 已提交
1334

1335 1336
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA,
				  SBAL_FLAGS0_TYPE_READ, NULL);
1337

1338
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1339
		retval = PTR_ERR(req);
1340
		goto out_unlock;
L
Linus Torvalds 已提交
1341 1342
	}

1343
	if (data)
S
Swen Schillig 已提交
1344
		req->data = data;
1345

1346
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1347

S
Swen Schillig 已提交
1348 1349 1350
	req->handler = zfcp_fsf_exchange_port_data_handler;
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
1351
	spin_unlock_irq(&qdio->req_q_lock);
1352

C
Christof Schmitt 已提交
1353
	if (!retval)
1354 1355
		wait_for_completion(&req->completion);

S
Swen Schillig 已提交
1356
	zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1357 1358

	return retval;
1359 1360

out_unlock:
1361
	spin_unlock_irq(&qdio->req_q_lock);
1362
	return retval;
L
Linus Torvalds 已提交
1363 1364
}

S
Swen Schillig 已提交
1365
static void zfcp_fsf_open_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1366
{
S
Swen Schillig 已提交
1367 1368
	struct zfcp_port *port = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;
1369
	struct fc_els_flogi *plogi;
L
Linus Torvalds 已提交
1370

S
Swen Schillig 已提交
1371
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1372
		goto out;
L
Linus Torvalds 已提交
1373 1374 1375 1376 1377

	switch (header->fsf_status) {
	case FSF_PORT_ALREADY_OPEN:
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1378
		zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1379 1380
		break;
	case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
S
Swen Schillig 已提交
1381
		dev_warn(&req->adapter->ccw_device->dev,
1382
			 "Not enough FCP adapter resources to open "
1383 1384
			 "remote port 0x%016Lx\n",
			 (unsigned long long)port->wwpn);
1385
		zfcp_erp_port_failed(port, "fsoph_1", req);
S
Swen Schillig 已提交
1386
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1387 1388 1389 1390 1391 1392
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]) {
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
		case FSF_SQ_NO_RETRY_POSSIBLE:
S
Swen Schillig 已提交
1393
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1394 1395 1396 1397 1398 1399 1400
			break;
		}
		break;
	case FSF_GOOD:
		port->handle = header->port_handle;
		atomic_set_mask(ZFCP_STATUS_COMMON_OPEN |
				ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1401 1402 1403
		atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
		                  ZFCP_STATUS_COMMON_ACCESS_BOXED,
		                  &port->status);
L
Linus Torvalds 已提交
1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418
		/* check whether D_ID has changed during open */
		/*
		 * FIXME: This check is not airtight, as the FCP channel does
		 * not monitor closures of target port connections caused on
		 * the remote side. Thus, they might miss out on invalidating
		 * locally cached WWPNs (and other N_Port parameters) of gone
		 * target ports. So, our heroic attempt to make things safe
		 * could be undermined by 'open port' response data tagged with
		 * obsolete WWPNs. Another reason to monitor potential
		 * connection closures ourself at least (by interpreting
		 * incoming ELS' and unsolicited status). It just crosses my
		 * mind that one should be able to cross-check by means of
		 * another GID_PN straight after a port has been opened.
		 * Alternately, an ADISC/PDISC ELS should suffice, as well.
		 */
1419
		plogi = (struct fc_els_flogi *) req->qtcb->bottom.support.els;
1420
		if (req->qtcb->bottom.support.els1_length >=
1421
		    FSF_PLOGI_MIN_LEN)
S
Swen Schillig 已提交
1422
				zfcp_fc_plogi_evaluate(port, plogi);
L
Linus Torvalds 已提交
1423 1424
		break;
	case FSF_UNKNOWN_OP_SUBTYPE:
S
Swen Schillig 已提交
1425
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1426 1427
		break;
	}
1428 1429

out:
1430
	put_device(&port->dev);
L
Linus Torvalds 已提交
1431 1432
}

S
Swen Schillig 已提交
1433 1434 1435 1436
/**
 * zfcp_fsf_open_port - create and send open port request
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1437
 */
S
Swen Schillig 已提交
1438
int zfcp_fsf_open_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1439
{
1440
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1441
	struct zfcp_port *port = erp_action->port;
1442
	struct zfcp_fsf_req *req;
S
Swen Schillig 已提交
1443 1444
	int retval = -EIO;

1445
	spin_lock_irq(&qdio->req_q_lock);
1446
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
1447 1448
		goto out;

1449
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
1450
				  SBAL_FLAGS0_TYPE_READ,
1451
				  qdio->adapter->pool.erp_req);
1452

1453
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1454
		retval = PTR_ERR(req);
L
Linus Torvalds 已提交
1455
		goto out;
S
Swen Schillig 已提交
1456
	}
L
Linus Torvalds 已提交
1457

1458
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1459
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
1460

S
Swen Schillig 已提交
1461
	req->handler = zfcp_fsf_open_port_handler;
1462
	hton24(req->qtcb->bottom.support.d_id, port->d_id);
1463
	req->data = port;
S
Swen Schillig 已提交
1464
	req->erp_action = erp_action;
1465
	erp_action->fsf_req_id = req->req_id;
1466
	get_device(&port->dev);
S
Swen Schillig 已提交
1467

1468
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1469
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1470
	if (retval) {
S
Swen Schillig 已提交
1471
		zfcp_fsf_req_free(req);
1472
		erp_action->fsf_req_id = 0;
1473
		put_device(&port->dev);
L
Linus Torvalds 已提交
1474
	}
S
Swen Schillig 已提交
1475
out:
1476
	spin_unlock_irq(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1477 1478 1479
	return retval;
}

S
Swen Schillig 已提交
1480
static void zfcp_fsf_close_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1481
{
S
Swen Schillig 已提交
1482
	struct zfcp_port *port = req->data;
L
Linus Torvalds 已提交
1483

S
Swen Schillig 已提交
1484
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1485
		return;
L
Linus Torvalds 已提交
1486

S
Swen Schillig 已提交
1487
	switch (req->qtcb->header.fsf_status) {
L
Linus Torvalds 已提交
1488
	case FSF_PORT_HANDLE_NOT_VALID:
1489
		zfcp_erp_adapter_reopen(port->adapter, 0, "fscph_1", req);
S
Swen Schillig 已提交
1490
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1491 1492 1493 1494
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		break;
	case FSF_GOOD:
1495
		zfcp_erp_modify_port_status(port, "fscph_2", req,
L
Linus Torvalds 已提交
1496 1497 1498 1499 1500 1501
					    ZFCP_STATUS_COMMON_OPEN,
					    ZFCP_CLEAR);
		break;
	}
}

S
Swen Schillig 已提交
1502 1503 1504 1505
/**
 * zfcp_fsf_close_port - create and send close port request
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1506
 */
S
Swen Schillig 已提交
1507
int zfcp_fsf_close_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1508
{
1509
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
1510 1511 1512
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1513
	spin_lock_irq(&qdio->req_q_lock);
1514
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
1515 1516
		goto out;

1517
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
1518
				  SBAL_FLAGS0_TYPE_READ,
1519
				  qdio->adapter->pool.erp_req);
1520

1521
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1522
		retval = PTR_ERR(req);
L
Linus Torvalds 已提交
1523
		goto out;
S
Swen Schillig 已提交
1524
	}
L
Linus Torvalds 已提交
1525

1526
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1527
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
1528

S
Swen Schillig 已提交
1529 1530 1531 1532
	req->handler = zfcp_fsf_close_port_handler;
	req->data = erp_action->port;
	req->erp_action = erp_action;
	req->qtcb->header.port_handle = erp_action->port->handle;
1533
	erp_action->fsf_req_id = req->req_id;
S
Swen Schillig 已提交
1534

1535
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1536
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1537
	if (retval) {
S
Swen Schillig 已提交
1538
		zfcp_fsf_req_free(req);
1539
		erp_action->fsf_req_id = 0;
L
Linus Torvalds 已提交
1540
	}
S
Swen Schillig 已提交
1541
out:
1542
	spin_unlock_irq(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1543 1544 1545
	return retval;
}

1546 1547
static void zfcp_fsf_open_wka_port_handler(struct zfcp_fsf_req *req)
{
1548
	struct zfcp_fc_wka_port *wka_port = req->data;
1549 1550 1551
	struct fsf_qtcb_header *header = &req->qtcb->header;

	if (req->status & ZFCP_STATUS_FSFREQ_ERROR) {
1552
		wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1553 1554 1555 1556 1557 1558 1559
		goto out;
	}

	switch (header->fsf_status) {
	case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
		dev_warn(&req->adapter->ccw_device->dev,
			 "Opening WKA port 0x%x failed\n", wka_port->d_id);
1560
		/* fall through */
1561 1562
	case FSF_ADAPTER_STATUS_AVAILABLE:
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1563
		/* fall through */
1564
	case FSF_ACCESS_DENIED:
1565
		wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1566 1567 1568
		break;
	case FSF_GOOD:
		wka_port->handle = header->port_handle;
1569 1570
		/* fall through */
	case FSF_PORT_ALREADY_OPEN:
1571
		wka_port->status = ZFCP_FC_WKA_PORT_ONLINE;
1572 1573 1574 1575 1576 1577 1578
	}
out:
	wake_up(&wka_port->completion_wq);
}

/**
 * zfcp_fsf_open_wka_port - create and send open wka-port request
1579
 * @wka_port: pointer to struct zfcp_fc_wka_port
1580 1581
 * Returns: 0 on success, error otherwise
 */
1582
int zfcp_fsf_open_wka_port(struct zfcp_fc_wka_port *wka_port)
1583
{
1584
	struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1585 1586 1587
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1588
	spin_lock_irq(&qdio->req_q_lock);
1589
	if (zfcp_qdio_sbal_get(qdio))
1590 1591
		goto out;

1592
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
1593
				  SBAL_FLAGS0_TYPE_READ,
1594
				  qdio->adapter->pool.erp_req);
1595

1596 1597 1598 1599 1600
	if (unlikely(IS_ERR(req))) {
		retval = PTR_ERR(req);
		goto out;
	}

1601
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1602
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1603 1604

	req->handler = zfcp_fsf_open_wka_port_handler;
1605
	hton24(req->qtcb->bottom.support.d_id, wka_port->d_id);
1606 1607 1608 1609 1610 1611 1612
	req->data = wka_port;

	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
	if (retval)
		zfcp_fsf_req_free(req);
out:
1613
	spin_unlock_irq(&qdio->req_q_lock);
1614 1615 1616 1617 1618
	return retval;
}

static void zfcp_fsf_close_wka_port_handler(struct zfcp_fsf_req *req)
{
1619
	struct zfcp_fc_wka_port *wka_port = req->data;
1620 1621 1622

	if (req->qtcb->header.fsf_status == FSF_PORT_HANDLE_NOT_VALID) {
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1623
		zfcp_erp_adapter_reopen(wka_port->adapter, 0, "fscwph1", req);
1624 1625
	}

1626
	wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1627 1628 1629 1630 1631
	wake_up(&wka_port->completion_wq);
}

/**
 * zfcp_fsf_close_wka_port - create and send close wka port request
1632
 * @wka_port: WKA port to open
1633 1634
 * Returns: 0 on success, error otherwise
 */
1635
int zfcp_fsf_close_wka_port(struct zfcp_fc_wka_port *wka_port)
1636
{
1637
	struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1638 1639 1640
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1641
	spin_lock_irq(&qdio->req_q_lock);
1642
	if (zfcp_qdio_sbal_get(qdio))
1643 1644
		goto out;

1645
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
1646
				  SBAL_FLAGS0_TYPE_READ,
1647
				  qdio->adapter->pool.erp_req);
1648

1649 1650 1651 1652 1653
	if (unlikely(IS_ERR(req))) {
		retval = PTR_ERR(req);
		goto out;
	}

1654
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1655
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1656 1657 1658 1659 1660 1661 1662 1663 1664 1665

	req->handler = zfcp_fsf_close_wka_port_handler;
	req->data = wka_port;
	req->qtcb->header.port_handle = wka_port->handle;

	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
	if (retval)
		zfcp_fsf_req_free(req);
out:
1666
	spin_unlock_irq(&qdio->req_q_lock);
1667 1668 1669
	return retval;
}

S
Swen Schillig 已提交
1670
static void zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1671
{
S
Swen Schillig 已提交
1672 1673
	struct zfcp_port *port = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;
1674
	struct scsi_device *sdev;
L
Linus Torvalds 已提交
1675

S
Swen Schillig 已提交
1676
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1677
		return;
L
Linus Torvalds 已提交
1678 1679 1680

	switch (header->fsf_status) {
	case FSF_PORT_HANDLE_NOT_VALID:
1681
		zfcp_erp_adapter_reopen(port->adapter, 0, "fscpph1", req);
S
Swen Schillig 已提交
1682
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1683 1684
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1685
		zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1686 1687
		break;
	case FSF_PORT_BOXED:
1688 1689 1690
		/* can't use generic zfcp_erp_modify_port_status because
		 * ZFCP_STATUS_COMMON_OPEN must not be reset for the port */
		atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1691 1692 1693 1694
		shost_for_each_device(sdev, port->adapter->scsi_host)
			if (sdev_to_zfcp(sdev)->port == port)
				atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
						  &sdev_to_zfcp(sdev)->status);
1695
		zfcp_erp_port_boxed(port, "fscpph2", req);
1696
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1697 1698 1699 1700
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]) {
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
S
Swen Schillig 已提交
1701
			/* fall through */
L
Linus Torvalds 已提交
1702
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
1703
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1704 1705 1706 1707 1708 1709 1710 1711
			break;
		}
		break;
	case FSF_GOOD:
		/* can't use generic zfcp_erp_modify_port_status because
		 * ZFCP_STATUS_COMMON_OPEN must not be reset for the port
		 */
		atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1712 1713 1714 1715
		shost_for_each_device(sdev, port->adapter->scsi_host)
			if (sdev_to_zfcp(sdev)->port == port)
				atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
						  &sdev_to_zfcp(sdev)->status);
L
Linus Torvalds 已提交
1716 1717 1718 1719
		break;
	}
}

S
Swen Schillig 已提交
1720 1721 1722 1723
/**
 * zfcp_fsf_close_physical_port - close physical port
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success
L
Linus Torvalds 已提交
1724
 */
S
Swen Schillig 已提交
1725
int zfcp_fsf_close_physical_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1726
{
1727
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
1728 1729 1730
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1731
	spin_lock_irq(&qdio->req_q_lock);
1732
	if (zfcp_qdio_sbal_get(qdio))
L
Linus Torvalds 已提交
1733 1734
		goto out;

1735
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PHYSICAL_PORT,
1736
				  SBAL_FLAGS0_TYPE_READ,
1737
				  qdio->adapter->pool.erp_req);
1738

1739
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1740 1741 1742
		retval = PTR_ERR(req);
		goto out;
	}
L
Linus Torvalds 已提交
1743

1744
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1745
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
1746

S
Swen Schillig 已提交
1747 1748 1749 1750
	req->data = erp_action->port;
	req->qtcb->header.port_handle = erp_action->port->handle;
	req->erp_action = erp_action;
	req->handler = zfcp_fsf_close_physical_port_handler;
1751
	erp_action->fsf_req_id = req->req_id;
S
Swen Schillig 已提交
1752

1753
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1754
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1755
	if (retval) {
S
Swen Schillig 已提交
1756
		zfcp_fsf_req_free(req);
1757
		erp_action->fsf_req_id = 0;
L
Linus Torvalds 已提交
1758
	}
S
Swen Schillig 已提交
1759
out:
1760
	spin_unlock_irq(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1761 1762 1763
	return retval;
}

1764
static void zfcp_fsf_open_lun_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1765
{
S
Swen Schillig 已提交
1766
	struct zfcp_adapter *adapter = req->adapter;
1767 1768
	struct scsi_device *sdev = req->data;
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
S
Swen Schillig 已提交
1769 1770 1771 1772
	struct fsf_qtcb_header *header = &req->qtcb->header;
	struct fsf_qtcb_bottom_support *bottom = &req->qtcb->bottom.support;
	struct fsf_queue_designator *queue_designator =
				&header->fsf_status_qual.fsf_queue_designator;
1773
	int exclusive, readwrite;
L
Linus Torvalds 已提交
1774

S
Swen Schillig 已提交
1775
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1776
		return;
L
Linus Torvalds 已提交
1777 1778

	atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
1779
			  ZFCP_STATUS_COMMON_ACCESS_BOXED |
1780 1781 1782
			  ZFCP_STATUS_LUN_SHARED |
			  ZFCP_STATUS_LUN_READONLY,
			  &zfcp_sdev->status);
L
Linus Torvalds 已提交
1783 1784 1785 1786

	switch (header->fsf_status) {

	case FSF_PORT_HANDLE_NOT_VALID:
1787
		zfcp_erp_adapter_reopen(adapter, 0, "fsouh_1", req);
S
Swen Schillig 已提交
1788
		/* fall through */
L
Linus Torvalds 已提交
1789 1790 1791
	case FSF_LUN_ALREADY_OPEN:
		break;
	case FSF_ACCESS_DENIED:
1792 1793 1794
		zfcp_fsf_access_denied_lun(req, sdev);
		atomic_clear_mask(ZFCP_STATUS_LUN_SHARED, &zfcp_sdev->status);
		atomic_clear_mask(ZFCP_STATUS_LUN_READONLY, &zfcp_sdev->status);
L
Linus Torvalds 已提交
1795 1796
		break;
	case FSF_PORT_BOXED:
1797
		zfcp_erp_port_boxed(zfcp_sdev->port, "fsouh_2", req);
1798
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1799 1800
		break;
	case FSF_LUN_SHARING_VIOLATION:
S
Swen Schillig 已提交
1801
		if (header->fsf_status_qual.word[0])
C
Christof Schmitt 已提交
1802
			dev_warn(&adapter->ccw_device->dev,
1803 1804
				 "LUN 0x%Lx on port 0x%Lx is already in "
				 "use by CSS%d, MIF Image ID %x\n",
1805 1806
				 (unsigned long long)zfcp_scsi_dev_lun(sdev),
				 (unsigned long long)zfcp_sdev->port->wwpn,
1807 1808
				 queue_designator->cssid,
				 queue_designator->hla);
S
Swen Schillig 已提交
1809
		else
C
Christof Schmitt 已提交
1810 1811
			zfcp_act_eval_err(adapter,
					  header->fsf_status_qual.word[2]);
1812 1813 1814
		zfcp_erp_lun_access_denied(sdev, "fsolh_3", req);
		atomic_clear_mask(ZFCP_STATUS_LUN_SHARED, &zfcp_sdev->status);
		atomic_clear_mask(ZFCP_STATUS_LUN_READONLY, &zfcp_sdev->status);
S
Swen Schillig 已提交
1815
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1816 1817
		break;
	case FSF_MAXIMUM_NUMBER_OF_LUNS_EXCEEDED:
S
Swen Schillig 已提交
1818
		dev_warn(&adapter->ccw_device->dev,
1819 1820
			 "No handle is available for LUN "
			 "0x%016Lx on port 0x%016Lx\n",
1821 1822 1823
			 (unsigned long long)zfcp_scsi_dev_lun(sdev),
			 (unsigned long long)zfcp_sdev->port->wwpn);
		zfcp_erp_lun_failed(sdev, "fsolh_4", req);
S
Swen Schillig 已提交
1824 1825 1826
		/* fall through */
	case FSF_INVALID_COMMAND_OPTION:
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1827 1828 1829 1830
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]) {
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1831
			zfcp_fc_test_link(zfcp_sdev->port);
S
Swen Schillig 已提交
1832
			/* fall through */
L
Linus Torvalds 已提交
1833
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
1834
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1835 1836 1837 1838 1839
			break;
		}
		break;

	case FSF_GOOD:
1840 1841
		zfcp_sdev->lun_handle = header->lun_handle;
		atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &zfcp_sdev->status);
1842 1843 1844

		if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE) &&
		    (adapter->adapter_features & FSF_FEATURE_LUN_SHARING) &&
1845
		    !zfcp_ccw_priv_sch(adapter)) {
1846 1847 1848 1849 1850
			exclusive = (bottom->lun_access_info &
					FSF_UNIT_ACCESS_EXCLUSIVE);
			readwrite = (bottom->lun_access_info &
					FSF_UNIT_ACCESS_OUTBOUND_TRANSFER);

L
Linus Torvalds 已提交
1851
			if (!exclusive)
1852 1853
				atomic_set_mask(ZFCP_STATUS_LUN_SHARED,
						&zfcp_sdev->status);
L
Linus Torvalds 已提交
1854 1855

			if (!readwrite) {
1856 1857
				atomic_set_mask(ZFCP_STATUS_LUN_READONLY,
						&zfcp_sdev->status);
S
Swen Schillig 已提交
1858
				dev_info(&adapter->ccw_device->dev,
1859 1860
					 "SCSI device at LUN 0x%016Lx on port "
					 "0x%016Lx opened read-only\n",
1861 1862
				    (unsigned long long)zfcp_scsi_dev_lun(sdev),
				    (unsigned long long)zfcp_sdev->port->wwpn);
L
Linus Torvalds 已提交
1863 1864 1865
        		}

        		if (exclusive && !readwrite) {
S
Swen Schillig 已提交
1866
				dev_err(&adapter->ccw_device->dev,
1867
					"Exclusive read-only access not "
1868
					"supported (LUN 0x%016Lx, "
1869
					"port 0x%016Lx)\n",
1870 1871 1872
				    (unsigned long long)zfcp_scsi_dev_lun(sdev),
				    (unsigned long long)zfcp_sdev->port->wwpn);
				zfcp_erp_lun_failed(sdev, "fsolh_5", req);
S
Swen Schillig 已提交
1873
				req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1874
				zfcp_erp_lun_shutdown(sdev, 0, "fsolh_6", req);
L
Linus Torvalds 已提交
1875
        		} else if (!exclusive && readwrite) {
S
Swen Schillig 已提交
1876
				dev_err(&adapter->ccw_device->dev,
1877
					"Shared read-write access not "
1878
					"supported (LUN 0x%016Lx, port "
1879
					"0x%016Lx)\n",
1880 1881 1882
				    (unsigned long long)zfcp_scsi_dev_lun(sdev),
				    (unsigned long long)zfcp_sdev->port->wwpn);
				zfcp_erp_lun_failed(sdev, "fsolh_7", req);
S
Swen Schillig 已提交
1883
				req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1884
				zfcp_erp_lun_shutdown(sdev, 0, "fsolh_8", req);
L
Linus Torvalds 已提交
1885 1886 1887 1888 1889 1890
        		}
		}
		break;
	}
}

S
Swen Schillig 已提交
1891
/**
1892
 * zfcp_fsf_open_lun - open LUN
S
Swen Schillig 已提交
1893 1894
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1895
 */
1896
int zfcp_fsf_open_lun(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1897
{
S
Swen Schillig 已提交
1898
	struct zfcp_adapter *adapter = erp_action->adapter;
1899
	struct zfcp_qdio *qdio = adapter->qdio;
S
Swen Schillig 已提交
1900 1901 1902
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1903
	spin_lock_irq(&qdio->req_q_lock);
1904
	if (zfcp_qdio_sbal_get(qdio))
L
Linus Torvalds 已提交
1905 1906
		goto out;

1907
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_LUN,
1908
				  SBAL_FLAGS0_TYPE_READ,
1909
				  adapter->pool.erp_req);
1910

1911
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1912 1913 1914 1915
		retval = PTR_ERR(req);
		goto out;
	}

1916
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1917
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
1918

S
Swen Schillig 已提交
1919
	req->qtcb->header.port_handle = erp_action->port->handle;
1920 1921 1922
	req->qtcb->bottom.support.fcp_lun = zfcp_scsi_dev_lun(erp_action->sdev);
	req->handler = zfcp_fsf_open_lun_handler;
	req->data = erp_action->sdev;
S
Swen Schillig 已提交
1923
	req->erp_action = erp_action;
1924
	erp_action->fsf_req_id = req->req_id;
S
Swen Schillig 已提交
1925 1926 1927 1928

	if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE))
		req->qtcb->bottom.support.option = FSF_OPEN_LUN_SUPPRESS_BOXING;

1929
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1930
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1931
	if (retval) {
S
Swen Schillig 已提交
1932
		zfcp_fsf_req_free(req);
1933
		erp_action->fsf_req_id = 0;
L
Linus Torvalds 已提交
1934
	}
S
Swen Schillig 已提交
1935
out:
1936
	spin_unlock_irq(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1937 1938 1939
	return retval;
}

1940
static void zfcp_fsf_close_lun_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1941
{
1942 1943
	struct scsi_device *sdev = req->data;
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
L
Linus Torvalds 已提交
1944

S
Swen Schillig 已提交
1945
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1946
		return;
L
Linus Torvalds 已提交
1947

S
Swen Schillig 已提交
1948
	switch (req->qtcb->header.fsf_status) {
L
Linus Torvalds 已提交
1949
	case FSF_PORT_HANDLE_NOT_VALID:
1950 1951
		zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0, "fscuh_1",
					req);
S
Swen Schillig 已提交
1952
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1953 1954
		break;
	case FSF_LUN_HANDLE_NOT_VALID:
1955
		zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fscuh_2", req);
S
Swen Schillig 已提交
1956
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1957 1958
		break;
	case FSF_PORT_BOXED:
1959
		zfcp_erp_port_boxed(zfcp_sdev->port, "fscuh_3", req);
1960
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1961 1962
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
S
Swen Schillig 已提交
1963
		switch (req->qtcb->header.fsf_status_qual.word[0]) {
L
Linus Torvalds 已提交
1964
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1965
			zfcp_fc_test_link(zfcp_sdev->port);
S
Swen Schillig 已提交
1966
			/* fall through */
L
Linus Torvalds 已提交
1967
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
1968
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1969 1970 1971 1972
			break;
		}
		break;
	case FSF_GOOD:
1973
		atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &zfcp_sdev->status);
L
Linus Torvalds 已提交
1974 1975 1976 1977 1978
		break;
	}
}

/**
1979 1980
 * zfcp_fsf_close_LUN - close LUN
 * @erp_action: pointer to erp_action triggering the "close LUN"
S
Swen Schillig 已提交
1981
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1982
 */
1983
int zfcp_fsf_close_lun(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1984
{
1985
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1986
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(erp_action->sdev);
S
Swen Schillig 已提交
1987 1988
	struct zfcp_fsf_req *req;
	int retval = -EIO;
L
Linus Torvalds 已提交
1989

1990
	spin_lock_irq(&qdio->req_q_lock);
1991
	if (zfcp_qdio_sbal_get(qdio))
L
Linus Torvalds 已提交
1992
		goto out;
1993

1994
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_LUN,
1995
				  SBAL_FLAGS0_TYPE_READ,
1996
				  qdio->adapter->pool.erp_req);
1997

1998
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1999 2000 2001
		retval = PTR_ERR(req);
		goto out;
	}
L
Linus Torvalds 已提交
2002

2003
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
2004
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
2005

S
Swen Schillig 已提交
2006
	req->qtcb->header.port_handle = erp_action->port->handle;
2007 2008 2009
	req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
	req->handler = zfcp_fsf_close_lun_handler;
	req->data = erp_action->sdev;
S
Swen Schillig 已提交
2010
	req->erp_action = erp_action;
2011
	erp_action->fsf_req_id = req->req_id;
2012

2013
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
2014 2015 2016
	retval = zfcp_fsf_req_send(req);
	if (retval) {
		zfcp_fsf_req_free(req);
2017
		erp_action->fsf_req_id = 0;
S
Swen Schillig 已提交
2018 2019
	}
out:
2020
	spin_unlock_irq(&qdio->req_q_lock);
S
Swen Schillig 已提交
2021
	return retval;
L
Linus Torvalds 已提交
2022 2023
}

2024 2025 2026
static void zfcp_fsf_update_lat(struct fsf_latency_record *lat_rec, u32 lat)
{
	lat_rec->sum += lat;
S
Swen Schillig 已提交
2027 2028
	lat_rec->min = min(lat_rec->min, lat);
	lat_rec->max = max(lat_rec->max, lat);
2029 2030
}

2031
static void zfcp_fsf_req_trace(struct zfcp_fsf_req *req, struct scsi_cmnd *scsi)
2032
{
2033 2034
	struct fsf_qual_latency_info *lat_in;
	struct latency_cont *lat = NULL;
2035
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(scsi->device);
2036 2037
	struct zfcp_blk_drv_data blktrc;
	int ticks = req->adapter->timer_ticks;
2038

2039
	lat_in = &req->qtcb->prefix.prot_status_qual.latency_info;
2040

2041 2042 2043 2044
	blktrc.flags = 0;
	blktrc.magic = ZFCP_BLK_DRV_DATA_MAGIC;
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
		blktrc.flags |= ZFCP_BLK_REQ_ERROR;
2045
	blktrc.inb_usage = 0;
2046
	blktrc.outb_usage = req->qdio_req.qdio_outb_usage;
2047

2048 2049
	if (req->adapter->adapter_features & FSF_FEATURE_MEASUREMENT_DATA &&
	    !(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
2050 2051 2052 2053 2054
		blktrc.flags |= ZFCP_BLK_LAT_VALID;
		blktrc.channel_lat = lat_in->channel_lat * ticks;
		blktrc.fabric_lat = lat_in->fabric_lat * ticks;

		switch (req->qtcb->bottom.io.data_direction) {
2055 2056
		case FSF_DATADIR_DIF_READ_STRIP:
		case FSF_DATADIR_DIF_READ_CONVERT:
2057
		case FSF_DATADIR_READ:
2058
			lat = &zfcp_sdev->latencies.read;
2059
			break;
2060 2061
		case FSF_DATADIR_DIF_WRITE_INSERT:
		case FSF_DATADIR_DIF_WRITE_CONVERT:
2062
		case FSF_DATADIR_WRITE:
2063
			lat = &zfcp_sdev->latencies.write;
2064 2065
			break;
		case FSF_DATADIR_CMND:
2066
			lat = &zfcp_sdev->latencies.cmd;
2067 2068
			break;
		}
L
Linus Torvalds 已提交
2069

2070
		if (lat) {
2071
			spin_lock(&zfcp_sdev->latencies.lock);
2072 2073 2074
			zfcp_fsf_update_lat(&lat->channel, lat_in->channel_lat);
			zfcp_fsf_update_lat(&lat->fabric, lat_in->fabric_lat);
			lat->counter++;
2075
			spin_unlock(&zfcp_sdev->latencies.lock);
2076
		}
S
Stefan Raspl 已提交
2077 2078
	}

2079 2080
	blk_add_driver_data(scsi->request->q, scsi->request, &blktrc,
			    sizeof(blktrc));
S
Stefan Raspl 已提交
2081 2082
}

2083
static void zfcp_fsf_fcp_handler_common(struct zfcp_fsf_req *req)
S
Swen Schillig 已提交
2084
{
2085 2086 2087
	struct scsi_cmnd *scmnd = req->data;
	struct scsi_device *sdev = scmnd->device;
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
S
Swen Schillig 已提交
2088 2089 2090
	struct fsf_qtcb_header *header = &req->qtcb->header;

	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
2091
		return;
L
Linus Torvalds 已提交
2092

S
Swen Schillig 已提交
2093 2094 2095
	switch (header->fsf_status) {
	case FSF_HANDLE_MISMATCH:
	case FSF_PORT_HANDLE_NOT_VALID:
2096 2097
		zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0, "fssfch1",
					req);
S
Swen Schillig 已提交
2098 2099 2100 2101
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_FCPLUN_NOT_VALID:
	case FSF_LUN_HANDLE_NOT_VALID:
2102
		zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fssfch2", req);
S
Swen Schillig 已提交
2103
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2104
		break;
S
Swen Schillig 已提交
2105 2106
	case FSF_SERVICE_CLASS_NOT_SUPPORTED:
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
2107
		break;
S
Swen Schillig 已提交
2108
	case FSF_ACCESS_DENIED:
2109
		zfcp_fsf_access_denied_lun(req, sdev);
S
Swen Schillig 已提交
2110 2111 2112
		break;
	case FSF_DIRECTION_INDICATOR_NOT_VALID:
		dev_err(&req->adapter->ccw_device->dev,
2113
			"Incorrect direction %d, LUN 0x%016Lx on port "
2114
			"0x%016Lx closed\n",
S
Swen Schillig 已提交
2115
			req->qtcb->bottom.io.data_direction,
2116 2117 2118 2119
			(unsigned long long)zfcp_scsi_dev_lun(sdev),
			(unsigned long long)zfcp_sdev->port->wwpn);
		zfcp_erp_adapter_shutdown(zfcp_sdev->port->adapter, 0,
					  "fssfch3", req);
S
Swen Schillig 已提交
2120 2121 2122 2123
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_CMND_LENGTH_NOT_VALID:
		dev_err(&req->adapter->ccw_device->dev,
2124
			"Incorrect CDB length %d, LUN 0x%016Lx on "
2125
			"port 0x%016Lx closed\n",
S
Swen Schillig 已提交
2126
			req->qtcb->bottom.io.fcp_cmnd_length,
2127 2128 2129 2130
			(unsigned long long)zfcp_scsi_dev_lun(sdev),
			(unsigned long long)zfcp_sdev->port->wwpn);
		zfcp_erp_adapter_shutdown(zfcp_sdev->port->adapter, 0,
					  "fssfch4", req);
S
Swen Schillig 已提交
2131 2132 2133
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_PORT_BOXED:
2134
		zfcp_erp_port_boxed(zfcp_sdev->port, "fssfch5", req);
2135
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
S
Swen Schillig 已提交
2136 2137
		break;
	case FSF_LUN_BOXED:
2138
		zfcp_erp_lun_boxed(sdev, "fssfch6", req);
2139
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
S
Swen Schillig 已提交
2140 2141 2142 2143
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		if (header->fsf_status_qual.word[0] ==
		    FSF_SQ_INVOKE_LINK_TEST_PROCEDURE)
2144
			zfcp_fc_test_link(zfcp_sdev->port);
S
Swen Schillig 已提交
2145
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2146 2147
		break;
	}
2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163
}

static void zfcp_fsf_fcp_cmnd_handler(struct zfcp_fsf_req *req)
{
	struct scsi_cmnd *scpnt;
	struct fcp_resp_with_ext *fcp_rsp;
	unsigned long flags;

	zfcp_fsf_fcp_handler_common(req);

	read_lock_irqsave(&req->adapter->abort_lock, flags);

	scpnt = req->data;
	if (unlikely(!scpnt)) {
		read_unlock_irqrestore(&req->adapter->abort_lock, flags);
		return;
S
Swen Schillig 已提交
2164
	}
2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201

	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
		set_host_byte(scpnt, DID_TRANSPORT_DISRUPTED);
		goto skip_fsfstatus;
	}

	switch (req->qtcb->header.fsf_status) {
	case FSF_INCONSISTENT_PROT_DATA:
	case FSF_INVALID_PROT_PARM:
		set_host_byte(scpnt, DID_ERROR);
		goto skip_fsfstatus;
	case FSF_BLOCK_GUARD_CHECK_FAILURE:
		zfcp_scsi_dif_sense_error(scpnt, 0x1);
		goto skip_fsfstatus;
	case FSF_APP_TAG_CHECK_FAILURE:
		zfcp_scsi_dif_sense_error(scpnt, 0x2);
		goto skip_fsfstatus;
	case FSF_REF_TAG_CHECK_FAILURE:
		zfcp_scsi_dif_sense_error(scpnt, 0x3);
		goto skip_fsfstatus;
	}
	fcp_rsp = (struct fcp_resp_with_ext *) &req->qtcb->bottom.io.fcp_rsp;
	zfcp_fc_eval_fcp_rsp(fcp_rsp, scpnt);

skip_fsfstatus:
	zfcp_fsf_req_trace(req, scpnt);
	zfcp_dbf_scsi_result(req->adapter->dbf, scpnt, req);

	scpnt->host_scribble = NULL;
	(scpnt->scsi_done) (scpnt);
	/*
	 * We must hold this lock until scsi_done has been called.
	 * Otherwise we may call scsi_done after abort regarding this
	 * command has completed.
	 * Note: scsi_done must not block!
	 */
	read_unlock_irqrestore(&req->adapter->abort_lock, flags);
L
Linus Torvalds 已提交
2202 2203
}

2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241
static int zfcp_fsf_set_data_dir(struct scsi_cmnd *scsi_cmnd, u32 *data_dir)
{
	switch (scsi_get_prot_op(scsi_cmnd)) {
	case SCSI_PROT_NORMAL:
		switch (scsi_cmnd->sc_data_direction) {
		case DMA_NONE:
			*data_dir = FSF_DATADIR_CMND;
			break;
		case DMA_FROM_DEVICE:
			*data_dir = FSF_DATADIR_READ;
			break;
		case DMA_TO_DEVICE:
			*data_dir = FSF_DATADIR_WRITE;
			break;
		case DMA_BIDIRECTIONAL:
			return -EINVAL;
		}
		break;

	case SCSI_PROT_READ_STRIP:
		*data_dir = FSF_DATADIR_DIF_READ_STRIP;
		break;
	case SCSI_PROT_WRITE_INSERT:
		*data_dir = FSF_DATADIR_DIF_WRITE_INSERT;
		break;
	case SCSI_PROT_READ_PASS:
		*data_dir = FSF_DATADIR_DIF_READ_CONVERT;
		break;
	case SCSI_PROT_WRITE_PASS:
		*data_dir = FSF_DATADIR_DIF_WRITE_CONVERT;
		break;
	default:
		return -EINVAL;
	}

	return 0;
}

S
Swen Schillig 已提交
2242
/**
2243
 * zfcp_fsf_fcp_cmnd - initiate an FCP command (for a SCSI command)
S
Swen Schillig 已提交
2244
 * @scsi_cmnd: scsi command to be sent
L
Linus Torvalds 已提交
2245
 */
2246
int zfcp_fsf_fcp_cmnd(struct scsi_cmnd *scsi_cmnd)
L
Linus Torvalds 已提交
2247
{
S
Swen Schillig 已提交
2248
	struct zfcp_fsf_req *req;
2249
	struct fcp_cmnd *fcp_cmnd;
2250
	unsigned int sbtype = SBAL_FLAGS0_TYPE_READ;
2251
	int real_bytes, retval = -EIO, dix_bytes = 0;
2252 2253 2254
	struct scsi_device *sdev = scsi_cmnd->device;
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
	struct zfcp_adapter *adapter = zfcp_sdev->port->adapter;
2255
	struct zfcp_qdio *qdio = adapter->qdio;
2256
	struct fsf_qtcb_bottom_io *io;
L
Linus Torvalds 已提交
2257

2258
	if (unlikely(!(atomic_read(&zfcp_sdev->status) &
S
Swen Schillig 已提交
2259 2260
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		return -EBUSY;
L
Linus Torvalds 已提交
2261

2262
	spin_lock(&qdio->req_q_lock);
2263
	if (atomic_read(&qdio->req_q_free) <= 0) {
2264
		atomic_inc(&qdio->req_q_full);
S
Swen Schillig 已提交
2265
		goto out;
2266
	}
2267

2268 2269 2270
	if (scsi_cmnd->sc_data_direction == DMA_TO_DEVICE)
		sbtype = SBAL_FLAGS0_TYPE_WRITE;

2271
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
2272
				  sbtype, adapter->pool.scsi_req);
2273

2274
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2275 2276 2277 2278
		retval = PTR_ERR(req);
		goto out;
	}

2279 2280 2281
	scsi_cmnd->host_scribble = (unsigned char *) req->req_id;

	io = &req->qtcb->bottom.io;
2282
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
S
Swen Schillig 已提交
2283
	req->data = scsi_cmnd;
2284
	req->handler = zfcp_fsf_fcp_cmnd_handler;
2285 2286
	req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
	req->qtcb->header.port_handle = zfcp_sdev->port->handle;
2287 2288
	io->service_class = FSF_CLASS_3;
	io->fcp_cmnd_length = FCP_CMND_LEN;
S
Swen Schillig 已提交
2289

2290 2291 2292
	if (scsi_get_prot_op(scsi_cmnd) != SCSI_PROT_NORMAL) {
		io->data_block_length = scsi_cmnd->device->sector_size;
		io->ref_tag_value = scsi_get_lba(scsi_cmnd) & 0xFFFFFFFF;
L
Linus Torvalds 已提交
2293 2294
	}

2295 2296
	zfcp_fsf_set_data_dir(scsi_cmnd, &io->data_direction);

2297 2298
	fcp_cmnd = (struct fcp_cmnd *) &req->qtcb->bottom.io.fcp_cmnd;
	zfcp_fc_scsi_to_fcp(fcp_cmnd, scsi_cmnd);
L
Linus Torvalds 已提交
2299

2300 2301 2302 2303 2304 2305 2306 2307
	if (scsi_prot_sg_count(scsi_cmnd)) {
		zfcp_qdio_set_data_div(qdio, &req->qdio_req,
				       scsi_prot_sg_count(scsi_cmnd));
		dix_bytes = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req,
						scsi_prot_sglist(scsi_cmnd));
		io->prot_data_length = dix_bytes;
	}

2308
	real_bytes = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req,
2309
					     scsi_sglist(scsi_cmnd));
2310 2311

	if (unlikely(real_bytes < 0) || unlikely(dix_bytes < 0))
S
Swen Schillig 已提交
2312
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2313

2314 2315
	zfcp_qdio_set_sbale_last(adapter->qdio, &req->qdio_req);

S
Swen Schillig 已提交
2316 2317 2318
	retval = zfcp_fsf_req_send(req);
	if (unlikely(retval))
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2319

S
Swen Schillig 已提交
2320
	goto out;
L
Linus Torvalds 已提交
2321

S
Swen Schillig 已提交
2322 2323 2324 2325
failed_scsi_cmnd:
	zfcp_fsf_req_free(req);
	scsi_cmnd->host_scribble = NULL;
out:
2326
	spin_unlock(&qdio->req_q_lock);
S
Swen Schillig 已提交
2327
	return retval;
L
Linus Torvalds 已提交
2328 2329
}

2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344
static void zfcp_fsf_fcp_task_mgmt_handler(struct zfcp_fsf_req *req)
{
	struct fcp_resp_with_ext *fcp_rsp;
	struct fcp_resp_rsp_info *rsp_info;

	zfcp_fsf_fcp_handler_common(req);

	fcp_rsp = (struct fcp_resp_with_ext *) &req->qtcb->bottom.io.fcp_rsp;
	rsp_info = (struct fcp_resp_rsp_info *) &fcp_rsp[1];

	if ((rsp_info->rsp_code != FCP_TMF_CMPL) ||
	     (req->status & ZFCP_STATUS_FSFREQ_ERROR))
		req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
}

L
Linus Torvalds 已提交
2345
/**
2346 2347
 * zfcp_fsf_fcp_task_mgmt - send SCSI task management command
 * @scmnd: SCSI command to send the task management command for
S
Swen Schillig 已提交
2348 2349
 * @tm_flags: unsigned byte for task management flags
 * Returns: on success pointer to struct fsf_req, NULL otherwise
L
Linus Torvalds 已提交
2350
 */
2351 2352
struct zfcp_fsf_req *zfcp_fsf_fcp_task_mgmt(struct scsi_cmnd *scmnd,
					    u8 tm_flags)
L
Linus Torvalds 已提交
2353
{
S
Swen Schillig 已提交
2354
	struct zfcp_fsf_req *req = NULL;
2355
	struct fcp_cmnd *fcp_cmnd;
2356 2357
	struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(scmnd->device);
	struct zfcp_qdio *qdio = zfcp_sdev->port->adapter->qdio;
L
Linus Torvalds 已提交
2358

2359
	if (unlikely(!(atomic_read(&zfcp_sdev->status) &
S
Swen Schillig 已提交
2360 2361
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		return NULL;
L
Linus Torvalds 已提交
2362

2363
	spin_lock_irq(&qdio->req_q_lock);
2364
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
2365
		goto out;
2366

2367
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
2368
				  SBAL_FLAGS0_TYPE_WRITE,
2369
				  qdio->adapter->pool.scsi_req);
2370

2371 2372
	if (IS_ERR(req)) {
		req = NULL;
S
Swen Schillig 已提交
2373
		goto out;
2374
	}
L
Linus Torvalds 已提交
2375

S
Swen Schillig 已提交
2376
	req->status |= ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT;
2377
	req->data = scmnd;
2378
	req->handler = zfcp_fsf_fcp_task_mgmt_handler;
2379 2380
	req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
	req->qtcb->header.port_handle = zfcp_sdev->port->handle;
S
Swen Schillig 已提交
2381 2382
	req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
	req->qtcb->bottom.io.service_class = FSF_CLASS_3;
2383
	req->qtcb->bottom.io.fcp_cmnd_length = FCP_CMND_LEN;
S
Swen Schillig 已提交
2384

2385
	zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
L
Linus Torvalds 已提交
2386

2387
	fcp_cmnd = (struct fcp_cmnd *) &req->qtcb->bottom.io.fcp_cmnd;
2388
	zfcp_fc_fcp_tm(fcp_cmnd, scmnd->device, tm_flags);
L
Linus Torvalds 已提交
2389

S
Swen Schillig 已提交
2390 2391 2392
	zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
	if (!zfcp_fsf_req_send(req))
		goto out;
L
Linus Torvalds 已提交
2393

S
Swen Schillig 已提交
2394 2395 2396
	zfcp_fsf_req_free(req);
	req = NULL;
out:
2397
	spin_unlock_irq(&qdio->req_q_lock);
S
Swen Schillig 已提交
2398 2399
	return req;
}
L
Linus Torvalds 已提交
2400

S
Swen Schillig 已提交
2401 2402
static void zfcp_fsf_control_file_handler(struct zfcp_fsf_req *req)
{
L
Linus Torvalds 已提交
2403 2404
}

S
Swen Schillig 已提交
2405 2406 2407 2408 2409
/**
 * zfcp_fsf_control_file - control file upload/download
 * @adapter: pointer to struct zfcp_adapter
 * @fsf_cfdc: pointer to struct zfcp_fsf_cfdc
 * Returns: on success pointer to struct zfcp_fsf_req, NULL otherwise
L
Linus Torvalds 已提交
2410
 */
S
Swen Schillig 已提交
2411 2412
struct zfcp_fsf_req *zfcp_fsf_control_file(struct zfcp_adapter *adapter,
					   struct zfcp_fsf_cfdc *fsf_cfdc)
L
Linus Torvalds 已提交
2413
{
2414
	struct zfcp_qdio *qdio = adapter->qdio;
S
Swen Schillig 已提交
2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431
	struct zfcp_fsf_req *req = NULL;
	struct fsf_qtcb_bottom_support *bottom;
	int direction, retval = -EIO, bytes;

	if (!(adapter->adapter_features & FSF_FEATURE_CFDC))
		return ERR_PTR(-EOPNOTSUPP);

	switch (fsf_cfdc->command) {
	case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
		direction = SBAL_FLAGS0_TYPE_WRITE;
		break;
	case FSF_QTCB_UPLOAD_CONTROL_FILE:
		direction = SBAL_FLAGS0_TYPE_READ;
		break;
	default:
		return ERR_PTR(-EINVAL);
	}
L
Linus Torvalds 已提交
2432

2433
	spin_lock_irq(&qdio->req_q_lock);
2434
	if (zfcp_qdio_sbal_get(qdio))
S
Swen Schillig 已提交
2435
		goto out;
L
Linus Torvalds 已提交
2436

2437
	req = zfcp_fsf_req_create(qdio, fsf_cfdc->command, direction, NULL);
2438
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2439 2440 2441
		retval = -EPERM;
		goto out;
	}
L
Linus Torvalds 已提交
2442

S
Swen Schillig 已提交
2443
	req->handler = zfcp_fsf_control_file_handler;
L
Linus Torvalds 已提交
2444

S
Swen Schillig 已提交
2445 2446 2447
	bottom = &req->qtcb->bottom.support;
	bottom->operation_subtype = FSF_CFDC_OPERATION_SUBTYPE;
	bottom->option = fsf_cfdc->option;
2448

2449 2450
	bytes = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, fsf_cfdc->sg);

S
Swen Schillig 已提交
2451 2452 2453 2454
	if (bytes != ZFCP_CFDC_MAX_SIZE) {
		zfcp_fsf_req_free(req);
		goto out;
	}
2455
	zfcp_qdio_set_sbale_last(adapter->qdio, &req->qdio_req);
L
Linus Torvalds 已提交
2456

S
Swen Schillig 已提交
2457 2458 2459
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
out:
2460
	spin_unlock_irq(&qdio->req_q_lock);
2461

S
Swen Schillig 已提交
2462
	if (!retval) {
2463
		wait_for_completion(&req->completion);
S
Swen Schillig 已提交
2464
		return req;
L
Linus Torvalds 已提交
2465
	}
S
Swen Schillig 已提交
2466
	return ERR_PTR(retval);
L
Linus Torvalds 已提交
2467
}
2468 2469 2470 2471 2472 2473

/**
 * zfcp_fsf_reqid_check - validate req_id contained in SBAL returned by QDIO
 * @adapter: pointer to struct zfcp_adapter
 * @sbal_idx: response queue index of SBAL to be processed
 */
2474
void zfcp_fsf_reqid_check(struct zfcp_qdio *qdio, int sbal_idx)
2475
{
2476
	struct zfcp_adapter *adapter = qdio->adapter;
2477
	struct qdio_buffer *sbal = qdio->res_q[sbal_idx];
2478 2479
	struct qdio_buffer_element *sbale;
	struct zfcp_fsf_req *fsf_req;
2480
	unsigned long req_id;
2481 2482 2483 2484 2485 2486
	int idx;

	for (idx = 0; idx < QDIO_MAX_ELEMENTS_PER_BUFFER; idx++) {

		sbale = &sbal->element[idx];
		req_id = (unsigned long) sbale->addr;
2487
		fsf_req = zfcp_reqlist_find_rm(adapter->req_list, req_id);
2488

2489
		if (!fsf_req) {
2490 2491 2492 2493
			/*
			 * Unknown request means that we have potentially memory
			 * corruption and must stop the machine immediately.
			 */
2494
			zfcp_qdio_siosl(adapter);
2495 2496
			panic("error: unknown req_id (%lx) on adapter %s.\n",
			      req_id, dev_name(&adapter->ccw_device->dev));
2497
		}
2498

2499
		fsf_req->qdio_req.sbal_response = sbal_idx;
2500 2501 2502 2503 2504 2505
		zfcp_fsf_req_complete(fsf_req);

		if (likely(sbale->flags & SBAL_FLAGS_LAST_ENTRY))
			break;
	}
}