Loading...
1// SPDX-License-Identifier: GPL-2.0
2/* Shared Memory Communications Direct over ISM devices (SMC-D)
3 *
4 * Functions for ISM device.
5 *
6 * Copyright IBM Corp. 2018
7 */
8
9#include <linux/if_vlan.h>
10#include <linux/spinlock.h>
11#include <linux/mutex.h>
12#include <linux/slab.h>
13#include <asm/page.h>
14
15#include "smc.h"
16#include "smc_core.h"
17#include "smc_ism.h"
18#include "smc_pnet.h"
19#include "smc_netlink.h"
20#include "linux/ism.h"
21
22struct smcd_dev_list smcd_dev_list = {
23 .list = LIST_HEAD_INIT(smcd_dev_list.list),
24 .mutex = __MUTEX_INITIALIZER(smcd_dev_list.mutex)
25};
26
27static bool smc_ism_v2_capable;
28static u8 smc_ism_v2_system_eid[SMC_MAX_EID_LEN];
29
30#if IS_ENABLED(CONFIG_ISM)
31static void smcd_register_dev(struct ism_dev *ism);
32static void smcd_unregister_dev(struct ism_dev *ism);
33static void smcd_handle_event(struct ism_dev *ism, struct ism_event *event);
34static void smcd_handle_irq(struct ism_dev *ism, unsigned int dmbno,
35 u16 dmbemask);
36
37static struct ism_client smc_ism_client = {
38 .name = "SMC-D",
39 .add = smcd_register_dev,
40 .remove = smcd_unregister_dev,
41 .handle_event = smcd_handle_event,
42 .handle_irq = smcd_handle_irq,
43};
44#endif
45
46static void smc_ism_create_system_eid(void)
47{
48 struct smc_ism_seid *seid =
49 (struct smc_ism_seid *)smc_ism_v2_system_eid;
50#if IS_ENABLED(CONFIG_S390)
51 struct cpuid id;
52 u16 ident_tail;
53 char tmp[5];
54
55 memcpy(seid->seid_string, "IBM-SYSZ-ISMSEID00000000", 24);
56 get_cpu_id(&id);
57 ident_tail = (u16)(id.ident & SMC_ISM_IDENT_MASK);
58 snprintf(tmp, 5, "%04X", ident_tail);
59 memcpy(seid->serial_number, tmp, 4);
60 snprintf(tmp, 5, "%04X", id.machine);
61 memcpy(seid->type, tmp, 4);
62#else
63 memset(seid, 0, SMC_MAX_EID_LEN);
64#endif
65}
66
67/* Test if an ISM communication is possible - same CPC */
68int smc_ism_cantalk(struct smcd_gid *peer_gid, unsigned short vlan_id,
69 struct smcd_dev *smcd)
70{
71 return smcd->ops->query_remote_gid(smcd, peer_gid, vlan_id ? 1 : 0,
72 vlan_id);
73}
74
75void smc_ism_get_system_eid(u8 **eid)
76{
77 if (!smc_ism_v2_capable)
78 *eid = NULL;
79 else
80 *eid = smc_ism_v2_system_eid;
81}
82
83u16 smc_ism_get_chid(struct smcd_dev *smcd)
84{
85 return smcd->ops->get_chid(smcd);
86}
87
88/* HW supports ISM V2 and thus System EID is defined */
89bool smc_ism_is_v2_capable(void)
90{
91 return smc_ism_v2_capable;
92}
93
94/* Set a connection using this DMBE. */
95void smc_ism_set_conn(struct smc_connection *conn)
96{
97 unsigned long flags;
98
99 spin_lock_irqsave(&conn->lgr->smcd->lock, flags);
100 conn->lgr->smcd->conn[conn->rmb_desc->sba_idx] = conn;
101 spin_unlock_irqrestore(&conn->lgr->smcd->lock, flags);
102}
103
104/* Unset a connection using this DMBE. */
105void smc_ism_unset_conn(struct smc_connection *conn)
106{
107 unsigned long flags;
108
109 if (!conn->rmb_desc)
110 return;
111
112 spin_lock_irqsave(&conn->lgr->smcd->lock, flags);
113 conn->lgr->smcd->conn[conn->rmb_desc->sba_idx] = NULL;
114 spin_unlock_irqrestore(&conn->lgr->smcd->lock, flags);
115}
116
117/* Register a VLAN identifier with the ISM device. Use a reference count
118 * and add a VLAN identifier only when the first DMB using this VLAN is
119 * registered.
120 */
121int smc_ism_get_vlan(struct smcd_dev *smcd, unsigned short vlanid)
122{
123 struct smc_ism_vlanid *new_vlan, *vlan;
124 unsigned long flags;
125 int rc = 0;
126
127 if (!vlanid) /* No valid vlan id */
128 return -EINVAL;
129
130 /* create new vlan entry, in case we need it */
131 new_vlan = kzalloc(sizeof(*new_vlan), GFP_KERNEL);
132 if (!new_vlan)
133 return -ENOMEM;
134 new_vlan->vlanid = vlanid;
135 refcount_set(&new_vlan->refcnt, 1);
136
137 /* if there is an existing entry, increase count and return */
138 spin_lock_irqsave(&smcd->lock, flags);
139 list_for_each_entry(vlan, &smcd->vlan, list) {
140 if (vlan->vlanid == vlanid) {
141 refcount_inc(&vlan->refcnt);
142 kfree(new_vlan);
143 goto out;
144 }
145 }
146
147 /* no existing entry found.
148 * add new entry to device; might fail, e.g., if HW limit reached
149 */
150 if (smcd->ops->add_vlan_id(smcd, vlanid)) {
151 kfree(new_vlan);
152 rc = -EIO;
153 goto out;
154 }
155 list_add_tail(&new_vlan->list, &smcd->vlan);
156out:
157 spin_unlock_irqrestore(&smcd->lock, flags);
158 return rc;
159}
160
161/* Unregister a VLAN identifier with the ISM device. Use a reference count
162 * and remove a VLAN identifier only when the last DMB using this VLAN is
163 * unregistered.
164 */
165int smc_ism_put_vlan(struct smcd_dev *smcd, unsigned short vlanid)
166{
167 struct smc_ism_vlanid *vlan;
168 unsigned long flags;
169 bool found = false;
170 int rc = 0;
171
172 if (!vlanid) /* No valid vlan id */
173 return -EINVAL;
174
175 spin_lock_irqsave(&smcd->lock, flags);
176 list_for_each_entry(vlan, &smcd->vlan, list) {
177 if (vlan->vlanid == vlanid) {
178 if (!refcount_dec_and_test(&vlan->refcnt))
179 goto out;
180 found = true;
181 break;
182 }
183 }
184 if (!found) {
185 rc = -ENOENT;
186 goto out; /* VLAN id not in table */
187 }
188
189 /* Found and the last reference just gone */
190 if (smcd->ops->del_vlan_id(smcd, vlanid))
191 rc = -EIO;
192 list_del(&vlan->list);
193 kfree(vlan);
194out:
195 spin_unlock_irqrestore(&smcd->lock, flags);
196 return rc;
197}
198
199int smc_ism_unregister_dmb(struct smcd_dev *smcd, struct smc_buf_desc *dmb_desc)
200{
201 struct smcd_dmb dmb;
202 int rc = 0;
203
204 if (!dmb_desc->dma_addr)
205 return rc;
206
207 memset(&dmb, 0, sizeof(dmb));
208 dmb.dmb_tok = dmb_desc->token;
209 dmb.sba_idx = dmb_desc->sba_idx;
210 dmb.cpu_addr = dmb_desc->cpu_addr;
211 dmb.dma_addr = dmb_desc->dma_addr;
212 dmb.dmb_len = dmb_desc->len;
213 rc = smcd->ops->unregister_dmb(smcd, &dmb);
214 if (!rc || rc == ISM_ERROR) {
215 dmb_desc->cpu_addr = NULL;
216 dmb_desc->dma_addr = 0;
217 }
218
219 return rc;
220}
221
222int smc_ism_register_dmb(struct smc_link_group *lgr, int dmb_len,
223 struct smc_buf_desc *dmb_desc)
224{
225#if IS_ENABLED(CONFIG_ISM)
226 struct smcd_dmb dmb;
227 int rc;
228
229 memset(&dmb, 0, sizeof(dmb));
230 dmb.dmb_len = dmb_len;
231 dmb.sba_idx = dmb_desc->sba_idx;
232 dmb.vlan_id = lgr->vlan_id;
233 dmb.rgid = lgr->peer_gid.gid;
234 rc = lgr->smcd->ops->register_dmb(lgr->smcd, &dmb, &smc_ism_client);
235 if (!rc) {
236 dmb_desc->sba_idx = dmb.sba_idx;
237 dmb_desc->token = dmb.dmb_tok;
238 dmb_desc->cpu_addr = dmb.cpu_addr;
239 dmb_desc->dma_addr = dmb.dma_addr;
240 dmb_desc->len = dmb.dmb_len;
241 }
242 return rc;
243#else
244 return 0;
245#endif
246}
247
248static int smc_nl_handle_smcd_dev(struct smcd_dev *smcd,
249 struct sk_buff *skb,
250 struct netlink_callback *cb)
251{
252 char smc_pnet[SMC_MAX_PNETID_LEN + 1];
253 struct smc_pci_dev smc_pci_dev;
254 struct nlattr *port_attrs;
255 struct nlattr *attrs;
256 struct ism_dev *ism;
257 int use_cnt = 0;
258 void *nlh;
259
260 ism = smcd->priv;
261 nlh = genlmsg_put(skb, NETLINK_CB(cb->skb).portid, cb->nlh->nlmsg_seq,
262 &smc_gen_nl_family, NLM_F_MULTI,
263 SMC_NETLINK_GET_DEV_SMCD);
264 if (!nlh)
265 goto errmsg;
266 attrs = nla_nest_start(skb, SMC_GEN_DEV_SMCD);
267 if (!attrs)
268 goto errout;
269 use_cnt = atomic_read(&smcd->lgr_cnt);
270 if (nla_put_u32(skb, SMC_NLA_DEV_USE_CNT, use_cnt))
271 goto errattr;
272 if (nla_put_u8(skb, SMC_NLA_DEV_IS_CRIT, use_cnt > 0))
273 goto errattr;
274 memset(&smc_pci_dev, 0, sizeof(smc_pci_dev));
275 smc_set_pci_values(to_pci_dev(ism->dev.parent), &smc_pci_dev);
276 if (nla_put_u32(skb, SMC_NLA_DEV_PCI_FID, smc_pci_dev.pci_fid))
277 goto errattr;
278 if (nla_put_u16(skb, SMC_NLA_DEV_PCI_CHID, smc_pci_dev.pci_pchid))
279 goto errattr;
280 if (nla_put_u16(skb, SMC_NLA_DEV_PCI_VENDOR, smc_pci_dev.pci_vendor))
281 goto errattr;
282 if (nla_put_u16(skb, SMC_NLA_DEV_PCI_DEVICE, smc_pci_dev.pci_device))
283 goto errattr;
284 if (nla_put_string(skb, SMC_NLA_DEV_PCI_ID, smc_pci_dev.pci_id))
285 goto errattr;
286
287 port_attrs = nla_nest_start(skb, SMC_NLA_DEV_PORT);
288 if (!port_attrs)
289 goto errattr;
290 if (nla_put_u8(skb, SMC_NLA_DEV_PORT_PNET_USR, smcd->pnetid_by_user))
291 goto errportattr;
292 memcpy(smc_pnet, smcd->pnetid, SMC_MAX_PNETID_LEN);
293 smc_pnet[SMC_MAX_PNETID_LEN] = 0;
294 if (nla_put_string(skb, SMC_NLA_DEV_PORT_PNETID, smc_pnet))
295 goto errportattr;
296
297 nla_nest_end(skb, port_attrs);
298 nla_nest_end(skb, attrs);
299 genlmsg_end(skb, nlh);
300 return 0;
301
302errportattr:
303 nla_nest_cancel(skb, port_attrs);
304errattr:
305 nla_nest_cancel(skb, attrs);
306errout:
307 nlmsg_cancel(skb, nlh);
308errmsg:
309 return -EMSGSIZE;
310}
311
312static void smc_nl_prep_smcd_dev(struct smcd_dev_list *dev_list,
313 struct sk_buff *skb,
314 struct netlink_callback *cb)
315{
316 struct smc_nl_dmp_ctx *cb_ctx = smc_nl_dmp_ctx(cb);
317 int snum = cb_ctx->pos[0];
318 struct smcd_dev *smcd;
319 int num = 0;
320
321 mutex_lock(&dev_list->mutex);
322 list_for_each_entry(smcd, &dev_list->list, list) {
323 if (num < snum)
324 goto next;
325 if (smc_nl_handle_smcd_dev(smcd, skb, cb))
326 goto errout;
327next:
328 num++;
329 }
330errout:
331 mutex_unlock(&dev_list->mutex);
332 cb_ctx->pos[0] = num;
333}
334
335int smcd_nl_get_device(struct sk_buff *skb, struct netlink_callback *cb)
336{
337 smc_nl_prep_smcd_dev(&smcd_dev_list, skb, cb);
338 return skb->len;
339}
340
341#if IS_ENABLED(CONFIG_ISM)
342struct smc_ism_event_work {
343 struct work_struct work;
344 struct smcd_dev *smcd;
345 struct ism_event event;
346};
347
348#define ISM_EVENT_REQUEST 0x0001
349#define ISM_EVENT_RESPONSE 0x0002
350#define ISM_EVENT_REQUEST_IR 0x00000001
351#define ISM_EVENT_CODE_SHUTDOWN 0x80
352#define ISM_EVENT_CODE_TESTLINK 0x83
353
354union smcd_sw_event_info {
355 u64 info;
356 struct {
357 u8 uid[SMC_LGR_ID_SIZE];
358 unsigned short vlan_id;
359 u16 code;
360 };
361};
362
363static void smcd_handle_sw_event(struct smc_ism_event_work *wrk)
364{
365 struct smcd_gid peer_gid = { .gid = wrk->event.tok,
366 .gid_ext = 0 };
367 union smcd_sw_event_info ev_info;
368
369 ev_info.info = wrk->event.info;
370 switch (wrk->event.code) {
371 case ISM_EVENT_CODE_SHUTDOWN: /* Peer shut down DMBs */
372 smc_smcd_terminate(wrk->smcd, &peer_gid, ev_info.vlan_id);
373 break;
374 case ISM_EVENT_CODE_TESTLINK: /* Activity timer */
375 if (ev_info.code == ISM_EVENT_REQUEST) {
376 ev_info.code = ISM_EVENT_RESPONSE;
377 wrk->smcd->ops->signal_event(wrk->smcd,
378 &peer_gid,
379 ISM_EVENT_REQUEST_IR,
380 ISM_EVENT_CODE_TESTLINK,
381 ev_info.info);
382 }
383 break;
384 }
385}
386
387/* worker for SMC-D events */
388static void smc_ism_event_work(struct work_struct *work)
389{
390 struct smc_ism_event_work *wrk =
391 container_of(work, struct smc_ism_event_work, work);
392 struct smcd_gid smcd_gid = { .gid = wrk->event.tok,
393 .gid_ext = 0 };
394
395 switch (wrk->event.type) {
396 case ISM_EVENT_GID: /* GID event, token is peer GID */
397 smc_smcd_terminate(wrk->smcd, &smcd_gid, VLAN_VID_MASK);
398 break;
399 case ISM_EVENT_DMB:
400 break;
401 case ISM_EVENT_SWR: /* Software defined event */
402 smcd_handle_sw_event(wrk);
403 break;
404 }
405 kfree(wrk);
406}
407
408static struct smcd_dev *smcd_alloc_dev(struct device *parent, const char *name,
409 const struct smcd_ops *ops, int max_dmbs)
410{
411 struct smcd_dev *smcd;
412
413 smcd = devm_kzalloc(parent, sizeof(*smcd), GFP_KERNEL);
414 if (!smcd)
415 return NULL;
416 smcd->conn = devm_kcalloc(parent, max_dmbs,
417 sizeof(struct smc_connection *), GFP_KERNEL);
418 if (!smcd->conn)
419 return NULL;
420
421 smcd->event_wq = alloc_ordered_workqueue("ism_evt_wq-%s)",
422 WQ_MEM_RECLAIM, name);
423 if (!smcd->event_wq)
424 return NULL;
425
426 smcd->ops = ops;
427
428 spin_lock_init(&smcd->lock);
429 spin_lock_init(&smcd->lgr_lock);
430 INIT_LIST_HEAD(&smcd->vlan);
431 INIT_LIST_HEAD(&smcd->lgr_list);
432 init_waitqueue_head(&smcd->lgrs_deleted);
433 return smcd;
434}
435
436static void smcd_register_dev(struct ism_dev *ism)
437{
438 const struct smcd_ops *ops = ism_get_smcd_ops();
439 struct smcd_dev *smcd;
440
441 if (!ops)
442 return;
443
444 smcd = smcd_alloc_dev(&ism->pdev->dev, dev_name(&ism->pdev->dev), ops,
445 ISM_NR_DMBS);
446 if (!smcd)
447 return;
448 smcd->priv = ism;
449 ism_set_priv(ism, &smc_ism_client, smcd);
450 if (smc_pnetid_by_dev_port(&ism->pdev->dev, 0, smcd->pnetid))
451 smc_pnetid_by_table_smcd(smcd);
452
453 mutex_lock(&smcd_dev_list.mutex);
454 if (list_empty(&smcd_dev_list.list)) {
455 if (smcd->ops->supports_v2())
456 smc_ism_v2_capable = true;
457 }
458 /* sort list: devices without pnetid before devices with pnetid */
459 if (smcd->pnetid[0])
460 list_add_tail(&smcd->list, &smcd_dev_list.list);
461 else
462 list_add(&smcd->list, &smcd_dev_list.list);
463 mutex_unlock(&smcd_dev_list.mutex);
464
465 pr_warn_ratelimited("smc: adding smcd device %s with pnetid %.16s%s\n",
466 dev_name(&ism->dev), smcd->pnetid,
467 smcd->pnetid_by_user ? " (user defined)" : "");
468
469 return;
470}
471
472static void smcd_unregister_dev(struct ism_dev *ism)
473{
474 struct smcd_dev *smcd = ism_get_priv(ism, &smc_ism_client);
475
476 pr_warn_ratelimited("smc: removing smcd device %s\n",
477 dev_name(&ism->dev));
478 smcd->going_away = 1;
479 smc_smcd_terminate_all(smcd);
480 mutex_lock(&smcd_dev_list.mutex);
481 list_del_init(&smcd->list);
482 mutex_unlock(&smcd_dev_list.mutex);
483 destroy_workqueue(smcd->event_wq);
484}
485
486/* SMCD Device event handler. Called from ISM device interrupt handler.
487 * Parameters are ism device pointer,
488 * - event->type (0 --> DMB, 1 --> GID),
489 * - event->code (event code),
490 * - event->tok (either DMB token when event type 0, or GID when event type 1)
491 * - event->time (time of day)
492 * - event->info (debug info).
493 *
494 * Context:
495 * - Function called in IRQ context from ISM device driver event handler.
496 */
497static void smcd_handle_event(struct ism_dev *ism, struct ism_event *event)
498{
499 struct smcd_dev *smcd = ism_get_priv(ism, &smc_ism_client);
500 struct smc_ism_event_work *wrk;
501
502 if (smcd->going_away)
503 return;
504 /* copy event to event work queue, and let it be handled there */
505 wrk = kmalloc(sizeof(*wrk), GFP_ATOMIC);
506 if (!wrk)
507 return;
508 INIT_WORK(&wrk->work, smc_ism_event_work);
509 wrk->smcd = smcd;
510 wrk->event = *event;
511 queue_work(smcd->event_wq, &wrk->work);
512}
513
514/* SMCD Device interrupt handler. Called from ISM device interrupt handler.
515 * Parameters are the ism device pointer, DMB number, and the DMBE bitmask.
516 * Find the connection and schedule the tasklet for this connection.
517 *
518 * Context:
519 * - Function called in IRQ context from ISM device driver IRQ handler.
520 */
521static void smcd_handle_irq(struct ism_dev *ism, unsigned int dmbno,
522 u16 dmbemask)
523{
524 struct smcd_dev *smcd = ism_get_priv(ism, &smc_ism_client);
525 struct smc_connection *conn = NULL;
526 unsigned long flags;
527
528 spin_lock_irqsave(&smcd->lock, flags);
529 conn = smcd->conn[dmbno];
530 if (conn && !conn->killed)
531 tasklet_schedule(&conn->rx_tsklet);
532 spin_unlock_irqrestore(&smcd->lock, flags);
533}
534#endif
535
536int smc_ism_signal_shutdown(struct smc_link_group *lgr)
537{
538 int rc = 0;
539#if IS_ENABLED(CONFIG_ISM)
540 union smcd_sw_event_info ev_info;
541
542 if (lgr->peer_shutdown)
543 return 0;
544
545 memcpy(ev_info.uid, lgr->id, SMC_LGR_ID_SIZE);
546 ev_info.vlan_id = lgr->vlan_id;
547 ev_info.code = ISM_EVENT_REQUEST;
548 rc = lgr->smcd->ops->signal_event(lgr->smcd, &lgr->peer_gid,
549 ISM_EVENT_REQUEST_IR,
550 ISM_EVENT_CODE_SHUTDOWN,
551 ev_info.info);
552#endif
553 return rc;
554}
555
556int smc_ism_init(void)
557{
558 int rc = 0;
559
560 smc_ism_v2_capable = false;
561 smc_ism_create_system_eid();
562
563#if IS_ENABLED(CONFIG_ISM)
564 rc = ism_register_client(&smc_ism_client);
565#endif
566 return rc;
567}
568
569void smc_ism_exit(void)
570{
571#if IS_ENABLED(CONFIG_ISM)
572 ism_unregister_client(&smc_ism_client);
573#endif
574}
1// SPDX-License-Identifier: GPL-2.0
2/* Shared Memory Communications Direct over ISM devices (SMC-D)
3 *
4 * Functions for ISM device.
5 *
6 * Copyright IBM Corp. 2018
7 */
8
9#include <linux/if_vlan.h>
10#include <linux/spinlock.h>
11#include <linux/mutex.h>
12#include <linux/slab.h>
13#include <asm/page.h>
14
15#include "smc.h"
16#include "smc_core.h"
17#include "smc_ism.h"
18#include "smc_pnet.h"
19#include "smc_netlink.h"
20#include "linux/ism.h"
21
22struct smcd_dev_list smcd_dev_list = {
23 .list = LIST_HEAD_INIT(smcd_dev_list.list),
24 .mutex = __MUTEX_INITIALIZER(smcd_dev_list.mutex)
25};
26
27static bool smc_ism_v2_capable;
28static u8 smc_ism_v2_system_eid[SMC_MAX_EID_LEN];
29
30#if IS_ENABLED(CONFIG_ISM)
31static void smcd_register_dev(struct ism_dev *ism);
32static void smcd_unregister_dev(struct ism_dev *ism);
33static void smcd_handle_event(struct ism_dev *ism, struct ism_event *event);
34static void smcd_handle_irq(struct ism_dev *ism, unsigned int dmbno,
35 u16 dmbemask);
36
37static struct ism_client smc_ism_client = {
38 .name = "SMC-D",
39 .add = smcd_register_dev,
40 .remove = smcd_unregister_dev,
41 .handle_event = smcd_handle_event,
42 .handle_irq = smcd_handle_irq,
43};
44#endif
45
46static void smc_ism_create_system_eid(void)
47{
48 struct smc_ism_seid *seid =
49 (struct smc_ism_seid *)smc_ism_v2_system_eid;
50#if IS_ENABLED(CONFIG_S390)
51 struct cpuid id;
52 u16 ident_tail;
53 char tmp[5];
54
55 memcpy(seid->seid_string, "IBM-SYSZ-ISMSEID00000000", 24);
56 get_cpu_id(&id);
57 ident_tail = (u16)(id.ident & SMC_ISM_IDENT_MASK);
58 snprintf(tmp, 5, "%04X", ident_tail);
59 memcpy(seid->serial_number, tmp, 4);
60 snprintf(tmp, 5, "%04X", id.machine);
61 memcpy(seid->type, tmp, 4);
62#else
63 memset(seid, 0, SMC_MAX_EID_LEN);
64#endif
65}
66
67/* Test if an ISM communication is possible - same CPC */
68int smc_ism_cantalk(struct smcd_gid *peer_gid, unsigned short vlan_id,
69 struct smcd_dev *smcd)
70{
71 return smcd->ops->query_remote_gid(smcd, peer_gid, vlan_id ? 1 : 0,
72 vlan_id);
73}
74
75void smc_ism_get_system_eid(u8 **eid)
76{
77 if (!smc_ism_v2_capable)
78 *eid = NULL;
79 else
80 *eid = smc_ism_v2_system_eid;
81}
82
83u16 smc_ism_get_chid(struct smcd_dev *smcd)
84{
85 return smcd->ops->get_chid(smcd);
86}
87
88/* HW supports ISM V2 and thus System EID is defined */
89bool smc_ism_is_v2_capable(void)
90{
91 return smc_ism_v2_capable;
92}
93
94void smc_ism_set_v2_capable(void)
95{
96 smc_ism_v2_capable = true;
97}
98
99/* Set a connection using this DMBE. */
100void smc_ism_set_conn(struct smc_connection *conn)
101{
102 unsigned long flags;
103
104 spin_lock_irqsave(&conn->lgr->smcd->lock, flags);
105 conn->lgr->smcd->conn[conn->rmb_desc->sba_idx] = conn;
106 spin_unlock_irqrestore(&conn->lgr->smcd->lock, flags);
107}
108
109/* Unset a connection using this DMBE. */
110void smc_ism_unset_conn(struct smc_connection *conn)
111{
112 unsigned long flags;
113
114 if (!conn->rmb_desc)
115 return;
116
117 spin_lock_irqsave(&conn->lgr->smcd->lock, flags);
118 conn->lgr->smcd->conn[conn->rmb_desc->sba_idx] = NULL;
119 spin_unlock_irqrestore(&conn->lgr->smcd->lock, flags);
120}
121
122/* Register a VLAN identifier with the ISM device. Use a reference count
123 * and add a VLAN identifier only when the first DMB using this VLAN is
124 * registered.
125 */
126int smc_ism_get_vlan(struct smcd_dev *smcd, unsigned short vlanid)
127{
128 struct smc_ism_vlanid *new_vlan, *vlan;
129 unsigned long flags;
130 int rc = 0;
131
132 if (!vlanid) /* No valid vlan id */
133 return -EINVAL;
134 if (!smcd->ops->add_vlan_id)
135 return -EOPNOTSUPP;
136
137 /* create new vlan entry, in case we need it */
138 new_vlan = kzalloc(sizeof(*new_vlan), GFP_KERNEL);
139 if (!new_vlan)
140 return -ENOMEM;
141 new_vlan->vlanid = vlanid;
142 refcount_set(&new_vlan->refcnt, 1);
143
144 /* if there is an existing entry, increase count and return */
145 spin_lock_irqsave(&smcd->lock, flags);
146 list_for_each_entry(vlan, &smcd->vlan, list) {
147 if (vlan->vlanid == vlanid) {
148 refcount_inc(&vlan->refcnt);
149 kfree(new_vlan);
150 goto out;
151 }
152 }
153
154 /* no existing entry found.
155 * add new entry to device; might fail, e.g., if HW limit reached
156 */
157 if (smcd->ops->add_vlan_id(smcd, vlanid)) {
158 kfree(new_vlan);
159 rc = -EIO;
160 goto out;
161 }
162 list_add_tail(&new_vlan->list, &smcd->vlan);
163out:
164 spin_unlock_irqrestore(&smcd->lock, flags);
165 return rc;
166}
167
168/* Unregister a VLAN identifier with the ISM device. Use a reference count
169 * and remove a VLAN identifier only when the last DMB using this VLAN is
170 * unregistered.
171 */
172int smc_ism_put_vlan(struct smcd_dev *smcd, unsigned short vlanid)
173{
174 struct smc_ism_vlanid *vlan;
175 unsigned long flags;
176 bool found = false;
177 int rc = 0;
178
179 if (!vlanid) /* No valid vlan id */
180 return -EINVAL;
181 if (!smcd->ops->del_vlan_id)
182 return -EOPNOTSUPP;
183
184 spin_lock_irqsave(&smcd->lock, flags);
185 list_for_each_entry(vlan, &smcd->vlan, list) {
186 if (vlan->vlanid == vlanid) {
187 if (!refcount_dec_and_test(&vlan->refcnt))
188 goto out;
189 found = true;
190 break;
191 }
192 }
193 if (!found) {
194 rc = -ENOENT;
195 goto out; /* VLAN id not in table */
196 }
197
198 /* Found and the last reference just gone */
199 if (smcd->ops->del_vlan_id(smcd, vlanid))
200 rc = -EIO;
201 list_del(&vlan->list);
202 kfree(vlan);
203out:
204 spin_unlock_irqrestore(&smcd->lock, flags);
205 return rc;
206}
207
208int smc_ism_unregister_dmb(struct smcd_dev *smcd, struct smc_buf_desc *dmb_desc)
209{
210 struct smcd_dmb dmb;
211 int rc = 0;
212
213 if (!dmb_desc->dma_addr)
214 return rc;
215
216 memset(&dmb, 0, sizeof(dmb));
217 dmb.dmb_tok = dmb_desc->token;
218 dmb.sba_idx = dmb_desc->sba_idx;
219 dmb.cpu_addr = dmb_desc->cpu_addr;
220 dmb.dma_addr = dmb_desc->dma_addr;
221 dmb.dmb_len = dmb_desc->len;
222 rc = smcd->ops->unregister_dmb(smcd, &dmb);
223 if (!rc || rc == ISM_ERROR) {
224 dmb_desc->cpu_addr = NULL;
225 dmb_desc->dma_addr = 0;
226 }
227
228 return rc;
229}
230
231int smc_ism_register_dmb(struct smc_link_group *lgr, int dmb_len,
232 struct smc_buf_desc *dmb_desc)
233{
234 struct smcd_dmb dmb;
235 int rc;
236
237 memset(&dmb, 0, sizeof(dmb));
238 dmb.dmb_len = dmb_len;
239 dmb.sba_idx = dmb_desc->sba_idx;
240 dmb.vlan_id = lgr->vlan_id;
241 dmb.rgid = lgr->peer_gid.gid;
242 rc = lgr->smcd->ops->register_dmb(lgr->smcd, &dmb, lgr->smcd->client);
243 if (!rc) {
244 dmb_desc->sba_idx = dmb.sba_idx;
245 dmb_desc->token = dmb.dmb_tok;
246 dmb_desc->cpu_addr = dmb.cpu_addr;
247 dmb_desc->dma_addr = dmb.dma_addr;
248 dmb_desc->len = dmb.dmb_len;
249 }
250 return rc;
251}
252
253bool smc_ism_support_dmb_nocopy(struct smcd_dev *smcd)
254{
255 /* for now only loopback-ism supports
256 * merging sndbuf with peer DMB to avoid
257 * data copies between them.
258 */
259 return (smcd->ops->support_dmb_nocopy &&
260 smcd->ops->support_dmb_nocopy(smcd));
261}
262
263int smc_ism_attach_dmb(struct smcd_dev *dev, u64 token,
264 struct smc_buf_desc *dmb_desc)
265{
266 struct smcd_dmb dmb;
267 int rc = 0;
268
269 if (!dev->ops->attach_dmb)
270 return -EINVAL;
271
272 memset(&dmb, 0, sizeof(dmb));
273 dmb.dmb_tok = token;
274 rc = dev->ops->attach_dmb(dev, &dmb);
275 if (!rc) {
276 dmb_desc->sba_idx = dmb.sba_idx;
277 dmb_desc->token = dmb.dmb_tok;
278 dmb_desc->cpu_addr = dmb.cpu_addr;
279 dmb_desc->dma_addr = dmb.dma_addr;
280 dmb_desc->len = dmb.dmb_len;
281 }
282 return rc;
283}
284
285int smc_ism_detach_dmb(struct smcd_dev *dev, u64 token)
286{
287 if (!dev->ops->detach_dmb)
288 return -EINVAL;
289
290 return dev->ops->detach_dmb(dev, token);
291}
292
293static int smc_nl_handle_smcd_dev(struct smcd_dev *smcd,
294 struct sk_buff *skb,
295 struct netlink_callback *cb)
296{
297 char smc_pnet[SMC_MAX_PNETID_LEN + 1];
298 struct smc_pci_dev smc_pci_dev;
299 struct nlattr *port_attrs;
300 struct nlattr *attrs;
301 struct ism_dev *ism;
302 int use_cnt = 0;
303 void *nlh;
304
305 ism = smcd->priv;
306 nlh = genlmsg_put(skb, NETLINK_CB(cb->skb).portid, cb->nlh->nlmsg_seq,
307 &smc_gen_nl_family, NLM_F_MULTI,
308 SMC_NETLINK_GET_DEV_SMCD);
309 if (!nlh)
310 goto errmsg;
311 attrs = nla_nest_start(skb, SMC_GEN_DEV_SMCD);
312 if (!attrs)
313 goto errout;
314 use_cnt = atomic_read(&smcd->lgr_cnt);
315 if (nla_put_u32(skb, SMC_NLA_DEV_USE_CNT, use_cnt))
316 goto errattr;
317 if (nla_put_u8(skb, SMC_NLA_DEV_IS_CRIT, use_cnt > 0))
318 goto errattr;
319 memset(&smc_pci_dev, 0, sizeof(smc_pci_dev));
320 smc_set_pci_values(to_pci_dev(ism->dev.parent), &smc_pci_dev);
321 if (nla_put_u32(skb, SMC_NLA_DEV_PCI_FID, smc_pci_dev.pci_fid))
322 goto errattr;
323 if (nla_put_u16(skb, SMC_NLA_DEV_PCI_CHID, smc_pci_dev.pci_pchid))
324 goto errattr;
325 if (nla_put_u16(skb, SMC_NLA_DEV_PCI_VENDOR, smc_pci_dev.pci_vendor))
326 goto errattr;
327 if (nla_put_u16(skb, SMC_NLA_DEV_PCI_DEVICE, smc_pci_dev.pci_device))
328 goto errattr;
329 if (nla_put_string(skb, SMC_NLA_DEV_PCI_ID, smc_pci_dev.pci_id))
330 goto errattr;
331
332 port_attrs = nla_nest_start(skb, SMC_NLA_DEV_PORT);
333 if (!port_attrs)
334 goto errattr;
335 if (nla_put_u8(skb, SMC_NLA_DEV_PORT_PNET_USR, smcd->pnetid_by_user))
336 goto errportattr;
337 memcpy(smc_pnet, smcd->pnetid, SMC_MAX_PNETID_LEN);
338 smc_pnet[SMC_MAX_PNETID_LEN] = 0;
339 if (nla_put_string(skb, SMC_NLA_DEV_PORT_PNETID, smc_pnet))
340 goto errportattr;
341
342 nla_nest_end(skb, port_attrs);
343 nla_nest_end(skb, attrs);
344 genlmsg_end(skb, nlh);
345 return 0;
346
347errportattr:
348 nla_nest_cancel(skb, port_attrs);
349errattr:
350 nla_nest_cancel(skb, attrs);
351errout:
352 nlmsg_cancel(skb, nlh);
353errmsg:
354 return -EMSGSIZE;
355}
356
357static void smc_nl_prep_smcd_dev(struct smcd_dev_list *dev_list,
358 struct sk_buff *skb,
359 struct netlink_callback *cb)
360{
361 struct smc_nl_dmp_ctx *cb_ctx = smc_nl_dmp_ctx(cb);
362 int snum = cb_ctx->pos[0];
363 struct smcd_dev *smcd;
364 int num = 0;
365
366 mutex_lock(&dev_list->mutex);
367 list_for_each_entry(smcd, &dev_list->list, list) {
368 if (num < snum)
369 goto next;
370 if (smc_ism_is_loopback(smcd))
371 goto next;
372 if (smc_nl_handle_smcd_dev(smcd, skb, cb))
373 goto errout;
374next:
375 num++;
376 }
377errout:
378 mutex_unlock(&dev_list->mutex);
379 cb_ctx->pos[0] = num;
380}
381
382int smcd_nl_get_device(struct sk_buff *skb, struct netlink_callback *cb)
383{
384 smc_nl_prep_smcd_dev(&smcd_dev_list, skb, cb);
385 return skb->len;
386}
387
388#if IS_ENABLED(CONFIG_ISM)
389struct smc_ism_event_work {
390 struct work_struct work;
391 struct smcd_dev *smcd;
392 struct ism_event event;
393};
394
395#define ISM_EVENT_REQUEST 0x0001
396#define ISM_EVENT_RESPONSE 0x0002
397#define ISM_EVENT_REQUEST_IR 0x00000001
398#define ISM_EVENT_CODE_SHUTDOWN 0x80
399#define ISM_EVENT_CODE_TESTLINK 0x83
400
401union smcd_sw_event_info {
402 u64 info;
403 struct {
404 u8 uid[SMC_LGR_ID_SIZE];
405 unsigned short vlan_id;
406 u16 code;
407 };
408};
409
410static void smcd_handle_sw_event(struct smc_ism_event_work *wrk)
411{
412 struct smcd_gid peer_gid = { .gid = wrk->event.tok,
413 .gid_ext = 0 };
414 union smcd_sw_event_info ev_info;
415
416 ev_info.info = wrk->event.info;
417 switch (wrk->event.code) {
418 case ISM_EVENT_CODE_SHUTDOWN: /* Peer shut down DMBs */
419 smc_smcd_terminate(wrk->smcd, &peer_gid, ev_info.vlan_id);
420 break;
421 case ISM_EVENT_CODE_TESTLINK: /* Activity timer */
422 if (ev_info.code == ISM_EVENT_REQUEST &&
423 wrk->smcd->ops->signal_event) {
424 ev_info.code = ISM_EVENT_RESPONSE;
425 wrk->smcd->ops->signal_event(wrk->smcd,
426 &peer_gid,
427 ISM_EVENT_REQUEST_IR,
428 ISM_EVENT_CODE_TESTLINK,
429 ev_info.info);
430 }
431 break;
432 }
433}
434
435/* worker for SMC-D events */
436static void smc_ism_event_work(struct work_struct *work)
437{
438 struct smc_ism_event_work *wrk =
439 container_of(work, struct smc_ism_event_work, work);
440 struct smcd_gid smcd_gid = { .gid = wrk->event.tok,
441 .gid_ext = 0 };
442
443 switch (wrk->event.type) {
444 case ISM_EVENT_GID: /* GID event, token is peer GID */
445 smc_smcd_terminate(wrk->smcd, &smcd_gid, VLAN_VID_MASK);
446 break;
447 case ISM_EVENT_DMB:
448 break;
449 case ISM_EVENT_SWR: /* Software defined event */
450 smcd_handle_sw_event(wrk);
451 break;
452 }
453 kfree(wrk);
454}
455
456static struct smcd_dev *smcd_alloc_dev(struct device *parent, const char *name,
457 const struct smcd_ops *ops, int max_dmbs)
458{
459 struct smcd_dev *smcd;
460
461 smcd = devm_kzalloc(parent, sizeof(*smcd), GFP_KERNEL);
462 if (!smcd)
463 return NULL;
464 smcd->conn = devm_kcalloc(parent, max_dmbs,
465 sizeof(struct smc_connection *), GFP_KERNEL);
466 if (!smcd->conn)
467 return NULL;
468
469 smcd->event_wq = alloc_ordered_workqueue("ism_evt_wq-%s)",
470 WQ_MEM_RECLAIM, name);
471 if (!smcd->event_wq)
472 return NULL;
473
474 smcd->ops = ops;
475
476 spin_lock_init(&smcd->lock);
477 spin_lock_init(&smcd->lgr_lock);
478 INIT_LIST_HEAD(&smcd->vlan);
479 INIT_LIST_HEAD(&smcd->lgr_list);
480 init_waitqueue_head(&smcd->lgrs_deleted);
481 return smcd;
482}
483
484static void smcd_register_dev(struct ism_dev *ism)
485{
486 const struct smcd_ops *ops = ism_get_smcd_ops();
487 struct smcd_dev *smcd, *fentry;
488
489 if (!ops)
490 return;
491
492 smcd = smcd_alloc_dev(&ism->pdev->dev, dev_name(&ism->pdev->dev), ops,
493 ISM_NR_DMBS);
494 if (!smcd)
495 return;
496 smcd->priv = ism;
497 smcd->client = &smc_ism_client;
498 ism_set_priv(ism, &smc_ism_client, smcd);
499 if (smc_pnetid_by_dev_port(&ism->pdev->dev, 0, smcd->pnetid))
500 smc_pnetid_by_table_smcd(smcd);
501
502 if (smcd->ops->supports_v2())
503 smc_ism_set_v2_capable();
504 mutex_lock(&smcd_dev_list.mutex);
505 /* sort list:
506 * - devices without pnetid before devices with pnetid;
507 * - loopback-ism always at the very beginning;
508 */
509 if (!smcd->pnetid[0]) {
510 fentry = list_first_entry_or_null(&smcd_dev_list.list,
511 struct smcd_dev, list);
512 if (fentry && smc_ism_is_loopback(fentry))
513 list_add(&smcd->list, &fentry->list);
514 else
515 list_add(&smcd->list, &smcd_dev_list.list);
516 } else {
517 list_add_tail(&smcd->list, &smcd_dev_list.list);
518 }
519 mutex_unlock(&smcd_dev_list.mutex);
520
521 pr_warn_ratelimited("smc: adding smcd device %s with pnetid %.16s%s\n",
522 dev_name(&ism->dev), smcd->pnetid,
523 smcd->pnetid_by_user ? " (user defined)" : "");
524
525 return;
526}
527
528static void smcd_unregister_dev(struct ism_dev *ism)
529{
530 struct smcd_dev *smcd = ism_get_priv(ism, &smc_ism_client);
531
532 pr_warn_ratelimited("smc: removing smcd device %s\n",
533 dev_name(&ism->dev));
534 smcd->going_away = 1;
535 smc_smcd_terminate_all(smcd);
536 mutex_lock(&smcd_dev_list.mutex);
537 list_del_init(&smcd->list);
538 mutex_unlock(&smcd_dev_list.mutex);
539 destroy_workqueue(smcd->event_wq);
540}
541
542/* SMCD Device event handler. Called from ISM device interrupt handler.
543 * Parameters are ism device pointer,
544 * - event->type (0 --> DMB, 1 --> GID),
545 * - event->code (event code),
546 * - event->tok (either DMB token when event type 0, or GID when event type 1)
547 * - event->time (time of day)
548 * - event->info (debug info).
549 *
550 * Context:
551 * - Function called in IRQ context from ISM device driver event handler.
552 */
553static void smcd_handle_event(struct ism_dev *ism, struct ism_event *event)
554{
555 struct smcd_dev *smcd = ism_get_priv(ism, &smc_ism_client);
556 struct smc_ism_event_work *wrk;
557
558 if (smcd->going_away)
559 return;
560 /* copy event to event work queue, and let it be handled there */
561 wrk = kmalloc(sizeof(*wrk), GFP_ATOMIC);
562 if (!wrk)
563 return;
564 INIT_WORK(&wrk->work, smc_ism_event_work);
565 wrk->smcd = smcd;
566 wrk->event = *event;
567 queue_work(smcd->event_wq, &wrk->work);
568}
569
570/* SMCD Device interrupt handler. Called from ISM device interrupt handler.
571 * Parameters are the ism device pointer, DMB number, and the DMBE bitmask.
572 * Find the connection and schedule the tasklet for this connection.
573 *
574 * Context:
575 * - Function called in IRQ context from ISM device driver IRQ handler.
576 */
577static void smcd_handle_irq(struct ism_dev *ism, unsigned int dmbno,
578 u16 dmbemask)
579{
580 struct smcd_dev *smcd = ism_get_priv(ism, &smc_ism_client);
581 struct smc_connection *conn = NULL;
582 unsigned long flags;
583
584 spin_lock_irqsave(&smcd->lock, flags);
585 conn = smcd->conn[dmbno];
586 if (conn && !conn->killed)
587 tasklet_schedule(&conn->rx_tsklet);
588 spin_unlock_irqrestore(&smcd->lock, flags);
589}
590#endif
591
592int smc_ism_signal_shutdown(struct smc_link_group *lgr)
593{
594 int rc = 0;
595#if IS_ENABLED(CONFIG_ISM)
596 union smcd_sw_event_info ev_info;
597
598 if (lgr->peer_shutdown)
599 return 0;
600 if (!lgr->smcd->ops->signal_event)
601 return 0;
602
603 memcpy(ev_info.uid, lgr->id, SMC_LGR_ID_SIZE);
604 ev_info.vlan_id = lgr->vlan_id;
605 ev_info.code = ISM_EVENT_REQUEST;
606 rc = lgr->smcd->ops->signal_event(lgr->smcd, &lgr->peer_gid,
607 ISM_EVENT_REQUEST_IR,
608 ISM_EVENT_CODE_SHUTDOWN,
609 ev_info.info);
610#endif
611 return rc;
612}
613
614int smc_ism_init(void)
615{
616 int rc = 0;
617
618 smc_ism_v2_capable = false;
619 smc_ism_create_system_eid();
620
621#if IS_ENABLED(CONFIG_ISM)
622 rc = ism_register_client(&smc_ism_client);
623#endif
624 return rc;
625}
626
627void smc_ism_exit(void)
628{
629#if IS_ENABLED(CONFIG_ISM)
630 ism_unregister_client(&smc_ism_client);
631#endif
632}