1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * zfcp device driver
4  *
5  * Module interface and handling of zfcp data structures.
6  *
7  * Copyright IBM Corp. 2002, 2020
8  */
9 
10 /*
11  * Driver authors:
12  *            Martin Peschke (originator of the driver)
13  *            Raimund Schroeder
14  *            Aron Zeh
15  *            Wolfgang Taphorn
16  *            Stefan Bader
17  *            Heiko Carstens (kernel 2.6 port of the driver)
18  *            Andreas Herrmann
19  *            Maxim Shchetynin
20  *            Volker Sameske
21  *            Ralph Wuerthner
22  *            Michael Loehr
23  *            Swen Schillig
24  *            Christof Schmitt
25  *            Martin Petermann
26  *            Sven Schuetz
27  *            Steffen Maier
28  *	      Benjamin Block
29  */
30 
31 #define KMSG_COMPONENT "zfcp"
32 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
33 
34 #include <linux/seq_file.h>
35 #include <linux/slab.h>
36 #include <linux/module.h>
37 #include "zfcp_ext.h"
38 #include "zfcp_fc.h"
39 #include "zfcp_reqlist.h"
40 #include "zfcp_diag.h"
41 
42 #define ZFCP_BUS_ID_SIZE	20
43 
44 MODULE_AUTHOR("IBM Deutschland Entwicklung GmbH - linux390@de.ibm.com");
45 MODULE_DESCRIPTION("FCP HBA driver");
46 MODULE_LICENSE("GPL");
47 
48 static char *init_device;
49 module_param_named(device, init_device, charp, 0400);
50 MODULE_PARM_DESC(device, "specify initial device");
51 
zfcp_cache_hw_align(const char * name,unsigned long size)52 static struct kmem_cache * __init zfcp_cache_hw_align(const char *name,
53 						      unsigned long size)
54 {
55 	return kmem_cache_create(name, size, roundup_pow_of_two(size), 0, NULL);
56 }
57 
zfcp_init_device_configure(char * busid,u64 wwpn,u64 lun)58 static void __init zfcp_init_device_configure(char *busid, u64 wwpn, u64 lun)
59 {
60 	struct ccw_device *cdev;
61 	struct zfcp_adapter *adapter;
62 	struct zfcp_port *port;
63 
64 	cdev = get_ccwdev_by_busid(&zfcp_ccw_driver, busid);
65 	if (!cdev)
66 		return;
67 
68 	if (ccw_device_set_online(cdev))
69 		goto out_ccw_device;
70 
71 	adapter = zfcp_ccw_adapter_by_cdev(cdev);
72 	if (!adapter)
73 		goto out_ccw_device;
74 
75 	port = zfcp_get_port_by_wwpn(adapter, wwpn);
76 	if (!port)
77 		goto out_port;
78 	flush_work(&port->rport_work);
79 
80 	zfcp_unit_add(port, lun);
81 	put_device(&port->dev);
82 
83 out_port:
84 	zfcp_ccw_adapter_put(adapter);
85 out_ccw_device:
86 	put_device(&cdev->dev);
87 	return;
88 }
89 
zfcp_init_device_setup(char * devstr)90 static void __init zfcp_init_device_setup(char *devstr)
91 {
92 	char *token;
93 	char *str, *str_saved;
94 	char busid[ZFCP_BUS_ID_SIZE];
95 	u64 wwpn, lun;
96 
97 	/* duplicate devstr and keep the original for sysfs presentation*/
98 	str_saved = kstrdup(devstr, GFP_KERNEL);
99 	str = str_saved;
100 	if (!str)
101 		return;
102 
103 	token = strsep(&str, ",");
104 	if (!token || strlen(token) >= ZFCP_BUS_ID_SIZE)
105 		goto err_out;
106 	strscpy(busid, token, ZFCP_BUS_ID_SIZE);
107 
108 	token = strsep(&str, ",");
109 	if (!token || kstrtoull(token, 0, (unsigned long long *) &wwpn))
110 		goto err_out;
111 
112 	token = strsep(&str, ",");
113 	if (!token || kstrtoull(token, 0, (unsigned long long *) &lun))
114 		goto err_out;
115 
116 	kfree(str_saved);
117 	zfcp_init_device_configure(busid, wwpn, lun);
118 	return;
119 
120 err_out:
121 	kfree(str_saved);
122 	pr_err("%s is not a valid SCSI device\n", devstr);
123 }
124 
zfcp_module_init(void)125 static int __init zfcp_module_init(void)
126 {
127 	int retval = -ENOMEM;
128 
129 	if (zfcp_experimental_dix)
130 		pr_warn("DIX is enabled. It is experimental and might cause problems\n");
131 
132 	zfcp_fsf_qtcb_cache = zfcp_cache_hw_align("zfcp_fsf_qtcb",
133 						  sizeof(struct fsf_qtcb));
134 	if (!zfcp_fsf_qtcb_cache)
135 		goto out_qtcb_cache;
136 
137 	zfcp_fc_req_cache = zfcp_cache_hw_align("zfcp_fc_req",
138 						sizeof(struct zfcp_fc_req));
139 	if (!zfcp_fc_req_cache)
140 		goto out_fc_cache;
141 
142 	zfcp_scsi_transport_template =
143 		fc_attach_transport(&zfcp_transport_functions);
144 	if (!zfcp_scsi_transport_template)
145 		goto out_transport;
146 	scsi_transport_reserve_device(zfcp_scsi_transport_template,
147 				      sizeof(struct zfcp_scsi_dev));
148 
149 	retval = ccw_driver_register(&zfcp_ccw_driver);
150 	if (retval) {
151 		pr_err("The zfcp device driver could not register with "
152 		       "the common I/O layer\n");
153 		goto out_ccw_register;
154 	}
155 
156 	if (init_device)
157 		zfcp_init_device_setup(init_device);
158 	return 0;
159 
160 out_ccw_register:
161 	fc_release_transport(zfcp_scsi_transport_template);
162 out_transport:
163 	kmem_cache_destroy(zfcp_fc_req_cache);
164 out_fc_cache:
165 	kmem_cache_destroy(zfcp_fsf_qtcb_cache);
166 out_qtcb_cache:
167 	return retval;
168 }
169 
170 module_init(zfcp_module_init);
171 
zfcp_module_exit(void)172 static void __exit zfcp_module_exit(void)
173 {
174 	ccw_driver_unregister(&zfcp_ccw_driver);
175 	fc_release_transport(zfcp_scsi_transport_template);
176 	kmem_cache_destroy(zfcp_fc_req_cache);
177 	kmem_cache_destroy(zfcp_fsf_qtcb_cache);
178 }
179 
180 module_exit(zfcp_module_exit);
181 
182 /**
183  * zfcp_get_port_by_wwpn - find port in port list of adapter by wwpn
184  * @adapter: pointer to adapter to search for port
185  * @wwpn: wwpn to search for
186  *
187  * Returns: pointer to zfcp_port or NULL
188  */
zfcp_get_port_by_wwpn(struct zfcp_adapter * adapter,u64 wwpn)189 struct zfcp_port *zfcp_get_port_by_wwpn(struct zfcp_adapter *adapter,
190 					u64 wwpn)
191 {
192 	unsigned long flags;
193 	struct zfcp_port *port;
194 
195 	read_lock_irqsave(&adapter->port_list_lock, flags);
196 	list_for_each_entry(port, &adapter->port_list, list)
197 		if (port->wwpn == wwpn) {
198 			if (!get_device(&port->dev))
199 				port = NULL;
200 			read_unlock_irqrestore(&adapter->port_list_lock, flags);
201 			return port;
202 		}
203 	read_unlock_irqrestore(&adapter->port_list_lock, flags);
204 	return NULL;
205 }
206 
zfcp_allocate_low_mem_buffers(struct zfcp_adapter * adapter)207 static int zfcp_allocate_low_mem_buffers(struct zfcp_adapter *adapter)
208 {
209 	adapter->pool.erp_req =
210 		mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
211 	if (!adapter->pool.erp_req)
212 		return -ENOMEM;
213 
214 	adapter->pool.gid_pn_req =
215 		mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
216 	if (!adapter->pool.gid_pn_req)
217 		return -ENOMEM;
218 
219 	adapter->pool.scsi_req =
220 		mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
221 	if (!adapter->pool.scsi_req)
222 		return -ENOMEM;
223 
224 	adapter->pool.scsi_abort =
225 		mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
226 	if (!adapter->pool.scsi_abort)
227 		return -ENOMEM;
228 
229 	adapter->pool.status_read_req =
230 		mempool_create_kmalloc_pool(FSF_STATUS_READS_RECOM,
231 					    sizeof(struct zfcp_fsf_req));
232 	if (!adapter->pool.status_read_req)
233 		return -ENOMEM;
234 
235 	adapter->pool.qtcb_pool =
236 		mempool_create_slab_pool(4, zfcp_fsf_qtcb_cache);
237 	if (!adapter->pool.qtcb_pool)
238 		return -ENOMEM;
239 
240 	BUILD_BUG_ON(sizeof(struct fsf_status_read_buffer) > PAGE_SIZE);
241 	adapter->pool.sr_data =
242 		mempool_create_page_pool(FSF_STATUS_READS_RECOM, 0);
243 	if (!adapter->pool.sr_data)
244 		return -ENOMEM;
245 
246 	adapter->pool.gid_pn =
247 		mempool_create_slab_pool(1, zfcp_fc_req_cache);
248 	if (!adapter->pool.gid_pn)
249 		return -ENOMEM;
250 
251 	return 0;
252 }
253 
zfcp_free_low_mem_buffers(struct zfcp_adapter * adapter)254 static void zfcp_free_low_mem_buffers(struct zfcp_adapter *adapter)
255 {
256 	mempool_destroy(adapter->pool.erp_req);
257 	mempool_destroy(adapter->pool.scsi_req);
258 	mempool_destroy(adapter->pool.scsi_abort);
259 	mempool_destroy(adapter->pool.qtcb_pool);
260 	mempool_destroy(adapter->pool.status_read_req);
261 	mempool_destroy(adapter->pool.sr_data);
262 	mempool_destroy(adapter->pool.gid_pn);
263 }
264 
265 /**
266  * zfcp_status_read_refill - refill the long running status_read_requests
267  * @adapter: ptr to struct zfcp_adapter for which the buffers should be refilled
268  *
269  * Return:
270  * * 0 on success meaning at least one status read is pending
271  * * 1 if posting failed and not a single status read buffer is pending,
272  *     also triggers adapter reopen recovery
273  */
zfcp_status_read_refill(struct zfcp_adapter * adapter)274 int zfcp_status_read_refill(struct zfcp_adapter *adapter)
275 {
276 	while (atomic_add_unless(&adapter->stat_miss, -1, 0))
277 		if (zfcp_fsf_status_read(adapter->qdio)) {
278 			atomic_inc(&adapter->stat_miss); /* undo add -1 */
279 			if (atomic_read(&adapter->stat_miss) >=
280 			    adapter->stat_read_buf_num) {
281 				zfcp_erp_adapter_reopen(adapter, 0, "axsref1");
282 				return 1;
283 			}
284 			break;
285 		}
286 	return 0;
287 }
288 
_zfcp_status_read_scheduler(struct work_struct * work)289 static void _zfcp_status_read_scheduler(struct work_struct *work)
290 {
291 	zfcp_status_read_refill(container_of(work, struct zfcp_adapter,
292 					     stat_work));
293 }
294 
zfcp_version_change_lost_work(struct work_struct * work)295 static void zfcp_version_change_lost_work(struct work_struct *work)
296 {
297 	struct zfcp_adapter *adapter = container_of(work, struct zfcp_adapter,
298 						    version_change_lost_work);
299 
300 	zfcp_fsf_exchange_config_data_sync(adapter->qdio, NULL);
301 }
302 
zfcp_print_sl(struct seq_file * m,struct service_level * sl)303 static void zfcp_print_sl(struct seq_file *m, struct service_level *sl)
304 {
305 	struct zfcp_adapter *adapter =
306 		container_of(sl, struct zfcp_adapter, service_level);
307 
308 	seq_printf(m, "zfcp: %s microcode level %x\n",
309 		   dev_name(&adapter->ccw_device->dev),
310 		   adapter->fsf_lic_version);
311 }
312 
zfcp_setup_adapter_work_queue(struct zfcp_adapter * adapter)313 static int zfcp_setup_adapter_work_queue(struct zfcp_adapter *adapter)
314 {
315 	char name[TASK_COMM_LEN];
316 
317 	snprintf(name, sizeof(name), "zfcp_q_%s",
318 		 dev_name(&adapter->ccw_device->dev));
319 	adapter->work_queue = alloc_ordered_workqueue(name, WQ_MEM_RECLAIM);
320 
321 	if (adapter->work_queue)
322 		return 0;
323 	return -ENOMEM;
324 }
325 
zfcp_destroy_adapter_work_queue(struct zfcp_adapter * adapter)326 static void zfcp_destroy_adapter_work_queue(struct zfcp_adapter *adapter)
327 {
328 	if (adapter->work_queue)
329 		destroy_workqueue(adapter->work_queue);
330 	adapter->work_queue = NULL;
331 
332 }
333 
334 /**
335  * zfcp_adapter_enqueue - enqueue a new adapter to the list
336  * @ccw_device: pointer to the struct cc_device
337  *
338  * Returns:	struct zfcp_adapter*
339  * Enqueues an adapter at the end of the adapter list in the driver data.
340  * All adapter internal structures are set up.
341  * Proc-fs entries are also created.
342  */
zfcp_adapter_enqueue(struct ccw_device * ccw_device)343 struct zfcp_adapter *zfcp_adapter_enqueue(struct ccw_device *ccw_device)
344 {
345 	struct zfcp_adapter *adapter;
346 
347 	if (!get_device(&ccw_device->dev))
348 		return ERR_PTR(-ENODEV);
349 
350 	adapter = kzalloc(sizeof(struct zfcp_adapter), GFP_KERNEL);
351 	if (!adapter) {
352 		put_device(&ccw_device->dev);
353 		return ERR_PTR(-ENOMEM);
354 	}
355 
356 	kref_init(&adapter->ref);
357 
358 	ccw_device->handler = NULL;
359 	adapter->ccw_device = ccw_device;
360 
361 	INIT_WORK(&adapter->stat_work, _zfcp_status_read_scheduler);
362 	INIT_DELAYED_WORK(&adapter->scan_work, zfcp_fc_scan_ports);
363 	INIT_WORK(&adapter->ns_up_work, zfcp_fc_sym_name_update);
364 	INIT_WORK(&adapter->version_change_lost_work,
365 		  zfcp_version_change_lost_work);
366 
367 	adapter->next_port_scan = jiffies;
368 
369 	adapter->erp_action.adapter = adapter;
370 
371 	if (zfcp_diag_adapter_setup(adapter))
372 		goto failed;
373 
374 	if (zfcp_qdio_setup(adapter))
375 		goto failed;
376 
377 	if (zfcp_allocate_low_mem_buffers(adapter))
378 		goto failed;
379 
380 	adapter->req_list = zfcp_reqlist_alloc();
381 	if (!adapter->req_list)
382 		goto failed;
383 
384 	if (zfcp_dbf_adapter_register(adapter))
385 		goto failed;
386 
387 	if (zfcp_setup_adapter_work_queue(adapter))
388 		goto failed;
389 
390 	if (zfcp_fc_gs_setup(adapter))
391 		goto failed;
392 
393 	rwlock_init(&adapter->port_list_lock);
394 	INIT_LIST_HEAD(&adapter->port_list);
395 
396 	INIT_LIST_HEAD(&adapter->events.list);
397 	INIT_WORK(&adapter->events.work, zfcp_fc_post_event);
398 	spin_lock_init(&adapter->events.list_lock);
399 
400 	init_waitqueue_head(&adapter->erp_ready_wq);
401 	init_waitqueue_head(&adapter->erp_done_wqh);
402 
403 	INIT_LIST_HEAD(&adapter->erp_ready_head);
404 	INIT_LIST_HEAD(&adapter->erp_running_head);
405 
406 	rwlock_init(&adapter->erp_lock);
407 	rwlock_init(&adapter->abort_lock);
408 
409 	if (zfcp_erp_thread_setup(adapter))
410 		goto failed;
411 
412 	adapter->service_level.seq_print = zfcp_print_sl;
413 
414 	dev_set_drvdata(&ccw_device->dev, adapter);
415 
416 	if (device_add_groups(&ccw_device->dev, zfcp_sysfs_adapter_attr_groups))
417 		goto err_sysfs;
418 
419 	/* report size limit per scatter-gather segment */
420 	adapter->ccw_device->dev.dma_parms = &adapter->dma_parms;
421 
422 	adapter->stat_read_buf_num = FSF_STATUS_READS_RECOM;
423 
424 	return adapter;
425 
426 err_sysfs:
427 failed:
428 	/* TODO: make this more fine-granular */
429 	cancel_delayed_work_sync(&adapter->scan_work);
430 	cancel_work_sync(&adapter->stat_work);
431 	cancel_work_sync(&adapter->ns_up_work);
432 	cancel_work_sync(&adapter->version_change_lost_work);
433 	zfcp_destroy_adapter_work_queue(adapter);
434 
435 	zfcp_fc_wka_ports_force_offline(adapter->gs);
436 	zfcp_scsi_adapter_unregister(adapter);
437 
438 	zfcp_erp_thread_kill(adapter);
439 	zfcp_dbf_adapter_unregister(adapter);
440 	zfcp_qdio_destroy(adapter->qdio);
441 
442 	zfcp_ccw_adapter_put(adapter); /* final put to release */
443 	return ERR_PTR(-ENOMEM);
444 }
445 
zfcp_adapter_unregister(struct zfcp_adapter * adapter)446 void zfcp_adapter_unregister(struct zfcp_adapter *adapter)
447 {
448 	struct ccw_device *cdev = adapter->ccw_device;
449 
450 	cancel_delayed_work_sync(&adapter->scan_work);
451 	cancel_work_sync(&adapter->stat_work);
452 	cancel_work_sync(&adapter->ns_up_work);
453 	cancel_work_sync(&adapter->version_change_lost_work);
454 	zfcp_destroy_adapter_work_queue(adapter);
455 
456 	zfcp_fc_wka_ports_force_offline(adapter->gs);
457 	zfcp_scsi_adapter_unregister(adapter);
458 	device_remove_groups(&cdev->dev, zfcp_sysfs_adapter_attr_groups);
459 
460 	zfcp_erp_thread_kill(adapter);
461 	zfcp_dbf_adapter_unregister(adapter);
462 	zfcp_qdio_destroy(adapter->qdio);
463 
464 	zfcp_ccw_adapter_put(adapter); /* final put to release */
465 }
466 
467 /**
468  * zfcp_adapter_release - remove the adapter from the resource list
469  * @ref: pointer to struct kref
470  * locks:	adapter list write lock is assumed to be held by caller
471  */
zfcp_adapter_release(struct kref * ref)472 void zfcp_adapter_release(struct kref *ref)
473 {
474 	struct zfcp_adapter *adapter = container_of(ref, struct zfcp_adapter,
475 						    ref);
476 	struct ccw_device *cdev = adapter->ccw_device;
477 
478 	dev_set_drvdata(&adapter->ccw_device->dev, NULL);
479 	zfcp_fc_gs_destroy(adapter);
480 	zfcp_free_low_mem_buffers(adapter);
481 	zfcp_diag_adapter_free(adapter);
482 	kfree(adapter->req_list);
483 	kfree(adapter->fc_stats);
484 	kfree(adapter->stats_reset_data);
485 	kfree(adapter);
486 	put_device(&cdev->dev);
487 }
488 
zfcp_port_release(struct device * dev)489 static void zfcp_port_release(struct device *dev)
490 {
491 	struct zfcp_port *port = container_of(dev, struct zfcp_port, dev);
492 
493 	zfcp_ccw_adapter_put(port->adapter);
494 	kfree(port);
495 }
496 
497 /**
498  * zfcp_port_enqueue - enqueue port to port list of adapter
499  * @adapter: adapter where remote port is added
500  * @wwpn: WWPN of the remote port to be enqueued
501  * @status: initial status for the port
502  * @d_id: destination id of the remote port to be enqueued
503  * Returns: pointer to enqueued port on success, ERR_PTR on error
504  *
505  * All port internal structures are set up and the sysfs entry is generated.
506  * d_id is used to enqueue ports with a well known address like the Directory
507  * Service for nameserver lookup.
508  */
zfcp_port_enqueue(struct zfcp_adapter * adapter,u64 wwpn,u32 status,u32 d_id)509 struct zfcp_port *zfcp_port_enqueue(struct zfcp_adapter *adapter, u64 wwpn,
510 				     u32 status, u32 d_id)
511 {
512 	struct zfcp_port *port;
513 	int retval = -ENOMEM;
514 
515 	kref_get(&adapter->ref);
516 
517 	port = zfcp_get_port_by_wwpn(adapter, wwpn);
518 	if (port) {
519 		put_device(&port->dev);
520 		retval = -EEXIST;
521 		goto err_out;
522 	}
523 
524 	port = kzalloc(sizeof(struct zfcp_port), GFP_KERNEL);
525 	if (!port)
526 		goto err_out;
527 
528 	rwlock_init(&port->unit_list_lock);
529 	INIT_LIST_HEAD(&port->unit_list);
530 	atomic_set(&port->units, 0);
531 
532 	INIT_WORK(&port->gid_pn_work, zfcp_fc_port_did_lookup);
533 	INIT_WORK(&port->test_link_work, zfcp_fc_link_test_work);
534 	INIT_WORK(&port->rport_work, zfcp_scsi_rport_work);
535 
536 	port->adapter = adapter;
537 	port->d_id = d_id;
538 	port->wwpn = wwpn;
539 	port->rport_task = RPORT_NONE;
540 	port->dev.parent = &adapter->ccw_device->dev;
541 	port->dev.groups = zfcp_port_attr_groups;
542 	port->dev.release = zfcp_port_release;
543 
544 	port->erp_action.adapter = adapter;
545 	port->erp_action.port = port;
546 
547 	if (dev_set_name(&port->dev, "0x%016llx", (unsigned long long)wwpn)) {
548 		kfree(port);
549 		goto err_out;
550 	}
551 	retval = -EINVAL;
552 
553 	if (device_register(&port->dev)) {
554 		put_device(&port->dev);
555 		goto err_out;
556 	}
557 
558 	write_lock_irq(&adapter->port_list_lock);
559 	list_add_tail(&port->list, &adapter->port_list);
560 	write_unlock_irq(&adapter->port_list_lock);
561 
562 	atomic_or(status | ZFCP_STATUS_COMMON_RUNNING, &port->status);
563 
564 	return port;
565 
566 err_out:
567 	zfcp_ccw_adapter_put(adapter);
568 	return ERR_PTR(retval);
569 }
570