zfcp_fsf.c 71.3 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, 2009
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 <scsi/fc/fc_els.h>
L
Linus Torvalds 已提交
14
#include "zfcp_ext.h"
15
#include "zfcp_fc.h"
16
#include "zfcp_dbf.h"
L
Linus Torvalds 已提交
17

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

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 已提交
43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59
/* 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 已提交
60 61
static void zfcp_act_eval_err(struct zfcp_adapter *adapter, u32 table)
{
S
Swen Schillig 已提交
62
	u16 subtable = table >> 16;
C
Christof Schmitt 已提交
63
	u16 rule = table & 0xffff;
64
	const char *act_type[] = { "unknown", "OS", "WWPN", "DID", "LUN" };
C
Christof Schmitt 已提交
65

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

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,
77
		 "Access denied to port 0x%016Lx\n",
78
		 (unsigned long long)port->wwpn);
C
Christof Schmitt 已提交
79 80
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[0]);
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[1]);
81
	zfcp_erp_port_access_denied(port, "fspad_1", req);
C
Christof Schmitt 已提交
82 83 84 85 86 87 88 89
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
}

static void zfcp_fsf_access_denied_unit(struct zfcp_fsf_req *req,
					struct zfcp_unit *unit)
{
	struct fsf_qtcb_header *header = &req->qtcb->header;
	dev_warn(&req->adapter->ccw_device->dev,
90
		 "Access denied to unit 0x%016Lx on port 0x%016Lx\n",
91 92
		 (unsigned long long)unit->fcp_lun,
		 (unsigned long long)unit->port->wwpn);
C
Christof Schmitt 已提交
93 94
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[0]);
	zfcp_act_eval_err(req->adapter, header->fsf_status_qual.halfword[1]);
95
	zfcp_erp_unit_access_denied(unit, "fsuad_1", req);
C
Christof Schmitt 已提交
96 97 98 99 100
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
}

static void zfcp_fsf_class_not_supp(struct zfcp_fsf_req *req)
{
101 102
	dev_err(&req->adapter->ccw_device->dev, "FCP device not "
		"operational because of an unsupported FC class\n");
103
	zfcp_erp_adapter_shutdown(req->adapter, 0, "fscns_1", req);
C
Christof Schmitt 已提交
104 105 106
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
}

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

120 121 122
	if (likely(req->qtcb))
		kmem_cache_free(zfcp_data.qtcb_cache, req->qtcb);
	kfree(req);
L
Linus Torvalds 已提交
123 124
}

S
Swen Schillig 已提交
125
static void zfcp_fsf_status_read_port_closed(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
126
{
127
	unsigned long flags;
S
Swen Schillig 已提交
128 129 130 131
	struct fsf_status_read_buffer *sr_buf = req->data;
	struct zfcp_adapter *adapter = req->adapter;
	struct zfcp_port *port;
	int d_id = sr_buf->d_id & ZFCP_DID_MASK;
L
Linus Torvalds 已提交
132

133 134
	read_lock_irqsave(&adapter->port_list_lock, flags);
	list_for_each_entry(port, &adapter->port_list, list)
S
Swen Schillig 已提交
135
		if (port->d_id == d_id) {
136
			zfcp_erp_port_reopen(port, 0, "fssrpc1", req);
137
			break;
S
Swen Schillig 已提交
138
		}
139
	read_unlock_irqrestore(&adapter->port_list_lock, flags);
L
Linus Torvalds 已提交
140 141
}

142
static void zfcp_fsf_link_down_info_eval(struct zfcp_fsf_req *req, char *id,
S
Swen Schillig 已提交
143
					 struct fsf_link_down_info *link_down)
144
{
S
Swen Schillig 已提交
145
	struct zfcp_adapter *adapter = req->adapter;
146

S
Swen Schillig 已提交
147
	if (atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED)
148 149 150
		return;

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

152
	zfcp_scsi_schedule_rports_block(adapter);
153

S
Swen Schillig 已提交
154
	if (!link_down)
155
		goto out;
156

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

S
Swen Schillig 已提交
225
static void zfcp_fsf_status_read_link_down(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
226
{
S
Swen Schillig 已提交
227 228 229
	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 已提交
230

S
Swen Schillig 已提交
231 232
	switch (sr_buf->status_subtype) {
	case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
233
		zfcp_fsf_link_down_info_eval(req, "fssrld1", ldi);
L
Linus Torvalds 已提交
234
		break;
S
Swen Schillig 已提交
235
	case FSF_STATUS_READ_SUB_FDISC_FAILED:
236
		zfcp_fsf_link_down_info_eval(req, "fssrld2", ldi);
L
Linus Torvalds 已提交
237
		break;
S
Swen Schillig 已提交
238
	case FSF_STATUS_READ_SUB_FIRMWARE_UPDATE:
239
		zfcp_fsf_link_down_info_eval(req, "fssrld3", NULL);
S
Swen Schillig 已提交
240 241
	};
}
L
Linus Torvalds 已提交
242

S
Swen Schillig 已提交
243 244 245 246
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 已提交
247

S
Swen Schillig 已提交
248
	if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
S
Swen Schillig 已提交
249
		zfcp_dbf_hba_fsf_unsol("dism", adapter->dbf, sr_buf);
250
		mempool_free(sr_buf, adapter->pool.status_read_data);
S
Swen Schillig 已提交
251 252 253
		zfcp_fsf_req_free(req);
		return;
	}
L
Linus Torvalds 已提交
254

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

S
Swen Schillig 已提交
257 258 259
	switch (sr_buf->status_type) {
	case FSF_STATUS_READ_PORT_CLOSED:
		zfcp_fsf_status_read_port_closed(req);
L
Linus Torvalds 已提交
260
		break;
S
Swen Schillig 已提交
261 262
	case FSF_STATUS_READ_INCOMING_ELS:
		zfcp_fc_incoming_els(req);
L
Linus Torvalds 已提交
263
		break;
S
Swen Schillig 已提交
264
	case FSF_STATUS_READ_SENSE_DATA_AVAIL:
L
Linus Torvalds 已提交
265
		break;
S
Swen Schillig 已提交
266
	case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
267 268 269
		dev_warn(&adapter->ccw_device->dev,
			 "The error threshold for checksum statistics "
			 "has been exceeded\n");
S
Swen Schillig 已提交
270
		zfcp_dbf_hba_berr(adapter->dbf, req);
L
Linus Torvalds 已提交
271
		break;
S
Swen Schillig 已提交
272 273 274 275 276
	case FSF_STATUS_READ_LINK_DOWN:
		zfcp_fsf_status_read_link_down(req);
		break;
	case FSF_STATUS_READ_LINK_UP:
		dev_info(&adapter->ccw_device->dev,
277
			 "The local link has been restored\n");
S
Swen Schillig 已提交
278
		/* All ports should be marked as ready to run again */
279
		zfcp_erp_modify_adapter_status(adapter, "fssrh_1", NULL,
S
Swen Schillig 已提交
280 281 282 283 284
					       ZFCP_STATUS_COMMON_RUNNING,
					       ZFCP_SET);
		zfcp_erp_adapter_reopen(adapter,
					ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
					ZFCP_STATUS_COMMON_ERP_FAILED,
285
					"fssrh_2", req);
S
Swen Schillig 已提交
286 287 288
		break;
	case FSF_STATUS_READ_NOTIFICATION_LOST:
		if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_ACT_UPDATED)
289 290
			zfcp_erp_adapter_access_changed(adapter, "fssrh_3",
							req);
S
Swen Schillig 已提交
291
		if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_INCOMING_ELS)
292
			queue_work(adapter->work_queue, &adapter->scan_work);
S
Swen Schillig 已提交
293 294
		break;
	case FSF_STATUS_READ_CFDC_UPDATED:
295
		zfcp_erp_adapter_access_changed(adapter, "fssrh_4", req);
S
Swen Schillig 已提交
296 297 298
		break;
	case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
		adapter->adapter_features = sr_buf->payload.word[0];
L
Linus Torvalds 已提交
299 300 301
		break;
	}

302
	mempool_free(sr_buf, adapter->pool.status_read_data);
S
Swen Schillig 已提交
303
	zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
304

S
Swen Schillig 已提交
305
	atomic_inc(&adapter->stat_miss);
306
	queue_work(adapter->work_queue, &adapter->stat_work);
S
Swen Schillig 已提交
307
}
L
Linus Torvalds 已提交
308

S
Swen Schillig 已提交
309 310 311 312 313 314 315 316 317 318 319 320 321
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:
		req->status |= ZFCP_STATUS_FSFREQ_ABORTED;
		break;
	case FSF_SQ_NO_RECOM:
		dev_err(&req->adapter->ccw_device->dev,
322 323
			"The FCP adapter reported a problem "
			"that cannot be recovered\n");
324
		zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfsqe1", req);
S
Swen Schillig 已提交
325 326 327 328
		break;
	}
	/* all non-return stats set FSFREQ_ERROR*/
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
329 330
}

S
Swen Schillig 已提交
331
static void zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
332
{
S
Swen Schillig 已提交
333 334
	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
		return;
L
Linus Torvalds 已提交
335

S
Swen Schillig 已提交
336 337 338
	switch (req->qtcb->header.fsf_status) {
	case FSF_UNKNOWN_COMMAND:
		dev_err(&req->adapter->ccw_device->dev,
339
			"The FCP adapter does not recognize the command 0x%x\n",
S
Swen Schillig 已提交
340
			req->qtcb->header.fsf_command);
341
		zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfse_1", req);
S
Swen Schillig 已提交
342 343 344 345 346 347 348
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		zfcp_fsf_fsfstatus_qual_eval(req);
		break;
	}
}
L
Linus Torvalds 已提交
349

S
Swen Schillig 已提交
350 351 352 353 354
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 已提交
355

S
Swen Schillig 已提交
356
	zfcp_dbf_hba_fsf_response(req);
L
Linus Torvalds 已提交
357

S
Swen Schillig 已提交
358 359 360 361 362
	if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			ZFCP_STATUS_FSFREQ_RETRY; /* only for SCSI cmnds. */
		return;
	}
L
Linus Torvalds 已提交
363

S
Swen Schillig 已提交
364 365 366 367 368 369
	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,
370 371 372
			"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]);
373
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_1", req);
S
Swen Schillig 已提交
374 375 376
		break;
	case FSF_PROT_ERROR_STATE:
	case FSF_PROT_SEQ_NUMB_ERROR:
377
		zfcp_erp_adapter_reopen(adapter, 0, "fspse_2", req);
S
Swen Schillig 已提交
378 379 380 381
		req->status |= ZFCP_STATUS_FSFREQ_RETRY;
		break;
	case FSF_PROT_UNSUPP_QTCB_TYPE:
		dev_err(&adapter->ccw_device->dev,
382
			"The QTCB type is not supported by the FCP adapter\n");
383
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_3", req);
S
Swen Schillig 已提交
384 385 386 387 388 389 390
		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,
391
			"0x%Lx is an ambiguous request identifier\n",
S
Swen Schillig 已提交
392
			(unsigned long long)qtcb->bottom.support.req_handle);
393
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_4", req);
S
Swen Schillig 已提交
394 395
		break;
	case FSF_PROT_LINK_DOWN:
396 397
		zfcp_fsf_link_down_info_eval(req, "fspse_5",
					     &psq->link_down_info);
S
Swen Schillig 已提交
398
		/* FIXME: reopening adapter now? better wait for link up */
399
		zfcp_erp_adapter_reopen(adapter, 0, "fspse_6", req);
S
Swen Schillig 已提交
400 401 402
		break;
	case FSF_PROT_REEST_QUEUE:
		/* All ports should be marked as ready to run again */
403
		zfcp_erp_modify_adapter_status(adapter, "fspse_7", NULL,
S
Swen Schillig 已提交
404 405 406 407
					       ZFCP_STATUS_COMMON_RUNNING,
					       ZFCP_SET);
		zfcp_erp_adapter_reopen(adapter,
					ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
408 409
					ZFCP_STATUS_COMMON_ERP_FAILED,
					"fspse_8", req);
S
Swen Schillig 已提交
410 411 412
		break;
	default:
		dev_err(&adapter->ccw_device->dev,
413
			"0x%x is not a valid transfer protocol status\n",
S
Swen Schillig 已提交
414
			qtcb->prefix.prot_status);
415
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_9", req);
S
Swen Schillig 已提交
416 417
	}
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
418 419
}

S
Swen Schillig 已提交
420 421 422 423 424 425 426 427 428
/**
 * 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.
 */
429
static void zfcp_fsf_req_complete(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
430
{
S
Swen Schillig 已提交
431 432 433 434
	if (unlikely(req->fsf_command == FSF_QTCB_UNSOLICITED_STATUS)) {
		zfcp_fsf_status_read_handler(req);
		return;
	}
L
Linus Torvalds 已提交
435

S
Swen Schillig 已提交
436 437 438 439
	del_timer(&req->timer);
	zfcp_fsf_protstatus_eval(req);
	zfcp_fsf_fsfstatus_eval(req);
	req->handler(req);
L
Linus Torvalds 已提交
440

S
Swen Schillig 已提交
441
	if (req->erp_action)
442
		zfcp_erp_notify(req->erp_action, 0);
L
Linus Torvalds 已提交
443

S
Swen Schillig 已提交
444 445 446
	if (likely(req->status & ZFCP_STATUS_FSFREQ_CLEANUP))
		zfcp_fsf_req_free(req);
	else
447
		complete(&req->completion);
S
Swen Schillig 已提交
448
}
L
Linus Torvalds 已提交
449

450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478
/**
 * 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;
	unsigned long flags;
	LIST_HEAD(remove_queue);
	unsigned int i;

	BUG_ON(atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_QDIOUP);
	spin_lock_irqsave(&adapter->req_list_lock, flags);
	for (i = 0; i < REQUEST_LIST_SIZE; i++)
		list_splice_init(&adapter->req_list[i], &remove_queue);
	spin_unlock_irqrestore(&adapter->req_list_lock, flags);

	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 已提交
479 480
static int zfcp_fsf_exchange_config_evaluate(struct zfcp_fsf_req *req)
{
481
	struct fsf_qtcb_bottom_config *bottom = &req->qtcb->bottom.config;
S
Swen Schillig 已提交
482 483
	struct zfcp_adapter *adapter = req->adapter;
	struct Scsi_Host *shost = adapter->scsi_host;
484
	struct fc_els_flogi *nsp, *plogi;
L
Linus Torvalds 已提交
485

486 487 488 489 490
	/* 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 已提交
491

S
Swen Schillig 已提交
492 493 494
	if (req->data)
		memcpy(req->data, bottom, sizeof(*bottom));

495 496
	fc_host_port_name(shost) = nsp->fl_wwpn;
	fc_host_node_name(shost) = nsp->fl_wwnn;
S
Swen Schillig 已提交
497 498 499 500 501 502 503 504 505 506 507 508 509
	fc_host_port_id(shost) = bottom->s_id & ZFCP_DID_MASK;
	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;
	adapter->timer_ticks = bottom->timer_interval;

	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:
		adapter->peer_d_id = bottom->peer_d_id & ZFCP_DID_MASK;
510 511
		adapter->peer_wwpn = plogi->fl_wwpn;
		adapter->peer_wwnn = plogi->fl_wwnn;
S
Swen Schillig 已提交
512 513 514 515 516 517 518
		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;
519
		/* fall through */
S
Swen Schillig 已提交
520 521
	default:
		dev_err(&adapter->ccw_device->dev,
522 523
			"Unknown or unsupported arbitrated loop "
			"fibre channel topology detected\n");
524
		zfcp_erp_adapter_shutdown(adapter, 0, "fsece_1", req);
S
Swen Schillig 已提交
525
		return -EIO;
L
Linus Torvalds 已提交
526
	}
S
Swen Schillig 已提交
527

L
Linus Torvalds 已提交
528 529 530
	return 0;
}

S
Swen Schillig 已提交
531
static void zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *req)
C
Christof Schmitt 已提交
532 533
{
	struct zfcp_adapter *adapter = req->adapter;
S
Swen Schillig 已提交
534 535 536
	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 已提交
537

S
Swen Schillig 已提交
538 539
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
		return;
L
Linus Torvalds 已提交
540

S
Swen Schillig 已提交
541 542 543 544 545 546
	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;
547

S
Swen Schillig 已提交
548 549 550 551
	switch (qtcb->header.fsf_status) {
	case FSF_GOOD:
		if (zfcp_fsf_exchange_config_evaluate(req))
			return;
L
Linus Torvalds 已提交
552

S
Swen Schillig 已提交
553 554
		if (bottom->max_qtcb_size < sizeof(struct fsf_qtcb)) {
			dev_err(&adapter->ccw_device->dev,
555 556 557
				"FCP adapter maximum QTCB size (%d bytes) "
				"is too small\n",
				bottom->max_qtcb_size);
558
			zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh1", req);
S
Swen Schillig 已提交
559 560 561 562
			return;
		}
		atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
				&adapter->status);
L
Linus Torvalds 已提交
563
		break;
S
Swen Schillig 已提交
564 565 566 567 568 569 570
	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 已提交
571

S
Swen Schillig 已提交
572 573
		atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
				&adapter->status);
L
Linus Torvalds 已提交
574

575
		zfcp_fsf_link_down_info_eval(req, "fsecdh2",
S
Swen Schillig 已提交
576
			&qtcb->header.fsf_status_qual.link_down_info);
L
Linus Torvalds 已提交
577
		break;
S
Swen Schillig 已提交
578
	default:
579
		zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh3", req);
S
Swen Schillig 已提交
580 581
		return;
	}
L
Linus Torvalds 已提交
582

S
Swen Schillig 已提交
583 584 585 586 587 588 589
	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 已提交
590

S
Swen Schillig 已提交
591 592
	if (FSF_QTCB_CURRENT_VERSION < bottom->low_qtcb_version) {
		dev_err(&adapter->ccw_device->dev,
593 594
			"The FCP adapter only supports newer "
			"control block versions\n");
595
		zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh4", req);
S
Swen Schillig 已提交
596 597 598 599
		return;
	}
	if (FSF_QTCB_CURRENT_VERSION > bottom->high_qtcb_version) {
		dev_err(&adapter->ccw_device->dev,
600 601
			"The FCP adapter only supports older "
			"control block versions\n");
602
		zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh5", req);
S
Swen Schillig 已提交
603 604
	}
}
L
Linus Torvalds 已提交
605

S
Swen Schillig 已提交
606 607 608 609 610
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 已提交
611

S
Swen Schillig 已提交
612 613
	if (req->data)
		memcpy(req->data, bottom, sizeof(*bottom));
614

615
	if (adapter->connection_features & FSF_FEATURE_NPIV_MODE) {
S
Swen Schillig 已提交
616
		fc_host_permanent_port_name(shost) = bottom->wwpn;
617 618
		fc_host_port_type(shost) = FC_PORTTYPE_NPIV;
	} else
S
Swen Schillig 已提交
619 620 621 622
		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;
}
L
Linus Torvalds 已提交
623

S
Swen Schillig 已提交
624 625 626 627 628 629 630 631 632 633 634 635 636
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);
637
		zfcp_fsf_link_down_info_eval(req, "fsepdh1",
S
Swen Schillig 已提交
638
			&qtcb->header.fsf_status_qual.link_down_info);
639
		break;
L
Linus Torvalds 已提交
640
	}
S
Swen Schillig 已提交
641
}
642

643
static int zfcp_fsf_sbal_check(struct zfcp_qdio *qdio)
S
Swen Schillig 已提交
644
{
645
	struct zfcp_qdio_queue *req_q = &qdio->req_q;
S
Swen Schillig 已提交
646

647
	spin_lock_bh(&qdio->req_q_lock);
648 649
	if (atomic_read(&req_q->count))
		return 1;
650
	spin_unlock_bh(&qdio->req_q_lock);
651 652 653
	return 0;
}

654
static int zfcp_fsf_req_sbal_get(struct zfcp_qdio *qdio)
655
{
656
	struct zfcp_adapter *adapter = qdio->adapter;
657
	long ret;
658

659 660 661
	spin_unlock_bh(&qdio->req_q_lock);
	ret = wait_event_interruptible_timeout(qdio->req_q_wq,
			       zfcp_fsf_sbal_check(qdio), 5 * HZ);
S
Swen Schillig 已提交
662 663
	if (ret > 0)
		return 0;
664
	if (!ret) {
665
		atomic_inc(&qdio->req_q_full);
666 667 668
		/* assume hanging outbound queue, try queue recovery */
		zfcp_erp_adapter_reopen(adapter, 0, "fsrsg_1", NULL);
	}
669

670
	spin_lock_bh(&qdio->req_q_lock);
S
Swen Schillig 已提交
671 672 673
	return -EIO;
}

674
static struct zfcp_fsf_req *zfcp_fsf_alloc(mempool_t *pool)
S
Swen Schillig 已提交
675 676
{
	struct zfcp_fsf_req *req;
677 678 679 680 681 682 683

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

	if (unlikely(!req))
S
Swen Schillig 已提交
684
		return NULL;
685

S
Swen Schillig 已提交
686
	memset(req, 0, sizeof(*req));
687
	req->pool = pool;
S
Swen Schillig 已提交
688 689 690
	return req;
}

691
static struct fsf_qtcb *zfcp_qtcb_alloc(mempool_t *pool)
S
Swen Schillig 已提交
692
{
693
	struct fsf_qtcb *qtcb;
S
Swen Schillig 已提交
694 695 696 697

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

S
Swen Schillig 已提交
700 701 702 703
	if (unlikely(!qtcb))
		return NULL;

	memset(qtcb, 0, sizeof(*qtcb));
704
	return qtcb;
S
Swen Schillig 已提交
705 706
}

707
static struct zfcp_fsf_req *zfcp_fsf_req_create(struct zfcp_qdio *qdio,
708
						u32 fsf_cmd, mempool_t *pool)
L
Linus Torvalds 已提交
709
{
710
	struct qdio_buffer_element *sbale;
711 712
	struct zfcp_qdio_queue *req_q = &qdio->req_q;
	struct zfcp_adapter *adapter = qdio->adapter;
713
	struct zfcp_fsf_req *req = zfcp_fsf_alloc(pool);
L
Linus Torvalds 已提交
714

S
Swen Schillig 已提交
715
	if (unlikely(!req))
716
		return ERR_PTR(-ENOMEM);
L
Linus Torvalds 已提交
717

S
Swen Schillig 已提交
718 719
	if (adapter->req_no == 0)
		adapter->req_no++;
L
Linus Torvalds 已提交
720

S
Swen Schillig 已提交
721 722
	INIT_LIST_HEAD(&req->list);
	init_timer(&req->timer);
723
	init_completion(&req->completion);
L
Linus Torvalds 已提交
724

S
Swen Schillig 已提交
725 726
	req->adapter = adapter;
	req->fsf_command = fsf_cmd;
727
	req->req_id = adapter->req_no;
728 729 730 731
	req->queue_req.sbal_number = 1;
	req->queue_req.sbal_first = req_q->first;
	req->queue_req.sbal_last = req_q->first;
	req->queue_req.sbale_curr = 1;
S
Swen Schillig 已提交
732

733
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
S
Swen Schillig 已提交
734 735 736
	sbale[0].addr = (void *) req->req_id;
	sbale[0].flags |= SBAL_FLAGS0_COMMAND;

737 738 739 740 741 742 743 744 745 746 747
	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);
		}

748
		req->qtcb->prefix.req_seq_no = adapter->fsf_req_seq_no;
S
Swen Schillig 已提交
749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764
		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;
		req->seq_no = adapter->fsf_req_seq_no;
		req->qtcb->prefix.req_seq_no = adapter->fsf_req_seq_no;
		sbale[1].addr = (void *) req->qtcb;
		sbale[1].length = sizeof(struct fsf_qtcb);
	}

	if (!(atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_QDIOUP)) {
		zfcp_fsf_req_free(req);
		return ERR_PTR(-EIO);
	}
765

S
Swen Schillig 已提交
766
	return req;
L
Linus Torvalds 已提交
767 768
}

S
Swen Schillig 已提交
769 770 771
static int zfcp_fsf_req_send(struct zfcp_fsf_req *req)
{
	struct zfcp_adapter *adapter = req->adapter;
772
	struct zfcp_qdio *qdio = adapter->qdio;
773 774 775
	unsigned long	     flags;
	int		     idx;
	int		     with_qtcb = (req->qtcb != NULL);
S
Swen Schillig 已提交
776 777

	/* put allocated FSF request into hash table */
778
	spin_lock_irqsave(&adapter->req_list_lock, flags);
S
Swen Schillig 已提交
779 780
	idx = zfcp_reqlist_hash(req->req_id);
	list_add_tail(&req->list, &adapter->req_list[idx]);
781
	spin_unlock_irqrestore(&adapter->req_list_lock, flags);
S
Swen Schillig 已提交
782

783
	req->queue_req.qdio_outb_usage = atomic_read(&qdio->req_q.count);
S
Swen Schillig 已提交
784
	req->issued = get_clock();
785
	if (zfcp_qdio_send(qdio, &req->queue_req)) {
S
Swen Schillig 已提交
786
		del_timer(&req->timer);
787 788 789 790 791
		spin_lock_irqsave(&adapter->req_list_lock, flags);
		/* lookup request again, list might have changed */
		if (zfcp_reqlist_find_safe(adapter, req))
			zfcp_reqlist_remove(adapter, req);
		spin_unlock_irqrestore(&adapter->req_list_lock, flags);
792
		zfcp_erp_adapter_reopen(adapter, 0, "fsrs__1", req);
S
Swen Schillig 已提交
793 794 795 796
		return -EIO;
	}

	/* Don't increase for unsolicited status */
797
	if (with_qtcb)
S
Swen Schillig 已提交
798
		adapter->fsf_req_seq_no++;
799
	adapter->req_no++;
S
Swen Schillig 已提交
800 801 802 803 804 805 806 807 808

	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 已提交
809
 */
810
int zfcp_fsf_status_read(struct zfcp_qdio *qdio)
L
Linus Torvalds 已提交
811
{
812
	struct zfcp_adapter *adapter = qdio->adapter;
S
Swen Schillig 已提交
813 814
	struct zfcp_fsf_req *req;
	struct fsf_status_read_buffer *sr_buf;
815
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
816
	int retval = -EIO;
L
Linus Torvalds 已提交
817

818 819
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
820 821
		goto out;

822
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_UNSOLICITED_STATUS,
823
				  adapter->pool.status_read_req);
824
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
825 826
		retval = PTR_ERR(req);
		goto out;
L
Linus Torvalds 已提交
827 828
	}

829
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
S
Swen Schillig 已提交
830
	sbale[2].flags |= SBAL_FLAGS_LAST_ENTRY;
831
	req->queue_req.sbale_curr = 2;
S
Swen Schillig 已提交
832

833
	sr_buf = mempool_alloc(adapter->pool.status_read_data, GFP_ATOMIC);
S
Swen Schillig 已提交
834 835 836 837 838 839
	if (!sr_buf) {
		retval = -ENOMEM;
		goto failed_buf;
	}
	memset(sr_buf, 0, sizeof(*sr_buf));
	req->data = sr_buf;
840
	sbale = zfcp_qdio_sbale_curr(qdio, &req->queue_req);
S
Swen Schillig 已提交
841 842
	sbale->addr = (void *) sr_buf;
	sbale->length = sizeof(*sr_buf);
843

S
Swen Schillig 已提交
844 845 846
	retval = zfcp_fsf_req_send(req);
	if (retval)
		goto failed_req_send;
L
Linus Torvalds 已提交
847

S
Swen Schillig 已提交
848 849 850
	goto out;

failed_req_send:
851
	mempool_free(sr_buf, adapter->pool.status_read_data);
S
Swen Schillig 已提交
852 853
failed_buf:
	zfcp_fsf_req_free(req);
S
Swen Schillig 已提交
854
	zfcp_dbf_hba_fsf_unsol("fail", adapter->dbf, NULL);
S
Swen Schillig 已提交
855
out:
856
	spin_unlock_bh(&qdio->req_q_lock);
S
Swen Schillig 已提交
857 858 859 860 861 862 863 864 865 866 867 868
	return retval;
}

static void zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *req)
{
	struct zfcp_unit *unit = req->data;
	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 已提交
869
	case FSF_PORT_HANDLE_NOT_VALID:
S
Swen Schillig 已提交
870
		if (fsq->word[0] == fsq->word[1]) {
871 872
			zfcp_erp_adapter_reopen(unit->port->adapter, 0,
						"fsafch1", req);
S
Swen Schillig 已提交
873
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
874 875 876
		}
		break;
	case FSF_LUN_HANDLE_NOT_VALID:
S
Swen Schillig 已提交
877
		if (fsq->word[0] == fsq->word[1]) {
878
			zfcp_erp_port_reopen(unit->port, 0, "fsafch2", req);
S
Swen Schillig 已提交
879
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
880 881 882
		}
		break;
	case FSF_FCP_COMMAND_DOES_NOT_EXIST:
S
Swen Schillig 已提交
883
		req->status |= ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED;
L
Linus Torvalds 已提交
884 885
		break;
	case FSF_PORT_BOXED:
886
		zfcp_erp_port_boxed(unit->port, "fsafch3", req);
S
Swen Schillig 已提交
887 888
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
889 890
		break;
	case FSF_LUN_BOXED:
891
		zfcp_erp_unit_boxed(unit, "fsafch4", req);
S
Swen Schillig 已提交
892 893
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
894 895
                break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
S
Swen Schillig 已提交
896
		switch (fsq->word[0]) {
L
Linus Torvalds 已提交
897
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
898
			zfcp_fc_test_link(unit->port);
899
			/* fall through */
L
Linus Torvalds 已提交
900
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
901
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
902 903 904 905
			break;
		}
		break;
	case FSF_GOOD:
S
Swen Schillig 已提交
906
		req->status |= ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED;
L
Linus Torvalds 已提交
907 908 909 910 911
		break;
	}
}

/**
S
Swen Schillig 已提交
912 913 914 915
 * zfcp_fsf_abort_fcp_command - abort running SCSI command
 * @old_req_id: unsigned long
 * @unit: pointer to struct zfcp_unit
 * Returns: pointer to struct zfcp_fsf_req
L
Linus Torvalds 已提交
916 917
 */

S
Swen Schillig 已提交
918
struct zfcp_fsf_req *zfcp_fsf_abort_fcp_command(unsigned long old_req_id,
919
						struct zfcp_unit *unit)
L
Linus Torvalds 已提交
920
{
921
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
922
	struct zfcp_fsf_req *req = NULL;
923
	struct zfcp_qdio *qdio = unit->port->adapter->qdio;
924

925 926
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
927
		goto out;
928 929
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_ABORT_FCP_CMND,
				  qdio->adapter->pool.scsi_abort);
930 931
	if (IS_ERR(req)) {
		req = NULL;
S
Swen Schillig 已提交
932
		goto out;
933
	}
934

S
Swen Schillig 已提交
935 936 937
	if (unlikely(!(atomic_read(&unit->status) &
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		goto out_error_free;
L
Linus Torvalds 已提交
938

939
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
S
Swen Schillig 已提交
940 941
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
942

S
Swen Schillig 已提交
943 944 945 946 947 948 949 950 951 952 953 954 955 956
	req->data = unit;
	req->handler = zfcp_fsf_abort_fcp_command_handler;
	req->qtcb->header.lun_handle = unit->handle;
	req->qtcb->header.port_handle = unit->port->handle;
	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:
957
	spin_unlock_bh(&qdio->req_q_lock);
S
Swen Schillig 已提交
958
	return req;
L
Linus Torvalds 已提交
959 960
}

S
Swen Schillig 已提交
961
static void zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
962
{
S
Swen Schillig 已提交
963 964 965
	struct zfcp_adapter *adapter = req->adapter;
	struct zfcp_send_ct *send_ct = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;
L
Linus Torvalds 已提交
966

S
Swen Schillig 已提交
967
	send_ct->status = -EINVAL;
L
Linus Torvalds 已提交
968

S
Swen Schillig 已提交
969
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
L
Linus Torvalds 已提交
970 971 972 973
		goto skip_fsfstatus;

	switch (header->fsf_status) {
        case FSF_GOOD:
S
Swen Schillig 已提交
974
		zfcp_dbf_san_ct_response(req);
S
Swen Schillig 已提交
975
		send_ct->status = 0;
L
Linus Torvalds 已提交
976 977
		break;
        case FSF_SERVICE_CLASS_NOT_SUPPORTED:
S
Swen Schillig 已提交
978
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
979 980 981 982 983
		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 已提交
984
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
985 986 987 988 989 990
			break;
                }
                break;
	case FSF_ACCESS_DENIED:
		break;
        case FSF_PORT_BOXED:
S
Swen Schillig 已提交
991 992
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
993
		break;
S
Swen Schillig 已提交
994
	case FSF_PORT_HANDLE_NOT_VALID:
995
		zfcp_erp_adapter_reopen(adapter, 0, "fsscth1", req);
996
		/* fall through */
S
Swen Schillig 已提交
997
	case FSF_GENERIC_COMMAND_REJECTED:
L
Linus Torvalds 已提交
998 999 1000 1001
	case FSF_PAYLOAD_SIZE_MISMATCH:
	case FSF_REQUEST_SIZE_TOO_LARGE:
	case FSF_RESPONSE_SIZE_TOO_LARGE:
	case FSF_SBAL_MISMATCH:
S
Swen Schillig 已提交
1002
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1003 1004 1005 1006
		break;
	}

skip_fsfstatus:
S
Swen Schillig 已提交
1007
	if (send_ct->handler)
L
Linus Torvalds 已提交
1008
		send_ct->handler(send_ct->handler_data);
S
Swen Schillig 已提交
1009
}
L
Linus Torvalds 已提交
1010

1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027
static void zfcp_fsf_setup_ct_els_unchained(struct qdio_buffer_element *sbale,
					    struct scatterlist *sg_req,
					    struct scatterlist *sg_resp)
{
	sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE_READ;
	sbale[2].addr   = sg_virt(sg_req);
	sbale[2].length = sg_req->length;
	sbale[3].addr   = sg_virt(sg_resp);
	sbale[3].length = sg_resp->length;
	sbale[3].flags |= SBAL_FLAGS_LAST_ENTRY;
}

static int zfcp_fsf_one_sbal(struct scatterlist *sg)
{
	return sg_is_last(sg) && sg->length <= PAGE_SIZE;
}

1028 1029 1030 1031
static int zfcp_fsf_setup_ct_els_sbals(struct zfcp_fsf_req *req,
				       struct scatterlist *sg_req,
				       struct scatterlist *sg_resp,
				       int max_sbals)
S
Swen Schillig 已提交
1032
{
1033
	struct zfcp_adapter *adapter = req->adapter;
1034
	struct qdio_buffer_element *sbale = zfcp_qdio_sbale_req(adapter->qdio,
1035 1036
							       &req->queue_req);
	u32 feat = adapter->adapter_features;
S
Swen Schillig 已提交
1037 1038
	int bytes;

1039
	if (!(feat & FSF_FEATURE_ELS_CT_CHAINED_SBALS)) {
1040
		if (!zfcp_fsf_one_sbal(sg_req) || !zfcp_fsf_one_sbal(sg_resp))
1041 1042
			return -EOPNOTSUPP;

1043 1044 1045 1046 1047 1048 1049
		zfcp_fsf_setup_ct_els_unchained(sbale, sg_req, sg_resp);
		return 0;
	}

	/* use single, unchained SBAL if it can hold the request */
	if (zfcp_fsf_one_sbal(sg_req) && zfcp_fsf_one_sbal(sg_resp)) {
		zfcp_fsf_setup_ct_els_unchained(sbale, sg_req, sg_resp);
1050 1051 1052
		return 0;
	}

1053
	bytes = zfcp_qdio_sbals_from_sg(adapter->qdio, &req->queue_req,
1054
					SBAL_FLAGS0_TYPE_WRITE_READ,
S
Swen Schillig 已提交
1055 1056
					sg_req, max_sbals);
	if (bytes <= 0)
1057
		return -EIO;
S
Swen Schillig 已提交
1058
	req->qtcb->bottom.support.req_buf_length = bytes;
1059
	req->queue_req.sbale_curr = ZFCP_LAST_SBALE_PER_SBAL;
S
Swen Schillig 已提交
1060

1061
	bytes = zfcp_qdio_sbals_from_sg(adapter->qdio, &req->queue_req,
1062
					SBAL_FLAGS0_TYPE_WRITE_READ,
S
Swen Schillig 已提交
1063
					sg_resp, max_sbals);
1064
	req->qtcb->bottom.support.resp_buf_length = bytes;
S
Swen Schillig 已提交
1065
	if (bytes <= 0)
1066
		return -EIO;
1067

1068 1069 1070 1071 1072 1073 1074 1075 1076
	return 0;
}

static int zfcp_fsf_setup_ct_els(struct zfcp_fsf_req *req,
				 struct scatterlist *sg_req,
				 struct scatterlist *sg_resp,
				 int max_sbals)
{
	int ret;
1077
	unsigned int fcp_chan_timeout;
1078 1079 1080 1081 1082

	ret = zfcp_fsf_setup_ct_els_sbals(req, sg_req, sg_resp, max_sbals);
	if (ret)
		return ret;

1083
	/* common settings for ct/gs and els requests */
1084
	fcp_chan_timeout = 2 * FC_DEF_R_A_TOV / 1000;
1085
	req->qtcb->bottom.support.service_class = FSF_CLASS_3;
1086 1087
	req->qtcb->bottom.support.timeout = fcp_chan_timeout;
	zfcp_fsf_start_timer(req, (fcp_chan_timeout + 10) * HZ);
S
Swen Schillig 已提交
1088 1089

	return 0;
L
Linus Torvalds 已提交
1090 1091 1092
}

/**
S
Swen Schillig 已提交
1093 1094 1095
 * 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 已提交
1096
 */
1097
int zfcp_fsf_send_ct(struct zfcp_send_ct *ct, mempool_t *pool)
L
Linus Torvalds 已提交
1098
{
1099
	struct zfcp_fc_wka_port *wka_port = ct->wka_port;
1100
	struct zfcp_qdio *qdio = wka_port->adapter->qdio;
S
Swen Schillig 已提交
1101 1102
	struct zfcp_fsf_req *req;
	int ret = -EIO;
L
Linus Torvalds 已提交
1103

1104 1105
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
1106
		goto out;
L
Linus Torvalds 已提交
1107

1108
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_GENERIC, pool);
1109

1110
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1111 1112
		ret = PTR_ERR(req);
		goto out;
1113 1114
	}

1115
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1116 1117
	ret = zfcp_fsf_setup_ct_els(req, ct->req, ct->resp,
				    FSF_MAX_SBALS_PER_REQ);
C
Christof Schmitt 已提交
1118
	if (ret)
L
Linus Torvalds 已提交
1119 1120
		goto failed_send;

S
Swen Schillig 已提交
1121
	req->handler = zfcp_fsf_send_ct_handler;
1122
	req->qtcb->header.port_handle = wka_port->handle;
S
Swen Schillig 已提交
1123 1124
	req->data = ct;

S
Swen Schillig 已提交
1125
	zfcp_dbf_san_ct_request(req);
L
Linus Torvalds 已提交
1126

S
Swen Schillig 已提交
1127 1128 1129
	ret = zfcp_fsf_req_send(req);
	if (ret)
		goto failed_send;
L
Linus Torvalds 已提交
1130

S
Swen Schillig 已提交
1131
	goto out;
L
Linus Torvalds 已提交
1132

S
Swen Schillig 已提交
1133 1134 1135
failed_send:
	zfcp_fsf_req_free(req);
out:
1136
	spin_unlock_bh(&qdio->req_q_lock);
S
Swen Schillig 已提交
1137
	return ret;
L
Linus Torvalds 已提交
1138 1139
}

S
Swen Schillig 已提交
1140
static void zfcp_fsf_send_els_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1141
{
S
Swen Schillig 已提交
1142 1143 1144
	struct zfcp_send_els *send_els = req->data;
	struct zfcp_port *port = send_els->port;
	struct fsf_qtcb_header *header = &req->qtcb->header;
L
Linus Torvalds 已提交
1145

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

S
Swen Schillig 已提交
1148
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
L
Linus Torvalds 已提交
1149 1150 1151 1152
		goto skip_fsfstatus;

	switch (header->fsf_status) {
	case FSF_GOOD:
S
Swen Schillig 已提交
1153
		zfcp_dbf_san_els_response(req);
S
Swen Schillig 已提交
1154
		send_els->status = 0;
L
Linus Torvalds 已提交
1155 1156
		break;
	case FSF_SERVICE_CLASS_NOT_SUPPORTED:
S
Swen Schillig 已提交
1157
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
1158 1159 1160 1161
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]){
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1162
			if (port && (send_els->ls_code != ELS_ADISC))
1163
				zfcp_fc_test_link(port);
S
Swen Schillig 已提交
1164
			/*fall through */
L
Linus Torvalds 已提交
1165 1166
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
		case FSF_SQ_RETRY_IF_POSSIBLE:
S
Swen Schillig 已提交
1167
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1168 1169 1170 1171 1172 1173 1174 1175 1176
			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:
1177 1178
		if (port)
			zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1179
		break;
S
Swen Schillig 已提交
1180 1181 1182
	case FSF_SBAL_MISMATCH:
		/* should never occure, avoided in zfcp_fsf_send_els */
		/* fall through */
L
Linus Torvalds 已提交
1183
	default:
S
Swen Schillig 已提交
1184
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1185 1186 1187
		break;
	}
skip_fsfstatus:
H
Heiko Carstens 已提交
1188
	if (send_els->handler)
L
Linus Torvalds 已提交
1189
		send_els->handler(send_els->handler_data);
S
Swen Schillig 已提交
1190
}
L
Linus Torvalds 已提交
1191

S
Swen Schillig 已提交
1192 1193 1194 1195 1196 1197 1198
/**
 * zfcp_fsf_send_els - initiate an ELS command (FC-FS)
 * @els: pointer to struct zfcp_send_els with data for the command
 */
int zfcp_fsf_send_els(struct zfcp_send_els *els)
{
	struct zfcp_fsf_req *req;
1199
	struct zfcp_qdio *qdio = els->adapter->qdio;
S
Swen Schillig 已提交
1200 1201
	int ret = -EIO;

1202 1203
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
1204
		goto out;
1205

1206
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_ELS, NULL);
1207

1208
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1209 1210 1211 1212
		ret = PTR_ERR(req);
		goto out;
	}

1213
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1214
	ret = zfcp_fsf_setup_ct_els(req, els->req, els->resp, 2);
1215

S
Swen Schillig 已提交
1216 1217 1218
	if (ret)
		goto failed_send;

1219
	req->qtcb->bottom.support.d_id = els->d_id;
S
Swen Schillig 已提交
1220 1221 1222
	req->handler = zfcp_fsf_send_els_handler;
	req->data = els;

S
Swen Schillig 已提交
1223
	zfcp_dbf_san_els_request(req);
S
Swen Schillig 已提交
1224 1225 1226 1227 1228 1229 1230 1231 1232 1233

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

	goto out;

failed_send:
	zfcp_fsf_req_free(req);
out:
1234
	spin_unlock_bh(&qdio->req_q_lock);
S
Swen Schillig 已提交
1235
	return ret;
L
Linus Torvalds 已提交
1236 1237
}

S
Swen Schillig 已提交
1238
int zfcp_fsf_exchange_config_data(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1239
{
1240
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1241
	struct zfcp_fsf_req *req;
1242
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
1243 1244
	int retval = -EIO;

1245 1246
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
1247
		goto out;
1248

1249 1250
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA,
				  qdio->adapter->pool.erp_req);
1251

1252
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1253 1254
		retval = PTR_ERR(req);
		goto out;
L
Linus Torvalds 已提交
1255 1256
	}

1257
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1258
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
1259 1260
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
1261

S
Swen Schillig 已提交
1262
	req->qtcb->bottom.config.feature_selection =
1263 1264
			FSF_FEATURE_CFDC |
			FSF_FEATURE_LUN_SHARING |
1265
			FSF_FEATURE_NOTIFICATION_LOST |
1266
			FSF_FEATURE_UPDATE_ALERT;
S
Swen Schillig 已提交
1267 1268 1269
	req->erp_action = erp_action;
	req->handler = zfcp_fsf_exchange_config_data_handler;
	erp_action->fsf_req = req;
L
Linus Torvalds 已提交
1270

1271
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1272
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1273
	if (retval) {
S
Swen Schillig 已提交
1274
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1275 1276
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1277
out:
1278
	spin_unlock_bh(&qdio->req_q_lock);
1279 1280
	return retval;
}
L
Linus Torvalds 已提交
1281

1282
int zfcp_fsf_exchange_config_data_sync(struct zfcp_qdio *qdio,
S
Swen Schillig 已提交
1283
				       struct fsf_qtcb_bottom_config *data)
1284
{
1285
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1286 1287 1288
	struct zfcp_fsf_req *req = NULL;
	int retval = -EIO;

1289 1290
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
1291
		goto out_unlock;
S
Swen Schillig 已提交
1292

1293
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA, NULL);
1294

1295
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1296
		retval = PTR_ERR(req);
1297
		goto out_unlock;
1298 1299
	}

1300
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
1301 1302
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
S
Swen Schillig 已提交
1303
	req->handler = zfcp_fsf_exchange_config_data_handler;
1304

S
Swen Schillig 已提交
1305
	req->qtcb->bottom.config.feature_selection =
1306 1307 1308 1309 1310 1311
			FSF_FEATURE_CFDC |
			FSF_FEATURE_LUN_SHARING |
			FSF_FEATURE_NOTIFICATION_LOST |
			FSF_FEATURE_UPDATE_ALERT;

	if (data)
S
Swen Schillig 已提交
1312
		req->data = data;
1313

S
Swen Schillig 已提交
1314 1315
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
1316
	spin_unlock_bh(&qdio->req_q_lock);
C
Christof Schmitt 已提交
1317
	if (!retval)
1318
		wait_for_completion(&req->completion);
1319

S
Swen Schillig 已提交
1320
	zfcp_fsf_req_free(req);
1321
	return retval;
1322

1323
out_unlock:
1324
	spin_unlock_bh(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1325 1326 1327 1328 1329
	return retval;
}

/**
 * zfcp_fsf_exchange_port_data - request information about local port
1330
 * @erp_action: ERP action for the adapter for which port data is requested
S
Swen Schillig 已提交
1331
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1332
 */
S
Swen Schillig 已提交
1333
int zfcp_fsf_exchange_port_data(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1334
{
1335
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1336
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1337 1338
	struct zfcp_fsf_req *req;
	int retval = -EIO;
L
Linus Torvalds 已提交
1339

1340
	if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1341
		return -EOPNOTSUPP;
L
Linus Torvalds 已提交
1342

1343 1344
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
1345
		goto out;
1346

1347 1348
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA,
				  qdio->adapter->pool.erp_req);
1349

1350
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1351 1352
		retval = PTR_ERR(req);
		goto out;
1353 1354
	}

1355
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1356
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
1357 1358
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
1359

S
Swen Schillig 已提交
1360 1361 1362
	req->handler = zfcp_fsf_exchange_port_data_handler;
	req->erp_action = erp_action;
	erp_action->fsf_req = req;
1363

1364
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1365
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1366
	if (retval) {
S
Swen Schillig 已提交
1367
		zfcp_fsf_req_free(req);
1368 1369
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1370
out:
1371
	spin_unlock_bh(&qdio->req_q_lock);
1372 1373 1374 1375 1376
	return retval;
}

/**
 * zfcp_fsf_exchange_port_data_sync - request information about local port
1377
 * @qdio: pointer to struct zfcp_qdio
S
Swen Schillig 已提交
1378 1379
 * @data: pointer to struct fsf_qtcb_bottom_port
 * Returns: 0 on success, error otherwise
1380
 */
1381
int zfcp_fsf_exchange_port_data_sync(struct zfcp_qdio *qdio,
S
Swen Schillig 已提交
1382
				     struct fsf_qtcb_bottom_port *data)
1383
{
1384
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1385 1386
	struct zfcp_fsf_req *req = NULL;
	int retval = -EIO;
1387

1388
	if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1389 1390
		return -EOPNOTSUPP;

1391 1392
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
1393
		goto out_unlock;
S
Swen Schillig 已提交
1394

1395
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA, NULL);
1396

1397
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1398
		retval = PTR_ERR(req);
1399
		goto out_unlock;
L
Linus Torvalds 已提交
1400 1401
	}

1402
	if (data)
S
Swen Schillig 已提交
1403
		req->data = data;
1404

1405
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
1406 1407 1408
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1409 1410 1411
	req->handler = zfcp_fsf_exchange_port_data_handler;
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
1412
	spin_unlock_bh(&qdio->req_q_lock);
1413

C
Christof Schmitt 已提交
1414
	if (!retval)
1415 1416
		wait_for_completion(&req->completion);

S
Swen Schillig 已提交
1417
	zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1418 1419

	return retval;
1420 1421

out_unlock:
1422
	spin_unlock_bh(&qdio->req_q_lock);
1423
	return retval;
L
Linus Torvalds 已提交
1424 1425
}

S
Swen Schillig 已提交
1426
static void zfcp_fsf_open_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1427
{
S
Swen Schillig 已提交
1428 1429
	struct zfcp_port *port = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;
1430
	struct fc_els_flogi *plogi;
L
Linus Torvalds 已提交
1431

S
Swen Schillig 已提交
1432
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1433
		goto out;
L
Linus Torvalds 已提交
1434 1435 1436 1437 1438

	switch (header->fsf_status) {
	case FSF_PORT_ALREADY_OPEN:
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1439
		zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1440 1441
		break;
	case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
S
Swen Schillig 已提交
1442
		dev_warn(&req->adapter->ccw_device->dev,
1443
			 "Not enough FCP adapter resources to open "
1444 1445
			 "remote port 0x%016Lx\n",
			 (unsigned long long)port->wwpn);
1446
		zfcp_erp_port_failed(port, "fsoph_1", req);
S
Swen Schillig 已提交
1447
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1448 1449 1450 1451 1452 1453
		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 已提交
1454
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1455 1456 1457 1458 1459 1460 1461
			break;
		}
		break;
	case FSF_GOOD:
		port->handle = header->port_handle;
		atomic_set_mask(ZFCP_STATUS_COMMON_OPEN |
				ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1462 1463 1464
		atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
		                  ZFCP_STATUS_COMMON_ACCESS_BOXED,
		                  &port->status);
L
Linus Torvalds 已提交
1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479
		/* 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.
		 */
1480
		plogi = (struct fc_els_flogi *) req->qtcb->bottom.support.els;
1481
		if (req->qtcb->bottom.support.els1_length >=
1482
		    FSF_PLOGI_MIN_LEN)
S
Swen Schillig 已提交
1483
				zfcp_fc_plogi_evaluate(port, plogi);
L
Linus Torvalds 已提交
1484 1485
		break;
	case FSF_UNKNOWN_OP_SUBTYPE:
S
Swen Schillig 已提交
1486
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1487 1488
		break;
	}
1489 1490

out:
1491
	put_device(&port->sysfs_device);
L
Linus Torvalds 已提交
1492 1493
}

S
Swen Schillig 已提交
1494 1495 1496 1497
/**
 * 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 已提交
1498
 */
S
Swen Schillig 已提交
1499
int zfcp_fsf_open_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1500
{
1501
	struct qdio_buffer_element *sbale;
1502
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1503
	struct zfcp_port *port = erp_action->port;
1504
	struct zfcp_fsf_req *req;
S
Swen Schillig 已提交
1505 1506
	int retval = -EIO;

1507 1508
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
1509 1510
		goto out;

1511 1512
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
				  qdio->adapter->pool.erp_req);
1513

1514
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1515
		retval = PTR_ERR(req);
L
Linus Torvalds 已提交
1516
		goto out;
S
Swen Schillig 已提交
1517
	}
L
Linus Torvalds 已提交
1518

1519
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1520
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
L
Linus Torvalds 已提交
1521 1522 1523
        sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
        sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1524
	req->handler = zfcp_fsf_open_port_handler;
1525 1526
	req->qtcb->bottom.support.d_id = port->d_id;
	req->data = port;
S
Swen Schillig 已提交
1527 1528
	req->erp_action = erp_action;
	erp_action->fsf_req = req;
1529
	get_device(&port->sysfs_device);
S
Swen Schillig 已提交
1530

1531
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1532
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1533
	if (retval) {
S
Swen Schillig 已提交
1534
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1535
		erp_action->fsf_req = NULL;
1536
		put_device(&port->sysfs_device);
L
Linus Torvalds 已提交
1537
	}
S
Swen Schillig 已提交
1538
out:
1539
	spin_unlock_bh(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1540 1541 1542
	return retval;
}

S
Swen Schillig 已提交
1543
static void zfcp_fsf_close_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1544
{
S
Swen Schillig 已提交
1545
	struct zfcp_port *port = req->data;
L
Linus Torvalds 已提交
1546

S
Swen Schillig 已提交
1547
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1548
		return;
L
Linus Torvalds 已提交
1549

S
Swen Schillig 已提交
1550
	switch (req->qtcb->header.fsf_status) {
L
Linus Torvalds 已提交
1551
	case FSF_PORT_HANDLE_NOT_VALID:
1552
		zfcp_erp_adapter_reopen(port->adapter, 0, "fscph_1", req);
S
Swen Schillig 已提交
1553
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1554 1555 1556 1557
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		break;
	case FSF_GOOD:
1558
		zfcp_erp_modify_port_status(port, "fscph_2", req,
L
Linus Torvalds 已提交
1559 1560 1561 1562 1563 1564
					    ZFCP_STATUS_COMMON_OPEN,
					    ZFCP_CLEAR);
		break;
	}
}

S
Swen Schillig 已提交
1565 1566 1567 1568
/**
 * 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 已提交
1569
 */
S
Swen Schillig 已提交
1570
int zfcp_fsf_close_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1571
{
1572
	struct qdio_buffer_element *sbale;
1573
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
1574 1575 1576
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1577 1578
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
1579 1580
		goto out;

1581 1582
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
				  qdio->adapter->pool.erp_req);
1583

1584
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1585
		retval = PTR_ERR(req);
L
Linus Torvalds 已提交
1586
		goto out;
S
Swen Schillig 已提交
1587
	}
L
Linus Torvalds 已提交
1588

1589
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1590
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
L
Linus Torvalds 已提交
1591 1592 1593
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1594 1595 1596 1597 1598 1599
	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;
	erp_action->fsf_req = req;

1600
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1601
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1602
	if (retval) {
S
Swen Schillig 已提交
1603
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1604 1605
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1606
out:
1607
	spin_unlock_bh(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1608 1609 1610
	return retval;
}

1611 1612
static void zfcp_fsf_open_wka_port_handler(struct zfcp_fsf_req *req)
{
1613
	struct zfcp_fc_wka_port *wka_port = req->data;
1614 1615 1616
	struct fsf_qtcb_header *header = &req->qtcb->header;

	if (req->status & ZFCP_STATUS_FSFREQ_ERROR) {
1617
		wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1618 1619 1620 1621 1622 1623 1624
		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);
1625
		/* fall through */
1626 1627
	case FSF_ADAPTER_STATUS_AVAILABLE:
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1628
		/* fall through */
1629
	case FSF_ACCESS_DENIED:
1630
		wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1631 1632 1633
		break;
	case FSF_GOOD:
		wka_port->handle = header->port_handle;
1634 1635
		/* fall through */
	case FSF_PORT_ALREADY_OPEN:
1636
		wka_port->status = ZFCP_FC_WKA_PORT_ONLINE;
1637 1638 1639 1640 1641 1642 1643
	}
out:
	wake_up(&wka_port->completion_wq);
}

/**
 * zfcp_fsf_open_wka_port - create and send open wka-port request
1644
 * @wka_port: pointer to struct zfcp_fc_wka_port
1645 1646
 * Returns: 0 on success, error otherwise
 */
1647
int zfcp_fsf_open_wka_port(struct zfcp_fc_wka_port *wka_port)
1648 1649
{
	struct qdio_buffer_element *sbale;
1650
	struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1651 1652 1653
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1654 1655
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
1656 1657
		goto out;

1658 1659
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
				  qdio->adapter->pool.erp_req);
1660

1661 1662 1663 1664 1665
	if (unlikely(IS_ERR(req))) {
		retval = PTR_ERR(req);
		goto out;
	}

1666
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1667
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

	req->handler = zfcp_fsf_open_wka_port_handler;
	req->qtcb->bottom.support.d_id = wka_port->d_id;
	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:
1680
	spin_unlock_bh(&qdio->req_q_lock);
1681 1682 1683 1684 1685
	return retval;
}

static void zfcp_fsf_close_wka_port_handler(struct zfcp_fsf_req *req)
{
1686
	struct zfcp_fc_wka_port *wka_port = req->data;
1687 1688 1689

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

1693
	wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1694 1695 1696 1697 1698
	wake_up(&wka_port->completion_wq);
}

/**
 * zfcp_fsf_close_wka_port - create and send close wka port request
1699
 * @wka_port: WKA port to open
1700 1701
 * Returns: 0 on success, error otherwise
 */
1702
int zfcp_fsf_close_wka_port(struct zfcp_fc_wka_port *wka_port)
1703 1704
{
	struct qdio_buffer_element *sbale;
1705
	struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1706 1707 1708
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1709 1710
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
1711 1712
		goto out;

1713 1714
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
				  qdio->adapter->pool.erp_req);
1715

1716 1717 1718 1719 1720
	if (unlikely(IS_ERR(req))) {
		retval = PTR_ERR(req);
		goto out;
	}

1721
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1722
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

	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:
1735
	spin_unlock_bh(&qdio->req_q_lock);
1736 1737 1738
	return retval;
}

S
Swen Schillig 已提交
1739
static void zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1740
{
S
Swen Schillig 已提交
1741 1742
	struct zfcp_port *port = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;
L
Linus Torvalds 已提交
1743 1744
	struct zfcp_unit *unit;

S
Swen Schillig 已提交
1745
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1746
		return;
L
Linus Torvalds 已提交
1747 1748 1749

	switch (header->fsf_status) {
	case FSF_PORT_HANDLE_NOT_VALID:
1750
		zfcp_erp_adapter_reopen(port->adapter, 0, "fscpph1", req);
S
Swen Schillig 已提交
1751
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1752 1753
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1754
		zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1755 1756
		break;
	case FSF_PORT_BOXED:
1757 1758 1759
		/* 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);
1760 1761
		read_lock(&port->unit_list_lock);
		list_for_each_entry(unit, &port->unit_list, list)
1762 1763
			atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
					  &unit->status);
1764
		read_unlock(&port->unit_list_lock);
1765 1766 1767 1768
		zfcp_erp_port_boxed(port, "fscpph2", req);
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;

L
Linus Torvalds 已提交
1769 1770 1771 1772
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]) {
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
S
Swen Schillig 已提交
1773
			/* fall through */
L
Linus Torvalds 已提交
1774
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
1775
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1776 1777 1778 1779 1780 1781 1782 1783
			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);
1784 1785
		read_lock(&port->unit_list_lock);
		list_for_each_entry(unit, &port->unit_list, list)
S
Swen Schillig 已提交
1786 1787
			atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
					  &unit->status);
1788
		read_unlock(&port->unit_list_lock);
L
Linus Torvalds 已提交
1789 1790 1791 1792
		break;
	}
}

S
Swen Schillig 已提交
1793 1794 1795 1796
/**
 * zfcp_fsf_close_physical_port - close physical port
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success
L
Linus Torvalds 已提交
1797
 */
S
Swen Schillig 已提交
1798
int zfcp_fsf_close_physical_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1799
{
1800
	struct qdio_buffer_element *sbale;
1801
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
1802 1803 1804
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1805 1806
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
L
Linus Torvalds 已提交
1807 1808
		goto out;

1809 1810
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PHYSICAL_PORT,
				  qdio->adapter->pool.erp_req);
1811

1812
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1813 1814 1815
		retval = PTR_ERR(req);
		goto out;
	}
L
Linus Torvalds 已提交
1816

1817
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1818
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
S
Swen Schillig 已提交
1819 1820
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
1821

S
Swen Schillig 已提交
1822 1823 1824 1825 1826 1827
	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;
	erp_action->fsf_req = req;

1828
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1829
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1830
	if (retval) {
S
Swen Schillig 已提交
1831
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1832 1833
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1834
out:
1835
	spin_unlock_bh(&qdio->req_q_lock);
L
Linus Torvalds 已提交
1836 1837 1838
	return retval;
}

S
Swen Schillig 已提交
1839
static void zfcp_fsf_open_unit_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1840
{
S
Swen Schillig 已提交
1841 1842 1843 1844 1845 1846
	struct zfcp_adapter *adapter = req->adapter;
	struct zfcp_unit *unit = req->data;
	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;
1847
	int exclusive, readwrite;
L
Linus Torvalds 已提交
1848

S
Swen Schillig 已提交
1849
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1850
		return;
L
Linus Torvalds 已提交
1851 1852

	atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
1853
			  ZFCP_STATUS_COMMON_ACCESS_BOXED |
L
Linus Torvalds 已提交
1854 1855 1856 1857 1858 1859 1860
			  ZFCP_STATUS_UNIT_SHARED |
			  ZFCP_STATUS_UNIT_READONLY,
			  &unit->status);

	switch (header->fsf_status) {

	case FSF_PORT_HANDLE_NOT_VALID:
1861
		zfcp_erp_adapter_reopen(unit->port->adapter, 0, "fsouh_1", req);
S
Swen Schillig 已提交
1862
		/* fall through */
L
Linus Torvalds 已提交
1863 1864 1865
	case FSF_LUN_ALREADY_OPEN:
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1866
		zfcp_fsf_access_denied_unit(req, unit);
L
Linus Torvalds 已提交
1867
		atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
C
Christof Schmitt 已提交
1868
		atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
L
Linus Torvalds 已提交
1869 1870
		break;
	case FSF_PORT_BOXED:
1871
		zfcp_erp_port_boxed(unit->port, "fsouh_2", req);
S
Swen Schillig 已提交
1872 1873
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
1874 1875
		break;
	case FSF_LUN_SHARING_VIOLATION:
S
Swen Schillig 已提交
1876
		if (header->fsf_status_qual.word[0])
C
Christof Schmitt 已提交
1877
			dev_warn(&adapter->ccw_device->dev,
1878 1879
				 "LUN 0x%Lx on port 0x%Lx is already in "
				 "use by CSS%d, MIF Image ID %x\n",
1880 1881
				 (unsigned long long)unit->fcp_lun,
				 (unsigned long long)unit->port->wwpn,
1882 1883
				 queue_designator->cssid,
				 queue_designator->hla);
S
Swen Schillig 已提交
1884
		else
C
Christof Schmitt 已提交
1885 1886
			zfcp_act_eval_err(adapter,
					  header->fsf_status_qual.word[2]);
1887
		zfcp_erp_unit_access_denied(unit, "fsouh_3", req);
L
Linus Torvalds 已提交
1888 1889
		atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
		atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
S
Swen Schillig 已提交
1890
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1891 1892
		break;
	case FSF_MAXIMUM_NUMBER_OF_LUNS_EXCEEDED:
S
Swen Schillig 已提交
1893
		dev_warn(&adapter->ccw_device->dev,
1894 1895
			 "No handle is available for LUN "
			 "0x%016Lx on port 0x%016Lx\n",
1896 1897
			 (unsigned long long)unit->fcp_lun,
			 (unsigned long long)unit->port->wwpn);
1898
		zfcp_erp_unit_failed(unit, "fsouh_4", req);
S
Swen Schillig 已提交
1899 1900 1901
		/* fall through */
	case FSF_INVALID_COMMAND_OPTION:
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1902 1903 1904 1905
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]) {
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1906
			zfcp_fc_test_link(unit->port);
S
Swen Schillig 已提交
1907
			/* fall through */
L
Linus Torvalds 已提交
1908
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
1909
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1910 1911 1912 1913 1914 1915 1916
			break;
		}
		break;

	case FSF_GOOD:
		unit->handle = header->lun_handle;
		atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
1917 1918 1919

		if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE) &&
		    (adapter->adapter_features & FSF_FEATURE_LUN_SHARING) &&
1920
		    !zfcp_ccw_priv_sch(adapter)) {
1921 1922 1923 1924 1925
			exclusive = (bottom->lun_access_info &
					FSF_UNIT_ACCESS_EXCLUSIVE);
			readwrite = (bottom->lun_access_info &
					FSF_UNIT_ACCESS_OUTBOUND_TRANSFER);

L
Linus Torvalds 已提交
1926 1927 1928 1929 1930 1931 1932
			if (!exclusive)
		                atomic_set_mask(ZFCP_STATUS_UNIT_SHARED,
						&unit->status);

			if (!readwrite) {
                		atomic_set_mask(ZFCP_STATUS_UNIT_READONLY,
						&unit->status);
S
Swen Schillig 已提交
1933
				dev_info(&adapter->ccw_device->dev,
1934 1935
					 "SCSI device at LUN 0x%016Lx on port "
					 "0x%016Lx opened read-only\n",
1936 1937
					 (unsigned long long)unit->fcp_lun,
					 (unsigned long long)unit->port->wwpn);
L
Linus Torvalds 已提交
1938 1939 1940
        		}

        		if (exclusive && !readwrite) {
S
Swen Schillig 已提交
1941
				dev_err(&adapter->ccw_device->dev,
1942 1943 1944
					"Exclusive read-only access not "
					"supported (unit 0x%016Lx, "
					"port 0x%016Lx)\n",
1945 1946
					(unsigned long long)unit->fcp_lun,
					(unsigned long long)unit->port->wwpn);
1947
				zfcp_erp_unit_failed(unit, "fsouh_5", req);
S
Swen Schillig 已提交
1948
				req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1949
				zfcp_erp_unit_shutdown(unit, 0, "fsouh_6", req);
L
Linus Torvalds 已提交
1950
        		} else if (!exclusive && readwrite) {
S
Swen Schillig 已提交
1951
				dev_err(&adapter->ccw_device->dev,
1952 1953
					"Shared read-write access not "
					"supported (unit 0x%016Lx, port "
1954
					"0x%016Lx)\n",
1955 1956
					(unsigned long long)unit->fcp_lun,
					(unsigned long long)unit->port->wwpn);
1957
				zfcp_erp_unit_failed(unit, "fsouh_7", req);
S
Swen Schillig 已提交
1958
				req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1959
				zfcp_erp_unit_shutdown(unit, 0, "fsouh_8", req);
L
Linus Torvalds 已提交
1960 1961 1962 1963 1964 1965
        		}
		}
		break;
	}
}

S
Swen Schillig 已提交
1966 1967 1968 1969
/**
 * zfcp_fsf_open_unit - open unit
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1970
 */
S
Swen Schillig 已提交
1971
int zfcp_fsf_open_unit(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1972
{
1973
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1974
	struct zfcp_adapter *adapter = erp_action->adapter;
1975
	struct zfcp_qdio *qdio = adapter->qdio;
S
Swen Schillig 已提交
1976 1977 1978
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1979 1980
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
L
Linus Torvalds 已提交
1981 1982
		goto out;

1983
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_LUN,
1984
				  adapter->pool.erp_req);
1985

1986
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1987 1988 1989 1990
		retval = PTR_ERR(req);
		goto out;
	}

1991
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1992
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
L
Linus Torvalds 已提交
1993 1994 1995
        sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
        sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1996 1997 1998 1999 2000 2001 2002 2003 2004 2005
	req->qtcb->header.port_handle = erp_action->port->handle;
	req->qtcb->bottom.support.fcp_lun = erp_action->unit->fcp_lun;
	req->handler = zfcp_fsf_open_unit_handler;
	req->data = erp_action->unit;
	req->erp_action = erp_action;
	erp_action->fsf_req = req;

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

2006
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
2007
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
2008
	if (retval) {
S
Swen Schillig 已提交
2009
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
2010 2011
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
2012
out:
2013
	spin_unlock_bh(&qdio->req_q_lock);
L
Linus Torvalds 已提交
2014 2015 2016
	return retval;
}

S
Swen Schillig 已提交
2017
static void zfcp_fsf_close_unit_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
2018
{
S
Swen Schillig 已提交
2019
	struct zfcp_unit *unit = req->data;
L
Linus Torvalds 已提交
2020

S
Swen Schillig 已提交
2021
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
2022
		return;
L
Linus Torvalds 已提交
2023

S
Swen Schillig 已提交
2024
	switch (req->qtcb->header.fsf_status) {
L
Linus Torvalds 已提交
2025
	case FSF_PORT_HANDLE_NOT_VALID:
2026
		zfcp_erp_adapter_reopen(unit->port->adapter, 0, "fscuh_1", req);
S
Swen Schillig 已提交
2027
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2028 2029
		break;
	case FSF_LUN_HANDLE_NOT_VALID:
2030
		zfcp_erp_port_reopen(unit->port, 0, "fscuh_2", req);
S
Swen Schillig 已提交
2031
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2032 2033
		break;
	case FSF_PORT_BOXED:
2034
		zfcp_erp_port_boxed(unit->port, "fscuh_3", req);
S
Swen Schillig 已提交
2035 2036
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
2037 2038
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
S
Swen Schillig 已提交
2039
		switch (req->qtcb->header.fsf_status_qual.word[0]) {
L
Linus Torvalds 已提交
2040
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
2041
			zfcp_fc_test_link(unit->port);
S
Swen Schillig 已提交
2042
			/* fall through */
L
Linus Torvalds 已提交
2043
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
2044
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2045 2046 2047 2048 2049 2050 2051 2052 2053 2054
			break;
		}
		break;
	case FSF_GOOD:
		atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
		break;
	}
}

/**
S
Swen Schillig 已提交
2055 2056 2057
 * zfcp_fsf_close_unit - close zfcp unit
 * @erp_action: pointer to struct zfcp_unit
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
2058
 */
S
Swen Schillig 已提交
2059
int zfcp_fsf_close_unit(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
2060
{
2061
	struct qdio_buffer_element *sbale;
2062
	struct zfcp_qdio *qdio = erp_action->adapter->qdio;
S
Swen Schillig 已提交
2063 2064
	struct zfcp_fsf_req *req;
	int retval = -EIO;
L
Linus Torvalds 已提交
2065

2066 2067
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
L
Linus Torvalds 已提交
2068
		goto out;
2069

2070 2071
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_LUN,
				  qdio->adapter->pool.erp_req);
2072

2073
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2074 2075 2076
		retval = PTR_ERR(req);
		goto out;
	}
L
Linus Torvalds 已提交
2077

2078
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
2079
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
S
Swen Schillig 已提交
2080
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
L
Linus Torvalds 已提交
2081 2082
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
2083 2084 2085 2086 2087 2088
	req->qtcb->header.port_handle = erp_action->port->handle;
	req->qtcb->header.lun_handle = erp_action->unit->handle;
	req->handler = zfcp_fsf_close_unit_handler;
	req->data = erp_action->unit;
	req->erp_action = erp_action;
	erp_action->fsf_req = req;
2089

2090
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
2091 2092 2093 2094 2095 2096
	retval = zfcp_fsf_req_send(req);
	if (retval) {
		zfcp_fsf_req_free(req);
		erp_action->fsf_req = NULL;
	}
out:
2097
	spin_unlock_bh(&qdio->req_q_lock);
S
Swen Schillig 已提交
2098
	return retval;
L
Linus Torvalds 已提交
2099 2100
}

2101 2102 2103
static void zfcp_fsf_update_lat(struct fsf_latency_record *lat_rec, u32 lat)
{
	lat_rec->sum += lat;
S
Swen Schillig 已提交
2104 2105
	lat_rec->min = min(lat_rec->min, lat);
	lat_rec->max = max(lat_rec->max, lat);
2106 2107
}

2108
static void zfcp_fsf_req_trace(struct zfcp_fsf_req *req, struct scsi_cmnd *scsi)
2109
{
2110 2111
	struct fsf_qual_latency_info *lat_in;
	struct latency_cont *lat = NULL;
S
Swen Schillig 已提交
2112
	struct zfcp_unit *unit = req->unit;
2113 2114
	struct zfcp_blk_drv_data blktrc;
	int ticks = req->adapter->timer_ticks;
2115

2116
	lat_in = &req->qtcb->prefix.prot_status_qual.latency_info;
2117

2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140
	blktrc.flags = 0;
	blktrc.magic = ZFCP_BLK_DRV_DATA_MAGIC;
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
		blktrc.flags |= ZFCP_BLK_REQ_ERROR;
	blktrc.inb_usage = req->queue_req.qdio_inb_usage;
	blktrc.outb_usage = req->queue_req.qdio_outb_usage;

	if (req->adapter->adapter_features & FSF_FEATURE_MEASUREMENT_DATA) {
		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) {
		case FSF_DATADIR_READ:
			lat = &unit->latencies.read;
			break;
		case FSF_DATADIR_WRITE:
			lat = &unit->latencies.write;
			break;
		case FSF_DATADIR_CMND:
			lat = &unit->latencies.cmd;
			break;
		}
L
Linus Torvalds 已提交
2141

2142 2143 2144 2145 2146 2147 2148
		if (lat) {
			spin_lock(&unit->latencies.lock);
			zfcp_fsf_update_lat(&lat->channel, lat_in->channel_lat);
			zfcp_fsf_update_lat(&lat->fabric, lat_in->fabric_lat);
			lat->counter++;
			spin_unlock(&unit->latencies.lock);
		}
S
Stefan Raspl 已提交
2149 2150
	}

2151 2152
	blk_add_driver_data(scsi->request->q, scsi->request, &blktrc,
			    sizeof(blktrc));
S
Stefan Raspl 已提交
2153 2154
}

S
Swen Schillig 已提交
2155
static void zfcp_fsf_send_fcp_command_task_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
2156
{
2157
	struct scsi_cmnd *scpnt;
2158
	struct fcp_resp_with_ext *fcp_rsp;
L
Linus Torvalds 已提交
2159 2160
	unsigned long flags;

S
Swen Schillig 已提交
2161 2162
	read_lock_irqsave(&req->adapter->abort_lock, flags);

2163 2164 2165 2166 2167 2168
	scpnt = req->data;
	if (unlikely(!scpnt)) {
		read_unlock_irqrestore(&req->adapter->abort_lock, flags);
		return;
	}

S
Swen Schillig 已提交
2169
	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ABORTED)) {
2170
		set_host_byte(scpnt, DID_SOFT_ERROR);
L
Linus Torvalds 已提交
2171 2172 2173
		goto skip_fsfstatus;
	}

S
Swen Schillig 已提交
2174
	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
2175
		set_host_byte(scpnt, DID_ERROR);
L
Linus Torvalds 已提交
2176 2177 2178
		goto skip_fsfstatus;
	}

2179 2180
	fcp_rsp = (struct fcp_resp_with_ext *) &req->qtcb->bottom.io.fcp_rsp;
	zfcp_fc_eval_fcp_rsp(fcp_rsp, scpnt);
L
Linus Torvalds 已提交
2181

2182
	zfcp_fsf_req_trace(req, scpnt);
S
Stefan Raspl 已提交
2183

S
Swen Schillig 已提交
2184
skip_fsfstatus:
2185
	if (scpnt->result != 0)
S
Swen Schillig 已提交
2186
		zfcp_dbf_scsi_result("erro", 3, req->adapter->dbf, scpnt, req);
2187
	else if (scpnt->retries > 0)
S
Swen Schillig 已提交
2188
		zfcp_dbf_scsi_result("retr", 4, req->adapter->dbf, scpnt, req);
2189
	else
S
Swen Schillig 已提交
2190
		zfcp_dbf_scsi_result("norm", 6, req->adapter->dbf, scpnt, req);
L
Linus Torvalds 已提交
2191 2192 2193 2194 2195 2196 2197 2198 2199

	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!
	 */
S
Swen Schillig 已提交
2200
	read_unlock_irqrestore(&req->adapter->abort_lock, flags);
L
Linus Torvalds 已提交
2201 2202
}

S
Swen Schillig 已提交
2203
static void zfcp_fsf_send_fcp_ctm_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
2204
{
2205 2206
	struct fcp_resp_with_ext *fcp_rsp;
	struct fcp_resp_rsp_info *rsp_info;
L
Linus Torvalds 已提交
2207

2208 2209 2210 2211
	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) ||
S
Swen Schillig 已提交
2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227
	     (req->status & ZFCP_STATUS_FSFREQ_ERROR))
		req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
}


static void zfcp_fsf_send_fcp_command_handler(struct zfcp_fsf_req *req)
{
	struct zfcp_unit *unit;
	struct fsf_qtcb_header *header = &req->qtcb->header;

	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT))
		unit = req->data;
	else
		unit = req->unit;

	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
L
Linus Torvalds 已提交
2228 2229
		goto skip_fsfstatus;

S
Swen Schillig 已提交
2230 2231 2232
	switch (header->fsf_status) {
	case FSF_HANDLE_MISMATCH:
	case FSF_PORT_HANDLE_NOT_VALID:
2233
		zfcp_erp_adapter_reopen(unit->port->adapter, 0, "fssfch1", req);
S
Swen Schillig 已提交
2234 2235 2236 2237
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_FCPLUN_NOT_VALID:
	case FSF_LUN_HANDLE_NOT_VALID:
2238
		zfcp_erp_port_reopen(unit->port, 0, "fssfch2", req);
S
Swen Schillig 已提交
2239
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2240
		break;
S
Swen Schillig 已提交
2241 2242
	case FSF_SERVICE_CLASS_NOT_SUPPORTED:
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
2243
		break;
S
Swen Schillig 已提交
2244 2245 2246 2247 2248
	case FSF_ACCESS_DENIED:
		zfcp_fsf_access_denied_unit(req, unit);
		break;
	case FSF_DIRECTION_INDICATOR_NOT_VALID:
		dev_err(&req->adapter->ccw_device->dev,
2249 2250
			"Incorrect direction %d, unit 0x%016Lx on port "
			"0x%016Lx closed\n",
S
Swen Schillig 已提交
2251
			req->qtcb->bottom.io.data_direction,
2252 2253
			(unsigned long long)unit->fcp_lun,
			(unsigned long long)unit->port->wwpn);
2254 2255
		zfcp_erp_adapter_shutdown(unit->port->adapter, 0, "fssfch3",
					  req);
S
Swen Schillig 已提交
2256 2257 2258 2259
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_CMND_LENGTH_NOT_VALID:
		dev_err(&req->adapter->ccw_device->dev,
2260 2261
			"Incorrect CDB length %d, unit 0x%016Lx on "
			"port 0x%016Lx closed\n",
S
Swen Schillig 已提交
2262
			req->qtcb->bottom.io.fcp_cmnd_length,
2263 2264
			(unsigned long long)unit->fcp_lun,
			(unsigned long long)unit->port->wwpn);
2265 2266
		zfcp_erp_adapter_shutdown(unit->port->adapter, 0, "fssfch4",
					  req);
S
Swen Schillig 已提交
2267 2268 2269
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_PORT_BOXED:
2270
		zfcp_erp_port_boxed(unit->port, "fssfch5", req);
S
Swen Schillig 已提交
2271 2272 2273 2274
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
		break;
	case FSF_LUN_BOXED:
2275
		zfcp_erp_unit_boxed(unit, "fssfch6", req);
S
Swen Schillig 已提交
2276 2277 2278 2279 2280 2281
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		if (header->fsf_status_qual.word[0] ==
		    FSF_SQ_INVOKE_LINK_TEST_PROCEDURE)
2282
			zfcp_fc_test_link(unit->port);
S
Swen Schillig 已提交
2283
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2284 2285
		break;
	}
S
Swen Schillig 已提交
2286 2287 2288 2289 2290 2291
skip_fsfstatus:
	if (req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT)
		zfcp_fsf_send_fcp_ctm_handler(req);
	else {
		zfcp_fsf_send_fcp_command_task_handler(req);
		req->unit = NULL;
2292
		put_device(&unit->sysfs_device);
S
Swen Schillig 已提交
2293
	}
L
Linus Torvalds 已提交
2294 2295
}

S
Swen Schillig 已提交
2296 2297 2298 2299
/**
 * zfcp_fsf_send_fcp_command_task - initiate an FCP command (for a SCSI command)
 * @unit: unit where command is sent to
 * @scsi_cmnd: scsi command to be sent
L
Linus Torvalds 已提交
2300
 */
2301 2302
int zfcp_fsf_send_fcp_command_task(struct zfcp_unit *unit,
				   struct scsi_cmnd *scsi_cmnd)
L
Linus Torvalds 已提交
2303
{
S
Swen Schillig 已提交
2304
	struct zfcp_fsf_req *req;
2305
	struct fcp_cmnd *fcp_cmnd;
2306
	unsigned int sbtype = SBAL_FLAGS0_TYPE_READ;
S
Swen Schillig 已提交
2307
	int real_bytes, retval = -EIO;
2308
	struct zfcp_adapter *adapter = unit->port->adapter;
2309
	struct zfcp_qdio *qdio = adapter->qdio;
L
Linus Torvalds 已提交
2310

S
Swen Schillig 已提交
2311 2312 2313
	if (unlikely(!(atomic_read(&unit->status) &
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		return -EBUSY;
L
Linus Torvalds 已提交
2314

2315 2316 2317
	spin_lock(&qdio->req_q_lock);
	if (atomic_read(&qdio->req_q.count) <= 0) {
		atomic_inc(&qdio->req_q_full);
S
Swen Schillig 已提交
2318
		goto out;
2319
	}
2320

2321
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
2322
				  adapter->pool.scsi_req);
2323

2324
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2325 2326 2327 2328
		retval = PTR_ERR(req);
		goto out;
	}

2329
	req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
2330
	get_device(&unit->sysfs_device);
S
Swen Schillig 已提交
2331 2332 2333 2334 2335 2336
	req->unit = unit;
	req->data = scsi_cmnd;
	req->handler = zfcp_fsf_send_fcp_command_handler;
	req->qtcb->header.lun_handle = unit->handle;
	req->qtcb->header.port_handle = unit->port->handle;
	req->qtcb->bottom.io.service_class = FSF_CLASS_3;
2337
	req->qtcb->bottom.io.fcp_cmnd_length = FCP_CMND_LEN;
S
Swen Schillig 已提交
2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348

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

	/*
	 * set depending on data direction:
	 *      data direction bits in SBALE (SB Type)
	 *      data direction bits in QTCB
	 */
	switch (scsi_cmnd->sc_data_direction) {
	case DMA_NONE:
		req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
L
Linus Torvalds 已提交
2349
		break;
S
Swen Schillig 已提交
2350 2351 2352 2353 2354 2355
	case DMA_FROM_DEVICE:
		req->qtcb->bottom.io.data_direction = FSF_DATADIR_READ;
		break;
	case DMA_TO_DEVICE:
		req->qtcb->bottom.io.data_direction = FSF_DATADIR_WRITE;
		sbtype = SBAL_FLAGS0_TYPE_WRITE;
L
Linus Torvalds 已提交
2356
		break;
S
Swen Schillig 已提交
2357 2358
	case DMA_BIDIRECTIONAL:
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2359 2360
	}

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

2364
	real_bytes = zfcp_qdio_sbals_from_sg(qdio, &req->queue_req, sbtype,
S
Swen Schillig 已提交
2365 2366 2367
					     scsi_sglist(scsi_cmnd),
					     FSF_MAX_SBALS_PER_REQ);
	if (unlikely(real_bytes < 0)) {
2368
		if (req->queue_req.sbal_number >= FSF_MAX_SBALS_PER_REQ) {
S
Swen Schillig 已提交
2369
			dev_err(&adapter->ccw_device->dev,
2370 2371
				"Oversize data package, unit 0x%016Lx "
				"on port 0x%016Lx closed\n",
2372 2373
				(unsigned long long)unit->fcp_lun,
				(unsigned long long)unit->port->wwpn);
2374
			zfcp_erp_unit_shutdown(unit, 0, "fssfct1", req);
S
Swen Schillig 已提交
2375 2376 2377
			retval = -EINVAL;
		}
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2378 2379
	}

S
Swen Schillig 已提交
2380 2381 2382
	retval = zfcp_fsf_req_send(req);
	if (unlikely(retval))
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2383

S
Swen Schillig 已提交
2384
	goto out;
L
Linus Torvalds 已提交
2385

S
Swen Schillig 已提交
2386
failed_scsi_cmnd:
2387
	put_device(&unit->sysfs_device);
S
Swen Schillig 已提交
2388 2389 2390
	zfcp_fsf_req_free(req);
	scsi_cmnd->host_scribble = NULL;
out:
2391
	spin_unlock(&qdio->req_q_lock);
S
Swen Schillig 已提交
2392
	return retval;
L
Linus Torvalds 已提交
2393 2394 2395
}

/**
S
Swen Schillig 已提交
2396 2397 2398 2399
 * zfcp_fsf_send_fcp_ctm - send SCSI task management command
 * @unit: pointer to struct zfcp_unit
 * @tm_flags: unsigned byte for task management flags
 * Returns: on success pointer to struct fsf_req, NULL otherwise
L
Linus Torvalds 已提交
2400
 */
2401
struct zfcp_fsf_req *zfcp_fsf_send_fcp_ctm(struct zfcp_unit *unit, u8 tm_flags)
L
Linus Torvalds 已提交
2402
{
2403
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
2404
	struct zfcp_fsf_req *req = NULL;
2405
	struct fcp_cmnd *fcp_cmnd;
2406
	struct zfcp_qdio *qdio = unit->port->adapter->qdio;
L
Linus Torvalds 已提交
2407

S
Swen Schillig 已提交
2408 2409 2410
	if (unlikely(!(atomic_read(&unit->status) &
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		return NULL;
L
Linus Torvalds 已提交
2411

2412 2413
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
2414
		goto out;
2415

2416 2417
	req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
				  qdio->adapter->pool.scsi_req);
2418

2419 2420
	if (IS_ERR(req)) {
		req = NULL;
S
Swen Schillig 已提交
2421
		goto out;
2422
	}
L
Linus Torvalds 已提交
2423

S
Swen Schillig 已提交
2424 2425 2426 2427 2428 2429 2430
	req->status |= ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT;
	req->data = unit;
	req->handler = zfcp_fsf_send_fcp_command_handler;
	req->qtcb->header.lun_handle = unit->handle;
	req->qtcb->header.port_handle = unit->port->handle;
	req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
	req->qtcb->bottom.io.service_class = FSF_CLASS_3;
2431
	req->qtcb->bottom.io.fcp_cmnd_length = FCP_CMND_LEN;
S
Swen Schillig 已提交
2432

2433
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
S
Swen Schillig 已提交
2434 2435
	sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
2436

2437 2438
	fcp_cmnd = (struct fcp_cmnd *) &req->qtcb->bottom.io.fcp_cmnd;
	zfcp_fc_fcp_tm(fcp_cmnd, unit->device, tm_flags);
L
Linus Torvalds 已提交
2439

S
Swen Schillig 已提交
2440 2441 2442
	zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
	if (!zfcp_fsf_req_send(req))
		goto out;
L
Linus Torvalds 已提交
2443

S
Swen Schillig 已提交
2444 2445 2446
	zfcp_fsf_req_free(req);
	req = NULL;
out:
2447
	spin_unlock_bh(&qdio->req_q_lock);
S
Swen Schillig 已提交
2448 2449
	return req;
}
L
Linus Torvalds 已提交
2450

S
Swen Schillig 已提交
2451 2452
static void zfcp_fsf_control_file_handler(struct zfcp_fsf_req *req)
{
L
Linus Torvalds 已提交
2453 2454
}

S
Swen Schillig 已提交
2455 2456 2457 2458 2459
/**
 * 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 已提交
2460
 */
S
Swen Schillig 已提交
2461 2462
struct zfcp_fsf_req *zfcp_fsf_control_file(struct zfcp_adapter *adapter,
					   struct zfcp_fsf_cfdc *fsf_cfdc)
L
Linus Torvalds 已提交
2463
{
2464
	struct qdio_buffer_element *sbale;
2465
	struct zfcp_qdio *qdio = adapter->qdio;
S
Swen Schillig 已提交
2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482
	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 已提交
2483

2484 2485
	spin_lock_bh(&qdio->req_q_lock);
	if (zfcp_fsf_req_sbal_get(qdio))
S
Swen Schillig 已提交
2486
		goto out;
L
Linus Torvalds 已提交
2487

2488
	req = zfcp_fsf_req_create(qdio, fsf_cfdc->command, NULL);
2489
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2490 2491 2492
		retval = -EPERM;
		goto out;
	}
L
Linus Torvalds 已提交
2493

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

2496
	sbale = zfcp_qdio_sbale_req(qdio, &req->queue_req);
S
Swen Schillig 已提交
2497
	sbale[0].flags |= direction;
2498

S
Swen Schillig 已提交
2499 2500 2501
	bottom = &req->qtcb->bottom.support;
	bottom->operation_subtype = FSF_CFDC_OPERATION_SUBTYPE;
	bottom->option = fsf_cfdc->option;
2502

2503 2504 2505
	bytes = zfcp_qdio_sbals_from_sg(qdio, &req->queue_req,
					direction, fsf_cfdc->sg,
					FSF_MAX_SBALS_PER_REQ);
S
Swen Schillig 已提交
2506 2507 2508 2509
	if (bytes != ZFCP_CFDC_MAX_SIZE) {
		zfcp_fsf_req_free(req);
		goto out;
	}
L
Linus Torvalds 已提交
2510

S
Swen Schillig 已提交
2511 2512 2513
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
out:
2514
	spin_unlock_bh(&qdio->req_q_lock);
2515

S
Swen Schillig 已提交
2516
	if (!retval) {
2517
		wait_for_completion(&req->completion);
S
Swen Schillig 已提交
2518
		return req;
L
Linus Torvalds 已提交
2519
	}
S
Swen Schillig 已提交
2520
	return ERR_PTR(retval);
L
Linus Torvalds 已提交
2521
}
2522 2523 2524 2525 2526 2527

/**
 * 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
 */
2528
void zfcp_fsf_reqid_check(struct zfcp_qdio *qdio, int sbal_idx)
2529
{
2530 2531
	struct zfcp_adapter *adapter = qdio->adapter;
	struct qdio_buffer *sbal = qdio->resp_q.sbal[sbal_idx];
2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554
	struct qdio_buffer_element *sbale;
	struct zfcp_fsf_req *fsf_req;
	unsigned long flags, req_id;
	int idx;

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

		sbale = &sbal->element[idx];
		req_id = (unsigned long) sbale->addr;
		spin_lock_irqsave(&adapter->req_list_lock, flags);
		fsf_req = zfcp_reqlist_find(adapter, req_id);

		if (!fsf_req)
			/*
			 * Unknown request means that we have potentially memory
			 * corruption and must stop the machine immediately.
			 */
			panic("error: unknown req_id (%lx) on adapter %s.\n",
			      req_id, dev_name(&adapter->ccw_device->dev));

		list_del(&fsf_req->list);
		spin_unlock_irqrestore(&adapter->req_list_lock, flags);

2555 2556
		fsf_req->queue_req.sbal_response = sbal_idx;
		fsf_req->queue_req.qdio_inb_usage =
2557
			atomic_read(&qdio->resp_q.count);
2558 2559 2560 2561 2562 2563
		zfcp_fsf_req_complete(fsf_req);

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