]> git.proxmox.com Git - mirror_ubuntu-zesty-kernel.git/blame - drivers/s390/scsi/zfcp_aux.c
[PATCH] s390: Remove CVS generated information
[mirror_ubuntu-zesty-kernel.git] / drivers / s390 / scsi / zfcp_aux.c
CommitLineData
1da177e4
LT
1/*
2 *
3 * linux/drivers/s390/scsi/zfcp_aux.c
4 *
5 * FCP adapter driver for IBM eServer zSeries
6 *
7 * (C) Copyright IBM Corp. 2002, 2004
8 *
9 * Author(s): Martin Peschke <mpeschke@de.ibm.com>
10 * Raimund Schroeder <raimund.schroeder@de.ibm.com>
11 * Aron Zeh
12 * Wolfgang Taphorn
13 * Stefan Bader <stefan.bader@de.ibm.com>
14 * Heiko Carstens <heiko.carstens@de.ibm.com>
15 * Andreas Herrmann <aherrman@de.ibm.com>
16 *
17 * This program is free software; you can redistribute it and/or modify
18 * it under the terms of the GNU General Public License as published by
19 * the Free Software Foundation; either version 2, or (at your option)
20 * any later version.
21 *
22 * This program is distributed in the hope that it will be useful,
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
25 * GNU General Public License for more details.
26 *
27 * You should have received a copy of the GNU General Public License
28 * along with this program; if not, write to the Free Software
29 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
30 */
31
1da177e4
LT
32#include "zfcp_ext.h"
33
34/* accumulated log level (module parameter) */
35static u32 loglevel = ZFCP_LOG_LEVEL_DEFAULTS;
36static char *device;
37/*********************** FUNCTION PROTOTYPES *********************************/
38
39/* written against the module interface */
40static int __init zfcp_module_init(void);
41
42/* FCP related */
43static void zfcp_ns_gid_pn_handler(unsigned long);
44
45/* miscellaneous */
46static inline int zfcp_sg_list_alloc(struct zfcp_sg_list *, size_t);
47static inline void zfcp_sg_list_free(struct zfcp_sg_list *);
48static inline int zfcp_sg_list_copy_from_user(struct zfcp_sg_list *,
49 void __user *, size_t);
50static inline int zfcp_sg_list_copy_to_user(void __user *,
51 struct zfcp_sg_list *, size_t);
52
bd6ae2f6 53static long zfcp_cfdc_dev_ioctl(struct file *, unsigned int, unsigned long);
1da177e4
LT
54
55#define ZFCP_CFDC_IOC_MAGIC 0xDD
56#define ZFCP_CFDC_IOC \
57 _IOWR(ZFCP_CFDC_IOC_MAGIC, 0, struct zfcp_cfdc_sense_data)
58
1da177e4
LT
59
60static struct file_operations zfcp_cfdc_fops = {
e183b06b
AH
61 .unlocked_ioctl = zfcp_cfdc_dev_ioctl,
62#ifdef CONFIG_COMPAT
63 .compat_ioctl = zfcp_cfdc_dev_ioctl
64#endif
1da177e4
LT
65};
66
67static struct miscdevice zfcp_cfdc_misc = {
68 .minor = ZFCP_CFDC_DEV_MINOR,
69 .name = ZFCP_CFDC_DEV_NAME,
70 .fops = &zfcp_cfdc_fops
71};
72
73/*********************** KERNEL/MODULE PARAMETERS ***************************/
74
75/* declare driver module init/cleanup functions */
76module_init(zfcp_module_init);
77
78MODULE_AUTHOR("Heiko Carstens <heiko.carstens@de.ibm.com>, "
79 "Andreas Herrman <aherrman@de.ibm.com>, "
80 "Martin Peschke <mpeschke@de.ibm.com>, "
81 "Raimund Schroeder <raimund.schroeder@de.ibm.com>, "
82 "Wolfgang Taphorn <taphorn@de.ibm.com>, "
83 "Aron Zeh <arzeh@de.ibm.com>, "
84 "IBM Deutschland Entwicklung GmbH");
85MODULE_DESCRIPTION
86 ("FCP (SCSI over Fibre Channel) HBA driver for IBM eServer zSeries");
87MODULE_LICENSE("GPL");
88
6f71d9bc 89module_param(device, charp, 0400);
1da177e4
LT
90MODULE_PARM_DESC(device, "specify initial device");
91
6f71d9bc 92module_param(loglevel, uint, 0400);
1da177e4
LT
93MODULE_PARM_DESC(loglevel,
94 "log levels, 8 nibbles: "
95 "FC ERP QDIO CIO Config FSF SCSI Other, "
96 "levels: 0=none 1=normal 2=devel 3=trace");
97
1da177e4
LT
98/****************************************************************/
99/************** Functions without logging ***********************/
100/****************************************************************/
101
102void
103_zfcp_hex_dump(char *addr, int count)
104{
105 int i;
106 for (i = 0; i < count; i++) {
107 printk("%02x", addr[i]);
108 if ((i % 4) == 3)
109 printk(" ");
110 if ((i % 32) == 31)
111 printk("\n");
112 }
113 if (((i-1) % 32) != 31)
114 printk("\n");
115}
116
117/****************************************************************/
118/************** Uncategorised Functions *************************/
119/****************************************************************/
120
121#define ZFCP_LOG_AREA ZFCP_LOG_AREA_OTHER
122
1da177e4
LT
123/**
124 * zfcp_device_setup - setup function
125 * @str: pointer to parameter string
126 *
127 * Parse "device=..." parameter string.
128 */
129static int __init
cd8a383e 130zfcp_device_setup(char *devstr)
1da177e4 131{
cd8a383e
AH
132 char *tmp, *str;
133 size_t len;
1da177e4 134
cd8a383e 135 if (!devstr)
1da177e4
LT
136 return 0;
137
cd8a383e
AH
138 len = strlen(devstr) + 1;
139 str = (char *) kmalloc(len, GFP_KERNEL);
140 if (!str)
141 goto err_out;
142 memcpy(str, devstr, len);
143
1da177e4
LT
144 tmp = strchr(str, ',');
145 if (!tmp)
146 goto err_out;
147 *tmp++ = '\0';
148 strncpy(zfcp_data.init_busid, str, BUS_ID_SIZE);
149 zfcp_data.init_busid[BUS_ID_SIZE-1] = '\0';
150
151 zfcp_data.init_wwpn = simple_strtoull(tmp, &tmp, 0);
152 if (*tmp++ != ',')
153 goto err_out;
154 if (*tmp == '\0')
155 goto err_out;
156
157 zfcp_data.init_fcp_lun = simple_strtoull(tmp, &tmp, 0);
158 if (*tmp != '\0')
159 goto err_out;
cd8a383e 160 kfree(str);
1da177e4
LT
161 return 1;
162
163 err_out:
164 ZFCP_LOG_NORMAL("Parse error for device parameter string %s\n", str);
cd8a383e 165 kfree(str);
1da177e4
LT
166 return 0;
167}
168
169static void __init
170zfcp_init_device_configure(void)
171{
172 struct zfcp_adapter *adapter;
173 struct zfcp_port *port;
174 struct zfcp_unit *unit;
175
176 down(&zfcp_data.config_sema);
177 read_lock_irq(&zfcp_data.config_lock);
178 adapter = zfcp_get_adapter_by_busid(zfcp_data.init_busid);
179 if (adapter)
180 zfcp_adapter_get(adapter);
181 read_unlock_irq(&zfcp_data.config_lock);
182
183 if (adapter == NULL)
184 goto out_adapter;
185 port = zfcp_port_enqueue(adapter, zfcp_data.init_wwpn, 0, 0);
186 if (!port)
187 goto out_port;
188 unit = zfcp_unit_enqueue(port, zfcp_data.init_fcp_lun);
189 if (!unit)
190 goto out_unit;
191 up(&zfcp_data.config_sema);
192 ccw_device_set_online(adapter->ccw_device);
193 zfcp_erp_wait(adapter);
194 down(&zfcp_data.config_sema);
195 zfcp_unit_put(unit);
196 out_unit:
197 zfcp_port_put(port);
198 out_port:
199 zfcp_adapter_put(adapter);
200 out_adapter:
201 up(&zfcp_data.config_sema);
202 return;
203}
204
205static int __init
206zfcp_module_init(void)
207{
208
209 int retval = 0;
210
211 atomic_set(&zfcp_data.loglevel, loglevel);
212
213 /* initialize adapter list */
214 INIT_LIST_HEAD(&zfcp_data.adapter_list_head);
215
216 /* initialize adapters to be removed list head */
217 INIT_LIST_HEAD(&zfcp_data.adapter_remove_lh);
218
219 zfcp_transport_template = fc_attach_transport(&zfcp_transport_functions);
220 if (!zfcp_transport_template)
221 return -ENODEV;
222
1da177e4
LT
223 retval = misc_register(&zfcp_cfdc_misc);
224 if (retval != 0) {
225 ZFCP_LOG_INFO("registration of misc device "
226 "zfcp_cfdc failed\n");
e183b06b 227 goto out;
1da177e4
LT
228 }
229
e183b06b
AH
230 ZFCP_LOG_TRACE("major/minor for zfcp_cfdc: %d/%d\n",
231 ZFCP_CFDC_DEV_MAJOR, zfcp_cfdc_misc.minor);
232
1da177e4
LT
233 /* Initialise proc semaphores */
234 sema_init(&zfcp_data.config_sema, 1);
235
236 /* initialise configuration rw lock */
237 rwlock_init(&zfcp_data.config_lock);
238
239 /* save address of data structure managing the driver module */
240 zfcp_data.scsi_host_template.module = THIS_MODULE;
241
242 /* setup dynamic I/O */
243 retval = zfcp_ccw_register();
244 if (retval) {
245 ZFCP_LOG_NORMAL("registration with common I/O layer failed\n");
246 goto out_ccw_register;
247 }
248
249 if (zfcp_device_setup(device))
250 zfcp_init_device_configure();
251
252 goto out;
253
254 out_ccw_register:
255 misc_deregister(&zfcp_cfdc_misc);
1da177e4
LT
256 out:
257 return retval;
258}
259
260/*
261 * function: zfcp_cfdc_dev_ioctl
262 *
263 * purpose: Handle control file upload/download transaction via IOCTL
264 * interface
265 *
266 * returns: 0 - Operation completed successfuly
267 * -ENOTTY - Unknown IOCTL command
268 * -EINVAL - Invalid sense data record
269 * -ENXIO - The FCP adapter is not available
270 * -EOPNOTSUPP - The FCP adapter does not have CFDC support
271 * -ENOMEM - Insufficient memory
272 * -EFAULT - User space memory I/O operation fault
273 * -EPERM - Cannot create or queue FSF request or create SBALs
274 * -ERESTARTSYS- Received signal (is mapped to EAGAIN by VFS)
275 */
e183b06b
AH
276static long
277zfcp_cfdc_dev_ioctl(struct file *file, unsigned int command,
278 unsigned long buffer)
1da177e4
LT
279{
280 struct zfcp_cfdc_sense_data *sense_data, __user *sense_data_user;
281 struct zfcp_adapter *adapter = NULL;
282 struct zfcp_fsf_req *fsf_req = NULL;
283 struct zfcp_sg_list *sg_list = NULL;
284 u32 fsf_command, option;
285 char *bus_id = NULL;
286 int retval = 0;
287
288 sense_data = kmalloc(sizeof(struct zfcp_cfdc_sense_data), GFP_KERNEL);
289 if (sense_data == NULL) {
290 retval = -ENOMEM;
291 goto out;
292 }
293
294 sg_list = kmalloc(sizeof(struct zfcp_sg_list), GFP_KERNEL);
295 if (sg_list == NULL) {
296 retval = -ENOMEM;
297 goto out;
298 }
299 memset(sg_list, 0, sizeof(*sg_list));
300
301 if (command != ZFCP_CFDC_IOC) {
302 ZFCP_LOG_INFO("IOC request code 0x%x invalid\n", command);
303 retval = -ENOTTY;
304 goto out;
305 }
306
307 if ((sense_data_user = (void __user *) buffer) == NULL) {
308 ZFCP_LOG_INFO("sense data record is required\n");
309 retval = -EINVAL;
310 goto out;
311 }
312
313 retval = copy_from_user(sense_data, sense_data_user,
314 sizeof(struct zfcp_cfdc_sense_data));
315 if (retval) {
316 retval = -EFAULT;
317 goto out;
318 }
319
320 if (sense_data->signature != ZFCP_CFDC_SIGNATURE) {
321 ZFCP_LOG_INFO("invalid sense data request signature 0x%08x\n",
322 ZFCP_CFDC_SIGNATURE);
323 retval = -EINVAL;
324 goto out;
325 }
326
327 switch (sense_data->command) {
328
329 case ZFCP_CFDC_CMND_DOWNLOAD_NORMAL:
330 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
331 option = FSF_CFDC_OPTION_NORMAL_MODE;
332 break;
333
334 case ZFCP_CFDC_CMND_DOWNLOAD_FORCE:
335 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
336 option = FSF_CFDC_OPTION_FORCE;
337 break;
338
339 case ZFCP_CFDC_CMND_FULL_ACCESS:
340 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
341 option = FSF_CFDC_OPTION_FULL_ACCESS;
342 break;
343
344 case ZFCP_CFDC_CMND_RESTRICTED_ACCESS:
345 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
346 option = FSF_CFDC_OPTION_RESTRICTED_ACCESS;
347 break;
348
349 case ZFCP_CFDC_CMND_UPLOAD:
350 fsf_command = FSF_QTCB_UPLOAD_CONTROL_FILE;
351 option = 0;
352 break;
353
354 default:
355 ZFCP_LOG_INFO("invalid command code 0x%08x\n",
356 sense_data->command);
357 retval = -EINVAL;
358 goto out;
359 }
360
361 bus_id = kmalloc(BUS_ID_SIZE, GFP_KERNEL);
362 if (bus_id == NULL) {
363 retval = -ENOMEM;
364 goto out;
365 }
366 snprintf(bus_id, BUS_ID_SIZE, "%d.%d.%04x",
367 (sense_data->devno >> 24),
368 (sense_data->devno >> 16) & 0xFF,
369 (sense_data->devno & 0xFFFF));
370
371 read_lock_irq(&zfcp_data.config_lock);
372 adapter = zfcp_get_adapter_by_busid(bus_id);
373 if (adapter)
374 zfcp_adapter_get(adapter);
375 read_unlock_irq(&zfcp_data.config_lock);
376
377 kfree(bus_id);
378
379 if (adapter == NULL) {
380 ZFCP_LOG_INFO("invalid adapter\n");
381 retval = -ENXIO;
382 goto out;
383 }
384
385 if (sense_data->command & ZFCP_CFDC_WITH_CONTROL_FILE) {
386 retval = zfcp_sg_list_alloc(sg_list,
387 ZFCP_CFDC_MAX_CONTROL_FILE_SIZE);
388 if (retval) {
389 retval = -ENOMEM;
390 goto out;
391 }
392 }
393
394 if ((sense_data->command & ZFCP_CFDC_DOWNLOAD) &&
395 (sense_data->command & ZFCP_CFDC_WITH_CONTROL_FILE)) {
396 retval = zfcp_sg_list_copy_from_user(
397 sg_list, &sense_data_user->control_file,
398 ZFCP_CFDC_MAX_CONTROL_FILE_SIZE);
399 if (retval) {
400 retval = -EFAULT;
401 goto out;
402 }
403 }
404
405 retval = zfcp_fsf_control_file(adapter, &fsf_req, fsf_command,
406 option, sg_list);
407 if (retval)
408 goto out;
409
410 if ((fsf_req->qtcb->prefix.prot_status != FSF_PROT_GOOD) &&
411 (fsf_req->qtcb->prefix.prot_status != FSF_PROT_FSF_STATUS_PRESENTED)) {
412 retval = -ENXIO;
413 goto out;
414 }
415
416 sense_data->fsf_status = fsf_req->qtcb->header.fsf_status;
417 memcpy(&sense_data->fsf_status_qual,
418 &fsf_req->qtcb->header.fsf_status_qual,
419 sizeof(union fsf_status_qual));
420 memcpy(&sense_data->payloads, &fsf_req->qtcb->bottom.support.els, 256);
421
422 retval = copy_to_user(sense_data_user, sense_data,
423 sizeof(struct zfcp_cfdc_sense_data));
424 if (retval) {
425 retval = -EFAULT;
426 goto out;
427 }
428
429 if (sense_data->command & ZFCP_CFDC_UPLOAD) {
430 retval = zfcp_sg_list_copy_to_user(
431 &sense_data_user->control_file, sg_list,
432 ZFCP_CFDC_MAX_CONTROL_FILE_SIZE);
433 if (retval) {
434 retval = -EFAULT;
435 goto out;
436 }
437 }
438
439 out:
440 if (fsf_req != NULL)
1db2c9c0 441 zfcp_fsf_req_free(fsf_req);
1da177e4
LT
442
443 if ((adapter != NULL) && (retval != -ENXIO))
444 zfcp_adapter_put(adapter);
445
446 if (sg_list != NULL) {
447 zfcp_sg_list_free(sg_list);
448 kfree(sg_list);
449 }
450
17fd682e 451 kfree(sense_data);
1da177e4
LT
452
453 return retval;
454}
455
456
457/**
458 * zfcp_sg_list_alloc - create a scatter-gather list of the specified size
459 * @sg_list: structure describing a scatter gather list
460 * @size: size of scatter-gather list
461 * Return: 0 on success, else -ENOMEM
462 *
463 * In sg_list->sg a pointer to the created scatter-gather list is returned,
464 * or NULL if we run out of memory. sg_list->count specifies the number of
465 * elements of the scatter-gather list. The maximum size of a single element
466 * in the scatter-gather list is PAGE_SIZE.
467 */
468static inline int
469zfcp_sg_list_alloc(struct zfcp_sg_list *sg_list, size_t size)
470{
471 struct scatterlist *sg;
472 unsigned int i;
473 int retval = 0;
474 void *address;
475
476 BUG_ON(sg_list == NULL);
477
478 sg_list->count = size >> PAGE_SHIFT;
479 if (size & ~PAGE_MASK)
480 sg_list->count++;
481 sg_list->sg = kmalloc(sg_list->count * sizeof(struct scatterlist),
482 GFP_KERNEL);
483 if (sg_list->sg == NULL) {
484 sg_list->count = 0;
485 retval = -ENOMEM;
486 goto out;
487 }
488 memset(sg_list->sg, 0, sg_list->count * sizeof(struct scatterlist));
489
490 for (i = 0, sg = sg_list->sg; i < sg_list->count; i++, sg++) {
491 sg->length = min(size, PAGE_SIZE);
492 sg->offset = 0;
493 address = (void *) get_zeroed_page(GFP_KERNEL);
494 if (address == NULL) {
495 sg_list->count = i;
496 zfcp_sg_list_free(sg_list);
497 retval = -ENOMEM;
498 goto out;
499 }
500 zfcp_address_to_sg(address, sg);
501 size -= sg->length;
502 }
503
504 out:
505 return retval;
506}
507
508
509/**
510 * zfcp_sg_list_free - free memory of a scatter-gather list
511 * @sg_list: structure describing a scatter-gather list
512 *
513 * Memory for each element in the scatter-gather list is freed.
514 * Finally sg_list->sg is freed itself and sg_list->count is reset.
515 */
516static inline void
517zfcp_sg_list_free(struct zfcp_sg_list *sg_list)
518{
519 struct scatterlist *sg;
520 unsigned int i;
521
522 BUG_ON(sg_list == NULL);
523
524 for (i = 0, sg = sg_list->sg; i < sg_list->count; i++, sg++)
525 free_page((unsigned long) zfcp_sg_to_address(sg));
526
527 sg_list->count = 0;
528 kfree(sg_list->sg);
529}
530
531/**
532 * zfcp_sg_size - determine size of a scatter-gather list
533 * @sg: array of (struct scatterlist)
534 * @sg_count: elements in array
535 * Return: size of entire scatter-gather list
536 */
537size_t
538zfcp_sg_size(struct scatterlist *sg, unsigned int sg_count)
539{
540 unsigned int i;
541 struct scatterlist *p;
542 size_t size;
543
544 size = 0;
545 for (i = 0, p = sg; i < sg_count; i++, p++) {
546 BUG_ON(p == NULL);
547 size += p->length;
548 }
549
550 return size;
551}
552
553
554/**
555 * zfcp_sg_list_copy_from_user -copy data from user space to scatter-gather list
556 * @sg_list: structure describing a scatter-gather list
557 * @user_buffer: pointer to buffer in user space
558 * @size: number of bytes to be copied
559 * Return: 0 on success, -EFAULT if copy_from_user fails.
560 */
561static inline int
562zfcp_sg_list_copy_from_user(struct zfcp_sg_list *sg_list,
563 void __user *user_buffer,
564 size_t size)
565{
566 struct scatterlist *sg;
567 unsigned int length;
568 void *zfcp_buffer;
569 int retval = 0;
570
571 BUG_ON(sg_list == NULL);
572
573 if (zfcp_sg_size(sg_list->sg, sg_list->count) < size)
574 return -EFAULT;
575
576 for (sg = sg_list->sg; size > 0; sg++) {
577 length = min((unsigned int)size, sg->length);
578 zfcp_buffer = zfcp_sg_to_address(sg);
579 if (copy_from_user(zfcp_buffer, user_buffer, length)) {
580 retval = -EFAULT;
581 goto out;
582 }
583 user_buffer += length;
584 size -= length;
585 }
586
587 out:
588 return retval;
589}
590
591
592/**
593 * zfcp_sg_list_copy_to_user - copy data from scatter-gather list to user space
594 * @user_buffer: pointer to buffer in user space
595 * @sg_list: structure describing a scatter-gather list
596 * @size: number of bytes to be copied
597 * Return: 0 on success, -EFAULT if copy_to_user fails
598 */
599static inline int
600zfcp_sg_list_copy_to_user(void __user *user_buffer,
601 struct zfcp_sg_list *sg_list,
602 size_t size)
603{
604 struct scatterlist *sg;
605 unsigned int length;
606 void *zfcp_buffer;
607 int retval = 0;
608
609 BUG_ON(sg_list == NULL);
610
611 if (zfcp_sg_size(sg_list->sg, sg_list->count) < size)
612 return -EFAULT;
613
614 for (sg = sg_list->sg; size > 0; sg++) {
615 length = min((unsigned int) size, sg->length);
616 zfcp_buffer = zfcp_sg_to_address(sg);
617 if (copy_to_user(user_buffer, zfcp_buffer, length)) {
618 retval = -EFAULT;
619 goto out;
620 }
621 user_buffer += length;
622 size -= length;
623 }
624
625 out:
626 return retval;
627}
628
629
630#undef ZFCP_LOG_AREA
631
632/****************************************************************/
633/****** Functions for configuration/set-up of structures ********/
634/****************************************************************/
635
636#define ZFCP_LOG_AREA ZFCP_LOG_AREA_CONFIG
637
638/**
639 * zfcp_get_unit_by_lun - find unit in unit list of port by FCP LUN
640 * @port: pointer to port to search for unit
641 * @fcp_lun: FCP LUN to search for
642 * Traverse list of all units of a port and return pointer to a unit
643 * with the given FCP LUN.
644 */
645struct zfcp_unit *
646zfcp_get_unit_by_lun(struct zfcp_port *port, fcp_lun_t fcp_lun)
647{
648 struct zfcp_unit *unit;
649 int found = 0;
650
651 list_for_each_entry(unit, &port->unit_list_head, list) {
652 if ((unit->fcp_lun == fcp_lun) &&
653 !atomic_test_mask(ZFCP_STATUS_COMMON_REMOVE, &unit->status))
654 {
655 found = 1;
656 break;
657 }
658 }
659 return found ? unit : NULL;
660}
661
662/**
663 * zfcp_get_port_by_wwpn - find port in port list of adapter by wwpn
664 * @adapter: pointer to adapter to search for port
665 * @wwpn: wwpn to search for
666 * Traverse list of all ports of an adapter and return pointer to a port
667 * with the given wwpn.
668 */
669struct zfcp_port *
670zfcp_get_port_by_wwpn(struct zfcp_adapter *adapter, wwn_t wwpn)
671{
672 struct zfcp_port *port;
673 int found = 0;
674
675 list_for_each_entry(port, &adapter->port_list_head, list) {
676 if ((port->wwpn == wwpn) &&
677 !(atomic_read(&port->status) &
678 (ZFCP_STATUS_PORT_NO_WWPN | ZFCP_STATUS_COMMON_REMOVE))) {
679 found = 1;
680 break;
681 }
682 }
683 return found ? port : NULL;
684}
685
686/**
687 * zfcp_get_port_by_did - find port in port list of adapter by d_id
688 * @adapter: pointer to adapter to search for port
689 * @d_id: d_id to search for
690 * Traverse list of all ports of an adapter and return pointer to a port
691 * with the given d_id.
692 */
693struct zfcp_port *
694zfcp_get_port_by_did(struct zfcp_adapter *adapter, u32 d_id)
695{
696 struct zfcp_port *port;
697 int found = 0;
698
699 list_for_each_entry(port, &adapter->port_list_head, list) {
700 if ((port->d_id == d_id) &&
701 !atomic_test_mask(ZFCP_STATUS_COMMON_REMOVE, &port->status))
702 {
703 found = 1;
704 break;
705 }
706 }
707 return found ? port : NULL;
708}
709
710/**
711 * zfcp_get_adapter_by_busid - find adpater in adapter list by bus_id
712 * @bus_id: bus_id to search for
713 * Traverse list of all adapters and return pointer to an adapter
714 * with the given bus_id.
715 */
716struct zfcp_adapter *
717zfcp_get_adapter_by_busid(char *bus_id)
718{
719 struct zfcp_adapter *adapter;
720 int found = 0;
721
722 list_for_each_entry(adapter, &zfcp_data.adapter_list_head, list) {
723 if ((strncmp(bus_id, zfcp_get_busid_by_adapter(adapter),
724 BUS_ID_SIZE) == 0) &&
725 !atomic_test_mask(ZFCP_STATUS_COMMON_REMOVE,
726 &adapter->status)){
727 found = 1;
728 break;
729 }
730 }
731 return found ? adapter : NULL;
732}
733
734/**
735 * zfcp_unit_enqueue - enqueue unit to unit list of a port.
736 * @port: pointer to port where unit is added
737 * @fcp_lun: FCP LUN of unit to be enqueued
738 * Return: pointer to enqueued unit on success, NULL on error
739 * Locks: config_sema must be held to serialize changes to the unit list
740 *
741 * Sets up some unit internal structures and creates sysfs entry.
742 */
743struct zfcp_unit *
744zfcp_unit_enqueue(struct zfcp_port *port, fcp_lun_t fcp_lun)
745{
746 struct zfcp_unit *unit, *tmp_unit;
747 scsi_lun_t scsi_lun;
748 int found;
749
750 /*
751 * check that there is no unit with this FCP_LUN already in list
752 * and enqueue it.
753 * Note: Unlike for the adapter and the port, this is an error
754 */
755 read_lock_irq(&zfcp_data.config_lock);
756 unit = zfcp_get_unit_by_lun(port, fcp_lun);
757 read_unlock_irq(&zfcp_data.config_lock);
758 if (unit)
759 return NULL;
760
761 unit = kmalloc(sizeof (struct zfcp_unit), GFP_KERNEL);
762 if (!unit)
763 return NULL;
764 memset(unit, 0, sizeof (struct zfcp_unit));
765
766 /* initialise reference count stuff */
767 atomic_set(&unit->refcount, 0);
768 init_waitqueue_head(&unit->remove_wq);
769
770 unit->port = port;
771 unit->fcp_lun = fcp_lun;
772
773 /* setup for sysfs registration */
774 snprintf(unit->sysfs_device.bus_id, BUS_ID_SIZE, "0x%016llx", fcp_lun);
775 unit->sysfs_device.parent = &port->sysfs_device;
776 unit->sysfs_device.release = zfcp_sysfs_unit_release;
777 dev_set_drvdata(&unit->sysfs_device, unit);
778
779 /* mark unit unusable as long as sysfs registration is not complete */
780 atomic_set_mask(ZFCP_STATUS_COMMON_REMOVE, &unit->status);
781
782 if (device_register(&unit->sysfs_device)) {
783 kfree(unit);
784 return NULL;
785 }
786
787 if (zfcp_sysfs_unit_create_files(&unit->sysfs_device)) {
788 device_unregister(&unit->sysfs_device);
789 return NULL;
790 }
791
792 zfcp_unit_get(unit);
793
794 scsi_lun = 0;
795 found = 0;
796 write_lock_irq(&zfcp_data.config_lock);
797 list_for_each_entry(tmp_unit, &port->unit_list_head, list) {
798 if (tmp_unit->scsi_lun != scsi_lun) {
799 found = 1;
800 break;
801 }
802 scsi_lun++;
803 }
804 unit->scsi_lun = scsi_lun;
805 if (found)
806 list_add_tail(&unit->list, &tmp_unit->list);
807 else
808 list_add_tail(&unit->list, &port->unit_list_head);
809 atomic_clear_mask(ZFCP_STATUS_COMMON_REMOVE, &unit->status);
810 atomic_set_mask(ZFCP_STATUS_COMMON_RUNNING, &unit->status);
811 write_unlock_irq(&zfcp_data.config_lock);
812
813 port->units++;
814 zfcp_port_get(port);
815
816 return unit;
817}
818
819void
820zfcp_unit_dequeue(struct zfcp_unit *unit)
821{
822 zfcp_unit_wait(unit);
823 write_lock_irq(&zfcp_data.config_lock);
824 list_del(&unit->list);
825 write_unlock_irq(&zfcp_data.config_lock);
826 unit->port->units--;
827 zfcp_port_put(unit->port);
828 zfcp_sysfs_unit_remove_files(&unit->sysfs_device);
829 device_unregister(&unit->sysfs_device);
830}
831
832static void *
dd0fc66f 833zfcp_mempool_alloc(gfp_t gfp_mask, void *size)
1da177e4
LT
834{
835 return kmalloc((size_t) size, gfp_mask);
836}
837
838static void
839zfcp_mempool_free(void *element, void *size)
840{
841 kfree(element);
842}
843
844/*
845 * Allocates a combined QTCB/fsf_req buffer for erp actions and fcp/SCSI
846 * commands.
847 * It also genrates fcp-nameserver request/response buffer and unsolicited
848 * status read fsf_req buffers.
849 *
850 * locks: must only be called with zfcp_data.config_sema taken
851 */
852static int
853zfcp_allocate_low_mem_buffers(struct zfcp_adapter *adapter)
854{
855 adapter->pool.fsf_req_erp =
856 mempool_create(ZFCP_POOL_FSF_REQ_ERP_NR,
857 zfcp_mempool_alloc, zfcp_mempool_free, (void *)
858 sizeof(struct zfcp_fsf_req_pool_element));
859
860 if (NULL == adapter->pool.fsf_req_erp)
861 return -ENOMEM;
862
863 adapter->pool.fsf_req_scsi =
864 mempool_create(ZFCP_POOL_FSF_REQ_SCSI_NR,
865 zfcp_mempool_alloc, zfcp_mempool_free, (void *)
866 sizeof(struct zfcp_fsf_req_pool_element));
867
868 if (NULL == adapter->pool.fsf_req_scsi)
869 return -ENOMEM;
870
871 adapter->pool.fsf_req_abort =
872 mempool_create(ZFCP_POOL_FSF_REQ_ABORT_NR,
873 zfcp_mempool_alloc, zfcp_mempool_free, (void *)
874 sizeof(struct zfcp_fsf_req_pool_element));
875
876 if (NULL == adapter->pool.fsf_req_abort)
877 return -ENOMEM;
878
879 adapter->pool.fsf_req_status_read =
880 mempool_create(ZFCP_POOL_STATUS_READ_NR,
881 zfcp_mempool_alloc, zfcp_mempool_free,
882 (void *) sizeof(struct zfcp_fsf_req));
883
884 if (NULL == adapter->pool.fsf_req_status_read)
885 return -ENOMEM;
886
887 adapter->pool.data_status_read =
888 mempool_create(ZFCP_POOL_STATUS_READ_NR,
889 zfcp_mempool_alloc, zfcp_mempool_free,
890 (void *) sizeof(struct fsf_status_read_buffer));
891
892 if (NULL == adapter->pool.data_status_read)
893 return -ENOMEM;
894
895 adapter->pool.data_gid_pn =
896 mempool_create(ZFCP_POOL_DATA_GID_PN_NR,
897 zfcp_mempool_alloc, zfcp_mempool_free, (void *)
898 sizeof(struct zfcp_gid_pn_data));
899
900 if (NULL == adapter->pool.data_gid_pn)
901 return -ENOMEM;
902
903 return 0;
904}
905
906/**
907 * zfcp_free_low_mem_buffers - free memory pools of an adapter
908 * @adapter: pointer to zfcp_adapter for which memory pools should be freed
909 * locking: zfcp_data.config_sema must be held
910 */
911static void
912zfcp_free_low_mem_buffers(struct zfcp_adapter *adapter)
913{
914 if (adapter->pool.fsf_req_erp)
915 mempool_destroy(adapter->pool.fsf_req_erp);
916 if (adapter->pool.fsf_req_scsi)
917 mempool_destroy(adapter->pool.fsf_req_scsi);
918 if (adapter->pool.fsf_req_abort)
919 mempool_destroy(adapter->pool.fsf_req_abort);
920 if (adapter->pool.fsf_req_status_read)
921 mempool_destroy(adapter->pool.fsf_req_status_read);
922 if (adapter->pool.data_status_read)
923 mempool_destroy(adapter->pool.data_status_read);
924 if (adapter->pool.data_gid_pn)
925 mempool_destroy(adapter->pool.data_gid_pn);
926}
927
1da177e4
LT
928void
929zfcp_dummy_release(struct device *dev)
930{
931 return;
932}
933
934/*
935 * Enqueues an adapter at the end of the adapter list in the driver data.
936 * All adapter internal structures are set up.
937 * Proc-fs entries are also created.
938 *
939 * returns: 0 if a new adapter was successfully enqueued
940 * ZFCP_KNOWN if an adapter with this devno was already present
941 * -ENOMEM if alloc failed
942 * locks: config_sema must be held to serialise changes to the adapter list
943 */
944struct zfcp_adapter *
945zfcp_adapter_enqueue(struct ccw_device *ccw_device)
946{
947 int retval = 0;
948 struct zfcp_adapter *adapter;
949
950 /*
951 * Note: It is safe to release the list_lock, as any list changes
952 * are protected by the config_sema, which must be held to get here
953 */
954
955 /* try to allocate new adapter data structure (zeroed) */
956 adapter = kmalloc(sizeof (struct zfcp_adapter), GFP_KERNEL);
957 if (!adapter) {
958 ZFCP_LOG_INFO("error: allocation of base adapter "
959 "structure failed\n");
960 goto out;
961 }
962 memset(adapter, 0, sizeof (struct zfcp_adapter));
963
964 ccw_device->handler = NULL;
965
966 /* save ccw_device pointer */
967 adapter->ccw_device = ccw_device;
968
969 retval = zfcp_qdio_allocate_queues(adapter);
970 if (retval)
971 goto queues_alloc_failed;
972
973 retval = zfcp_qdio_allocate(adapter);
974 if (retval)
975 goto qdio_allocate_failed;
976
977 retval = zfcp_allocate_low_mem_buffers(adapter);
978 if (retval) {
979 ZFCP_LOG_INFO("error: pool allocation failed\n");
980 goto failed_low_mem_buffers;
981 }
982
983 /* initialise reference count stuff */
984 atomic_set(&adapter->refcount, 0);
985 init_waitqueue_head(&adapter->remove_wq);
986
987 /* initialise list of ports */
988 INIT_LIST_HEAD(&adapter->port_list_head);
989
990 /* initialise list of ports to be removed */
991 INIT_LIST_HEAD(&adapter->port_remove_lh);
992
993 /* initialize list of fsf requests */
1db2c9c0 994 spin_lock_init(&adapter->fsf_req_list_lock);
1da177e4
LT
995 INIT_LIST_HEAD(&adapter->fsf_req_list_head);
996
c48a29d0
HC
997 /* initialize debug locks */
998
999 spin_lock_init(&adapter->erp_dbf_lock);
1000 spin_lock_init(&adapter->hba_dbf_lock);
1001 spin_lock_init(&adapter->san_dbf_lock);
1002 spin_lock_init(&adapter->scsi_dbf_lock);
1003
1004 /* initialize error recovery stuff */
1005
1006 rwlock_init(&adapter->erp_lock);
1007 sema_init(&adapter->erp_ready_sem, 0);
1008 INIT_LIST_HEAD(&adapter->erp_ready_head);
1009 INIT_LIST_HEAD(&adapter->erp_running_head);
1010
1da177e4
LT
1011 /* initialize abort lock */
1012 rwlock_init(&adapter->abort_lock);
1013
1014 /* initialise some erp stuff */
1015 init_waitqueue_head(&adapter->erp_thread_wqh);
1016 init_waitqueue_head(&adapter->erp_done_wqh);
1017
1018 /* initialize lock of associated request queue */
1019 rwlock_init(&adapter->request_queue.queue_lock);
1020
1021 /* intitialise SCSI ER timer */
1022 init_timer(&adapter->scsi_er_timer);
1023
1024 /* set FC service class used per default */
1025 adapter->fc_service_class = ZFCP_FC_SERVICE_CLASS_DEFAULT;
1026
1027 sprintf(adapter->name, "%s", zfcp_get_busid_by_adapter(adapter));
1028 ASCEBC(adapter->name, strlen(adapter->name));
1029
1030 /* mark adapter unusable as long as sysfs registration is not complete */
1031 atomic_set_mask(ZFCP_STATUS_COMMON_REMOVE, &adapter->status);
1032
1033 adapter->ccw_device = ccw_device;
1034 dev_set_drvdata(&ccw_device->dev, adapter);
1035
1036 if (zfcp_sysfs_adapter_create_files(&ccw_device->dev))
1037 goto sysfs_failed;
1038
1039 adapter->generic_services.parent = &adapter->ccw_device->dev;
1040 adapter->generic_services.release = zfcp_dummy_release;
1041 snprintf(adapter->generic_services.bus_id, BUS_ID_SIZE,
1042 "generic_services");
1043
1044 if (device_register(&adapter->generic_services))
1045 goto generic_services_failed;
1046
1047 /* put allocated adapter at list tail */
1048 write_lock_irq(&zfcp_data.config_lock);
1049 atomic_clear_mask(ZFCP_STATUS_COMMON_REMOVE, &adapter->status);
1050 list_add_tail(&adapter->list, &zfcp_data.adapter_list_head);
1051 write_unlock_irq(&zfcp_data.config_lock);
1052
1053 zfcp_data.adapters++;
1054
1055 goto out;
1056
1057 generic_services_failed:
1058 zfcp_sysfs_adapter_remove_files(&adapter->ccw_device->dev);
1059 sysfs_failed:
1060 dev_set_drvdata(&ccw_device->dev, NULL);
1061 failed_low_mem_buffers:
1062 zfcp_free_low_mem_buffers(adapter);
1063 if (qdio_free(ccw_device) != 0)
1064 ZFCP_LOG_NORMAL("bug: qdio_free for adapter %s failed\n",
1065 zfcp_get_busid_by_adapter(adapter));
1066 qdio_allocate_failed:
1067 zfcp_qdio_free_queues(adapter);
1068 queues_alloc_failed:
1069 kfree(adapter);
1070 adapter = NULL;
1071 out:
1072 return adapter;
1073}
1074
1075/*
1076 * returns: 0 - struct zfcp_adapter data structure successfully removed
1077 * !0 - struct zfcp_adapter data structure could not be removed
1078 * (e.g. still used)
1079 * locks: adapter list write lock is assumed to be held by caller
1080 * adapter->fsf_req_list_lock is taken and released within this
1081 * function and must not be held on entry
1082 */
1083void
1084zfcp_adapter_dequeue(struct zfcp_adapter *adapter)
1085{
1086 int retval = 0;
1087 unsigned long flags;
1088
1089 device_unregister(&adapter->generic_services);
1090 zfcp_sysfs_adapter_remove_files(&adapter->ccw_device->dev);
1091 dev_set_drvdata(&adapter->ccw_device->dev, NULL);
1092 /* sanity check: no pending FSF requests */
1db2c9c0 1093 spin_lock_irqsave(&adapter->fsf_req_list_lock, flags);
1da177e4 1094 retval = !list_empty(&adapter->fsf_req_list_head);
1db2c9c0 1095 spin_unlock_irqrestore(&adapter->fsf_req_list_lock, flags);
1da177e4
LT
1096 if (retval) {
1097 ZFCP_LOG_NORMAL("bug: adapter %s (%p) still in use, "
1098 "%i requests outstanding\n",
1099 zfcp_get_busid_by_adapter(adapter), adapter,
1100 atomic_read(&adapter->fsf_reqs_active));
1101 retval = -EBUSY;
1102 goto out;
1103 }
1104
1105 /* remove specified adapter data structure from list */
1106 write_lock_irq(&zfcp_data.config_lock);
1107 list_del(&adapter->list);
1108 write_unlock_irq(&zfcp_data.config_lock);
1109
1110 /* decrease number of adapters in list */
1111 zfcp_data.adapters--;
1112
1113 ZFCP_LOG_TRACE("adapter %s (%p) removed from list, "
1114 "%i adapters still in list\n",
1115 zfcp_get_busid_by_adapter(adapter),
1116 adapter, zfcp_data.adapters);
1117
1118 retval = qdio_free(adapter->ccw_device);
1119 if (retval)
1120 ZFCP_LOG_NORMAL("bug: qdio_free for adapter %s failed\n",
1121 zfcp_get_busid_by_adapter(adapter));
1122
1123 zfcp_free_low_mem_buffers(adapter);
1124 /* free memory of adapter data structure and queues */
1125 zfcp_qdio_free_queues(adapter);
f6cd94b1
AH
1126 kfree(adapter->fc_stats);
1127 kfree(adapter->stats_reset_data);
1da177e4
LT
1128 ZFCP_LOG_TRACE("freeing adapter structure\n");
1129 kfree(adapter);
1130 out:
1131 return;
1132}
1133
1134/**
1135 * zfcp_port_enqueue - enqueue port to port list of adapter
1136 * @adapter: adapter where remote port is added
1137 * @wwpn: WWPN of the remote port to be enqueued
1138 * @status: initial status for the port
1139 * @d_id: destination id of the remote port to be enqueued
1140 * Return: pointer to enqueued port on success, NULL on error
1141 * Locks: config_sema must be held to serialize changes to the port list
1142 *
1143 * All port internal structures are set up and the sysfs entry is generated.
1144 * d_id is used to enqueue ports with a well known address like the Directory
1145 * Service for nameserver lookup.
1146 */
1147struct zfcp_port *
1148zfcp_port_enqueue(struct zfcp_adapter *adapter, wwn_t wwpn, u32 status,
1149 u32 d_id)
1150{
3859f6a2 1151 struct zfcp_port *port;
1da177e4 1152 int check_wwpn;
1da177e4
LT
1153
1154 check_wwpn = !(status & ZFCP_STATUS_PORT_NO_WWPN);
1da177e4
LT
1155 /*
1156 * check that there is no port with this WWPN already in list
1157 */
1158 if (check_wwpn) {
1159 read_lock_irq(&zfcp_data.config_lock);
1160 port = zfcp_get_port_by_wwpn(adapter, wwpn);
1161 read_unlock_irq(&zfcp_data.config_lock);
1162 if (port)
1163 return NULL;
1164 }
1165
1166 port = kmalloc(sizeof (struct zfcp_port), GFP_KERNEL);
1167 if (!port)
1168 return NULL;
1169 memset(port, 0, sizeof (struct zfcp_port));
1170
1171 /* initialise reference count stuff */
1172 atomic_set(&port->refcount, 0);
1173 init_waitqueue_head(&port->remove_wq);
1174
1175 INIT_LIST_HEAD(&port->unit_list_head);
1176 INIT_LIST_HEAD(&port->unit_remove_lh);
1177
1178 port->adapter = adapter;
1179
1180 if (check_wwpn)
1181 port->wwpn = wwpn;
1182
1183 atomic_set_mask(status, &port->status);
1184
1185 /* setup for sysfs registration */
1186 if (status & ZFCP_STATUS_PORT_WKA) {
1187 switch (d_id) {
1188 case ZFCP_DID_DIRECTORY_SERVICE:
1189 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1190 "directory");
1191 break;
1192 case ZFCP_DID_MANAGEMENT_SERVICE:
1193 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1194 "management");
1195 break;
1196 case ZFCP_DID_KEY_DISTRIBUTION_SERVICE:
1197 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1198 "key_distribution");
1199 break;
1200 case ZFCP_DID_ALIAS_SERVICE:
1201 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1202 "alias");
1203 break;
1204 case ZFCP_DID_TIME_SERVICE:
1205 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1206 "time");
1207 break;
1208 default:
1209 kfree(port);
1210 return NULL;
1211 }
1212 port->d_id = d_id;
1213 port->sysfs_device.parent = &adapter->generic_services;
1214 } else {
1215 snprintf(port->sysfs_device.bus_id,
1216 BUS_ID_SIZE, "0x%016llx", wwpn);
3859f6a2 1217 port->sysfs_device.parent = &adapter->ccw_device->dev;
1da177e4
LT
1218 }
1219 port->sysfs_device.release = zfcp_sysfs_port_release;
1220 dev_set_drvdata(&port->sysfs_device, port);
1221
1222 /* mark port unusable as long as sysfs registration is not complete */
1223 atomic_set_mask(ZFCP_STATUS_COMMON_REMOVE, &port->status);
1224
1225 if (device_register(&port->sysfs_device)) {
1226 kfree(port);
1227 return NULL;
1228 }
1229
1230 if (zfcp_sysfs_port_create_files(&port->sysfs_device, status)) {
1231 device_unregister(&port->sysfs_device);
1232 return NULL;
1233 }
1234
1235 zfcp_port_get(port);
1236
1da177e4 1237 write_lock_irq(&zfcp_data.config_lock);
3859f6a2 1238 list_add_tail(&port->list, &adapter->port_list_head);
1da177e4
LT
1239 atomic_clear_mask(ZFCP_STATUS_COMMON_REMOVE, &port->status);
1240 atomic_set_mask(ZFCP_STATUS_COMMON_RUNNING, &port->status);
1241 if (d_id == ZFCP_DID_DIRECTORY_SERVICE)
1242 if (!adapter->nameserver_port)
1243 adapter->nameserver_port = port;
1244 adapter->ports++;
1245 write_unlock_irq(&zfcp_data.config_lock);
1246
1247 zfcp_adapter_get(adapter);
1248
1249 return port;
1250}
1251
1252void
1253zfcp_port_dequeue(struct zfcp_port *port)
1254{
1255 zfcp_port_wait(port);
1256 write_lock_irq(&zfcp_data.config_lock);
1257 list_del(&port->list);
1258 port->adapter->ports--;
1259 write_unlock_irq(&zfcp_data.config_lock);
3859f6a2 1260 if (port->rport)
20b1730a
HC
1261 fc_remote_port_delete(port->rport);
1262 port->rport = NULL;
1da177e4
LT
1263 zfcp_adapter_put(port->adapter);
1264 zfcp_sysfs_port_remove_files(&port->sysfs_device,
1265 atomic_read(&port->status));
1266 device_unregister(&port->sysfs_device);
1267}
1268
1269/* Enqueues a nameserver port */
1270int
1271zfcp_nameserver_enqueue(struct zfcp_adapter *adapter)
1272{
1273 struct zfcp_port *port;
1274
1275 port = zfcp_port_enqueue(adapter, 0, ZFCP_STATUS_PORT_WKA,
1276 ZFCP_DID_DIRECTORY_SERVICE);
1277 if (!port) {
1278 ZFCP_LOG_INFO("error: enqueue of nameserver port for "
1279 "adapter %s failed\n",
1280 zfcp_get_busid_by_adapter(adapter));
1281 return -ENXIO;
1282 }
1283 zfcp_port_put(port);
1284
1285 return 0;
1286}
1287
1288#undef ZFCP_LOG_AREA
1289
1290/****************************************************************/
1291/******* Fibre Channel Standard related Functions **************/
1292/****************************************************************/
1293
1294#define ZFCP_LOG_AREA ZFCP_LOG_AREA_FC
1295
1296void
1297zfcp_fsf_incoming_els_rscn(struct zfcp_adapter *adapter,
1298 struct fsf_status_read_buffer *status_buffer)
1299{
1300 struct fcp_rscn_head *fcp_rscn_head;
1301 struct fcp_rscn_element *fcp_rscn_element;
1302 struct zfcp_port *port;
1303 u16 i;
1304 u16 no_entries;
1305 u32 range_mask;
1306 unsigned long flags;
1307
1308 fcp_rscn_head = (struct fcp_rscn_head *) status_buffer->payload;
1309 fcp_rscn_element = (struct fcp_rscn_element *) status_buffer->payload;
1310
1311 /* see FC-FS */
1312 no_entries = (fcp_rscn_head->payload_len / 4);
1313
1da177e4
LT
1314 for (i = 1; i < no_entries; i++) {
1315 /* skip head and start with 1st element */
1316 fcp_rscn_element++;
1317 switch (fcp_rscn_element->addr_format) {
1318 case ZFCP_PORT_ADDRESS:
1da177e4
LT
1319 range_mask = ZFCP_PORTS_RANGE_PORT;
1320 break;
1321 case ZFCP_AREA_ADDRESS:
1da177e4
LT
1322 range_mask = ZFCP_PORTS_RANGE_AREA;
1323 break;
1324 case ZFCP_DOMAIN_ADDRESS:
1da177e4
LT
1325 range_mask = ZFCP_PORTS_RANGE_DOMAIN;
1326 break;
1327 case ZFCP_FABRIC_ADDRESS:
1da177e4
LT
1328 range_mask = ZFCP_PORTS_RANGE_FABRIC;
1329 break;
1330 default:
1331 ZFCP_LOG_INFO("incoming RSCN with unknown "
1332 "address format\n");
1333 continue;
1334 }
1335 read_lock_irqsave(&zfcp_data.config_lock, flags);
1336 list_for_each_entry(port, &adapter->port_list_head, list) {
1337 if (atomic_test_mask
1338 (ZFCP_STATUS_PORT_WKA, &port->status))
1339 continue;
1340 /* Do we know this port? If not skip it. */
1341 if (!atomic_test_mask
1342 (ZFCP_STATUS_PORT_DID_DID, &port->status)) {
1343 ZFCP_LOG_INFO("incoming RSCN, trying to open "
1344 "port 0x%016Lx\n", port->wwpn);
1da177e4
LT
1345 zfcp_erp_port_reopen(port,
1346 ZFCP_STATUS_COMMON_ERP_FAILED);
1347 continue;
1348 }
1349
1350 /*
1351 * FIXME: race: d_id might being invalidated
1352 * (...DID_DID reset)
1353 */
1354 if ((port->d_id & range_mask)
1355 == (fcp_rscn_element->nport_did & range_mask)) {
1356 ZFCP_LOG_TRACE("reopen did 0x%08x\n",
1357 fcp_rscn_element->nport_did);
1358 /*
1359 * Unfortunately, an RSCN does not specify the
1360 * type of change a target underwent. We assume
1361 * that it makes sense to reopen the link.
1362 * FIXME: Shall we try to find out more about
1363 * the target and link state before closing it?
1364 * How to accomplish this? (nameserver?)
1365 * Where would such code be put in?
1366 * (inside or outside erp)
1367 */
1368 ZFCP_LOG_INFO("incoming RSCN, trying to open "
1369 "port 0x%016Lx\n", port->wwpn);
1da177e4
LT
1370 zfcp_test_link(port);
1371 }
1372 }
1373 read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1374 }
1375}
1376
1377static void
1378zfcp_fsf_incoming_els_plogi(struct zfcp_adapter *adapter,
1379 struct fsf_status_read_buffer *status_buffer)
1380{
1381 logi *els_logi = (logi *) status_buffer->payload;
1382 struct zfcp_port *port;
1383 unsigned long flags;
1384
1da177e4
LT
1385 read_lock_irqsave(&zfcp_data.config_lock, flags);
1386 list_for_each_entry(port, &adapter->port_list_head, list) {
1387 if (port->wwpn == (*(wwn_t *) & els_logi->nport_wwn))
1388 break;
1389 }
1390 read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1391
1392 if (!port || (port->wwpn != (*(wwn_t *) & els_logi->nport_wwn))) {
1393 ZFCP_LOG_DEBUG("ignored incoming PLOGI for nonexisting port "
1394 "with d_id 0x%08x on adapter %s\n",
1395 status_buffer->d_id,
1396 zfcp_get_busid_by_adapter(adapter));
1397 } else {
1da177e4
LT
1398 zfcp_erp_port_forced_reopen(port, 0);
1399 }
1400}
1401
1402static void
1403zfcp_fsf_incoming_els_logo(struct zfcp_adapter *adapter,
1404 struct fsf_status_read_buffer *status_buffer)
1405{
1406 struct fcp_logo *els_logo = (struct fcp_logo *) status_buffer->payload;
1407 struct zfcp_port *port;
1408 unsigned long flags;
1409
1da177e4
LT
1410 read_lock_irqsave(&zfcp_data.config_lock, flags);
1411 list_for_each_entry(port, &adapter->port_list_head, list) {
1412 if (port->wwpn == els_logo->nport_wwpn)
1413 break;
1414 }
1415 read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1416
1417 if (!port || (port->wwpn != els_logo->nport_wwpn)) {
1418 ZFCP_LOG_DEBUG("ignored incoming LOGO for nonexisting port "
1419 "with d_id 0x%08x on adapter %s\n",
1420 status_buffer->d_id,
1421 zfcp_get_busid_by_adapter(adapter));
1422 } else {
1da177e4
LT
1423 zfcp_erp_port_forced_reopen(port, 0);
1424 }
1425}
1426
1427static void
1428zfcp_fsf_incoming_els_unknown(struct zfcp_adapter *adapter,
1429 struct fsf_status_read_buffer *status_buffer)
1430{
1da177e4
LT
1431 ZFCP_LOG_NORMAL("warning: unknown incoming ELS 0x%08x "
1432 "for adapter %s\n", *(u32 *) (status_buffer->payload),
1433 zfcp_get_busid_by_adapter(adapter));
1434
1435}
1436
1437void
1438zfcp_fsf_incoming_els(struct zfcp_fsf_req *fsf_req)
1439{
1440 struct fsf_status_read_buffer *status_buffer;
1441 u32 els_type;
1442 struct zfcp_adapter *adapter;
1443
059c97d0 1444 status_buffer = (struct fsf_status_read_buffer *) fsf_req->data;
1da177e4
LT
1445 els_type = *(u32 *) (status_buffer->payload);
1446 adapter = fsf_req->adapter;
1447
8a36e453 1448 zfcp_san_dbf_event_incoming_els(fsf_req);
1da177e4
LT
1449 if (els_type == LS_PLOGI)
1450 zfcp_fsf_incoming_els_plogi(adapter, status_buffer);
1451 else if (els_type == LS_LOGO)
1452 zfcp_fsf_incoming_els_logo(adapter, status_buffer);
1453 else if ((els_type & 0xffff0000) == LS_RSCN)
1454 /* we are only concerned with the command, not the length */
1455 zfcp_fsf_incoming_els_rscn(adapter, status_buffer);
1456 else
1457 zfcp_fsf_incoming_els_unknown(adapter, status_buffer);
1458}
1459
1460
1461/**
1462 * zfcp_gid_pn_buffers_alloc - allocate buffers for GID_PN nameserver request
1463 * @gid_pn: pointer to return pointer to struct zfcp_gid_pn_data
1464 * @pool: pointer to mempool_t if non-null memory pool is used for allocation
1465 */
1466static int
1467zfcp_gid_pn_buffers_alloc(struct zfcp_gid_pn_data **gid_pn, mempool_t *pool)
1468{
1469 struct zfcp_gid_pn_data *data;
1470
1471 if (pool != NULL) {
1472 data = mempool_alloc(pool, GFP_ATOMIC);
1473 if (likely(data != NULL)) {
1474 data->ct.pool = pool;
1475 }
1476 } else {
1477 data = kmalloc(sizeof(struct zfcp_gid_pn_data), GFP_ATOMIC);
1478 }
1479
1480 if (NULL == data)
1481 return -ENOMEM;
1482
1483 memset(data, 0, sizeof(*data));
1484 data->ct.req = &data->req;
1485 data->ct.resp = &data->resp;
1486 data->ct.req_count = data->ct.resp_count = 1;
1487 zfcp_address_to_sg(&data->ct_iu_req, &data->req);
1488 zfcp_address_to_sg(&data->ct_iu_resp, &data->resp);
1489 data->req.length = sizeof(struct ct_iu_gid_pn_req);
1490 data->resp.length = sizeof(struct ct_iu_gid_pn_resp);
1491
1492 *gid_pn = data;
1493 return 0;
1494}
1495
1496/**
1497 * zfcp_gid_pn_buffers_free - free buffers for GID_PN nameserver request
1498 * @gid_pn: pointer to struct zfcp_gid_pn_data which has to be freed
1499 */
1500static void
1501zfcp_gid_pn_buffers_free(struct zfcp_gid_pn_data *gid_pn)
1502{
1503 if ((gid_pn->ct.pool != 0))
1504 mempool_free(gid_pn, gid_pn->ct.pool);
1505 else
1506 kfree(gid_pn);
1507
1508 return;
1509}
1510
1511/**
1512 * zfcp_ns_gid_pn_request - initiate GID_PN nameserver request
1513 * @erp_action: pointer to zfcp_erp_action where GID_PN request is needed
1514 */
1515int
1516zfcp_ns_gid_pn_request(struct zfcp_erp_action *erp_action)
1517{
1518 int ret;
1519 struct ct_iu_gid_pn_req *ct_iu_req;
1520 struct zfcp_gid_pn_data *gid_pn;
1521 struct zfcp_adapter *adapter = erp_action->adapter;
1522
1523 ret = zfcp_gid_pn_buffers_alloc(&gid_pn, adapter->pool.data_gid_pn);
1524 if (ret < 0) {
1525 ZFCP_LOG_INFO("error: buffer allocation for gid_pn nameserver "
1526 "request failed for adapter %s\n",
1527 zfcp_get_busid_by_adapter(adapter));
1528 goto out;
1529 }
1530
1531 /* setup nameserver request */
1532 ct_iu_req = zfcp_sg_to_address(gid_pn->ct.req);
1533 ct_iu_req->header.revision = ZFCP_CT_REVISION;
1534 ct_iu_req->header.gs_type = ZFCP_CT_DIRECTORY_SERVICE;
1535 ct_iu_req->header.gs_subtype = ZFCP_CT_NAME_SERVER;
1536 ct_iu_req->header.options = ZFCP_CT_SYNCHRONOUS;
1537 ct_iu_req->header.cmd_rsp_code = ZFCP_CT_GID_PN;
1538 ct_iu_req->header.max_res_size = ZFCP_CT_MAX_SIZE;
1539 ct_iu_req->wwpn = erp_action->port->wwpn;
1540
1541 /* setup parameters for send generic command */
1542 gid_pn->ct.port = adapter->nameserver_port;
1543 gid_pn->ct.handler = zfcp_ns_gid_pn_handler;
1544 gid_pn->ct.handler_data = (unsigned long) gid_pn;
1545 gid_pn->ct.timeout = ZFCP_NS_GID_PN_TIMEOUT;
1546 gid_pn->ct.timer = &erp_action->timer;
1547 gid_pn->port = erp_action->port;
1548
1549 ret = zfcp_fsf_send_ct(&gid_pn->ct, adapter->pool.fsf_req_erp,
1550 erp_action);
1551 if (ret) {
1552 ZFCP_LOG_INFO("error: initiation of gid_pn nameserver request "
1553 "failed for adapter %s\n",
1554 zfcp_get_busid_by_adapter(adapter));
1555
1556 zfcp_gid_pn_buffers_free(gid_pn);
1557 }
1558
1559 out:
1560 return ret;
1561}
1562
1563/**
1564 * zfcp_ns_gid_pn_handler - handler for GID_PN nameserver request
1565 * @data: unsigned long, contains pointer to struct zfcp_gid_pn_data
1566 */
1567static void zfcp_ns_gid_pn_handler(unsigned long data)
1568{
1569 struct zfcp_port *port;
1570 struct zfcp_send_ct *ct;
1571 struct ct_iu_gid_pn_req *ct_iu_req;
1572 struct ct_iu_gid_pn_resp *ct_iu_resp;
1573 struct zfcp_gid_pn_data *gid_pn;
1574
1575
1576 gid_pn = (struct zfcp_gid_pn_data *) data;
1577 port = gid_pn->port;
1578 ct = &gid_pn->ct;
1579 ct_iu_req = zfcp_sg_to_address(ct->req);
1580 ct_iu_resp = zfcp_sg_to_address(ct->resp);
1581
66c8684a
AH
1582 if (ct->status != 0)
1583 goto failed;
1584
1585 if (zfcp_check_ct_response(&ct_iu_resp->header)) {
1da177e4
LT
1586 /* FIXME: do we need some specific erp entry points */
1587 atomic_set_mask(ZFCP_STATUS_PORT_INVALID_WWPN, &port->status);
1588 goto failed;
1589 }
1590 /* paranoia */
1591 if (ct_iu_req->wwpn != port->wwpn) {
1592 ZFCP_LOG_NORMAL("bug: wwpn 0x%016Lx returned by nameserver "
1593 "lookup does not match expected wwpn 0x%016Lx "
1594 "for adapter %s\n", ct_iu_req->wwpn, port->wwpn,
1595 zfcp_get_busid_by_port(port));
1596 goto mismatch;
1597 }
1598
1599 /* looks like a valid d_id */
1600 port->d_id = ct_iu_resp->d_id & ZFCP_DID_MASK;
1601 atomic_set_mask(ZFCP_STATUS_PORT_DID_DID, &port->status);
1602 ZFCP_LOG_DEBUG("adapter %s: wwpn=0x%016Lx ---> d_id=0x%08x\n",
1603 zfcp_get_busid_by_port(port), port->wwpn, port->d_id);
1604 goto out;
1605
1606 mismatch:
1607 ZFCP_LOG_DEBUG("CT IUs do not match:\n");
1608 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG, (char *) ct_iu_req,
1609 sizeof(struct ct_iu_gid_pn_req));
1610 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG, (char *) ct_iu_resp,
1611 sizeof(struct ct_iu_gid_pn_resp));
1612
1613 failed:
1614 ZFCP_LOG_NORMAL("warning: failed gid_pn nameserver request for wwpn "
1615 "0x%016Lx for adapter %s\n",
1616 port->wwpn, zfcp_get_busid_by_port(port));
1617 out:
1618 zfcp_gid_pn_buffers_free(gid_pn);
1619 return;
1620}
1621
1622/* reject CT_IU reason codes acc. to FC-GS-4 */
1623static const struct zfcp_rc_entry zfcp_ct_rc[] = {
1624 {0x01, "invalid command code"},
1625 {0x02, "invalid version level"},
1626 {0x03, "logical error"},
1627 {0x04, "invalid CT_IU size"},
1628 {0x05, "logical busy"},
1629 {0x07, "protocol error"},
1630 {0x09, "unable to perform command request"},
1631 {0x0b, "command not supported"},
1632 {0x0d, "server not available"},
1633 {0x0e, "session could not be established"},
1634 {0xff, "vendor specific error"},
1635 {0, NULL},
1636};
1637
1638/* LS_RJT reason codes acc. to FC-FS */
1639static const struct zfcp_rc_entry zfcp_ls_rjt_rc[] = {
1640 {0x01, "invalid LS_Command code"},
1641 {0x03, "logical error"},
1642 {0x05, "logical busy"},
1643 {0x07, "protocol error"},
1644 {0x09, "unable to perform command request"},
1645 {0x0b, "command not supported"},
1646 {0x0e, "command already in progress"},
1647 {0xff, "vendor specific error"},
1648 {0, NULL},
1649};
1650
1651/* reject reason codes according to FC-PH/FC-FS */
1652static const struct zfcp_rc_entry zfcp_p_rjt_rc[] = {
1653 {0x01, "invalid D_ID"},
1654 {0x02, "invalid S_ID"},
1655 {0x03, "Nx_Port not available, temporary"},
1656 {0x04, "Nx_Port not available, permament"},
1657 {0x05, "class not supported"},
1658 {0x06, "delimiter usage error"},
1659 {0x07, "TYPE not supported"},
1660 {0x08, "invalid Link_Control"},
1661 {0x09, "invalid R_CTL field"},
1662 {0x0a, "invalid F_CTL field"},
1663 {0x0b, "invalid OX_ID"},
1664 {0x0c, "invalid RX_ID"},
1665 {0x0d, "invalid SEQ_ID"},
1666 {0x0e, "invalid DF_CTL"},
1667 {0x0f, "invalid SEQ_CNT"},
1668 {0x10, "invalid parameter field"},
1669 {0x11, "exchange error"},
1670 {0x12, "protocol error"},
1671 {0x13, "incorrect length"},
1672 {0x14, "unsupported ACK"},
1673 {0x15, "class of service not supported by entity at FFFFFE"},
1674 {0x16, "login required"},
1675 {0x17, "excessive sequences attempted"},
1676 {0x18, "unable to establish exchange"},
1677 {0x1a, "fabric path not available"},
1678 {0x1b, "invalid VC_ID (class 4)"},
1679 {0x1c, "invalid CS_CTL field"},
1680 {0x1d, "insufficient resources for VC (class 4)"},
1681 {0x1f, "invalid class of service"},
1682 {0x20, "preemption request rejected"},
1683 {0x21, "preemption not enabled"},
1684 {0x22, "multicast error"},
1685 {0x23, "multicast error terminate"},
1686 {0x24, "process login required"},
1687 {0xff, "vendor specific reject"},
1688 {0, NULL},
1689};
1690
1691/**
1692 * zfcp_rc_description - return description for given reaon code
1693 * @code: reason code
1694 * @rc_table: table of reason codes and descriptions
1695 */
1696static inline const char *
1697zfcp_rc_description(u8 code, const struct zfcp_rc_entry *rc_table)
1698{
1699 const char *descr = "unknown reason code";
1700
1701 do {
1702 if (code == rc_table->code) {
1703 descr = rc_table->description;
1704 break;
1705 }
1706 rc_table++;
1707 } while (rc_table->code && rc_table->description);
1708
1709 return descr;
1710}
1711
1712/**
1713 * zfcp_check_ct_response - evaluate reason code for CT_IU
1714 * @rjt: response payload to an CT_IU request
1715 * Return: 0 for accept CT_IU, 1 for reject CT_IU or invlid response code
1716 */
1717int
1718zfcp_check_ct_response(struct ct_hdr *rjt)
1719{
1720 if (rjt->cmd_rsp_code == ZFCP_CT_ACCEPT)
1721 return 0;
1722
1723 if (rjt->cmd_rsp_code != ZFCP_CT_REJECT) {
1724 ZFCP_LOG_NORMAL("error: invalid Generic Service command/"
1725 "response code (0x%04hx)\n",
1726 rjt->cmd_rsp_code);
1727 return 1;
1728 }
1729
1730 ZFCP_LOG_INFO("Generic Service command rejected\n");
1731 ZFCP_LOG_INFO("%s (0x%02x, 0x%02x, 0x%02x)\n",
1732 zfcp_rc_description(rjt->reason_code, zfcp_ct_rc),
1733 (u32) rjt->reason_code, (u32) rjt->reason_code_expl,
1734 (u32) rjt->vendor_unique);
1735
1736 return 1;
1737}
1738
1739/**
1740 * zfcp_print_els_rjt - print reject parameter and description for ELS reject
1741 * @rjt_par: reject parameter acc. to FC-PH/FC-FS
1742 * @rc_table: table of reason codes and descriptions
1743 */
1744static inline void
1745zfcp_print_els_rjt(struct zfcp_ls_rjt_par *rjt_par,
1746 const struct zfcp_rc_entry *rc_table)
1747{
1748 ZFCP_LOG_INFO("%s (%02x %02x %02x %02x)\n",
1749 zfcp_rc_description(rjt_par->reason_code, rc_table),
1750 (u32) rjt_par->action, (u32) rjt_par->reason_code,
1751 (u32) rjt_par->reason_expl, (u32) rjt_par->vendor_unique);
1752}
1753
1754/**
1755 * zfcp_fsf_handle_els_rjt - evaluate status qualifier/reason code on ELS reject
1756 * @sq: status qualifier word
1757 * @rjt_par: reject parameter as described in FC-PH and FC-FS
1758 * Return: -EROMTEIO for LS_RJT, -EREMCHG for invalid D_ID, -EIO else
1759 */
1760int
1761zfcp_handle_els_rjt(u32 sq, struct zfcp_ls_rjt_par *rjt_par)
1762{
1763 int ret = -EIO;
1764
1765 if (sq == FSF_IOSTAT_NPORT_RJT) {
1766 ZFCP_LOG_INFO("ELS rejected (P_RJT)\n");
1767 zfcp_print_els_rjt(rjt_par, zfcp_p_rjt_rc);
1768 /* invalid d_id */
1769 if (rjt_par->reason_code == 0x01)
1770 ret = -EREMCHG;
1771 } else if (sq == FSF_IOSTAT_FABRIC_RJT) {
1772 ZFCP_LOG_INFO("ELS rejected (F_RJT)\n");
1773 zfcp_print_els_rjt(rjt_par, zfcp_p_rjt_rc);
1774 /* invalid d_id */
1775 if (rjt_par->reason_code == 0x01)
1776 ret = -EREMCHG;
1777 } else if (sq == FSF_IOSTAT_LS_RJT) {
1778 ZFCP_LOG_INFO("ELS rejected (LS_RJT)\n");
1779 zfcp_print_els_rjt(rjt_par, zfcp_ls_rjt_rc);
1780 ret = -EREMOTEIO;
1781 } else
1782 ZFCP_LOG_INFO("unexpected SQ: 0x%02x\n", sq);
1783
1784 return ret;
1785}
1786
1787#undef ZFCP_LOG_AREA