[SCSI] zfcp: Fix deadlock between zfcp ERP and SCSI
[linux-2.6.git] / drivers / s390 / scsi / zfcp_aux.c
blob49d5fc729bef3b86ff2ade0dd52e043c746bc63e
1 /*
2 * This file is part of the zfcp device driver for
3 * FCP adapters for IBM System z9 and zSeries.
5 * (C) Copyright IBM Corp. 2002, 2006
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2, or (at your option)
10 * any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 * Driver authors:
24 * Martin Peschke (originator of the driver)
25 * Raimund Schroeder
26 * Aron Zeh
27 * Wolfgang Taphorn
28 * Stefan Bader
29 * Heiko Carstens (kernel 2.6 port of the driver)
30 * Andreas Herrmann
31 * Maxim Shchetynin
32 * Volker Sameske
33 * Ralph Wuerthner
36 #include "zfcp_ext.h"
38 /* accumulated log level (module parameter) */
39 static u32 loglevel = ZFCP_LOG_LEVEL_DEFAULTS;
40 static char *device;
41 /*********************** FUNCTION PROTOTYPES *********************************/
43 /* written against the module interface */
44 static int __init zfcp_module_init(void);
46 /* FCP related */
47 static void zfcp_ns_gid_pn_handler(unsigned long);
49 /* miscellaneous */
50 static int zfcp_sg_list_alloc(struct zfcp_sg_list *, size_t);
51 static void zfcp_sg_list_free(struct zfcp_sg_list *);
52 static int zfcp_sg_list_copy_from_user(struct zfcp_sg_list *,
53 void __user *, size_t);
54 static int zfcp_sg_list_copy_to_user(void __user *,
55 struct zfcp_sg_list *, size_t);
56 static long zfcp_cfdc_dev_ioctl(struct file *, unsigned int, unsigned long);
58 #define ZFCP_CFDC_IOC_MAGIC 0xDD
59 #define ZFCP_CFDC_IOC \
60 _IOWR(ZFCP_CFDC_IOC_MAGIC, 0, struct zfcp_cfdc_sense_data)
63 static const struct file_operations zfcp_cfdc_fops = {
64 .unlocked_ioctl = zfcp_cfdc_dev_ioctl,
65 #ifdef CONFIG_COMPAT
66 .compat_ioctl = zfcp_cfdc_dev_ioctl
67 #endif
70 static struct miscdevice zfcp_cfdc_misc = {
71 .minor = ZFCP_CFDC_DEV_MINOR,
72 .name = ZFCP_CFDC_DEV_NAME,
73 .fops = &zfcp_cfdc_fops
76 /*********************** KERNEL/MODULE PARAMETERS ***************************/
78 /* declare driver module init/cleanup functions */
79 module_init(zfcp_module_init);
81 MODULE_AUTHOR("IBM Deutschland Entwicklung GmbH - linux390@de.ibm.com");
82 MODULE_DESCRIPTION
83 ("FCP (SCSI over Fibre Channel) HBA driver for IBM System z9 and zSeries");
84 MODULE_LICENSE("GPL");
86 module_param(device, charp, 0400);
87 MODULE_PARM_DESC(device, "specify initial device");
89 module_param(loglevel, uint, 0400);
90 MODULE_PARM_DESC(loglevel,
91 "log levels, 8 nibbles: "
92 "FC ERP QDIO CIO Config FSF SCSI Other, "
93 "levels: 0=none 1=normal 2=devel 3=trace");
95 /****************************************************************/
96 /************** Functions without logging ***********************/
97 /****************************************************************/
99 void
100 _zfcp_hex_dump(char *addr, int count)
102 int i;
103 for (i = 0; i < count; i++) {
104 printk("%02x", addr[i]);
105 if ((i % 4) == 3)
106 printk(" ");
107 if ((i % 32) == 31)
108 printk("\n");
110 if (((i-1) % 32) != 31)
111 printk("\n");
115 /****************************************************************/
116 /****** Functions to handle the request ID hash table ********/
117 /****************************************************************/
119 #define ZFCP_LOG_AREA ZFCP_LOG_AREA_FSF
121 static int zfcp_reqlist_init(struct zfcp_adapter *adapter)
123 int i;
125 adapter->req_list = kcalloc(REQUEST_LIST_SIZE, sizeof(struct list_head),
126 GFP_KERNEL);
128 if (!adapter->req_list)
129 return -ENOMEM;
131 for (i=0; i<REQUEST_LIST_SIZE; i++)
132 INIT_LIST_HEAD(&adapter->req_list[i]);
134 return 0;
137 static void zfcp_reqlist_free(struct zfcp_adapter *adapter)
139 struct zfcp_fsf_req *request, *tmp;
140 unsigned int i;
142 for (i=0; i<REQUEST_LIST_SIZE; i++) {
143 if (list_empty(&adapter->req_list[i]))
144 continue;
146 list_for_each_entry_safe(request, tmp,
147 &adapter->req_list[i], list)
148 list_del(&request->list);
151 kfree(adapter->req_list);
154 void zfcp_reqlist_add(struct zfcp_adapter *adapter,
155 struct zfcp_fsf_req *fsf_req)
157 unsigned int i;
159 i = fsf_req->req_id % REQUEST_LIST_SIZE;
160 list_add_tail(&fsf_req->list, &adapter->req_list[i]);
163 void zfcp_reqlist_remove(struct zfcp_adapter *adapter, unsigned long req_id)
165 struct zfcp_fsf_req *request, *tmp;
166 unsigned int i, counter;
167 u64 dbg_tmp[2];
169 i = req_id % REQUEST_LIST_SIZE;
170 BUG_ON(list_empty(&adapter->req_list[i]));
172 counter = 0;
173 list_for_each_entry_safe(request, tmp, &adapter->req_list[i], list) {
174 if (request->req_id == req_id) {
175 dbg_tmp[0] = (u64) atomic_read(&adapter->reqs_active);
176 dbg_tmp[1] = (u64) counter;
177 debug_event(adapter->erp_dbf, 4, (void *) dbg_tmp, 16);
178 list_del(&request->list);
179 break;
181 counter++;
185 struct zfcp_fsf_req *zfcp_reqlist_ismember(struct zfcp_adapter *adapter,
186 unsigned long req_id)
188 struct zfcp_fsf_req *request, *tmp;
189 unsigned int i;
191 /* 0 is reserved as an invalid req_id */
192 if (req_id == 0)
193 return NULL;
195 i = req_id % REQUEST_LIST_SIZE;
197 list_for_each_entry_safe(request, tmp, &adapter->req_list[i], list)
198 if (request->req_id == req_id)
199 return request;
201 return NULL;
204 int zfcp_reqlist_isempty(struct zfcp_adapter *adapter)
206 unsigned int i;
208 for (i=0; i<REQUEST_LIST_SIZE; i++)
209 if (!list_empty(&adapter->req_list[i]))
210 return 0;
212 return 1;
215 #undef ZFCP_LOG_AREA
217 /****************************************************************/
218 /************** Uncategorised Functions *************************/
219 /****************************************************************/
221 #define ZFCP_LOG_AREA ZFCP_LOG_AREA_OTHER
224 * zfcp_device_setup - setup function
225 * @str: pointer to parameter string
227 * Parse "device=..." parameter string.
229 static int __init
230 zfcp_device_setup(char *devstr)
232 char *tmp, *str;
233 size_t len;
235 if (!devstr)
236 return 0;
238 len = strlen(devstr) + 1;
239 str = kmalloc(len, GFP_KERNEL);
240 if (!str)
241 goto err_out;
242 memcpy(str, devstr, len);
244 tmp = strchr(str, ',');
245 if (!tmp)
246 goto err_out;
247 *tmp++ = '\0';
248 strncpy(zfcp_data.init_busid, str, BUS_ID_SIZE);
249 zfcp_data.init_busid[BUS_ID_SIZE-1] = '\0';
251 zfcp_data.init_wwpn = simple_strtoull(tmp, &tmp, 0);
252 if (*tmp++ != ',')
253 goto err_out;
254 if (*tmp == '\0')
255 goto err_out;
257 zfcp_data.init_fcp_lun = simple_strtoull(tmp, &tmp, 0);
258 if (*tmp != '\0')
259 goto err_out;
260 kfree(str);
261 return 1;
263 err_out:
264 ZFCP_LOG_NORMAL("Parse error for device parameter string %s\n", str);
265 kfree(str);
266 return 0;
269 static void __init
270 zfcp_init_device_configure(void)
272 struct zfcp_adapter *adapter;
273 struct zfcp_port *port;
274 struct zfcp_unit *unit;
276 down(&zfcp_data.config_sema);
277 read_lock_irq(&zfcp_data.config_lock);
278 adapter = zfcp_get_adapter_by_busid(zfcp_data.init_busid);
279 if (adapter)
280 zfcp_adapter_get(adapter);
281 read_unlock_irq(&zfcp_data.config_lock);
283 if (adapter == NULL)
284 goto out_adapter;
285 port = zfcp_port_enqueue(adapter, zfcp_data.init_wwpn, 0, 0);
286 if (!port)
287 goto out_port;
288 unit = zfcp_unit_enqueue(port, zfcp_data.init_fcp_lun);
289 if (!unit)
290 goto out_unit;
291 up(&zfcp_data.config_sema);
292 ccw_device_set_online(adapter->ccw_device);
293 zfcp_erp_wait(adapter);
294 down(&zfcp_data.config_sema);
295 zfcp_unit_put(unit);
296 out_unit:
297 zfcp_port_put(port);
298 out_port:
299 zfcp_adapter_put(adapter);
300 out_adapter:
301 up(&zfcp_data.config_sema);
302 return;
305 static int calc_alignment(int size)
307 int align = 1;
309 if (!size)
310 return 0;
312 while ((size - align) > 0)
313 align <<= 1;
315 return align;
318 static int __init
319 zfcp_module_init(void)
321 int retval = -ENOMEM;
322 int size, align;
324 size = sizeof(struct zfcp_fsf_req_qtcb);
325 align = calc_alignment(size);
326 zfcp_data.fsf_req_qtcb_cache =
327 kmem_cache_create("zfcp_fsf", size, align, 0, NULL, NULL);
328 if (!zfcp_data.fsf_req_qtcb_cache)
329 goto out;
331 size = sizeof(struct fsf_status_read_buffer);
332 align = calc_alignment(size);
333 zfcp_data.sr_buffer_cache =
334 kmem_cache_create("zfcp_sr", size, align, 0, NULL, NULL);
335 if (!zfcp_data.sr_buffer_cache)
336 goto out_sr_cache;
338 size = sizeof(struct zfcp_gid_pn_data);
339 align = calc_alignment(size);
340 zfcp_data.gid_pn_cache =
341 kmem_cache_create("zfcp_gid", size, align, 0, NULL, NULL);
342 if (!zfcp_data.gid_pn_cache)
343 goto out_gid_cache;
345 atomic_set(&zfcp_data.loglevel, loglevel);
347 /* initialize adapter list */
348 INIT_LIST_HEAD(&zfcp_data.adapter_list_head);
350 /* initialize adapters to be removed list head */
351 INIT_LIST_HEAD(&zfcp_data.adapter_remove_lh);
353 zfcp_data.scsi_transport_template =
354 fc_attach_transport(&zfcp_transport_functions);
355 if (!zfcp_data.scsi_transport_template)
356 goto out_transport;
358 retval = misc_register(&zfcp_cfdc_misc);
359 if (retval != 0) {
360 ZFCP_LOG_INFO("registration of misc device "
361 "zfcp_cfdc failed\n");
362 goto out_misc;
365 ZFCP_LOG_TRACE("major/minor for zfcp_cfdc: %d/%d\n",
366 ZFCP_CFDC_DEV_MAJOR, zfcp_cfdc_misc.minor);
368 /* Initialise proc semaphores */
369 sema_init(&zfcp_data.config_sema, 1);
371 /* initialise configuration rw lock */
372 rwlock_init(&zfcp_data.config_lock);
374 /* setup dynamic I/O */
375 retval = zfcp_ccw_register();
376 if (retval) {
377 ZFCP_LOG_NORMAL("registration with common I/O layer failed\n");
378 goto out_ccw_register;
381 if (zfcp_device_setup(device))
382 zfcp_init_device_configure();
384 goto out;
386 out_ccw_register:
387 misc_deregister(&zfcp_cfdc_misc);
388 out_misc:
389 fc_release_transport(zfcp_data.scsi_transport_template);
390 out_transport:
391 kmem_cache_destroy(zfcp_data.gid_pn_cache);
392 out_gid_cache:
393 kmem_cache_destroy(zfcp_data.sr_buffer_cache);
394 out_sr_cache:
395 kmem_cache_destroy(zfcp_data.fsf_req_qtcb_cache);
396 out:
397 return retval;
401 * function: zfcp_cfdc_dev_ioctl
403 * purpose: Handle control file upload/download transaction via IOCTL
404 * interface
406 * returns: 0 - Operation completed successfuly
407 * -ENOTTY - Unknown IOCTL command
408 * -EINVAL - Invalid sense data record
409 * -ENXIO - The FCP adapter is not available
410 * -EOPNOTSUPP - The FCP adapter does not have CFDC support
411 * -ENOMEM - Insufficient memory
412 * -EFAULT - User space memory I/O operation fault
413 * -EPERM - Cannot create or queue FSF request or create SBALs
414 * -ERESTARTSYS- Received signal (is mapped to EAGAIN by VFS)
416 static long
417 zfcp_cfdc_dev_ioctl(struct file *file, unsigned int command,
418 unsigned long buffer)
420 struct zfcp_cfdc_sense_data *sense_data, __user *sense_data_user;
421 struct zfcp_adapter *adapter = NULL;
422 struct zfcp_fsf_req *fsf_req = NULL;
423 struct zfcp_sg_list *sg_list = NULL;
424 u32 fsf_command, option;
425 char *bus_id = NULL;
426 int retval = 0;
428 sense_data = kmalloc(sizeof(struct zfcp_cfdc_sense_data), GFP_KERNEL);
429 if (sense_data == NULL) {
430 retval = -ENOMEM;
431 goto out;
434 sg_list = kzalloc(sizeof(struct zfcp_sg_list), GFP_KERNEL);
435 if (sg_list == NULL) {
436 retval = -ENOMEM;
437 goto out;
440 if (command != ZFCP_CFDC_IOC) {
441 ZFCP_LOG_INFO("IOC request code 0x%x invalid\n", command);
442 retval = -ENOTTY;
443 goto out;
446 if ((sense_data_user = (void __user *) buffer) == NULL) {
447 ZFCP_LOG_INFO("sense data record is required\n");
448 retval = -EINVAL;
449 goto out;
452 retval = copy_from_user(sense_data, sense_data_user,
453 sizeof(struct zfcp_cfdc_sense_data));
454 if (retval) {
455 retval = -EFAULT;
456 goto out;
459 if (sense_data->signature != ZFCP_CFDC_SIGNATURE) {
460 ZFCP_LOG_INFO("invalid sense data request signature 0x%08x\n",
461 ZFCP_CFDC_SIGNATURE);
462 retval = -EINVAL;
463 goto out;
466 switch (sense_data->command) {
468 case ZFCP_CFDC_CMND_DOWNLOAD_NORMAL:
469 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
470 option = FSF_CFDC_OPTION_NORMAL_MODE;
471 break;
473 case ZFCP_CFDC_CMND_DOWNLOAD_FORCE:
474 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
475 option = FSF_CFDC_OPTION_FORCE;
476 break;
478 case ZFCP_CFDC_CMND_FULL_ACCESS:
479 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
480 option = FSF_CFDC_OPTION_FULL_ACCESS;
481 break;
483 case ZFCP_CFDC_CMND_RESTRICTED_ACCESS:
484 fsf_command = FSF_QTCB_DOWNLOAD_CONTROL_FILE;
485 option = FSF_CFDC_OPTION_RESTRICTED_ACCESS;
486 break;
488 case ZFCP_CFDC_CMND_UPLOAD:
489 fsf_command = FSF_QTCB_UPLOAD_CONTROL_FILE;
490 option = 0;
491 break;
493 default:
494 ZFCP_LOG_INFO("invalid command code 0x%08x\n",
495 sense_data->command);
496 retval = -EINVAL;
497 goto out;
500 bus_id = kmalloc(BUS_ID_SIZE, GFP_KERNEL);
501 if (bus_id == NULL) {
502 retval = -ENOMEM;
503 goto out;
505 snprintf(bus_id, BUS_ID_SIZE, "%d.%d.%04x",
506 (sense_data->devno >> 24),
507 (sense_data->devno >> 16) & 0xFF,
508 (sense_data->devno & 0xFFFF));
510 read_lock_irq(&zfcp_data.config_lock);
511 adapter = zfcp_get_adapter_by_busid(bus_id);
512 if (adapter)
513 zfcp_adapter_get(adapter);
514 read_unlock_irq(&zfcp_data.config_lock);
516 kfree(bus_id);
518 if (adapter == NULL) {
519 ZFCP_LOG_INFO("invalid adapter\n");
520 retval = -ENXIO;
521 goto out;
524 if (sense_data->command & ZFCP_CFDC_WITH_CONTROL_FILE) {
525 retval = zfcp_sg_list_alloc(sg_list,
526 ZFCP_CFDC_MAX_CONTROL_FILE_SIZE);
527 if (retval) {
528 retval = -ENOMEM;
529 goto out;
533 if ((sense_data->command & ZFCP_CFDC_DOWNLOAD) &&
534 (sense_data->command & ZFCP_CFDC_WITH_CONTROL_FILE)) {
535 retval = zfcp_sg_list_copy_from_user(
536 sg_list, &sense_data_user->control_file,
537 ZFCP_CFDC_MAX_CONTROL_FILE_SIZE);
538 if (retval) {
539 retval = -EFAULT;
540 goto out;
544 retval = zfcp_fsf_control_file(adapter, &fsf_req, fsf_command,
545 option, sg_list);
546 if (retval)
547 goto out;
549 if ((fsf_req->qtcb->prefix.prot_status != FSF_PROT_GOOD) &&
550 (fsf_req->qtcb->prefix.prot_status != FSF_PROT_FSF_STATUS_PRESENTED)) {
551 retval = -ENXIO;
552 goto out;
555 sense_data->fsf_status = fsf_req->qtcb->header.fsf_status;
556 memcpy(&sense_data->fsf_status_qual,
557 &fsf_req->qtcb->header.fsf_status_qual,
558 sizeof(union fsf_status_qual));
559 memcpy(&sense_data->payloads, &fsf_req->qtcb->bottom.support.els, 256);
561 retval = copy_to_user(sense_data_user, sense_data,
562 sizeof(struct zfcp_cfdc_sense_data));
563 if (retval) {
564 retval = -EFAULT;
565 goto out;
568 if (sense_data->command & ZFCP_CFDC_UPLOAD) {
569 retval = zfcp_sg_list_copy_to_user(
570 &sense_data_user->control_file, sg_list,
571 ZFCP_CFDC_MAX_CONTROL_FILE_SIZE);
572 if (retval) {
573 retval = -EFAULT;
574 goto out;
578 out:
579 if (fsf_req != NULL)
580 zfcp_fsf_req_free(fsf_req);
582 if ((adapter != NULL) && (retval != -ENXIO))
583 zfcp_adapter_put(adapter);
585 if (sg_list != NULL) {
586 zfcp_sg_list_free(sg_list);
587 kfree(sg_list);
590 kfree(sense_data);
592 return retval;
597 * zfcp_sg_list_alloc - create a scatter-gather list of the specified size
598 * @sg_list: structure describing a scatter gather list
599 * @size: size of scatter-gather list
600 * Return: 0 on success, else -ENOMEM
602 * In sg_list->sg a pointer to the created scatter-gather list is returned,
603 * or NULL if we run out of memory. sg_list->count specifies the number of
604 * elements of the scatter-gather list. The maximum size of a single element
605 * in the scatter-gather list is PAGE_SIZE.
607 static int
608 zfcp_sg_list_alloc(struct zfcp_sg_list *sg_list, size_t size)
610 struct scatterlist *sg;
611 unsigned int i;
612 int retval = 0;
613 void *address;
615 BUG_ON(sg_list == NULL);
617 sg_list->count = size >> PAGE_SHIFT;
618 if (size & ~PAGE_MASK)
619 sg_list->count++;
620 sg_list->sg = kcalloc(sg_list->count, sizeof(struct scatterlist),
621 GFP_KERNEL);
622 if (sg_list->sg == NULL) {
623 sg_list->count = 0;
624 retval = -ENOMEM;
625 goto out;
628 for (i = 0, sg = sg_list->sg; i < sg_list->count; i++, sg++) {
629 sg->length = min(size, PAGE_SIZE);
630 sg->offset = 0;
631 address = (void *) get_zeroed_page(GFP_KERNEL);
632 if (address == NULL) {
633 sg_list->count = i;
634 zfcp_sg_list_free(sg_list);
635 retval = -ENOMEM;
636 goto out;
638 zfcp_address_to_sg(address, sg);
639 size -= sg->length;
642 out:
643 return retval;
648 * zfcp_sg_list_free - free memory of a scatter-gather list
649 * @sg_list: structure describing a scatter-gather list
651 * Memory for each element in the scatter-gather list is freed.
652 * Finally sg_list->sg is freed itself and sg_list->count is reset.
654 static void
655 zfcp_sg_list_free(struct zfcp_sg_list *sg_list)
657 struct scatterlist *sg;
658 unsigned int i;
660 BUG_ON(sg_list == NULL);
662 for (i = 0, sg = sg_list->sg; i < sg_list->count; i++, sg++)
663 free_page((unsigned long) zfcp_sg_to_address(sg));
665 sg_list->count = 0;
666 kfree(sg_list->sg);
670 * zfcp_sg_size - determine size of a scatter-gather list
671 * @sg: array of (struct scatterlist)
672 * @sg_count: elements in array
673 * Return: size of entire scatter-gather list
675 size_t
676 zfcp_sg_size(struct scatterlist *sg, unsigned int sg_count)
678 unsigned int i;
679 struct scatterlist *p;
680 size_t size;
682 size = 0;
683 for (i = 0, p = sg; i < sg_count; i++, p++) {
684 BUG_ON(p == NULL);
685 size += p->length;
688 return size;
693 * zfcp_sg_list_copy_from_user -copy data from user space to scatter-gather list
694 * @sg_list: structure describing a scatter-gather list
695 * @user_buffer: pointer to buffer in user space
696 * @size: number of bytes to be copied
697 * Return: 0 on success, -EFAULT if copy_from_user fails.
699 static int
700 zfcp_sg_list_copy_from_user(struct zfcp_sg_list *sg_list,
701 void __user *user_buffer,
702 size_t size)
704 struct scatterlist *sg;
705 unsigned int length;
706 void *zfcp_buffer;
707 int retval = 0;
709 BUG_ON(sg_list == NULL);
711 if (zfcp_sg_size(sg_list->sg, sg_list->count) < size)
712 return -EFAULT;
714 for (sg = sg_list->sg; size > 0; sg++) {
715 length = min((unsigned int)size, sg->length);
716 zfcp_buffer = zfcp_sg_to_address(sg);
717 if (copy_from_user(zfcp_buffer, user_buffer, length)) {
718 retval = -EFAULT;
719 goto out;
721 user_buffer += length;
722 size -= length;
725 out:
726 return retval;
731 * zfcp_sg_list_copy_to_user - copy data from scatter-gather list to user space
732 * @user_buffer: pointer to buffer in user space
733 * @sg_list: structure describing a scatter-gather list
734 * @size: number of bytes to be copied
735 * Return: 0 on success, -EFAULT if copy_to_user fails
737 static int
738 zfcp_sg_list_copy_to_user(void __user *user_buffer,
739 struct zfcp_sg_list *sg_list,
740 size_t size)
742 struct scatterlist *sg;
743 unsigned int length;
744 void *zfcp_buffer;
745 int retval = 0;
747 BUG_ON(sg_list == NULL);
749 if (zfcp_sg_size(sg_list->sg, sg_list->count) < size)
750 return -EFAULT;
752 for (sg = sg_list->sg; size > 0; sg++) {
753 length = min((unsigned int) size, sg->length);
754 zfcp_buffer = zfcp_sg_to_address(sg);
755 if (copy_to_user(user_buffer, zfcp_buffer, length)) {
756 retval = -EFAULT;
757 goto out;
759 user_buffer += length;
760 size -= length;
763 out:
764 return retval;
768 #undef ZFCP_LOG_AREA
770 /****************************************************************/
771 /****** Functions for configuration/set-up of structures ********/
772 /****************************************************************/
774 #define ZFCP_LOG_AREA ZFCP_LOG_AREA_CONFIG
777 * zfcp_get_unit_by_lun - find unit in unit list of port by FCP LUN
778 * @port: pointer to port to search for unit
779 * @fcp_lun: FCP LUN to search for
780 * Traverse list of all units of a port and return pointer to a unit
781 * with the given FCP LUN.
783 struct zfcp_unit *
784 zfcp_get_unit_by_lun(struct zfcp_port *port, fcp_lun_t fcp_lun)
786 struct zfcp_unit *unit;
787 int found = 0;
789 list_for_each_entry(unit, &port->unit_list_head, list) {
790 if ((unit->fcp_lun == fcp_lun) &&
791 !atomic_test_mask(ZFCP_STATUS_COMMON_REMOVE, &unit->status))
793 found = 1;
794 break;
797 return found ? unit : NULL;
801 * zfcp_get_port_by_wwpn - find port in port list of adapter by wwpn
802 * @adapter: pointer to adapter to search for port
803 * @wwpn: wwpn to search for
804 * Traverse list of all ports of an adapter and return pointer to a port
805 * with the given wwpn.
807 struct zfcp_port *
808 zfcp_get_port_by_wwpn(struct zfcp_adapter *adapter, wwn_t wwpn)
810 struct zfcp_port *port;
811 int found = 0;
813 list_for_each_entry(port, &adapter->port_list_head, list) {
814 if ((port->wwpn == wwpn) &&
815 !(atomic_read(&port->status) &
816 (ZFCP_STATUS_PORT_NO_WWPN | ZFCP_STATUS_COMMON_REMOVE))) {
817 found = 1;
818 break;
821 return found ? port : NULL;
825 * zfcp_get_port_by_did - find port in port list of adapter by d_id
826 * @adapter: pointer to adapter to search for port
827 * @d_id: d_id to search for
828 * Traverse list of all ports of an adapter and return pointer to a port
829 * with the given d_id.
831 struct zfcp_port *
832 zfcp_get_port_by_did(struct zfcp_adapter *adapter, u32 d_id)
834 struct zfcp_port *port;
835 int found = 0;
837 list_for_each_entry(port, &adapter->port_list_head, list) {
838 if ((port->d_id == d_id) &&
839 !atomic_test_mask(ZFCP_STATUS_COMMON_REMOVE, &port->status))
841 found = 1;
842 break;
845 return found ? port : NULL;
849 * zfcp_get_adapter_by_busid - find adpater in adapter list by bus_id
850 * @bus_id: bus_id to search for
851 * Traverse list of all adapters and return pointer to an adapter
852 * with the given bus_id.
854 struct zfcp_adapter *
855 zfcp_get_adapter_by_busid(char *bus_id)
857 struct zfcp_adapter *adapter;
858 int found = 0;
860 list_for_each_entry(adapter, &zfcp_data.adapter_list_head, list) {
861 if ((strncmp(bus_id, zfcp_get_busid_by_adapter(adapter),
862 BUS_ID_SIZE) == 0) &&
863 !atomic_test_mask(ZFCP_STATUS_COMMON_REMOVE,
864 &adapter->status)){
865 found = 1;
866 break;
869 return found ? adapter : NULL;
873 * zfcp_unit_enqueue - enqueue unit to unit list of a port.
874 * @port: pointer to port where unit is added
875 * @fcp_lun: FCP LUN of unit to be enqueued
876 * Return: pointer to enqueued unit on success, NULL on error
877 * Locks: config_sema must be held to serialize changes to the unit list
879 * Sets up some unit internal structures and creates sysfs entry.
881 struct zfcp_unit *
882 zfcp_unit_enqueue(struct zfcp_port *port, fcp_lun_t fcp_lun)
884 struct zfcp_unit *unit, *tmp_unit;
885 unsigned int scsi_lun;
886 int found;
889 * check that there is no unit with this FCP_LUN already in list
890 * and enqueue it.
891 * Note: Unlike for the adapter and the port, this is an error
893 read_lock_irq(&zfcp_data.config_lock);
894 unit = zfcp_get_unit_by_lun(port, fcp_lun);
895 read_unlock_irq(&zfcp_data.config_lock);
896 if (unit)
897 return NULL;
899 unit = kzalloc(sizeof (struct zfcp_unit), GFP_KERNEL);
900 if (!unit)
901 return NULL;
903 /* initialise reference count stuff */
904 atomic_set(&unit->refcount, 0);
905 init_waitqueue_head(&unit->remove_wq);
907 unit->port = port;
908 unit->fcp_lun = fcp_lun;
910 /* setup for sysfs registration */
911 snprintf(unit->sysfs_device.bus_id, BUS_ID_SIZE, "0x%016llx", fcp_lun);
912 unit->sysfs_device.parent = &port->sysfs_device;
913 unit->sysfs_device.release = zfcp_sysfs_unit_release;
914 dev_set_drvdata(&unit->sysfs_device, unit);
916 init_waitqueue_head(&unit->scsi_scan_wq);
918 /* mark unit unusable as long as sysfs registration is not complete */
919 atomic_set_mask(ZFCP_STATUS_COMMON_REMOVE, &unit->status);
921 if (device_register(&unit->sysfs_device)) {
922 kfree(unit);
923 return NULL;
926 if (zfcp_sysfs_unit_create_files(&unit->sysfs_device)) {
927 device_unregister(&unit->sysfs_device);
928 return NULL;
931 zfcp_unit_get(unit);
933 scsi_lun = 0;
934 found = 0;
935 write_lock_irq(&zfcp_data.config_lock);
936 list_for_each_entry(tmp_unit, &port->unit_list_head, list) {
937 if (tmp_unit->scsi_lun != scsi_lun) {
938 found = 1;
939 break;
941 scsi_lun++;
943 unit->scsi_lun = scsi_lun;
944 if (found)
945 list_add_tail(&unit->list, &tmp_unit->list);
946 else
947 list_add_tail(&unit->list, &port->unit_list_head);
948 atomic_clear_mask(ZFCP_STATUS_COMMON_REMOVE, &unit->status);
949 atomic_set_mask(ZFCP_STATUS_COMMON_RUNNING, &unit->status);
950 write_unlock_irq(&zfcp_data.config_lock);
952 port->units++;
953 zfcp_port_get(port);
955 return unit;
958 void
959 zfcp_unit_dequeue(struct zfcp_unit *unit)
961 zfcp_unit_wait(unit);
962 write_lock_irq(&zfcp_data.config_lock);
963 list_del(&unit->list);
964 write_unlock_irq(&zfcp_data.config_lock);
965 unit->port->units--;
966 zfcp_port_put(unit->port);
967 zfcp_sysfs_unit_remove_files(&unit->sysfs_device);
968 device_unregister(&unit->sysfs_device);
972 * Allocates a combined QTCB/fsf_req buffer for erp actions and fcp/SCSI
973 * commands.
974 * It also genrates fcp-nameserver request/response buffer and unsolicited
975 * status read fsf_req buffers.
977 * locks: must only be called with zfcp_data.config_sema taken
979 static int
980 zfcp_allocate_low_mem_buffers(struct zfcp_adapter *adapter)
982 adapter->pool.fsf_req_erp =
983 mempool_create_slab_pool(ZFCP_POOL_FSF_REQ_ERP_NR,
984 zfcp_data.fsf_req_qtcb_cache);
985 if (!adapter->pool.fsf_req_erp)
986 return -ENOMEM;
988 adapter->pool.fsf_req_scsi =
989 mempool_create_slab_pool(ZFCP_POOL_FSF_REQ_SCSI_NR,
990 zfcp_data.fsf_req_qtcb_cache);
991 if (!adapter->pool.fsf_req_scsi)
992 return -ENOMEM;
994 adapter->pool.fsf_req_abort =
995 mempool_create_slab_pool(ZFCP_POOL_FSF_REQ_ABORT_NR,
996 zfcp_data.fsf_req_qtcb_cache);
997 if (!adapter->pool.fsf_req_abort)
998 return -ENOMEM;
1000 adapter->pool.fsf_req_status_read =
1001 mempool_create_kmalloc_pool(ZFCP_POOL_STATUS_READ_NR,
1002 sizeof(struct zfcp_fsf_req));
1003 if (!adapter->pool.fsf_req_status_read)
1004 return -ENOMEM;
1006 adapter->pool.data_status_read =
1007 mempool_create_slab_pool(ZFCP_POOL_STATUS_READ_NR,
1008 zfcp_data.sr_buffer_cache);
1009 if (!adapter->pool.data_status_read)
1010 return -ENOMEM;
1012 adapter->pool.data_gid_pn =
1013 mempool_create_slab_pool(ZFCP_POOL_DATA_GID_PN_NR,
1014 zfcp_data.gid_pn_cache);
1015 if (!adapter->pool.data_gid_pn)
1016 return -ENOMEM;
1018 return 0;
1022 * zfcp_free_low_mem_buffers - free memory pools of an adapter
1023 * @adapter: pointer to zfcp_adapter for which memory pools should be freed
1024 * locking: zfcp_data.config_sema must be held
1026 static void
1027 zfcp_free_low_mem_buffers(struct zfcp_adapter *adapter)
1029 if (adapter->pool.fsf_req_erp)
1030 mempool_destroy(adapter->pool.fsf_req_erp);
1031 if (adapter->pool.fsf_req_scsi)
1032 mempool_destroy(adapter->pool.fsf_req_scsi);
1033 if (adapter->pool.fsf_req_abort)
1034 mempool_destroy(adapter->pool.fsf_req_abort);
1035 if (adapter->pool.fsf_req_status_read)
1036 mempool_destroy(adapter->pool.fsf_req_status_read);
1037 if (adapter->pool.data_status_read)
1038 mempool_destroy(adapter->pool.data_status_read);
1039 if (adapter->pool.data_gid_pn)
1040 mempool_destroy(adapter->pool.data_gid_pn);
1043 void
1044 zfcp_dummy_release(struct device *dev)
1046 return;
1050 * Enqueues an adapter at the end of the adapter list in the driver data.
1051 * All adapter internal structures are set up.
1052 * Proc-fs entries are also created.
1054 * returns: 0 if a new adapter was successfully enqueued
1055 * ZFCP_KNOWN if an adapter with this devno was already present
1056 * -ENOMEM if alloc failed
1057 * locks: config_sema must be held to serialise changes to the adapter list
1059 struct zfcp_adapter *
1060 zfcp_adapter_enqueue(struct ccw_device *ccw_device)
1062 int retval = 0;
1063 struct zfcp_adapter *adapter;
1066 * Note: It is safe to release the list_lock, as any list changes
1067 * are protected by the config_sema, which must be held to get here
1070 /* try to allocate new adapter data structure (zeroed) */
1071 adapter = kzalloc(sizeof (struct zfcp_adapter), GFP_KERNEL);
1072 if (!adapter) {
1073 ZFCP_LOG_INFO("error: allocation of base adapter "
1074 "structure failed\n");
1075 goto out;
1078 ccw_device->handler = NULL;
1080 /* save ccw_device pointer */
1081 adapter->ccw_device = ccw_device;
1083 retval = zfcp_qdio_allocate_queues(adapter);
1084 if (retval)
1085 goto queues_alloc_failed;
1087 retval = zfcp_qdio_allocate(adapter);
1088 if (retval)
1089 goto qdio_allocate_failed;
1091 retval = zfcp_allocate_low_mem_buffers(adapter);
1092 if (retval) {
1093 ZFCP_LOG_INFO("error: pool allocation failed\n");
1094 goto failed_low_mem_buffers;
1097 /* initialise reference count stuff */
1098 atomic_set(&adapter->refcount, 0);
1099 init_waitqueue_head(&adapter->remove_wq);
1101 /* initialise list of ports */
1102 INIT_LIST_HEAD(&adapter->port_list_head);
1104 /* initialise list of ports to be removed */
1105 INIT_LIST_HEAD(&adapter->port_remove_lh);
1107 /* initialize list of fsf requests */
1108 spin_lock_init(&adapter->req_list_lock);
1109 retval = zfcp_reqlist_init(adapter);
1110 if (retval) {
1111 ZFCP_LOG_INFO("request list initialization failed\n");
1112 goto failed_low_mem_buffers;
1115 /* initialize debug locks */
1117 spin_lock_init(&adapter->erp_dbf_lock);
1118 spin_lock_init(&adapter->hba_dbf_lock);
1119 spin_lock_init(&adapter->san_dbf_lock);
1120 spin_lock_init(&adapter->scsi_dbf_lock);
1122 /* initialize error recovery stuff */
1124 rwlock_init(&adapter->erp_lock);
1125 sema_init(&adapter->erp_ready_sem, 0);
1126 INIT_LIST_HEAD(&adapter->erp_ready_head);
1127 INIT_LIST_HEAD(&adapter->erp_running_head);
1129 /* initialize abort lock */
1130 rwlock_init(&adapter->abort_lock);
1132 /* initialise some erp stuff */
1133 init_waitqueue_head(&adapter->erp_thread_wqh);
1134 init_waitqueue_head(&adapter->erp_done_wqh);
1136 /* initialize lock of associated request queue */
1137 rwlock_init(&adapter->request_queue.queue_lock);
1139 /* mark adapter unusable as long as sysfs registration is not complete */
1140 atomic_set_mask(ZFCP_STATUS_COMMON_REMOVE, &adapter->status);
1142 adapter->ccw_device = ccw_device;
1143 dev_set_drvdata(&ccw_device->dev, adapter);
1145 if (zfcp_sysfs_adapter_create_files(&ccw_device->dev))
1146 goto sysfs_failed;
1148 adapter->generic_services.parent = &adapter->ccw_device->dev;
1149 adapter->generic_services.release = zfcp_dummy_release;
1150 snprintf(adapter->generic_services.bus_id, BUS_ID_SIZE,
1151 "generic_services");
1153 if (device_register(&adapter->generic_services))
1154 goto generic_services_failed;
1156 /* put allocated adapter at list tail */
1157 write_lock_irq(&zfcp_data.config_lock);
1158 atomic_clear_mask(ZFCP_STATUS_COMMON_REMOVE, &adapter->status);
1159 list_add_tail(&adapter->list, &zfcp_data.adapter_list_head);
1160 write_unlock_irq(&zfcp_data.config_lock);
1162 zfcp_data.adapters++;
1164 goto out;
1166 generic_services_failed:
1167 zfcp_sysfs_adapter_remove_files(&adapter->ccw_device->dev);
1168 sysfs_failed:
1169 dev_set_drvdata(&ccw_device->dev, NULL);
1170 failed_low_mem_buffers:
1171 zfcp_free_low_mem_buffers(adapter);
1172 if (qdio_free(ccw_device) != 0)
1173 ZFCP_LOG_NORMAL("bug: qdio_free for adapter %s failed\n",
1174 zfcp_get_busid_by_adapter(adapter));
1175 qdio_allocate_failed:
1176 zfcp_qdio_free_queues(adapter);
1177 queues_alloc_failed:
1178 kfree(adapter);
1179 adapter = NULL;
1180 out:
1181 return adapter;
1185 * returns: 0 - struct zfcp_adapter data structure successfully removed
1186 * !0 - struct zfcp_adapter data structure could not be removed
1187 * (e.g. still used)
1188 * locks: adapter list write lock is assumed to be held by caller
1190 void
1191 zfcp_adapter_dequeue(struct zfcp_adapter *adapter)
1193 int retval = 0;
1194 unsigned long flags;
1196 device_unregister(&adapter->generic_services);
1197 zfcp_sysfs_adapter_remove_files(&adapter->ccw_device->dev);
1198 dev_set_drvdata(&adapter->ccw_device->dev, NULL);
1199 /* sanity check: no pending FSF requests */
1200 spin_lock_irqsave(&adapter->req_list_lock, flags);
1201 retval = zfcp_reqlist_isempty(adapter);
1202 spin_unlock_irqrestore(&adapter->req_list_lock, flags);
1203 if (!retval) {
1204 ZFCP_LOG_NORMAL("bug: adapter %s (%p) still in use, "
1205 "%i requests outstanding\n",
1206 zfcp_get_busid_by_adapter(adapter), adapter,
1207 atomic_read(&adapter->reqs_active));
1208 retval = -EBUSY;
1209 goto out;
1212 /* remove specified adapter data structure from list */
1213 write_lock_irq(&zfcp_data.config_lock);
1214 list_del(&adapter->list);
1215 write_unlock_irq(&zfcp_data.config_lock);
1217 /* decrease number of adapters in list */
1218 zfcp_data.adapters--;
1220 ZFCP_LOG_TRACE("adapter %s (%p) removed from list, "
1221 "%i adapters still in list\n",
1222 zfcp_get_busid_by_adapter(adapter),
1223 adapter, zfcp_data.adapters);
1225 retval = qdio_free(adapter->ccw_device);
1226 if (retval)
1227 ZFCP_LOG_NORMAL("bug: qdio_free for adapter %s failed\n",
1228 zfcp_get_busid_by_adapter(adapter));
1230 zfcp_free_low_mem_buffers(adapter);
1231 /* free memory of adapter data structure and queues */
1232 zfcp_qdio_free_queues(adapter);
1233 zfcp_reqlist_free(adapter);
1234 kfree(adapter->fc_stats);
1235 kfree(adapter->stats_reset_data);
1236 ZFCP_LOG_TRACE("freeing adapter structure\n");
1237 kfree(adapter);
1238 out:
1239 return;
1243 * zfcp_port_enqueue - enqueue port to port list of adapter
1244 * @adapter: adapter where remote port is added
1245 * @wwpn: WWPN of the remote port to be enqueued
1246 * @status: initial status for the port
1247 * @d_id: destination id of the remote port to be enqueued
1248 * Return: pointer to enqueued port on success, NULL on error
1249 * Locks: config_sema must be held to serialize changes to the port list
1251 * All port internal structures are set up and the sysfs entry is generated.
1252 * d_id is used to enqueue ports with a well known address like the Directory
1253 * Service for nameserver lookup.
1255 struct zfcp_port *
1256 zfcp_port_enqueue(struct zfcp_adapter *adapter, wwn_t wwpn, u32 status,
1257 u32 d_id)
1259 struct zfcp_port *port;
1260 int check_wwpn;
1262 check_wwpn = !(status & ZFCP_STATUS_PORT_NO_WWPN);
1264 * check that there is no port with this WWPN already in list
1266 if (check_wwpn) {
1267 read_lock_irq(&zfcp_data.config_lock);
1268 port = zfcp_get_port_by_wwpn(adapter, wwpn);
1269 read_unlock_irq(&zfcp_data.config_lock);
1270 if (port)
1271 return NULL;
1274 port = kzalloc(sizeof (struct zfcp_port), GFP_KERNEL);
1275 if (!port)
1276 return NULL;
1278 /* initialise reference count stuff */
1279 atomic_set(&port->refcount, 0);
1280 init_waitqueue_head(&port->remove_wq);
1282 INIT_LIST_HEAD(&port->unit_list_head);
1283 INIT_LIST_HEAD(&port->unit_remove_lh);
1285 port->adapter = adapter;
1287 if (check_wwpn)
1288 port->wwpn = wwpn;
1290 atomic_set_mask(status, &port->status);
1292 /* setup for sysfs registration */
1293 if (status & ZFCP_STATUS_PORT_WKA) {
1294 switch (d_id) {
1295 case ZFCP_DID_DIRECTORY_SERVICE:
1296 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1297 "directory");
1298 break;
1299 case ZFCP_DID_MANAGEMENT_SERVICE:
1300 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1301 "management");
1302 break;
1303 case ZFCP_DID_KEY_DISTRIBUTION_SERVICE:
1304 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1305 "key_distribution");
1306 break;
1307 case ZFCP_DID_ALIAS_SERVICE:
1308 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1309 "alias");
1310 break;
1311 case ZFCP_DID_TIME_SERVICE:
1312 snprintf(port->sysfs_device.bus_id, BUS_ID_SIZE,
1313 "time");
1314 break;
1315 default:
1316 kfree(port);
1317 return NULL;
1319 port->d_id = d_id;
1320 port->sysfs_device.parent = &adapter->generic_services;
1321 } else {
1322 snprintf(port->sysfs_device.bus_id,
1323 BUS_ID_SIZE, "0x%016llx", wwpn);
1324 port->sysfs_device.parent = &adapter->ccw_device->dev;
1326 port->sysfs_device.release = zfcp_sysfs_port_release;
1327 dev_set_drvdata(&port->sysfs_device, port);
1329 /* mark port unusable as long as sysfs registration is not complete */
1330 atomic_set_mask(ZFCP_STATUS_COMMON_REMOVE, &port->status);
1332 if (device_register(&port->sysfs_device)) {
1333 kfree(port);
1334 return NULL;
1337 if (zfcp_sysfs_port_create_files(&port->sysfs_device, status)) {
1338 device_unregister(&port->sysfs_device);
1339 return NULL;
1342 zfcp_port_get(port);
1344 write_lock_irq(&zfcp_data.config_lock);
1345 list_add_tail(&port->list, &adapter->port_list_head);
1346 atomic_clear_mask(ZFCP_STATUS_COMMON_REMOVE, &port->status);
1347 atomic_set_mask(ZFCP_STATUS_COMMON_RUNNING, &port->status);
1348 if (d_id == ZFCP_DID_DIRECTORY_SERVICE)
1349 if (!adapter->nameserver_port)
1350 adapter->nameserver_port = port;
1351 adapter->ports++;
1352 write_unlock_irq(&zfcp_data.config_lock);
1354 zfcp_adapter_get(adapter);
1356 return port;
1359 void
1360 zfcp_port_dequeue(struct zfcp_port *port)
1362 zfcp_port_wait(port);
1363 write_lock_irq(&zfcp_data.config_lock);
1364 list_del(&port->list);
1365 port->adapter->ports--;
1366 write_unlock_irq(&zfcp_data.config_lock);
1367 if (port->rport)
1368 fc_remote_port_delete(port->rport);
1369 port->rport = NULL;
1370 zfcp_adapter_put(port->adapter);
1371 zfcp_sysfs_port_remove_files(&port->sysfs_device,
1372 atomic_read(&port->status));
1373 device_unregister(&port->sysfs_device);
1376 /* Enqueues a nameserver port */
1378 zfcp_nameserver_enqueue(struct zfcp_adapter *adapter)
1380 struct zfcp_port *port;
1382 port = zfcp_port_enqueue(adapter, 0, ZFCP_STATUS_PORT_WKA,
1383 ZFCP_DID_DIRECTORY_SERVICE);
1384 if (!port) {
1385 ZFCP_LOG_INFO("error: enqueue of nameserver port for "
1386 "adapter %s failed\n",
1387 zfcp_get_busid_by_adapter(adapter));
1388 return -ENXIO;
1390 zfcp_port_put(port);
1392 return 0;
1395 #undef ZFCP_LOG_AREA
1397 /****************************************************************/
1398 /******* Fibre Channel Standard related Functions **************/
1399 /****************************************************************/
1401 #define ZFCP_LOG_AREA ZFCP_LOG_AREA_FC
1403 void
1404 zfcp_fsf_incoming_els_rscn(struct zfcp_adapter *adapter,
1405 struct fsf_status_read_buffer *status_buffer)
1407 struct fcp_rscn_head *fcp_rscn_head;
1408 struct fcp_rscn_element *fcp_rscn_element;
1409 struct zfcp_port *port;
1410 u16 i;
1411 u16 no_entries;
1412 u32 range_mask;
1413 unsigned long flags;
1415 fcp_rscn_head = (struct fcp_rscn_head *) status_buffer->payload;
1416 fcp_rscn_element = (struct fcp_rscn_element *) status_buffer->payload;
1418 /* see FC-FS */
1419 no_entries = (fcp_rscn_head->payload_len / 4);
1421 for (i = 1; i < no_entries; i++) {
1422 /* skip head and start with 1st element */
1423 fcp_rscn_element++;
1424 switch (fcp_rscn_element->addr_format) {
1425 case ZFCP_PORT_ADDRESS:
1426 range_mask = ZFCP_PORTS_RANGE_PORT;
1427 break;
1428 case ZFCP_AREA_ADDRESS:
1429 range_mask = ZFCP_PORTS_RANGE_AREA;
1430 break;
1431 case ZFCP_DOMAIN_ADDRESS:
1432 range_mask = ZFCP_PORTS_RANGE_DOMAIN;
1433 break;
1434 case ZFCP_FABRIC_ADDRESS:
1435 range_mask = ZFCP_PORTS_RANGE_FABRIC;
1436 break;
1437 default:
1438 ZFCP_LOG_INFO("incoming RSCN with unknown "
1439 "address format\n");
1440 continue;
1442 read_lock_irqsave(&zfcp_data.config_lock, flags);
1443 list_for_each_entry(port, &adapter->port_list_head, list) {
1444 if (atomic_test_mask
1445 (ZFCP_STATUS_PORT_WKA, &port->status))
1446 continue;
1447 /* Do we know this port? If not skip it. */
1448 if (!atomic_test_mask
1449 (ZFCP_STATUS_PORT_DID_DID, &port->status)) {
1450 ZFCP_LOG_INFO("incoming RSCN, trying to open "
1451 "port 0x%016Lx\n", port->wwpn);
1452 zfcp_erp_port_reopen(port,
1453 ZFCP_STATUS_COMMON_ERP_FAILED);
1454 continue;
1458 * FIXME: race: d_id might being invalidated
1459 * (...DID_DID reset)
1461 if ((port->d_id & range_mask)
1462 == (fcp_rscn_element->nport_did & range_mask)) {
1463 ZFCP_LOG_TRACE("reopen did 0x%08x\n",
1464 fcp_rscn_element->nport_did);
1466 * Unfortunately, an RSCN does not specify the
1467 * type of change a target underwent. We assume
1468 * that it makes sense to reopen the link.
1469 * FIXME: Shall we try to find out more about
1470 * the target and link state before closing it?
1471 * How to accomplish this? (nameserver?)
1472 * Where would such code be put in?
1473 * (inside or outside erp)
1475 ZFCP_LOG_INFO("incoming RSCN, trying to open "
1476 "port 0x%016Lx\n", port->wwpn);
1477 zfcp_test_link(port);
1480 read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1484 static void
1485 zfcp_fsf_incoming_els_plogi(struct zfcp_adapter *adapter,
1486 struct fsf_status_read_buffer *status_buffer)
1488 struct fsf_plogi *els_plogi;
1489 struct zfcp_port *port;
1490 unsigned long flags;
1492 els_plogi = (struct fsf_plogi *) status_buffer->payload;
1493 read_lock_irqsave(&zfcp_data.config_lock, flags);
1494 list_for_each_entry(port, &adapter->port_list_head, list) {
1495 if (port->wwpn == (*(wwn_t *) &els_plogi->serv_param.wwpn))
1496 break;
1498 read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1500 if (!port || (port->wwpn != (*(wwn_t *) &els_plogi->serv_param.wwpn))) {
1501 ZFCP_LOG_DEBUG("ignored incoming PLOGI for nonexisting port "
1502 "with d_id 0x%06x on adapter %s\n",
1503 status_buffer->d_id,
1504 zfcp_get_busid_by_adapter(adapter));
1505 } else {
1506 zfcp_erp_port_forced_reopen(port, 0);
1510 static void
1511 zfcp_fsf_incoming_els_logo(struct zfcp_adapter *adapter,
1512 struct fsf_status_read_buffer *status_buffer)
1514 struct fcp_logo *els_logo = (struct fcp_logo *) status_buffer->payload;
1515 struct zfcp_port *port;
1516 unsigned long flags;
1518 read_lock_irqsave(&zfcp_data.config_lock, flags);
1519 list_for_each_entry(port, &adapter->port_list_head, list) {
1520 if (port->wwpn == els_logo->nport_wwpn)
1521 break;
1523 read_unlock_irqrestore(&zfcp_data.config_lock, flags);
1525 if (!port || (port->wwpn != els_logo->nport_wwpn)) {
1526 ZFCP_LOG_DEBUG("ignored incoming LOGO for nonexisting port "
1527 "with d_id 0x%06x on adapter %s\n",
1528 status_buffer->d_id,
1529 zfcp_get_busid_by_adapter(adapter));
1530 } else {
1531 zfcp_erp_port_forced_reopen(port, 0);
1535 static void
1536 zfcp_fsf_incoming_els_unknown(struct zfcp_adapter *adapter,
1537 struct fsf_status_read_buffer *status_buffer)
1539 ZFCP_LOG_NORMAL("warning: unknown incoming ELS 0x%08x "
1540 "for adapter %s\n", *(u32 *) (status_buffer->payload),
1541 zfcp_get_busid_by_adapter(adapter));
1545 void
1546 zfcp_fsf_incoming_els(struct zfcp_fsf_req *fsf_req)
1548 struct fsf_status_read_buffer *status_buffer;
1549 u32 els_type;
1550 struct zfcp_adapter *adapter;
1552 status_buffer = (struct fsf_status_read_buffer *) fsf_req->data;
1553 els_type = *(u32 *) (status_buffer->payload);
1554 adapter = fsf_req->adapter;
1556 zfcp_san_dbf_event_incoming_els(fsf_req);
1557 if (els_type == LS_PLOGI)
1558 zfcp_fsf_incoming_els_plogi(adapter, status_buffer);
1559 else if (els_type == LS_LOGO)
1560 zfcp_fsf_incoming_els_logo(adapter, status_buffer);
1561 else if ((els_type & 0xffff0000) == LS_RSCN)
1562 /* we are only concerned with the command, not the length */
1563 zfcp_fsf_incoming_els_rscn(adapter, status_buffer);
1564 else
1565 zfcp_fsf_incoming_els_unknown(adapter, status_buffer);
1570 * zfcp_gid_pn_buffers_alloc - allocate buffers for GID_PN nameserver request
1571 * @gid_pn: pointer to return pointer to struct zfcp_gid_pn_data
1572 * @pool: pointer to mempool_t if non-null memory pool is used for allocation
1574 static int
1575 zfcp_gid_pn_buffers_alloc(struct zfcp_gid_pn_data **gid_pn, mempool_t *pool)
1577 struct zfcp_gid_pn_data *data;
1579 if (pool != NULL) {
1580 data = mempool_alloc(pool, GFP_ATOMIC);
1581 if (likely(data != NULL)) {
1582 data->ct.pool = pool;
1584 } else {
1585 data = kmalloc(sizeof(struct zfcp_gid_pn_data), GFP_ATOMIC);
1588 if (NULL == data)
1589 return -ENOMEM;
1591 memset(data, 0, sizeof(*data));
1592 data->ct.req = &data->req;
1593 data->ct.resp = &data->resp;
1594 data->ct.req_count = data->ct.resp_count = 1;
1595 zfcp_address_to_sg(&data->ct_iu_req, &data->req);
1596 zfcp_address_to_sg(&data->ct_iu_resp, &data->resp);
1597 data->req.length = sizeof(struct ct_iu_gid_pn_req);
1598 data->resp.length = sizeof(struct ct_iu_gid_pn_resp);
1600 *gid_pn = data;
1601 return 0;
1605 * zfcp_gid_pn_buffers_free - free buffers for GID_PN nameserver request
1606 * @gid_pn: pointer to struct zfcp_gid_pn_data which has to be freed
1608 static void
1609 zfcp_gid_pn_buffers_free(struct zfcp_gid_pn_data *gid_pn)
1611 if ((gid_pn->ct.pool != 0))
1612 mempool_free(gid_pn, gid_pn->ct.pool);
1613 else
1614 kfree(gid_pn);
1616 return;
1620 * zfcp_ns_gid_pn_request - initiate GID_PN nameserver request
1621 * @erp_action: pointer to zfcp_erp_action where GID_PN request is needed
1624 zfcp_ns_gid_pn_request(struct zfcp_erp_action *erp_action)
1626 int ret;
1627 struct ct_iu_gid_pn_req *ct_iu_req;
1628 struct zfcp_gid_pn_data *gid_pn;
1629 struct zfcp_adapter *adapter = erp_action->adapter;
1631 ret = zfcp_gid_pn_buffers_alloc(&gid_pn, adapter->pool.data_gid_pn);
1632 if (ret < 0) {
1633 ZFCP_LOG_INFO("error: buffer allocation for gid_pn nameserver "
1634 "request failed for adapter %s\n",
1635 zfcp_get_busid_by_adapter(adapter));
1636 goto out;
1639 /* setup nameserver request */
1640 ct_iu_req = zfcp_sg_to_address(gid_pn->ct.req);
1641 ct_iu_req->header.revision = ZFCP_CT_REVISION;
1642 ct_iu_req->header.gs_type = ZFCP_CT_DIRECTORY_SERVICE;
1643 ct_iu_req->header.gs_subtype = ZFCP_CT_NAME_SERVER;
1644 ct_iu_req->header.options = ZFCP_CT_SYNCHRONOUS;
1645 ct_iu_req->header.cmd_rsp_code = ZFCP_CT_GID_PN;
1646 ct_iu_req->header.max_res_size = ZFCP_CT_MAX_SIZE;
1647 ct_iu_req->wwpn = erp_action->port->wwpn;
1649 /* setup parameters for send generic command */
1650 gid_pn->ct.port = adapter->nameserver_port;
1651 gid_pn->ct.handler = zfcp_ns_gid_pn_handler;
1652 gid_pn->ct.handler_data = (unsigned long) gid_pn;
1653 gid_pn->ct.timeout = ZFCP_NS_GID_PN_TIMEOUT;
1654 gid_pn->port = erp_action->port;
1656 ret = zfcp_fsf_send_ct(&gid_pn->ct, adapter->pool.fsf_req_erp,
1657 erp_action);
1658 if (ret) {
1659 ZFCP_LOG_INFO("error: initiation of gid_pn nameserver request "
1660 "failed for adapter %s\n",
1661 zfcp_get_busid_by_adapter(adapter));
1663 zfcp_gid_pn_buffers_free(gid_pn);
1666 out:
1667 return ret;
1671 * zfcp_ns_gid_pn_handler - handler for GID_PN nameserver request
1672 * @data: unsigned long, contains pointer to struct zfcp_gid_pn_data
1674 static void zfcp_ns_gid_pn_handler(unsigned long data)
1676 struct zfcp_port *port;
1677 struct zfcp_send_ct *ct;
1678 struct ct_iu_gid_pn_req *ct_iu_req;
1679 struct ct_iu_gid_pn_resp *ct_iu_resp;
1680 struct zfcp_gid_pn_data *gid_pn;
1683 gid_pn = (struct zfcp_gid_pn_data *) data;
1684 port = gid_pn->port;
1685 ct = &gid_pn->ct;
1686 ct_iu_req = zfcp_sg_to_address(ct->req);
1687 ct_iu_resp = zfcp_sg_to_address(ct->resp);
1689 if (ct->status != 0)
1690 goto failed;
1692 if (zfcp_check_ct_response(&ct_iu_resp->header)) {
1693 /* FIXME: do we need some specific erp entry points */
1694 atomic_set_mask(ZFCP_STATUS_PORT_INVALID_WWPN, &port->status);
1695 goto failed;
1697 /* paranoia */
1698 if (ct_iu_req->wwpn != port->wwpn) {
1699 ZFCP_LOG_NORMAL("bug: wwpn 0x%016Lx returned by nameserver "
1700 "lookup does not match expected wwpn 0x%016Lx "
1701 "for adapter %s\n", ct_iu_req->wwpn, port->wwpn,
1702 zfcp_get_busid_by_port(port));
1703 goto mismatch;
1706 /* looks like a valid d_id */
1707 port->d_id = ct_iu_resp->d_id & ZFCP_DID_MASK;
1708 atomic_set_mask(ZFCP_STATUS_PORT_DID_DID, &port->status);
1709 ZFCP_LOG_DEBUG("adapter %s: wwpn=0x%016Lx ---> d_id=0x%06x\n",
1710 zfcp_get_busid_by_port(port), port->wwpn, port->d_id);
1711 goto out;
1713 mismatch:
1714 ZFCP_LOG_DEBUG("CT IUs do not match:\n");
1715 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG, (char *) ct_iu_req,
1716 sizeof(struct ct_iu_gid_pn_req));
1717 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG, (char *) ct_iu_resp,
1718 sizeof(struct ct_iu_gid_pn_resp));
1720 failed:
1721 ZFCP_LOG_NORMAL("warning: failed gid_pn nameserver request for wwpn "
1722 "0x%016Lx for adapter %s\n",
1723 port->wwpn, zfcp_get_busid_by_port(port));
1724 out:
1725 zfcp_gid_pn_buffers_free(gid_pn);
1726 return;
1729 /* reject CT_IU reason codes acc. to FC-GS-4 */
1730 static const struct zfcp_rc_entry zfcp_ct_rc[] = {
1731 {0x01, "invalid command code"},
1732 {0x02, "invalid version level"},
1733 {0x03, "logical error"},
1734 {0x04, "invalid CT_IU size"},
1735 {0x05, "logical busy"},
1736 {0x07, "protocol error"},
1737 {0x09, "unable to perform command request"},
1738 {0x0b, "command not supported"},
1739 {0x0d, "server not available"},
1740 {0x0e, "session could not be established"},
1741 {0xff, "vendor specific error"},
1742 {0, NULL},
1745 /* LS_RJT reason codes acc. to FC-FS */
1746 static const struct zfcp_rc_entry zfcp_ls_rjt_rc[] = {
1747 {0x01, "invalid LS_Command code"},
1748 {0x03, "logical error"},
1749 {0x05, "logical busy"},
1750 {0x07, "protocol error"},
1751 {0x09, "unable to perform command request"},
1752 {0x0b, "command not supported"},
1753 {0x0e, "command already in progress"},
1754 {0xff, "vendor specific error"},
1755 {0, NULL},
1758 /* reject reason codes according to FC-PH/FC-FS */
1759 static const struct zfcp_rc_entry zfcp_p_rjt_rc[] = {
1760 {0x01, "invalid D_ID"},
1761 {0x02, "invalid S_ID"},
1762 {0x03, "Nx_Port not available, temporary"},
1763 {0x04, "Nx_Port not available, permament"},
1764 {0x05, "class not supported"},
1765 {0x06, "delimiter usage error"},
1766 {0x07, "TYPE not supported"},
1767 {0x08, "invalid Link_Control"},
1768 {0x09, "invalid R_CTL field"},
1769 {0x0a, "invalid F_CTL field"},
1770 {0x0b, "invalid OX_ID"},
1771 {0x0c, "invalid RX_ID"},
1772 {0x0d, "invalid SEQ_ID"},
1773 {0x0e, "invalid DF_CTL"},
1774 {0x0f, "invalid SEQ_CNT"},
1775 {0x10, "invalid parameter field"},
1776 {0x11, "exchange error"},
1777 {0x12, "protocol error"},
1778 {0x13, "incorrect length"},
1779 {0x14, "unsupported ACK"},
1780 {0x15, "class of service not supported by entity at FFFFFE"},
1781 {0x16, "login required"},
1782 {0x17, "excessive sequences attempted"},
1783 {0x18, "unable to establish exchange"},
1784 {0x1a, "fabric path not available"},
1785 {0x1b, "invalid VC_ID (class 4)"},
1786 {0x1c, "invalid CS_CTL field"},
1787 {0x1d, "insufficient resources for VC (class 4)"},
1788 {0x1f, "invalid class of service"},
1789 {0x20, "preemption request rejected"},
1790 {0x21, "preemption not enabled"},
1791 {0x22, "multicast error"},
1792 {0x23, "multicast error terminate"},
1793 {0x24, "process login required"},
1794 {0xff, "vendor specific reject"},
1795 {0, NULL},
1799 * zfcp_rc_description - return description for given reaon code
1800 * @code: reason code
1801 * @rc_table: table of reason codes and descriptions
1803 static const char *
1804 zfcp_rc_description(u8 code, const struct zfcp_rc_entry *rc_table)
1806 const char *descr = "unknown reason code";
1808 do {
1809 if (code == rc_table->code) {
1810 descr = rc_table->description;
1811 break;
1813 rc_table++;
1814 } while (rc_table->code && rc_table->description);
1816 return descr;
1820 * zfcp_check_ct_response - evaluate reason code for CT_IU
1821 * @rjt: response payload to an CT_IU request
1822 * Return: 0 for accept CT_IU, 1 for reject CT_IU or invlid response code
1825 zfcp_check_ct_response(struct ct_hdr *rjt)
1827 if (rjt->cmd_rsp_code == ZFCP_CT_ACCEPT)
1828 return 0;
1830 if (rjt->cmd_rsp_code != ZFCP_CT_REJECT) {
1831 ZFCP_LOG_NORMAL("error: invalid Generic Service command/"
1832 "response code (0x%04hx)\n",
1833 rjt->cmd_rsp_code);
1834 return 1;
1837 ZFCP_LOG_INFO("Generic Service command rejected\n");
1838 ZFCP_LOG_INFO("%s (0x%02x, 0x%02x, 0x%02x)\n",
1839 zfcp_rc_description(rjt->reason_code, zfcp_ct_rc),
1840 (u32) rjt->reason_code, (u32) rjt->reason_code_expl,
1841 (u32) rjt->vendor_unique);
1843 return 1;
1847 * zfcp_print_els_rjt - print reject parameter and description for ELS reject
1848 * @rjt_par: reject parameter acc. to FC-PH/FC-FS
1849 * @rc_table: table of reason codes and descriptions
1851 static void
1852 zfcp_print_els_rjt(struct zfcp_ls_rjt_par *rjt_par,
1853 const struct zfcp_rc_entry *rc_table)
1855 ZFCP_LOG_INFO("%s (%02x %02x %02x %02x)\n",
1856 zfcp_rc_description(rjt_par->reason_code, rc_table),
1857 (u32) rjt_par->action, (u32) rjt_par->reason_code,
1858 (u32) rjt_par->reason_expl, (u32) rjt_par->vendor_unique);
1862 * zfcp_fsf_handle_els_rjt - evaluate status qualifier/reason code on ELS reject
1863 * @sq: status qualifier word
1864 * @rjt_par: reject parameter as described in FC-PH and FC-FS
1865 * Return: -EROMTEIO for LS_RJT, -EREMCHG for invalid D_ID, -EIO else
1868 zfcp_handle_els_rjt(u32 sq, struct zfcp_ls_rjt_par *rjt_par)
1870 int ret = -EIO;
1872 if (sq == FSF_IOSTAT_NPORT_RJT) {
1873 ZFCP_LOG_INFO("ELS rejected (P_RJT)\n");
1874 zfcp_print_els_rjt(rjt_par, zfcp_p_rjt_rc);
1875 /* invalid d_id */
1876 if (rjt_par->reason_code == 0x01)
1877 ret = -EREMCHG;
1878 } else if (sq == FSF_IOSTAT_FABRIC_RJT) {
1879 ZFCP_LOG_INFO("ELS rejected (F_RJT)\n");
1880 zfcp_print_els_rjt(rjt_par, zfcp_p_rjt_rc);
1881 /* invalid d_id */
1882 if (rjt_par->reason_code == 0x01)
1883 ret = -EREMCHG;
1884 } else if (sq == FSF_IOSTAT_LS_RJT) {
1885 ZFCP_LOG_INFO("ELS rejected (LS_RJT)\n");
1886 zfcp_print_els_rjt(rjt_par, zfcp_ls_rjt_rc);
1887 ret = -EREMOTEIO;
1888 } else
1889 ZFCP_LOG_INFO("unexpected SQ: 0x%02x\n", sq);
1891 return ret;
1895 * zfcp_plogi_evaluate - evaluate PLOGI playload and copy important fields
1896 * into zfcp_port structure
1897 * @port: zfcp_port structure
1898 * @plogi: plogi payload
1900 void
1901 zfcp_plogi_evaluate(struct zfcp_port *port, struct fsf_plogi *plogi)
1903 port->maxframe_size = plogi->serv_param.common_serv_param[7] |
1904 ((plogi->serv_param.common_serv_param[6] & 0x0F) << 8);
1905 if (plogi->serv_param.class1_serv_param[0] & 0x80)
1906 port->supported_classes |= FC_COS_CLASS1;
1907 if (plogi->serv_param.class2_serv_param[0] & 0x80)
1908 port->supported_classes |= FC_COS_CLASS2;
1909 if (plogi->serv_param.class3_serv_param[0] & 0x80)
1910 port->supported_classes |= FC_COS_CLASS3;
1911 if (plogi->serv_param.class4_serv_param[0] & 0x80)
1912 port->supported_classes |= FC_COS_CLASS4;
1915 #undef ZFCP_LOG_AREA