zfcp_fsf.c 71.8 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>
L
Linus Torvalds 已提交
13 14
#include "zfcp_ext.h"

15 16 17
#define ZFCP_REQ_AUTO_CLEANUP	0x00000002
#define ZFCP_REQ_NO_QTCB	0x00000008

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 114
	if (likely(req->pool)) {
		mempool_free(req, req->pool);
115 116 117
		return;
	}

S
Swen Schillig 已提交
118 119
	if (req->qtcb) {
		kmem_cache_free(zfcp_data.fsf_req_qtcb_cache, req);
120 121
		return;
	}
L
Linus Torvalds 已提交
122 123
}

S
Swen Schillig 已提交
124 125 126 127
/**
 * zfcp_fsf_req_dismiss_all - dismiss all fsf requests
 * @adapter: pointer to struct zfcp_adapter
 *
128 129 130 131
 * 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.
L
Linus Torvalds 已提交
132
 */
133
void zfcp_fsf_req_dismiss_all(struct zfcp_adapter *adapter)
L
Linus Torvalds 已提交
134
{
S
Swen Schillig 已提交
135
	struct zfcp_fsf_req *req, *tmp;
136
	unsigned long flags;
137
	LIST_HEAD(remove_queue);
138
	unsigned int i;
139

S
Swen Schillig 已提交
140
	BUG_ON(atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_QDIOUP);
141
	spin_lock_irqsave(&adapter->req_list_lock, flags);
142
	for (i = 0; i < REQUEST_LIST_SIZE; i++)
143
		list_splice_init(&adapter->req_list[i], &remove_queue);
144 145
	spin_unlock_irqrestore(&adapter->req_list_lock, flags);

S
Swen Schillig 已提交
146 147 148 149
	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);
L
Linus Torvalds 已提交
150 151 152
	}
}

S
Swen Schillig 已提交
153
static void zfcp_fsf_status_read_port_closed(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
154
{
S
Swen Schillig 已提交
155 156 157 158 159
	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;
	unsigned long flags;
L
Linus Torvalds 已提交
160

S
Swen Schillig 已提交
161 162 163 164
	read_lock_irqsave(&zfcp_data.config_lock, flags);
	list_for_each_entry(port, &adapter->port_list_head, list)
		if (port->d_id == d_id) {
			read_unlock_irqrestore(&zfcp_data.config_lock, flags);
165
			zfcp_erp_port_reopen(port, 0, "fssrpc1", req);
S
Swen Schillig 已提交
166 167 168
			return;
		}
	read_unlock_irqrestore(&zfcp_data.config_lock, flags);
L
Linus Torvalds 已提交
169 170
}

171
static void zfcp_fsf_link_down_info_eval(struct zfcp_fsf_req *req, char *id,
S
Swen Schillig 已提交
172
					 struct fsf_link_down_info *link_down)
173
{
S
Swen Schillig 已提交
174
	struct zfcp_adapter *adapter = req->adapter;
175
	unsigned long flags;
176

S
Swen Schillig 已提交
177
	if (atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED)
178 179 180
		return;

	atomic_set_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED, &adapter->status);
181 182

	read_lock_irqsave(&zfcp_data.config_lock, flags);
183
	zfcp_scsi_schedule_rports_block(adapter);
184
	read_unlock_irqrestore(&zfcp_data.config_lock, flags);
185

S
Swen Schillig 已提交
186
	if (!link_down)
187
		goto out;
188

189 190
	switch (link_down->error_code) {
	case FSF_PSQ_LINK_NO_LIGHT:
S
Swen Schillig 已提交
191
		dev_warn(&req->adapter->ccw_device->dev,
192 193
			 "There is no light signal from the local "
			 "fibre channel cable\n");
194 195
		break;
	case FSF_PSQ_LINK_WRAP_PLUG:
S
Swen Schillig 已提交
196
		dev_warn(&req->adapter->ccw_device->dev,
197 198
			 "There is a wrap plug instead of a fibre "
			 "channel cable\n");
199 200
		break;
	case FSF_PSQ_LINK_NO_FCP:
S
Swen Schillig 已提交
201
		dev_warn(&req->adapter->ccw_device->dev,
202 203
			 "The adjacent fibre channel node does not "
			 "support FCP\n");
204 205
		break;
	case FSF_PSQ_LINK_FIRMWARE_UPDATE:
S
Swen Schillig 已提交
206
		dev_warn(&req->adapter->ccw_device->dev,
207 208
			 "The FCP device is suspended because of a "
			 "firmware update\n");
C
Christof Schmitt 已提交
209
		break;
210
	case FSF_PSQ_LINK_INVALID_WWPN:
S
Swen Schillig 已提交
211
		dev_warn(&req->adapter->ccw_device->dev,
212 213
			 "The FCP device detected a WWPN that is "
			 "duplicate or not valid\n");
214 215
		break;
	case FSF_PSQ_LINK_NO_NPIV_SUPPORT:
S
Swen Schillig 已提交
216
		dev_warn(&req->adapter->ccw_device->dev,
217
			 "The fibre channel fabric does not support NPIV\n");
218 219
		break;
	case FSF_PSQ_LINK_NO_FCP_RESOURCES:
S
Swen Schillig 已提交
220
		dev_warn(&req->adapter->ccw_device->dev,
221
			 "The FCP adapter cannot support more NPIV ports\n");
222 223
		break;
	case FSF_PSQ_LINK_NO_FABRIC_RESOURCES:
S
Swen Schillig 已提交
224
		dev_warn(&req->adapter->ccw_device->dev,
225 226
			 "The adjacent switch cannot support "
			 "more NPIV ports\n");
227 228
		break;
	case FSF_PSQ_LINK_FABRIC_LOGIN_UNABLE:
S
Swen Schillig 已提交
229
		dev_warn(&req->adapter->ccw_device->dev,
230 231
			 "The FCP adapter could not log in to the "
			 "fibre channel fabric\n");
232 233
		break;
	case FSF_PSQ_LINK_WWPN_ASSIGNMENT_CORRUPTED:
S
Swen Schillig 已提交
234
		dev_warn(&req->adapter->ccw_device->dev,
235 236
			 "The WWPN assignment file on the FCP adapter "
			 "has been damaged\n");
237 238
		break;
	case FSF_PSQ_LINK_MODE_TABLE_CURRUPTED:
S
Swen Schillig 已提交
239
		dev_warn(&req->adapter->ccw_device->dev,
240 241
			 "The mode table on the FCP adapter "
			 "has been damaged\n");
242 243
		break;
	case FSF_PSQ_LINK_NO_WWPN_ASSIGNMENT:
S
Swen Schillig 已提交
244
		dev_warn(&req->adapter->ccw_device->dev,
245 246
			 "All NPIV ports on the FCP adapter have "
			 "been assigned\n");
247 248
		break;
	default:
S
Swen Schillig 已提交
249
		dev_warn(&req->adapter->ccw_device->dev,
250 251
			 "The link between the FCP adapter and "
			 "the FC fabric is down\n");
252
	}
S
Swen Schillig 已提交
253 254
out:
	zfcp_erp_adapter_failed(adapter, id, req);
255 256
}

S
Swen Schillig 已提交
257
static void zfcp_fsf_status_read_link_down(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
258
{
S
Swen Schillig 已提交
259 260 261
	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 已提交
262

S
Swen Schillig 已提交
263 264
	switch (sr_buf->status_subtype) {
	case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
265
		zfcp_fsf_link_down_info_eval(req, "fssrld1", ldi);
L
Linus Torvalds 已提交
266
		break;
S
Swen Schillig 已提交
267
	case FSF_STATUS_READ_SUB_FDISC_FAILED:
268
		zfcp_fsf_link_down_info_eval(req, "fssrld2", ldi);
L
Linus Torvalds 已提交
269
		break;
S
Swen Schillig 已提交
270
	case FSF_STATUS_READ_SUB_FIRMWARE_UPDATE:
271
		zfcp_fsf_link_down_info_eval(req, "fssrld3", NULL);
S
Swen Schillig 已提交
272 273
	};
}
L
Linus Torvalds 已提交
274

S
Swen Schillig 已提交
275 276 277 278
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 已提交
279

S
Swen Schillig 已提交
280 281 282 283 284 285
	if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
		zfcp_hba_dbf_event_fsf_unsol("dism", adapter, sr_buf);
		mempool_free(sr_buf, adapter->pool.data_status_read);
		zfcp_fsf_req_free(req);
		return;
	}
L
Linus Torvalds 已提交
286

S
Swen Schillig 已提交
287
	zfcp_hba_dbf_event_fsf_unsol("read", adapter, sr_buf);
L
Linus Torvalds 已提交
288

S
Swen Schillig 已提交
289 290 291
	switch (sr_buf->status_type) {
	case FSF_STATUS_READ_PORT_CLOSED:
		zfcp_fsf_status_read_port_closed(req);
L
Linus Torvalds 已提交
292
		break;
S
Swen Schillig 已提交
293 294
	case FSF_STATUS_READ_INCOMING_ELS:
		zfcp_fc_incoming_els(req);
L
Linus Torvalds 已提交
295
		break;
S
Swen Schillig 已提交
296
	case FSF_STATUS_READ_SENSE_DATA_AVAIL:
L
Linus Torvalds 已提交
297
		break;
S
Swen Schillig 已提交
298
	case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
299 300 301
		dev_warn(&adapter->ccw_device->dev,
			 "The error threshold for checksum statistics "
			 "has been exceeded\n");
302
		zfcp_hba_dbf_event_berr(adapter, req);
L
Linus Torvalds 已提交
303
		break;
S
Swen Schillig 已提交
304 305 306 307 308
	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,
309
			 "The local link has been restored\n");
S
Swen Schillig 已提交
310
		/* All ports should be marked as ready to run again */
311
		zfcp_erp_modify_adapter_status(adapter, "fssrh_1", NULL,
S
Swen Schillig 已提交
312 313 314 315 316
					       ZFCP_STATUS_COMMON_RUNNING,
					       ZFCP_SET);
		zfcp_erp_adapter_reopen(adapter,
					ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
					ZFCP_STATUS_COMMON_ERP_FAILED,
317
					"fssrh_2", req);
S
Swen Schillig 已提交
318 319 320
		break;
	case FSF_STATUS_READ_NOTIFICATION_LOST:
		if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_ACT_UPDATED)
321 322
			zfcp_erp_adapter_access_changed(adapter, "fssrh_3",
							req);
S
Swen Schillig 已提交
323 324 325 326
		if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_INCOMING_ELS)
			schedule_work(&adapter->scan_work);
		break;
	case FSF_STATUS_READ_CFDC_UPDATED:
327
		zfcp_erp_adapter_access_changed(adapter, "fssrh_4", req);
S
Swen Schillig 已提交
328 329 330
		break;
	case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
		adapter->adapter_features = sr_buf->payload.word[0];
L
Linus Torvalds 已提交
331 332 333
		break;
	}

S
Swen Schillig 已提交
334 335
	mempool_free(sr_buf, adapter->pool.data_status_read);
	zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
336

S
Swen Schillig 已提交
337
	atomic_inc(&adapter->stat_miss);
338
	queue_work(zfcp_data.work_queue, &adapter->stat_work);
S
Swen Schillig 已提交
339
}
L
Linus Torvalds 已提交
340

S
Swen Schillig 已提交
341 342 343 344 345 346 347 348 349 350 351 352 353
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,
354 355
			"The FCP adapter reported a problem "
			"that cannot be recovered\n");
356
		zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfsqe1", req);
S
Swen Schillig 已提交
357 358 359 360
		break;
	}
	/* all non-return stats set FSFREQ_ERROR*/
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
361 362
}

S
Swen Schillig 已提交
363
static void zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
364
{
S
Swen Schillig 已提交
365 366
	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
		return;
L
Linus Torvalds 已提交
367

S
Swen Schillig 已提交
368 369 370
	switch (req->qtcb->header.fsf_status) {
	case FSF_UNKNOWN_COMMAND:
		dev_err(&req->adapter->ccw_device->dev,
371
			"The FCP adapter does not recognize the command 0x%x\n",
S
Swen Schillig 已提交
372
			req->qtcb->header.fsf_command);
373
		zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfse_1", req);
S
Swen Schillig 已提交
374 375 376 377 378 379 380
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		zfcp_fsf_fsfstatus_qual_eval(req);
		break;
	}
}
L
Linus Torvalds 已提交
381

S
Swen Schillig 已提交
382 383 384 385 386
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 已提交
387

S
Swen Schillig 已提交
388
	zfcp_hba_dbf_event_fsf_response(req);
L
Linus Torvalds 已提交
389

S
Swen Schillig 已提交
390 391 392 393 394
	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 已提交
395

S
Swen Schillig 已提交
396 397 398 399 400 401
	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,
402 403 404
			"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]);
405
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_1", req);
S
Swen Schillig 已提交
406 407 408
		break;
	case FSF_PROT_ERROR_STATE:
	case FSF_PROT_SEQ_NUMB_ERROR:
409
		zfcp_erp_adapter_reopen(adapter, 0, "fspse_2", req);
S
Swen Schillig 已提交
410 411 412 413
		req->status |= ZFCP_STATUS_FSFREQ_RETRY;
		break;
	case FSF_PROT_UNSUPP_QTCB_TYPE:
		dev_err(&adapter->ccw_device->dev,
414
			"The QTCB type is not supported by the FCP adapter\n");
415
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_3", req);
S
Swen Schillig 已提交
416 417 418 419 420 421 422
		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,
423
			"0x%Lx is an ambiguous request identifier\n",
S
Swen Schillig 已提交
424
			(unsigned long long)qtcb->bottom.support.req_handle);
425
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_4", req);
S
Swen Schillig 已提交
426 427
		break;
	case FSF_PROT_LINK_DOWN:
428 429
		zfcp_fsf_link_down_info_eval(req, "fspse_5",
					     &psq->link_down_info);
S
Swen Schillig 已提交
430
		/* FIXME: reopening adapter now? better wait for link up */
431
		zfcp_erp_adapter_reopen(adapter, 0, "fspse_6", req);
S
Swen Schillig 已提交
432 433 434
		break;
	case FSF_PROT_REEST_QUEUE:
		/* All ports should be marked as ready to run again */
435
		zfcp_erp_modify_adapter_status(adapter, "fspse_7", NULL,
S
Swen Schillig 已提交
436 437 438 439
					       ZFCP_STATUS_COMMON_RUNNING,
					       ZFCP_SET);
		zfcp_erp_adapter_reopen(adapter,
					ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
440 441
					ZFCP_STATUS_COMMON_ERP_FAILED,
					"fspse_8", req);
S
Swen Schillig 已提交
442 443 444
		break;
	default:
		dev_err(&adapter->ccw_device->dev,
445
			"0x%x is not a valid transfer protocol status\n",
S
Swen Schillig 已提交
446
			qtcb->prefix.prot_status);
447
		zfcp_erp_adapter_shutdown(adapter, 0, "fspse_9", req);
S
Swen Schillig 已提交
448 449
	}
	req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
450 451
}

S
Swen Schillig 已提交
452 453 454 455 456 457 458 459 460 461
/**
 * 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.
 */
void zfcp_fsf_req_complete(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
462
{
S
Swen Schillig 已提交
463 464 465 466
	if (unlikely(req->fsf_command == FSF_QTCB_UNSOLICITED_STATUS)) {
		zfcp_fsf_status_read_handler(req);
		return;
	}
L
Linus Torvalds 已提交
467

S
Swen Schillig 已提交
468 469 470 471
	del_timer(&req->timer);
	zfcp_fsf_protstatus_eval(req);
	zfcp_fsf_fsfstatus_eval(req);
	req->handler(req);
L
Linus Torvalds 已提交
472

S
Swen Schillig 已提交
473
	if (req->erp_action)
474
		zfcp_erp_notify(req->erp_action, 0);
S
Swen Schillig 已提交
475
	req->status |= ZFCP_STATUS_FSFREQ_COMPLETED;
L
Linus Torvalds 已提交
476

S
Swen Schillig 已提交
477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492
	if (likely(req->status & ZFCP_STATUS_FSFREQ_CLEANUP))
		zfcp_fsf_req_free(req);
	else
	/* notify initiator waiting for the requests completion */
	/*
	 * FIXME: Race! We must not access fsf_req here as it might have been
	 * cleaned up already due to the set ZFCP_STATUS_FSFREQ_COMPLETED
	 * flag. It's an improbable case. But, we have the same paranoia for
	 * the cleanup flag already.
	 * Might better be handled using complete()?
	 * (setting the flag and doing wakeup ought to be atomic
	 *  with regard to checking the flag as long as waitqueue is
	 *  part of the to be released structure)
	 */
		wake_up(&req->completion_wq);
}
L
Linus Torvalds 已提交
493

S
Swen Schillig 已提交
494 495 496 497 498
static int zfcp_fsf_exchange_config_evaluate(struct zfcp_fsf_req *req)
{
	struct fsf_qtcb_bottom_config *bottom;
	struct zfcp_adapter *adapter = req->adapter;
	struct Scsi_Host *shost = adapter->scsi_host;
L
Linus Torvalds 已提交
499

S
Swen Schillig 已提交
500
	bottom = &req->qtcb->bottom.config;
L
Linus Torvalds 已提交
501

S
Swen Schillig 已提交
502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528
	if (req->data)
		memcpy(req->data, bottom, sizeof(*bottom));

	fc_host_node_name(shost) = bottom->nport_serv_param.wwnn;
	fc_host_port_name(shost) = bottom->nport_serv_param.wwpn;
	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;
		adapter->peer_wwpn = bottom->plogi_payload.wwpn;
		adapter->peer_wwnn = bottom->plogi_payload.wwnn;
		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;
529
		/* fall through */
S
Swen Schillig 已提交
530 531
	default:
		dev_err(&adapter->ccw_device->dev,
532 533
			"Unknown or unsupported arbitrated loop "
			"fibre channel topology detected\n");
534
		zfcp_erp_adapter_shutdown(adapter, 0, "fsece_1", req);
S
Swen Schillig 已提交
535
		return -EIO;
L
Linus Torvalds 已提交
536
	}
S
Swen Schillig 已提交
537

L
Linus Torvalds 已提交
538 539 540
	return 0;
}

S
Swen Schillig 已提交
541
static void zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *req)
C
Christof Schmitt 已提交
542 543
{
	struct zfcp_adapter *adapter = req->adapter;
S
Swen Schillig 已提交
544 545 546
	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 已提交
547

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

S
Swen Schillig 已提交
551 552 553 554 555 556
	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;
557

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

S
Swen Schillig 已提交
563 564
		if (bottom->max_qtcb_size < sizeof(struct fsf_qtcb)) {
			dev_err(&adapter->ccw_device->dev,
565 566 567
				"FCP adapter maximum QTCB size (%d bytes) "
				"is too small\n",
				bottom->max_qtcb_size);
568
			zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh1", req);
S
Swen Schillig 已提交
569 570 571 572
			return;
		}
		atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
				&adapter->status);
L
Linus Torvalds 已提交
573
		break;
S
Swen Schillig 已提交
574 575 576 577 578 579 580
	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 已提交
581

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

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

S
Swen Schillig 已提交
593 594 595 596 597 598 599
	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 已提交
600

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

S
Swen Schillig 已提交
616 617 618 619 620
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 已提交
621

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

625
	if (adapter->connection_features & FSF_FEATURE_NPIV_MODE) {
S
Swen Schillig 已提交
626
		fc_host_permanent_port_name(shost) = bottom->wwpn;
627 628
		fc_host_port_type(shost) = FC_PORTTYPE_NPIV;
	} else
S
Swen Schillig 已提交
629 630 631 632
		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 已提交
633

S
Swen Schillig 已提交
634 635 636 637 638 639 640 641 642 643 644 645 646
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);
647
		zfcp_fsf_link_down_info_eval(req, "fsepdh1",
S
Swen Schillig 已提交
648
			&qtcb->header.fsf_status_qual.link_down_info);
649
		break;
L
Linus Torvalds 已提交
650
	}
S
Swen Schillig 已提交
651
}
652

653
static int zfcp_fsf_sbal_check(struct zfcp_adapter *adapter)
S
Swen Schillig 已提交
654
{
655
	struct zfcp_qdio_queue *req_q = &adapter->req_q;
S
Swen Schillig 已提交
656

657 658 659 660 661 662 663 664 665 666
	spin_lock_bh(&adapter->req_q_lock);
	if (atomic_read(&req_q->count))
		return 1;
	spin_unlock_bh(&adapter->req_q_lock);
	return 0;
}

static int zfcp_fsf_req_sbal_get(struct zfcp_adapter *adapter)
{
	long ret;
667

668
	spin_unlock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
669
	ret = wait_event_interruptible_timeout(adapter->request_wq,
670
			       zfcp_fsf_sbal_check(adapter), 5 * HZ);
S
Swen Schillig 已提交
671 672
	if (ret > 0)
		return 0;
673 674
	if (!ret)
		atomic_inc(&adapter->qdio_outb_full);
675 676

	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
677 678 679 680 681 682 683 684 685 686
	return -EIO;
}

static struct zfcp_fsf_req *zfcp_fsf_alloc_noqtcb(mempool_t *pool)
{
	struct zfcp_fsf_req *req;
	req = mempool_alloc(pool, GFP_ATOMIC);
	if (!req)
		return NULL;
	memset(req, 0, sizeof(*req));
687
	req->pool = pool;
S
Swen Schillig 已提交
688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712
	return req;
}

static struct zfcp_fsf_req *zfcp_fsf_alloc_qtcb(mempool_t *pool)
{
	struct zfcp_fsf_req_qtcb *qtcb;

	if (likely(pool))
		qtcb = mempool_alloc(pool, GFP_ATOMIC);
	else
		qtcb = kmem_cache_alloc(zfcp_data.fsf_req_qtcb_cache,
					GFP_ATOMIC);
	if (unlikely(!qtcb))
		return NULL;

	memset(qtcb, 0, sizeof(*qtcb));
	qtcb->fsf_req.qtcb = &qtcb->qtcb;
	qtcb->fsf_req.pool = pool;

	return &qtcb->fsf_req;
}

static struct zfcp_fsf_req *zfcp_fsf_req_create(struct zfcp_adapter *adapter,
						u32 fsf_cmd, int req_flags,
						mempool_t *pool)
L
Linus Torvalds 已提交
713
{
714
	struct qdio_buffer_element *sbale;
L
Linus Torvalds 已提交
715

S
Swen Schillig 已提交
716 717
	struct zfcp_fsf_req *req;
	struct zfcp_qdio_queue *req_q = &adapter->req_q;
718

S
Swen Schillig 已提交
719 720 721 722
	if (req_flags & ZFCP_REQ_NO_QTCB)
		req = zfcp_fsf_alloc_noqtcb(pool);
	else
		req = zfcp_fsf_alloc_qtcb(pool);
L
Linus Torvalds 已提交
723

S
Swen Schillig 已提交
724 725
	if (unlikely(!req))
		return ERR_PTR(-EIO);
L
Linus Torvalds 已提交
726

S
Swen Schillig 已提交
727 728
	if (adapter->req_no == 0)
		adapter->req_no++;
L
Linus Torvalds 已提交
729

S
Swen Schillig 已提交
730 731 732
	INIT_LIST_HEAD(&req->list);
	init_timer(&req->timer);
	init_waitqueue_head(&req->completion_wq);
L
Linus Torvalds 已提交
733

S
Swen Schillig 已提交
734 735
	req->adapter = adapter;
	req->fsf_command = fsf_cmd;
736
	req->req_id = adapter->req_no;
S
Swen Schillig 已提交
737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763
	req->sbal_number = 1;
	req->sbal_first = req_q->first;
	req->sbal_last = req_q->first;
	req->sbale_curr = 1;

	sbale = zfcp_qdio_sbale_req(req);
	sbale[0].addr = (void *) req->req_id;
	sbale[0].flags |= SBAL_FLAGS0_COMMAND;

	if (likely(req->qtcb)) {
		req->qtcb->prefix.req_seq_no = req->adapter->fsf_req_seq_no;
		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);
	}
764

S
Swen Schillig 已提交
765 766
	if (likely(req_flags & ZFCP_REQ_AUTO_CLEANUP))
		req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
L
Linus Torvalds 已提交
767

S
Swen Schillig 已提交
768
	return req;
L
Linus Torvalds 已提交
769 770
}

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

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

784
	req->qdio_outb_usage = atomic_read(&adapter->req_q.count);
S
Swen Schillig 已提交
785 786 787
	req->issued = get_clock();
	if (zfcp_qdio_send(req)) {
		del_timer(&req->timer);
788 789 790 791 792
		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);
793
		zfcp_erp_adapter_reopen(adapter, 0, "fsrs__1", req);
S
Swen Schillig 已提交
794 795 796 797
		return -EIO;
	}

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

	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 已提交
810
 */
S
Swen Schillig 已提交
811
int zfcp_fsf_status_read(struct zfcp_adapter *adapter)
L
Linus Torvalds 已提交
812
{
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
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
819 820 821 822 823 824
	if (zfcp_fsf_req_sbal_get(adapter))
		goto out;

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

S
Swen Schillig 已提交
830 831 832 833 834 835 836 837 838 839 840 841 842 843 844
	sbale = zfcp_qdio_sbale_req(req);
	sbale[0].flags |= SBAL_FLAGS0_TYPE_STATUS;
	sbale[2].flags |= SBAL_FLAGS_LAST_ENTRY;
	req->sbale_curr = 2;

	sr_buf = mempool_alloc(adapter->pool.data_status_read, GFP_ATOMIC);
	if (!sr_buf) {
		retval = -ENOMEM;
		goto failed_buf;
	}
	memset(sr_buf, 0, sizeof(*sr_buf));
	req->data = sr_buf;
	sbale = zfcp_qdio_sbale_curr(req);
	sbale->addr = (void *) sr_buf;
	sbale->length = sizeof(*sr_buf);
845

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

S
Swen Schillig 已提交
850 851 852 853 854 855 856 857
	goto out;

failed_req_send:
	mempool_free(sr_buf, adapter->pool.data_status_read);
failed_buf:
	zfcp_fsf_req_free(req);
	zfcp_hba_dbf_event_fsf_unsol("fail", adapter, NULL);
out:
858
	spin_unlock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
859 860 861 862 863 864 865 866 867 868 869 870
	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 已提交
871
	case FSF_PORT_HANDLE_NOT_VALID:
S
Swen Schillig 已提交
872
		if (fsq->word[0] == fsq->word[1]) {
873 874
			zfcp_erp_adapter_reopen(unit->port->adapter, 0,
						"fsafch1", req);
S
Swen Schillig 已提交
875
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
876 877 878
		}
		break;
	case FSF_LUN_HANDLE_NOT_VALID:
S
Swen Schillig 已提交
879
		if (fsq->word[0] == fsq->word[1]) {
880
			zfcp_erp_port_reopen(unit->port, 0, "fsafch2", req);
S
Swen Schillig 已提交
881
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
882 883 884
		}
		break;
	case FSF_FCP_COMMAND_DOES_NOT_EXIST:
S
Swen Schillig 已提交
885
		req->status |= ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED;
L
Linus Torvalds 已提交
886 887
		break;
	case FSF_PORT_BOXED:
888
		zfcp_erp_port_boxed(unit->port, "fsafch3", req);
S
Swen Schillig 已提交
889 890
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
891 892
		break;
	case FSF_LUN_BOXED:
893
		zfcp_erp_unit_boxed(unit, "fsafch4", req);
S
Swen Schillig 已提交
894 895
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
896 897
                break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
S
Swen Schillig 已提交
898
		switch (fsq->word[0]) {
L
Linus Torvalds 已提交
899
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
900
			zfcp_test_link(unit->port);
901
			/* fall through */
L
Linus Torvalds 已提交
902
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
903
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
904 905 906 907
			break;
		}
		break;
	case FSF_GOOD:
S
Swen Schillig 已提交
908
		req->status |= ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED;
L
Linus Torvalds 已提交
909 910 911 912 913
		break;
	}
}

/**
S
Swen Schillig 已提交
914 915 916 917
 * 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 已提交
918 919
 */

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

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

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

S
Swen Schillig 已提交
941 942 943
	sbale = zfcp_qdio_sbale_req(req);
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
944

S
Swen Schillig 已提交
945 946 947 948 949 950 951 952 953 954 955 956 957 958
	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:
959
	spin_unlock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
960
	return req;
L
Linus Torvalds 已提交
961 962
}

S
Swen Schillig 已提交
963
static void zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
964
{
S
Swen Schillig 已提交
965 966 967
	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 已提交
968

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

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

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

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

1013 1014 1015 1016
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 已提交
1017
{
1018 1019
	struct qdio_buffer_element *sbale = zfcp_qdio_sbale_req(req);
	u32 feat = req->adapter->adapter_features;
S
Swen Schillig 已提交
1020 1021
	int bytes;

1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035
	if (!(feat & FSF_FEATURE_ELS_CT_CHAINED_SBALS)) {
		if (sg_req->length > PAGE_SIZE || sg_resp->length > PAGE_SIZE ||
		    !sg_is_last(sg_req) || !sg_is_last(sg_resp))
			return -EOPNOTSUPP;

		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;
		return 0;
	}

S
Swen Schillig 已提交
1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049
	bytes = zfcp_qdio_sbals_from_sg(req, SBAL_FLAGS0_TYPE_WRITE_READ,
					sg_req, max_sbals);
	if (bytes <= 0)
		return -ENOMEM;
	req->qtcb->bottom.support.req_buf_length = bytes;
	req->sbale_curr = ZFCP_LAST_SBALE_PER_SBAL;

	bytes = zfcp_qdio_sbals_from_sg(req, SBAL_FLAGS0_TYPE_WRITE_READ,
					sg_resp, max_sbals);
	if (bytes <= 0)
		return -ENOMEM;
	req->qtcb->bottom.support.resp_buf_length = bytes;

	return 0;
L
Linus Torvalds 已提交
1050 1051 1052
}

/**
S
Swen Schillig 已提交
1053 1054 1055 1056
 * 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
 * @erp_action: if non-null the Generic Service request sent within ERP
L
Linus Torvalds 已提交
1057
 */
S
Swen Schillig 已提交
1058 1059
int zfcp_fsf_send_ct(struct zfcp_send_ct *ct, mempool_t *pool,
		     struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1060
{
1061 1062
	struct zfcp_wka_port *wka_port = ct->wka_port;
	struct zfcp_adapter *adapter = wka_port->adapter;
S
Swen Schillig 已提交
1063 1064
	struct zfcp_fsf_req *req;
	int ret = -EIO;
L
Linus Torvalds 已提交
1065

1066
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1067 1068
	if (zfcp_fsf_req_sbal_get(adapter))
		goto out;
L
Linus Torvalds 已提交
1069

S
Swen Schillig 已提交
1070 1071
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_SEND_GENERIC,
				  ZFCP_REQ_AUTO_CLEANUP, pool);
1072
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1073 1074
		ret = PTR_ERR(req);
		goto out;
1075 1076
	}

1077 1078
	ret = zfcp_fsf_setup_ct_els_sbals(req, ct->req, ct->resp,
					  FSF_MAX_SBALS_PER_REQ);
C
Christof Schmitt 已提交
1079
	if (ret)
L
Linus Torvalds 已提交
1080 1081
		goto failed_send;

S
Swen Schillig 已提交
1082
	req->handler = zfcp_fsf_send_ct_handler;
1083
	req->qtcb->header.port_handle = wka_port->handle;
S
Swen Schillig 已提交
1084 1085 1086 1087 1088 1089 1090 1091 1092
	req->qtcb->bottom.support.service_class = FSF_CLASS_3;
	req->qtcb->bottom.support.timeout = ct->timeout;
	req->data = ct;

	zfcp_san_dbf_event_ct_request(req);

	if (erp_action) {
		erp_action->fsf_req = req;
		req->erp_action = erp_action;
1093
		zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1094 1095
	} else
		zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
L
Linus Torvalds 已提交
1096

S
Swen Schillig 已提交
1097 1098 1099
	ret = zfcp_fsf_req_send(req);
	if (ret)
		goto failed_send;
L
Linus Torvalds 已提交
1100

S
Swen Schillig 已提交
1101
	goto out;
L
Linus Torvalds 已提交
1102

S
Swen Schillig 已提交
1103 1104 1105 1106 1107
failed_send:
	zfcp_fsf_req_free(req);
	if (erp_action)
		erp_action->fsf_req = NULL;
out:
1108
	spin_unlock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1109
	return ret;
L
Linus Torvalds 已提交
1110 1111
}

S
Swen Schillig 已提交
1112
static void zfcp_fsf_send_els_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1113
{
S
Swen Schillig 已提交
1114 1115 1116
	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 已提交
1117

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

S
Swen Schillig 已提交
1120
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
L
Linus Torvalds 已提交
1121 1122 1123 1124
		goto skip_fsfstatus;

	switch (header->fsf_status) {
	case FSF_GOOD:
S
Swen Schillig 已提交
1125 1126
		zfcp_san_dbf_event_els_response(req);
		send_els->status = 0;
L
Linus Torvalds 已提交
1127 1128
		break;
	case FSF_SERVICE_CLASS_NOT_SUPPORTED:
S
Swen Schillig 已提交
1129
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
1130 1131 1132 1133
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]){
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1134 1135
			if (port && (send_els->ls_code != ZFCP_LS_ADISC))
				zfcp_test_link(port);
S
Swen Schillig 已提交
1136
			/*fall through */
L
Linus Torvalds 已提交
1137 1138
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
		case FSF_SQ_RETRY_IF_POSSIBLE:
S
Swen Schillig 已提交
1139
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1140 1141 1142 1143 1144 1145 1146 1147 1148
			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:
1149 1150
		if (port)
			zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1151
		break;
S
Swen Schillig 已提交
1152 1153 1154
	case FSF_SBAL_MISMATCH:
		/* should never occure, avoided in zfcp_fsf_send_els */
		/* fall through */
L
Linus Torvalds 已提交
1155
	default:
S
Swen Schillig 已提交
1156
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1157 1158 1159
		break;
	}
skip_fsfstatus:
H
Heiko Carstens 已提交
1160
	if (send_els->handler)
L
Linus Torvalds 已提交
1161
		send_els->handler(send_els->handler_data);
S
Swen Schillig 已提交
1162
}
L
Linus Torvalds 已提交
1163

S
Swen Schillig 已提交
1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174
/**
 * 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;
	struct zfcp_adapter *adapter = els->adapter;
	struct fsf_qtcb_bottom_support *bottom;
	int ret = -EIO;

1175 1176
	spin_lock_bh(&adapter->req_q_lock);
	if (zfcp_fsf_req_sbal_get(adapter))
S
Swen Schillig 已提交
1177 1178 1179
		goto out;
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_SEND_ELS,
				  ZFCP_REQ_AUTO_CLEANUP, NULL);
1180
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1181 1182 1183 1184
		ret = PTR_ERR(req);
		goto out;
	}

1185
	ret = zfcp_fsf_setup_ct_els_sbals(req, els->req, els->resp, 2);
1186

S
Swen Schillig 已提交
1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208
	if (ret)
		goto failed_send;

	bottom = &req->qtcb->bottom.support;
	req->handler = zfcp_fsf_send_els_handler;
	bottom->d_id = els->d_id;
	bottom->service_class = FSF_CLASS_3;
	bottom->timeout = 2 * R_A_TOV;
	req->data = els;

	zfcp_san_dbf_event_els_request(req);

	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	ret = zfcp_fsf_req_send(req);
	if (ret)
		goto failed_send;

	goto out;

failed_send:
	zfcp_fsf_req_free(req);
out:
1209
	spin_unlock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1210
	return ret;
L
Linus Torvalds 已提交
1211 1212
}

S
Swen Schillig 已提交
1213
int zfcp_fsf_exchange_config_data(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1214
{
1215
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1216
	struct zfcp_fsf_req *req;
1217
	struct zfcp_adapter *adapter = erp_action->adapter;
S
Swen Schillig 已提交
1218 1219
	int retval = -EIO;

1220
	spin_lock_bh(&adapter->req_q_lock);
1221
	if (zfcp_fsf_req_sbal_get(adapter))
S
Swen Schillig 已提交
1222 1223 1224 1225 1226
		goto out;
	req = zfcp_fsf_req_create(adapter,
				  FSF_QTCB_EXCHANGE_CONFIG_DATA,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
1227
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1228 1229
		retval = PTR_ERR(req);
		goto out;
L
Linus Torvalds 已提交
1230 1231
	}

S
Swen Schillig 已提交
1232
	sbale = zfcp_qdio_sbale_req(req);
1233 1234
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
1235

S
Swen Schillig 已提交
1236
	req->qtcb->bottom.config.feature_selection =
1237 1238
			FSF_FEATURE_CFDC |
			FSF_FEATURE_LUN_SHARING |
1239
			FSF_FEATURE_NOTIFICATION_LOST |
1240
			FSF_FEATURE_UPDATE_ALERT;
S
Swen Schillig 已提交
1241 1242 1243
	req->erp_action = erp_action;
	req->handler = zfcp_fsf_exchange_config_data_handler;
	erp_action->fsf_req = req;
L
Linus Torvalds 已提交
1244

1245
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1246
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1247
	if (retval) {
S
Swen Schillig 已提交
1248
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1249 1250
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1251
out:
1252
	spin_unlock_bh(&adapter->req_q_lock);
1253 1254
	return retval;
}
L
Linus Torvalds 已提交
1255

S
Swen Schillig 已提交
1256 1257
int zfcp_fsf_exchange_config_data_sync(struct zfcp_adapter *adapter,
				       struct fsf_qtcb_bottom_config *data)
1258
{
1259
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1260 1261 1262
	struct zfcp_fsf_req *req = NULL;
	int retval = -EIO;

1263
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1264
	if (zfcp_fsf_req_sbal_get(adapter))
1265
		goto out_unlock;
S
Swen Schillig 已提交
1266 1267 1268

	req = zfcp_fsf_req_create(adapter, FSF_QTCB_EXCHANGE_CONFIG_DATA,
				  0, NULL);
1269
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1270
		retval = PTR_ERR(req);
1271
		goto out_unlock;
1272 1273
	}

S
Swen Schillig 已提交
1274
	sbale = zfcp_qdio_sbale_req(req);
1275 1276
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
S
Swen Schillig 已提交
1277
	req->handler = zfcp_fsf_exchange_config_data_handler;
1278

S
Swen Schillig 已提交
1279
	req->qtcb->bottom.config.feature_selection =
1280 1281 1282 1283 1284 1285
			FSF_FEATURE_CFDC |
			FSF_FEATURE_LUN_SHARING |
			FSF_FEATURE_NOTIFICATION_LOST |
			FSF_FEATURE_UPDATE_ALERT;

	if (data)
S
Swen Schillig 已提交
1286
		req->data = data;
1287

S
Swen Schillig 已提交
1288 1289
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
1290
	spin_unlock_bh(&adapter->req_q_lock);
C
Christof Schmitt 已提交
1291
	if (!retval)
S
Swen Schillig 已提交
1292 1293
		wait_event(req->completion_wq,
			   req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
1294

S
Swen Schillig 已提交
1295
	zfcp_fsf_req_free(req);
1296
	return retval;
1297

1298 1299
out_unlock:
	spin_unlock_bh(&adapter->req_q_lock);
L
Linus Torvalds 已提交
1300 1301 1302 1303 1304
	return retval;
}

/**
 * zfcp_fsf_exchange_port_data - request information about local port
1305
 * @erp_action: ERP action for the adapter for which port data is requested
S
Swen Schillig 已提交
1306
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1307
 */
S
Swen Schillig 已提交
1308
int zfcp_fsf_exchange_port_data(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1309
{
1310
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1311
	struct zfcp_fsf_req *req;
1312
	struct zfcp_adapter *adapter = erp_action->adapter;
S
Swen Schillig 已提交
1313
	int retval = -EIO;
L
Linus Torvalds 已提交
1314

C
Christof Schmitt 已提交
1315
	if (!(adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1316
		return -EOPNOTSUPP;
L
Linus Torvalds 已提交
1317

1318
	spin_lock_bh(&adapter->req_q_lock);
1319
	if (zfcp_fsf_req_sbal_get(adapter))
S
Swen Schillig 已提交
1320 1321 1322 1323
		goto out;
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_EXCHANGE_PORT_DATA,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
1324
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1325 1326
		retval = PTR_ERR(req);
		goto out;
1327 1328
	}

S
Swen Schillig 已提交
1329
	sbale = zfcp_qdio_sbale_req(req);
1330 1331
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
1332

S
Swen Schillig 已提交
1333 1334 1335
	req->handler = zfcp_fsf_exchange_port_data_handler;
	req->erp_action = erp_action;
	erp_action->fsf_req = req;
1336

1337
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1338
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1339
	if (retval) {
S
Swen Schillig 已提交
1340
		zfcp_fsf_req_free(req);
1341 1342
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1343
out:
1344
	spin_unlock_bh(&adapter->req_q_lock);
1345 1346 1347 1348 1349
	return retval;
}

/**
 * zfcp_fsf_exchange_port_data_sync - request information about local port
S
Swen Schillig 已提交
1350 1351 1352
 * @adapter: pointer to struct zfcp_adapter
 * @data: pointer to struct fsf_qtcb_bottom_port
 * Returns: 0 on success, error otherwise
1353
 */
S
Swen Schillig 已提交
1354 1355
int zfcp_fsf_exchange_port_data_sync(struct zfcp_adapter *adapter,
				     struct fsf_qtcb_bottom_port *data)
1356
{
1357
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1358 1359
	struct zfcp_fsf_req *req = NULL;
	int retval = -EIO;
1360

C
Christof Schmitt 已提交
1361
	if (!(adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1362 1363
		return -EOPNOTSUPP;

1364
	spin_lock_bh(&adapter->req_q_lock);
1365
	if (zfcp_fsf_req_sbal_get(adapter))
1366
		goto out_unlock;
S
Swen Schillig 已提交
1367 1368 1369

	req = zfcp_fsf_req_create(adapter, FSF_QTCB_EXCHANGE_PORT_DATA, 0,
				  NULL);
1370
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1371
		retval = PTR_ERR(req);
1372
		goto out_unlock;
L
Linus Torvalds 已提交
1373 1374
	}

1375
	if (data)
S
Swen Schillig 已提交
1376
		req->data = data;
1377

S
Swen Schillig 已提交
1378
	sbale = zfcp_qdio_sbale_req(req);
1379 1380 1381
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1382 1383 1384
	req->handler = zfcp_fsf_exchange_port_data_handler;
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
1385
	spin_unlock_bh(&adapter->req_q_lock);
1386

C
Christof Schmitt 已提交
1387
	if (!retval)
S
Swen Schillig 已提交
1388 1389 1390
		wait_event(req->completion_wq,
			   req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
	zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1391 1392

	return retval;
1393 1394 1395 1396

out_unlock:
	spin_unlock_bh(&adapter->req_q_lock);
	return retval;
L
Linus Torvalds 已提交
1397 1398
}

S
Swen Schillig 已提交
1399
static void zfcp_fsf_open_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1400
{
S
Swen Schillig 已提交
1401 1402
	struct zfcp_port *port = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;
L
Linus Torvalds 已提交
1403 1404
	struct fsf_plogi *plogi;

S
Swen Schillig 已提交
1405
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1406
		goto out;
L
Linus Torvalds 已提交
1407 1408 1409 1410 1411

	switch (header->fsf_status) {
	case FSF_PORT_ALREADY_OPEN:
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1412
		zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1413 1414
		break;
	case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
S
Swen Schillig 已提交
1415
		dev_warn(&req->adapter->ccw_device->dev,
1416
			 "Not enough FCP adapter resources to open "
1417 1418
			 "remote port 0x%016Lx\n",
			 (unsigned long long)port->wwpn);
1419
		zfcp_erp_port_failed(port, "fsoph_1", req);
S
Swen Schillig 已提交
1420
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1421 1422 1423 1424 1425 1426
		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 已提交
1427
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1428 1429 1430 1431 1432 1433 1434
			break;
		}
		break;
	case FSF_GOOD:
		port->handle = header->port_handle;
		atomic_set_mask(ZFCP_STATUS_COMMON_OPEN |
				ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1435 1436 1437
		atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
		                  ZFCP_STATUS_COMMON_ACCESS_BOXED,
		                  &port->status);
L
Linus Torvalds 已提交
1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452
		/* 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.
		 */
S
Swen Schillig 已提交
1453
		plogi = (struct fsf_plogi *) req->qtcb->bottom.support.els;
1454 1455
		if (req->qtcb->bottom.support.els1_length >=
		    FSF_PLOGI_MIN_LEN) {
S
Swen Schillig 已提交
1456
			if (plogi->serv_param.wwpn != port->wwpn)
1457
				port->d_id = 0;
S
Swen Schillig 已提交
1458 1459 1460
			else {
				port->wwnn = plogi->serv_param.wwnn;
				zfcp_fc_plogi_evaluate(port, plogi);
L
Linus Torvalds 已提交
1461 1462 1463 1464
			}
		}
		break;
	case FSF_UNKNOWN_OP_SUBTYPE:
S
Swen Schillig 已提交
1465
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1466 1467
		break;
	}
1468 1469 1470

out:
	zfcp_port_put(port);
L
Linus Torvalds 已提交
1471 1472
}

S
Swen Schillig 已提交
1473 1474 1475 1476
/**
 * 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 已提交
1477
 */
S
Swen Schillig 已提交
1478
int zfcp_fsf_open_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1479
{
1480
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1481 1482
	struct zfcp_adapter *adapter = erp_action->adapter;
	struct zfcp_fsf_req *req;
1483
	struct zfcp_port *port = erp_action->port;
S
Swen Schillig 已提交
1484 1485
	int retval = -EIO;

1486
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1487 1488 1489 1490 1491 1492 1493
	if (zfcp_fsf_req_sbal_get(adapter))
		goto out;

	req = zfcp_fsf_req_create(adapter,
				  FSF_QTCB_OPEN_PORT_WITH_DID,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
1494
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1495
		retval = PTR_ERR(req);
L
Linus Torvalds 已提交
1496
		goto out;
S
Swen Schillig 已提交
1497
	}
L
Linus Torvalds 已提交
1498

S
Swen Schillig 已提交
1499
	sbale = zfcp_qdio_sbale_req(req);
L
Linus Torvalds 已提交
1500 1501 1502
        sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
        sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1503
	req->handler = zfcp_fsf_open_port_handler;
1504 1505
	req->qtcb->bottom.support.d_id = port->d_id;
	req->data = port;
S
Swen Schillig 已提交
1506 1507
	req->erp_action = erp_action;
	erp_action->fsf_req = req;
1508
	zfcp_port_get(port);
S
Swen Schillig 已提交
1509

1510
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1511
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1512
	if (retval) {
S
Swen Schillig 已提交
1513
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1514
		erp_action->fsf_req = NULL;
1515
		zfcp_port_put(port);
L
Linus Torvalds 已提交
1516
	}
S
Swen Schillig 已提交
1517
out:
1518
	spin_unlock_bh(&adapter->req_q_lock);
L
Linus Torvalds 已提交
1519 1520 1521
	return retval;
}

S
Swen Schillig 已提交
1522
static void zfcp_fsf_close_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1523
{
S
Swen Schillig 已提交
1524
	struct zfcp_port *port = req->data;
L
Linus Torvalds 已提交
1525

S
Swen Schillig 已提交
1526
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1527
		return;
L
Linus Torvalds 已提交
1528

S
Swen Schillig 已提交
1529
	switch (req->qtcb->header.fsf_status) {
L
Linus Torvalds 已提交
1530
	case FSF_PORT_HANDLE_NOT_VALID:
1531
		zfcp_erp_adapter_reopen(port->adapter, 0, "fscph_1", req);
S
Swen Schillig 已提交
1532
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1533 1534 1535 1536
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		break;
	case FSF_GOOD:
1537
		zfcp_erp_modify_port_status(port, "fscph_2", req,
L
Linus Torvalds 已提交
1538 1539 1540 1541 1542 1543
					    ZFCP_STATUS_COMMON_OPEN,
					    ZFCP_CLEAR);
		break;
	}
}

S
Swen Schillig 已提交
1544 1545 1546 1547
/**
 * 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 已提交
1548
 */
S
Swen Schillig 已提交
1549
int zfcp_fsf_close_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1550
{
1551
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1552 1553 1554 1555
	struct zfcp_adapter *adapter = erp_action->adapter;
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1556
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1557 1558 1559 1560 1561 1562
	if (zfcp_fsf_req_sbal_get(adapter))
		goto out;

	req = zfcp_fsf_req_create(adapter, FSF_QTCB_CLOSE_PORT,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
1563
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1564
		retval = PTR_ERR(req);
L
Linus Torvalds 已提交
1565
		goto out;
S
Swen Schillig 已提交
1566
	}
L
Linus Torvalds 已提交
1567

S
Swen Schillig 已提交
1568
	sbale = zfcp_qdio_sbale_req(req);
L
Linus Torvalds 已提交
1569 1570 1571
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1572 1573 1574 1575 1576 1577
	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;

1578
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1579
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1580
	if (retval) {
S
Swen Schillig 已提交
1581
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1582 1583
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1584
out:
1585
	spin_unlock_bh(&adapter->req_q_lock);
L
Linus Torvalds 已提交
1586 1587 1588
	return retval;
}

1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602
static void zfcp_fsf_open_wka_port_handler(struct zfcp_fsf_req *req)
{
	struct zfcp_wka_port *wka_port = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;

	if (req->status & ZFCP_STATUS_FSFREQ_ERROR) {
		wka_port->status = ZFCP_WKA_PORT_OFFLINE;
		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);
1603
		/* fall through */
1604 1605
	case FSF_ADAPTER_STATUS_AVAILABLE:
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1606
		/* fall through */
1607 1608 1609 1610
	case FSF_ACCESS_DENIED:
		wka_port->status = ZFCP_WKA_PORT_OFFLINE;
		break;
	case FSF_PORT_ALREADY_OPEN:
1611
		break;
1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631
	case FSF_GOOD:
		wka_port->handle = header->port_handle;
		wka_port->status = ZFCP_WKA_PORT_ONLINE;
	}
out:
	wake_up(&wka_port->completion_wq);
}

/**
 * zfcp_fsf_open_wka_port - create and send open wka-port request
 * @wka_port: pointer to struct zfcp_wka_port
 * Returns: 0 on success, error otherwise
 */
int zfcp_fsf_open_wka_port(struct zfcp_wka_port *wka_port)
{
	struct qdio_buffer_element *sbale;
	struct zfcp_adapter *adapter = wka_port->adapter;
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1632
	spin_lock_bh(&adapter->req_q_lock);
1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657
	if (zfcp_fsf_req_sbal_get(adapter))
		goto out;

	req = zfcp_fsf_req_create(adapter,
				  FSF_QTCB_OPEN_PORT_WITH_DID,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
	if (unlikely(IS_ERR(req))) {
		retval = PTR_ERR(req);
		goto out;
	}

	sbale = zfcp_qdio_sbale_req(req);
	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:
1658
	spin_unlock_bh(&adapter->req_q_lock);
1659 1660 1661 1662 1663 1664 1665 1666 1667
	return retval;
}

static void zfcp_fsf_close_wka_port_handler(struct zfcp_fsf_req *req)
{
	struct zfcp_wka_port *wka_port = req->data;

	if (req->qtcb->header.fsf_status == FSF_PORT_HANDLE_NOT_VALID) {
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1668
		zfcp_erp_adapter_reopen(wka_port->adapter, 0, "fscwph1", req);
1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686
	}

	wka_port->status = ZFCP_WKA_PORT_OFFLINE;
	wake_up(&wka_port->completion_wq);
}

/**
 * zfcp_fsf_close_wka_port - create and send close wka port request
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success, error otherwise
 */
int zfcp_fsf_close_wka_port(struct zfcp_wka_port *wka_port)
{
	struct qdio_buffer_element *sbale;
	struct zfcp_adapter *adapter = wka_port->adapter;
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1687
	spin_lock_bh(&adapter->req_q_lock);
1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711
	if (zfcp_fsf_req_sbal_get(adapter))
		goto out;

	req = zfcp_fsf_req_create(adapter, FSF_QTCB_CLOSE_PORT,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
	if (unlikely(IS_ERR(req))) {
		retval = PTR_ERR(req);
		goto out;
	}

	sbale = zfcp_qdio_sbale_req(req);
	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:
1712
	spin_unlock_bh(&adapter->req_q_lock);
1713 1714 1715
	return retval;
}

S
Swen Schillig 已提交
1716
static void zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1717
{
S
Swen Schillig 已提交
1718 1719
	struct zfcp_port *port = req->data;
	struct fsf_qtcb_header *header = &req->qtcb->header;
L
Linus Torvalds 已提交
1720 1721
	struct zfcp_unit *unit;

S
Swen Schillig 已提交
1722
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1723
		return;
L
Linus Torvalds 已提交
1724 1725 1726

	switch (header->fsf_status) {
	case FSF_PORT_HANDLE_NOT_VALID:
1727
		zfcp_erp_adapter_reopen(port->adapter, 0, "fscpph1", req);
S
Swen Schillig 已提交
1728
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1729 1730
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1731
		zfcp_fsf_access_denied_port(req, port);
L
Linus Torvalds 已提交
1732 1733
		break;
	case FSF_PORT_BOXED:
1734
		zfcp_erp_port_boxed(port, "fscpph2", req);
S
Swen Schillig 已提交
1735 1736
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
1737 1738 1739 1740 1741 1742
		/* 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);
		list_for_each_entry(unit, &port->unit_list_head, list)
			atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
					  &unit->status);
L
Linus Torvalds 已提交
1743 1744 1745 1746
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]) {
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
S
Swen Schillig 已提交
1747
			/* fall through */
L
Linus Torvalds 已提交
1748
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
1749
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1750 1751 1752 1753 1754 1755 1756 1757 1758
			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);
		list_for_each_entry(unit, &port->unit_list_head, list)
S
Swen Schillig 已提交
1759 1760
			atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
					  &unit->status);
L
Linus Torvalds 已提交
1761 1762 1763 1764
		break;
	}
}

S
Swen Schillig 已提交
1765 1766 1767 1768
/**
 * zfcp_fsf_close_physical_port - close physical port
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success
L
Linus Torvalds 已提交
1769
 */
S
Swen Schillig 已提交
1770
int zfcp_fsf_close_physical_port(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1771
{
1772
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1773 1774 1775 1776
	struct zfcp_adapter *adapter = erp_action->adapter;
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1777
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1778
	if (zfcp_fsf_req_sbal_get(adapter))
L
Linus Torvalds 已提交
1779 1780
		goto out;

S
Swen Schillig 已提交
1781 1782 1783
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_CLOSE_PHYSICAL_PORT,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
1784
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1785 1786 1787
		retval = PTR_ERR(req);
		goto out;
	}
L
Linus Torvalds 已提交
1788

S
Swen Schillig 已提交
1789 1790 1791
	sbale = zfcp_qdio_sbale_req(req);
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
1792

S
Swen Schillig 已提交
1793 1794 1795 1796 1797 1798
	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;

1799
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1800
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1801
	if (retval) {
S
Swen Schillig 已提交
1802
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1803 1804
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1805
out:
1806
	spin_unlock_bh(&adapter->req_q_lock);
L
Linus Torvalds 已提交
1807 1808 1809
	return retval;
}

S
Swen Schillig 已提交
1810
static void zfcp_fsf_open_unit_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1811
{
S
Swen Schillig 已提交
1812 1813 1814 1815 1816 1817
	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;
1818
	int exclusive, readwrite;
L
Linus Torvalds 已提交
1819

S
Swen Schillig 已提交
1820
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1821
		return;
L
Linus Torvalds 已提交
1822 1823

	atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
1824
			  ZFCP_STATUS_COMMON_ACCESS_BOXED |
L
Linus Torvalds 已提交
1825 1826 1827 1828 1829 1830 1831
			  ZFCP_STATUS_UNIT_SHARED |
			  ZFCP_STATUS_UNIT_READONLY,
			  &unit->status);

	switch (header->fsf_status) {

	case FSF_PORT_HANDLE_NOT_VALID:
1832
		zfcp_erp_adapter_reopen(unit->port->adapter, 0, "fsouh_1", req);
S
Swen Schillig 已提交
1833
		/* fall through */
L
Linus Torvalds 已提交
1834 1835 1836
	case FSF_LUN_ALREADY_OPEN:
		break;
	case FSF_ACCESS_DENIED:
S
Swen Schillig 已提交
1837
		zfcp_fsf_access_denied_unit(req, unit);
L
Linus Torvalds 已提交
1838
		atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
C
Christof Schmitt 已提交
1839
		atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
L
Linus Torvalds 已提交
1840 1841
		break;
	case FSF_PORT_BOXED:
1842
		zfcp_erp_port_boxed(unit->port, "fsouh_2", req);
S
Swen Schillig 已提交
1843 1844
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
1845 1846
		break;
	case FSF_LUN_SHARING_VIOLATION:
S
Swen Schillig 已提交
1847
		if (header->fsf_status_qual.word[0])
C
Christof Schmitt 已提交
1848
			dev_warn(&adapter->ccw_device->dev,
1849 1850
				 "LUN 0x%Lx on port 0x%Lx is already in "
				 "use by CSS%d, MIF Image ID %x\n",
1851 1852
				 (unsigned long long)unit->fcp_lun,
				 (unsigned long long)unit->port->wwpn,
1853 1854
				 queue_designator->cssid,
				 queue_designator->hla);
S
Swen Schillig 已提交
1855
		else
C
Christof Schmitt 已提交
1856 1857
			zfcp_act_eval_err(adapter,
					  header->fsf_status_qual.word[2]);
1858
		zfcp_erp_unit_access_denied(unit, "fsouh_3", req);
L
Linus Torvalds 已提交
1859 1860
		atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
		atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
S
Swen Schillig 已提交
1861
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1862 1863
		break;
	case FSF_MAXIMUM_NUMBER_OF_LUNS_EXCEEDED:
S
Swen Schillig 已提交
1864
		dev_warn(&adapter->ccw_device->dev,
1865 1866
			 "No handle is available for LUN "
			 "0x%016Lx on port 0x%016Lx\n",
1867 1868
			 (unsigned long long)unit->fcp_lun,
			 (unsigned long long)unit->port->wwpn);
1869
		zfcp_erp_unit_failed(unit, "fsouh_4", req);
S
Swen Schillig 已提交
1870 1871 1872
		/* fall through */
	case FSF_INVALID_COMMAND_OPTION:
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1873 1874 1875 1876
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
		switch (header->fsf_status_qual.word[0]) {
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1877
			zfcp_test_link(unit->port);
S
Swen Schillig 已提交
1878
			/* fall through */
L
Linus Torvalds 已提交
1879
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
1880
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1881 1882 1883 1884 1885 1886 1887
			break;
		}
		break;

	case FSF_GOOD:
		unit->handle = header->lun_handle;
		atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
1888 1889 1890

		if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE) &&
		    (adapter->adapter_features & FSF_FEATURE_LUN_SHARING) &&
1891
		    !zfcp_ccw_priv_sch(adapter)) {
1892 1893 1894 1895 1896
			exclusive = (bottom->lun_access_info &
					FSF_UNIT_ACCESS_EXCLUSIVE);
			readwrite = (bottom->lun_access_info &
					FSF_UNIT_ACCESS_OUTBOUND_TRANSFER);

L
Linus Torvalds 已提交
1897 1898 1899 1900 1901 1902 1903
			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 已提交
1904
				dev_info(&adapter->ccw_device->dev,
1905 1906
					 "SCSI device at LUN 0x%016Lx on port "
					 "0x%016Lx opened read-only\n",
1907 1908
					 (unsigned long long)unit->fcp_lun,
					 (unsigned long long)unit->port->wwpn);
L
Linus Torvalds 已提交
1909 1910 1911
        		}

        		if (exclusive && !readwrite) {
S
Swen Schillig 已提交
1912
				dev_err(&adapter->ccw_device->dev,
1913 1914 1915
					"Exclusive read-only access not "
					"supported (unit 0x%016Lx, "
					"port 0x%016Lx)\n",
1916 1917
					(unsigned long long)unit->fcp_lun,
					(unsigned long long)unit->port->wwpn);
1918
				zfcp_erp_unit_failed(unit, "fsouh_5", req);
S
Swen Schillig 已提交
1919
				req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1920
				zfcp_erp_unit_shutdown(unit, 0, "fsouh_6", req);
L
Linus Torvalds 已提交
1921
        		} else if (!exclusive && readwrite) {
S
Swen Schillig 已提交
1922
				dev_err(&adapter->ccw_device->dev,
1923 1924
					"Shared read-write access not "
					"supported (unit 0x%016Lx, port "
1925
					"0x%016Lx)\n",
1926 1927
					(unsigned long long)unit->fcp_lun,
					(unsigned long long)unit->port->wwpn);
1928
				zfcp_erp_unit_failed(unit, "fsouh_7", req);
S
Swen Schillig 已提交
1929
				req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1930
				zfcp_erp_unit_shutdown(unit, 0, "fsouh_8", req);
L
Linus Torvalds 已提交
1931 1932 1933 1934 1935 1936
        		}
		}
		break;
	}
}

S
Swen Schillig 已提交
1937 1938 1939 1940
/**
 * zfcp_fsf_open_unit - open unit
 * @erp_action: pointer to struct zfcp_erp_action
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
1941
 */
S
Swen Schillig 已提交
1942
int zfcp_fsf_open_unit(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
1943
{
1944
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
1945 1946 1947 1948
	struct zfcp_adapter *adapter = erp_action->adapter;
	struct zfcp_fsf_req *req;
	int retval = -EIO;

1949
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
1950
	if (zfcp_fsf_req_sbal_get(adapter))
L
Linus Torvalds 已提交
1951 1952
		goto out;

S
Swen Schillig 已提交
1953 1954 1955
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_OPEN_LUN,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
1956
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
1957 1958 1959 1960 1961
		retval = PTR_ERR(req);
		goto out;
	}

	sbale = zfcp_qdio_sbale_req(req);
L
Linus Torvalds 已提交
1962 1963 1964
        sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
        sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
1965 1966 1967 1968 1969 1970 1971 1972 1973 1974
	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;

1975
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
1976
	retval = zfcp_fsf_req_send(req);
L
Linus Torvalds 已提交
1977
	if (retval) {
S
Swen Schillig 已提交
1978
		zfcp_fsf_req_free(req);
L
Linus Torvalds 已提交
1979 1980
		erp_action->fsf_req = NULL;
	}
S
Swen Schillig 已提交
1981
out:
1982
	spin_unlock_bh(&adapter->req_q_lock);
L
Linus Torvalds 已提交
1983 1984 1985
	return retval;
}

S
Swen Schillig 已提交
1986
static void zfcp_fsf_close_unit_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
1987
{
S
Swen Schillig 已提交
1988
	struct zfcp_unit *unit = req->data;
L
Linus Torvalds 已提交
1989

S
Swen Schillig 已提交
1990
	if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1991
		return;
L
Linus Torvalds 已提交
1992

S
Swen Schillig 已提交
1993
	switch (req->qtcb->header.fsf_status) {
L
Linus Torvalds 已提交
1994
	case FSF_PORT_HANDLE_NOT_VALID:
1995
		zfcp_erp_adapter_reopen(unit->port->adapter, 0, "fscuh_1", req);
S
Swen Schillig 已提交
1996
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
1997 1998
		break;
	case FSF_LUN_HANDLE_NOT_VALID:
1999
		zfcp_erp_port_reopen(unit->port, 0, "fscuh_2", req);
S
Swen Schillig 已提交
2000
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2001 2002
		break;
	case FSF_PORT_BOXED:
2003
		zfcp_erp_port_boxed(unit->port, "fscuh_3", req);
S
Swen Schillig 已提交
2004 2005
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
L
Linus Torvalds 已提交
2006 2007
		break;
	case FSF_ADAPTER_STATUS_AVAILABLE:
S
Swen Schillig 已提交
2008
		switch (req->qtcb->header.fsf_status_qual.word[0]) {
L
Linus Torvalds 已提交
2009
		case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
2010
			zfcp_test_link(unit->port);
S
Swen Schillig 已提交
2011
			/* fall through */
L
Linus Torvalds 已提交
2012
		case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
S
Swen Schillig 已提交
2013
			req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2014 2015 2016 2017 2018 2019 2020 2021 2022 2023
			break;
		}
		break;
	case FSF_GOOD:
		atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
		break;
	}
}

/**
S
Swen Schillig 已提交
2024 2025 2026
 * zfcp_fsf_close_unit - close zfcp unit
 * @erp_action: pointer to struct zfcp_unit
 * Returns: 0 on success, error otherwise
L
Linus Torvalds 已提交
2027
 */
S
Swen Schillig 已提交
2028
int zfcp_fsf_close_unit(struct zfcp_erp_action *erp_action)
L
Linus Torvalds 已提交
2029
{
2030
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
2031 2032 2033
	struct zfcp_adapter *adapter = erp_action->adapter;
	struct zfcp_fsf_req *req;
	int retval = -EIO;
L
Linus Torvalds 已提交
2034

2035
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
2036
	if (zfcp_fsf_req_sbal_get(adapter))
L
Linus Torvalds 已提交
2037
		goto out;
S
Swen Schillig 已提交
2038 2039 2040
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_CLOSE_LUN,
				  ZFCP_REQ_AUTO_CLEANUP,
				  adapter->pool.fsf_req_erp);
2041
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2042 2043 2044
		retval = PTR_ERR(req);
		goto out;
	}
L
Linus Torvalds 已提交
2045

S
Swen Schillig 已提交
2046 2047
	sbale = zfcp_qdio_sbale_req(req);
	sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
L
Linus Torvalds 已提交
2048 2049
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;

S
Swen Schillig 已提交
2050 2051 2052 2053 2054 2055
	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;
2056

2057
	zfcp_fsf_start_erp_timer(req);
S
Swen Schillig 已提交
2058 2059 2060 2061 2062 2063
	retval = zfcp_fsf_req_send(req);
	if (retval) {
		zfcp_fsf_req_free(req);
		erp_action->fsf_req = NULL;
	}
out:
2064
	spin_unlock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
2065
	return retval;
L
Linus Torvalds 已提交
2066 2067
}

2068 2069 2070
static void zfcp_fsf_update_lat(struct fsf_latency_record *lat_rec, u32 lat)
{
	lat_rec->sum += lat;
S
Swen Schillig 已提交
2071 2072
	lat_rec->min = min(lat_rec->min, lat);
	lat_rec->max = max(lat_rec->max, lat);
2073 2074
}

S
Swen Schillig 已提交
2075
static void zfcp_fsf_req_latency(struct zfcp_fsf_req *req)
2076 2077 2078
{
	struct fsf_qual_latency_info *lat_inf;
	struct latency_cont *lat;
S
Swen Schillig 已提交
2079
	struct zfcp_unit *unit = req->unit;
2080

S
Swen Schillig 已提交
2081
	lat_inf = &req->qtcb->prefix.prot_status_qual.latency_info;
2082

S
Swen Schillig 已提交
2083
	switch (req->qtcb->bottom.io.data_direction) {
2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096
	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;
	default:
		return;
	}

2097
	spin_lock(&unit->latencies.lock);
2098 2099 2100
	zfcp_fsf_update_lat(&lat->channel, lat_inf->channel_lat);
	zfcp_fsf_update_lat(&lat->fabric, lat_inf->fabric_lat);
	lat->counter++;
2101
	spin_unlock(&unit->latencies.lock);
L
Linus Torvalds 已提交
2102 2103
}

S
Stefan Raspl 已提交
2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133
#ifdef CONFIG_BLK_DEV_IO_TRACE
static void zfcp_fsf_trace_latency(struct zfcp_fsf_req *fsf_req)
{
	struct fsf_qual_latency_info *lat_inf;
	struct scsi_cmnd *scsi_cmnd = (struct scsi_cmnd *)fsf_req->data;
	struct request *req = scsi_cmnd->request;
	struct zfcp_blk_drv_data trace;
	int ticks = fsf_req->adapter->timer_ticks;

	trace.flags = 0;
	trace.magic = ZFCP_BLK_DRV_DATA_MAGIC;
	if (fsf_req->adapter->adapter_features & FSF_FEATURE_MEASUREMENT_DATA) {
		trace.flags |= ZFCP_BLK_LAT_VALID;
		lat_inf = &fsf_req->qtcb->prefix.prot_status_qual.latency_info;
		trace.channel_lat = lat_inf->channel_lat * ticks;
		trace.fabric_lat = lat_inf->fabric_lat * ticks;
	}
	if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
		trace.flags |= ZFCP_BLK_REQ_ERROR;
	trace.inb_usage = fsf_req->qdio_inb_usage;
	trace.outb_usage = fsf_req->qdio_outb_usage;

	blk_add_driver_data(req->q, req, &trace, sizeof(trace));
}
#else
static inline void zfcp_fsf_trace_latency(struct zfcp_fsf_req *fsf_req)
{
}
#endif

S
Swen Schillig 已提交
2134
static void zfcp_fsf_send_fcp_command_task_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
2135
{
2136
	struct scsi_cmnd *scpnt;
L
Linus Torvalds 已提交
2137
	struct fcp_rsp_iu *fcp_rsp_iu = (struct fcp_rsp_iu *)
S
Swen Schillig 已提交
2138
	    &(req->qtcb->bottom.io.fcp_rsp);
L
Linus Torvalds 已提交
2139
	u32 sns_len;
2140
	char *fcp_rsp_info = (unsigned char *) &fcp_rsp_iu[1];
L
Linus Torvalds 已提交
2141 2142
	unsigned long flags;

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

2145 2146 2147 2148 2149 2150
	scpnt = req->data;
	if (unlikely(!scpnt)) {
		read_unlock_irqrestore(&req->adapter->abort_lock, flags);
		return;
	}

S
Swen Schillig 已提交
2151
	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ABORTED)) {
2152
		set_host_byte(scpnt, DID_SOFT_ERROR);
L
Linus Torvalds 已提交
2153 2154 2155
		goto skip_fsfstatus;
	}

S
Swen Schillig 已提交
2156
	if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
2157
		set_host_byte(scpnt, DID_ERROR);
L
Linus Torvalds 已提交
2158 2159 2160
		goto skip_fsfstatus;
	}

2161
	set_msg_byte(scpnt, COMMAND_COMPLETE);
L
Linus Torvalds 已提交
2162 2163 2164

	scpnt->result |= fcp_rsp_iu->scsi_status;

S
Swen Schillig 已提交
2165 2166
	if (req->adapter->adapter_features & FSF_FEATURE_MEASUREMENT_DATA)
		zfcp_fsf_req_latency(req);
2167

S
Stefan Raspl 已提交
2168 2169
	zfcp_fsf_trace_latency(req);

L
Linus Torvalds 已提交
2170
	if (unlikely(fcp_rsp_iu->validity.bits.fcp_rsp_len_valid)) {
S
Swen Schillig 已提交
2171
		if (fcp_rsp_info[3] == RSP_CODE_GOOD)
2172
			set_host_byte(scpnt, DID_OK);
S
Swen Schillig 已提交
2173
		else {
2174
			set_host_byte(scpnt, DID_ERROR);
已提交
2175
			goto skip_fsfstatus;
L
Linus Torvalds 已提交
2176 2177 2178 2179
		}
	}

	if (unlikely(fcp_rsp_iu->validity.bits.fcp_sns_len_valid)) {
S
Swen Schillig 已提交
2180 2181
		sns_len = FSF_FCP_RSP_SIZE - sizeof(struct fcp_rsp_iu) +
			  fcp_rsp_iu->fcp_rsp_len;
L
Linus Torvalds 已提交
2182 2183 2184
		sns_len = min(sns_len, (u32) SCSI_SENSE_BUFFERSIZE);
		sns_len = min(sns_len, fcp_rsp_iu->fcp_sns_len);

2185
		memcpy(scpnt->sense_buffer,
L
Linus Torvalds 已提交
2186 2187 2188 2189
		       zfcp_get_fcp_sns_info_ptr(fcp_rsp_iu), sns_len);
	}

	if (unlikely(fcp_rsp_iu->validity.bits.fcp_resid_under)) {
2190 2191 2192
		scsi_set_resid(scpnt, fcp_rsp_iu->fcp_resid);
		if (scsi_bufflen(scpnt) - scsi_get_resid(scpnt) <
		    scpnt->underflow)
2193
			set_host_byte(scpnt, DID_ERROR);
L
Linus Torvalds 已提交
2194
	}
S
Swen Schillig 已提交
2195
skip_fsfstatus:
2196
	if (scpnt->result != 0)
S
Swen Schillig 已提交
2197
		zfcp_scsi_dbf_event_result("erro", 3, req->adapter, scpnt, req);
2198
	else if (scpnt->retries > 0)
S
Swen Schillig 已提交
2199
		zfcp_scsi_dbf_event_result("retr", 4, req->adapter, scpnt, req);
2200
	else
S
Swen Schillig 已提交
2201
		zfcp_scsi_dbf_event_result("norm", 6, req->adapter, scpnt, req);
L
Linus Torvalds 已提交
2202 2203 2204 2205 2206 2207 2208 2209 2210

	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 已提交
2211
	read_unlock_irqrestore(&req->adapter->abort_lock, flags);
L
Linus Torvalds 已提交
2212 2213
}

S
Swen Schillig 已提交
2214
static void zfcp_fsf_send_fcp_ctm_handler(struct zfcp_fsf_req *req)
L
Linus Torvalds 已提交
2215 2216
{
	struct fcp_rsp_iu *fcp_rsp_iu = (struct fcp_rsp_iu *)
S
Swen Schillig 已提交
2217
	    &(req->qtcb->bottom.io.fcp_rsp);
2218
	char *fcp_rsp_info = (unsigned char *) &fcp_rsp_iu[1];
L
Linus Torvalds 已提交
2219

S
Swen Schillig 已提交
2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236
	if ((fcp_rsp_info[3] != RSP_CODE_GOOD) ||
	     (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 已提交
2237 2238
		goto skip_fsfstatus;

S
Swen Schillig 已提交
2239 2240 2241
	switch (header->fsf_status) {
	case FSF_HANDLE_MISMATCH:
	case FSF_PORT_HANDLE_NOT_VALID:
2242
		zfcp_erp_adapter_reopen(unit->port->adapter, 0, "fssfch1", req);
S
Swen Schillig 已提交
2243 2244 2245 2246
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_FCPLUN_NOT_VALID:
	case FSF_LUN_HANDLE_NOT_VALID:
2247
		zfcp_erp_port_reopen(unit->port, 0, "fssfch2", req);
S
Swen Schillig 已提交
2248
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2249
		break;
S
Swen Schillig 已提交
2250 2251
	case FSF_SERVICE_CLASS_NOT_SUPPORTED:
		zfcp_fsf_class_not_supp(req);
L
Linus Torvalds 已提交
2252
		break;
S
Swen Schillig 已提交
2253 2254 2255 2256 2257
	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,
2258 2259
			"Incorrect direction %d, unit 0x%016Lx on port "
			"0x%016Lx closed\n",
S
Swen Schillig 已提交
2260
			req->qtcb->bottom.io.data_direction,
2261 2262
			(unsigned long long)unit->fcp_lun,
			(unsigned long long)unit->port->wwpn);
2263 2264
		zfcp_erp_adapter_shutdown(unit->port->adapter, 0, "fssfch3",
					  req);
S
Swen Schillig 已提交
2265 2266 2267 2268
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_CMND_LENGTH_NOT_VALID:
		dev_err(&req->adapter->ccw_device->dev,
2269 2270
			"Incorrect CDB length %d, unit 0x%016Lx on "
			"port 0x%016Lx closed\n",
S
Swen Schillig 已提交
2271
			req->qtcb->bottom.io.fcp_cmnd_length,
2272 2273
			(unsigned long long)unit->fcp_lun,
			(unsigned long long)unit->port->wwpn);
2274 2275
		zfcp_erp_adapter_shutdown(unit->port->adapter, 0, "fssfch4",
					  req);
S
Swen Schillig 已提交
2276 2277 2278
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
		break;
	case FSF_PORT_BOXED:
2279
		zfcp_erp_port_boxed(unit->port, "fssfch5", req);
S
Swen Schillig 已提交
2280 2281 2282 2283
		req->status |= ZFCP_STATUS_FSFREQ_ERROR |
			       ZFCP_STATUS_FSFREQ_RETRY;
		break;
	case FSF_LUN_BOXED:
2284
		zfcp_erp_unit_boxed(unit, "fssfch6", req);
S
Swen Schillig 已提交
2285 2286 2287 2288 2289 2290 2291 2292
		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)
			zfcp_test_link(unit->port);
		req->status |= ZFCP_STATUS_FSFREQ_ERROR;
L
Linus Torvalds 已提交
2293 2294
		break;
	}
S
Swen Schillig 已提交
2295 2296 2297 2298 2299 2300 2301 2302
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;
		zfcp_unit_put(unit);
	}
L
Linus Torvalds 已提交
2303 2304
}

2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318
static void zfcp_set_fcp_dl(struct fcp_cmnd_iu *fcp_cmd, u32 fcp_dl)
{
	u32 *fcp_dl_ptr;

	/*
	 * fcp_dl_addr = start address of fcp_cmnd structure +
	 * size of fixed part + size of dynamically sized add_dcp_cdb field
	 * SEE FCP-2 documentation
	 */
	fcp_dl_ptr = (u32 *) ((unsigned char *) &fcp_cmd[1] +
			(fcp_cmd->add_fcp_cdb_length << 2));
	*fcp_dl_ptr = fcp_dl;
}

S
Swen Schillig 已提交
2319 2320 2321 2322
/**
 * 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 已提交
2323
 */
2324 2325
int zfcp_fsf_send_fcp_command_task(struct zfcp_unit *unit,
				   struct scsi_cmnd *scsi_cmnd)
L
Linus Torvalds 已提交
2326
{
S
Swen Schillig 已提交
2327 2328
	struct zfcp_fsf_req *req;
	struct fcp_cmnd_iu *fcp_cmnd_iu;
2329
	unsigned int sbtype = SBAL_FLAGS0_TYPE_READ;
S
Swen Schillig 已提交
2330
	int real_bytes, retval = -EIO;
2331
	struct zfcp_adapter *adapter = unit->port->adapter;
L
Linus Torvalds 已提交
2332

S
Swen Schillig 已提交
2333 2334 2335
	if (unlikely(!(atomic_read(&unit->status) &
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		return -EBUSY;
L
Linus Torvalds 已提交
2336

2337
	spin_lock(&adapter->req_q_lock);
2338 2339
	if (atomic_read(&adapter->req_q.count) <= 0) {
		atomic_inc(&adapter->qdio_outb_full);
S
Swen Schillig 已提交
2340
		goto out;
2341
	}
2342 2343
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_FCP_CMND,
				  ZFCP_REQ_AUTO_CLEANUP,
S
Swen Schillig 已提交
2344
				  adapter->pool.fsf_req_scsi);
2345
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2346 2347 2348 2349 2350 2351 2352 2353 2354 2355 2356 2357 2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370
		retval = PTR_ERR(req);
		goto out;
	}

	zfcp_unit_get(unit);
	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;

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

	fcp_cmnd_iu = (struct fcp_cmnd_iu *) &(req->qtcb->bottom.io.fcp_cmnd);
	fcp_cmnd_iu->fcp_lun = unit->fcp_lun;
	/*
	 * set depending on data direction:
	 *      data direction bits in SBALE (SB Type)
	 *      data direction bits in QTCB
	 *      data direction bits in FCP_CMND IU
	 */
	switch (scsi_cmnd->sc_data_direction) {
	case DMA_NONE:
		req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
L
Linus Torvalds 已提交
2371
		break;
S
Swen Schillig 已提交
2372 2373 2374 2375 2376 2377 2378 2379
	case DMA_FROM_DEVICE:
		req->qtcb->bottom.io.data_direction = FSF_DATADIR_READ;
		fcp_cmnd_iu->rddata = 1;
		break;
	case DMA_TO_DEVICE:
		req->qtcb->bottom.io.data_direction = FSF_DATADIR_WRITE;
		sbtype = SBAL_FLAGS0_TYPE_WRITE;
		fcp_cmnd_iu->wddata = 1;
L
Linus Torvalds 已提交
2380
		break;
S
Swen Schillig 已提交
2381 2382
	case DMA_BIDIRECTIONAL:
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2383 2384
	}

S
Swen Schillig 已提交
2385 2386 2387 2388 2389 2390
	if (likely((scsi_cmnd->device->simple_tags) ||
		   ((atomic_read(&unit->status) & ZFCP_STATUS_UNIT_READONLY) &&
		    (atomic_read(&unit->status) & ZFCP_STATUS_UNIT_SHARED))))
		fcp_cmnd_iu->task_attribute = SIMPLE_Q;
	else
		fcp_cmnd_iu->task_attribute = UNTAGGED;
L
Linus Torvalds 已提交
2391

S
Swen Schillig 已提交
2392 2393 2394
	if (unlikely(scsi_cmnd->cmd_len > FCP_CDB_LENGTH))
		fcp_cmnd_iu->add_fcp_cdb_length =
			(scsi_cmnd->cmd_len - FCP_CDB_LENGTH) >> 2;
L
Linus Torvalds 已提交
2395

S
Swen Schillig 已提交
2396
	memcpy(fcp_cmnd_iu->fcp_cdb, scsi_cmnd->cmnd, scsi_cmnd->cmd_len);
2397

S
Swen Schillig 已提交
2398
	req->qtcb->bottom.io.fcp_cmnd_length = sizeof(struct fcp_cmnd_iu) +
2399
		fcp_cmnd_iu->add_fcp_cdb_length + sizeof(u32);
L
Linus Torvalds 已提交
2400

S
Swen Schillig 已提交
2401 2402 2403 2404
	real_bytes = zfcp_qdio_sbals_from_sg(req, sbtype,
					     scsi_sglist(scsi_cmnd),
					     FSF_MAX_SBALS_PER_REQ);
	if (unlikely(real_bytes < 0)) {
2405
		if (req->sbal_number >= FSF_MAX_SBALS_PER_REQ) {
S
Swen Schillig 已提交
2406
			dev_err(&adapter->ccw_device->dev,
2407 2408
				"Oversize data package, unit 0x%016Lx "
				"on port 0x%016Lx closed\n",
2409 2410
				(unsigned long long)unit->fcp_lun,
				(unsigned long long)unit->port->wwpn);
2411
			zfcp_erp_unit_shutdown(unit, 0, "fssfct1", req);
S
Swen Schillig 已提交
2412 2413 2414
			retval = -EINVAL;
		}
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2415 2416
	}

S
Swen Schillig 已提交
2417
	zfcp_set_fcp_dl(fcp_cmnd_iu, real_bytes);
L
Linus Torvalds 已提交
2418

S
Swen Schillig 已提交
2419 2420 2421
	retval = zfcp_fsf_req_send(req);
	if (unlikely(retval))
		goto failed_scsi_cmnd;
L
Linus Torvalds 已提交
2422

S
Swen Schillig 已提交
2423
	goto out;
L
Linus Torvalds 已提交
2424

S
Swen Schillig 已提交
2425 2426 2427 2428 2429
failed_scsi_cmnd:
	zfcp_unit_put(unit);
	zfcp_fsf_req_free(req);
	scsi_cmnd->host_scribble = NULL;
out:
2430
	spin_unlock(&adapter->req_q_lock);
S
Swen Schillig 已提交
2431
	return retval;
L
Linus Torvalds 已提交
2432 2433 2434
}

/**
S
Swen Schillig 已提交
2435 2436 2437 2438
 * 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 已提交
2439
 */
2440
struct zfcp_fsf_req *zfcp_fsf_send_fcp_ctm(struct zfcp_unit *unit, u8 tm_flags)
L
Linus Torvalds 已提交
2441
{
2442
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
2443 2444
	struct zfcp_fsf_req *req = NULL;
	struct fcp_cmnd_iu *fcp_cmnd_iu;
2445
	struct zfcp_adapter *adapter = unit->port->adapter;
L
Linus Torvalds 已提交
2446

S
Swen Schillig 已提交
2447 2448 2449
	if (unlikely(!(atomic_read(&unit->status) &
		       ZFCP_STATUS_COMMON_UNBLOCKED)))
		return NULL;
L
Linus Torvalds 已提交
2450

2451 2452
	spin_lock_bh(&adapter->req_q_lock);
	if (zfcp_fsf_req_sbal_get(adapter))
S
Swen Schillig 已提交
2453
		goto out;
2454
	req = zfcp_fsf_req_create(adapter, FSF_QTCB_FCP_CMND, 0,
S
Swen Schillig 已提交
2455
				  adapter->pool.fsf_req_scsi);
2456 2457
	if (IS_ERR(req)) {
		req = NULL;
S
Swen Schillig 已提交
2458
		goto out;
2459
	}
L
Linus Torvalds 已提交
2460

S
Swen Schillig 已提交
2461 2462 2463 2464 2465 2466 2467 2468
	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;
	req->qtcb->bottom.io.fcp_cmnd_length = 	sizeof(struct fcp_cmnd_iu) +
2469
						sizeof(u32);
S
Swen Schillig 已提交
2470 2471 2472 2473

	sbale = zfcp_qdio_sbale_req(req);
	sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE;
	sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
L
Linus Torvalds 已提交
2474

S
Swen Schillig 已提交
2475 2476 2477
	fcp_cmnd_iu = (struct fcp_cmnd_iu *) &req->qtcb->bottom.io.fcp_cmnd;
	fcp_cmnd_iu->fcp_lun = unit->fcp_lun;
	fcp_cmnd_iu->task_management_flags = tm_flags;
L
Linus Torvalds 已提交
2478

S
Swen Schillig 已提交
2479 2480 2481
	zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
	if (!zfcp_fsf_req_send(req))
		goto out;
L
Linus Torvalds 已提交
2482

S
Swen Schillig 已提交
2483 2484 2485
	zfcp_fsf_req_free(req);
	req = NULL;
out:
2486
	spin_unlock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
2487 2488
	return req;
}
L
Linus Torvalds 已提交
2489

S
Swen Schillig 已提交
2490 2491
static void zfcp_fsf_control_file_handler(struct zfcp_fsf_req *req)
{
L
Linus Torvalds 已提交
2492 2493
}

S
Swen Schillig 已提交
2494 2495 2496 2497 2498
/**
 * 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 已提交
2499
 */
S
Swen Schillig 已提交
2500 2501
struct zfcp_fsf_req *zfcp_fsf_control_file(struct zfcp_adapter *adapter,
					   struct zfcp_fsf_cfdc *fsf_cfdc)
L
Linus Torvalds 已提交
2502
{
2503
	struct qdio_buffer_element *sbale;
S
Swen Schillig 已提交
2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520
	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 已提交
2521

2522
	spin_lock_bh(&adapter->req_q_lock);
S
Swen Schillig 已提交
2523 2524
	if (zfcp_fsf_req_sbal_get(adapter))
		goto out;
L
Linus Torvalds 已提交
2525

S
Swen Schillig 已提交
2526
	req = zfcp_fsf_req_create(adapter, fsf_cfdc->command, 0, NULL);
2527
	if (IS_ERR(req)) {
S
Swen Schillig 已提交
2528 2529 2530
		retval = -EPERM;
		goto out;
	}
L
Linus Torvalds 已提交
2531

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

S
Swen Schillig 已提交
2534 2535
	sbale = zfcp_qdio_sbale_req(req);
	sbale[0].flags |= direction;
2536

S
Swen Schillig 已提交
2537 2538 2539
	bottom = &req->qtcb->bottom.support;
	bottom->operation_subtype = FSF_CFDC_OPERATION_SUBTYPE;
	bottom->option = fsf_cfdc->option;
2540

S
Swen Schillig 已提交
2541 2542 2543 2544 2545 2546 2547
	bytes = zfcp_qdio_sbals_from_sg(req, direction, fsf_cfdc->sg,
					FSF_MAX_SBALS_PER_REQ);
	if (bytes != ZFCP_CFDC_MAX_SIZE) {
		retval = -ENOMEM;
		zfcp_fsf_req_free(req);
		goto out;
	}
L
Linus Torvalds 已提交
2548

S
Swen Schillig 已提交
2549 2550 2551
	zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
	retval = zfcp_fsf_req_send(req);
out:
2552
	spin_unlock_bh(&adapter->req_q_lock);
2553

S
Swen Schillig 已提交
2554 2555 2556 2557
	if (!retval) {
		wait_event(req->completion_wq,
			   req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
		return req;
L
Linus Torvalds 已提交
2558
	}
S
Swen Schillig 已提交
2559
	return ERR_PTR(retval);
L
Linus Torvalds 已提交
2560
}