1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2 * vim:expandtab:shiftwidth=8:tabstop=8:
4 * Copyright (C) 2001, 2002 Cluster File Systems, Inc.
5 * Author: Zach Brown <zab@zabbo.net>
6 * Author: Peter J. Braam <braam@clusterfs.com>
7 * Author: Phil Schwan <phil@clusterfs.com>
8 * Author: Eric Barton <eric@bartonsoftware.com>
10 * This file is part of Portals, http://www.sf.net/projects/sandiaportals/
12 * Portals is free software; you can redistribute it and/or
13 * modify it under the terms of version 2 of the GNU General Public
14 * License as published by the Free Software Foundation.
16 * Portals is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with Portals; if not, write to the Free Software
23 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
28 ptl_handle_ni_t ksocknal_ni;
29 static nal_t ksocknal_api;
30 #if (LINUX_VERSION_CODE >= KERNEL_VERSION(2,5,0))
31 ksock_nal_data_t ksocknal_data;
33 static ksock_nal_data_t ksocknal_data;
36 kpr_nal_interface_t ksocknal_router_interface = {
38 kprni_arg: &ksocknal_data,
39 kprni_fwd: ksocknal_fwd_packet,
40 kprni_notify: ksocknal_notify,
43 #define SOCKNAL_SYSCTL 200
45 #define SOCKNAL_SYSCTL_TIMEOUT 1
46 #define SOCKNAL_SYSCTL_EAGER_ACK 2
47 #define SOCKNAL_SYSCTL_ZERO_COPY 3
48 #define SOCKNAL_SYSCTL_TYPED 4
49 #define SOCKNAL_SYSCTL_MIN_BULK 5
51 static ctl_table ksocknal_ctl_table[] = {
52 {SOCKNAL_SYSCTL_TIMEOUT, "timeout",
53 &ksocknal_data.ksnd_io_timeout, sizeof (int),
54 0644, NULL, &proc_dointvec},
55 {SOCKNAL_SYSCTL_EAGER_ACK, "eager_ack",
56 &ksocknal_data.ksnd_eager_ack, sizeof (int),
57 0644, NULL, &proc_dointvec},
59 {SOCKNAL_SYSCTL_EAGER_ACK, "zero_copy",
60 &ksocknal_data.ksnd_zc_min_frag, sizeof (int),
61 0644, NULL, &proc_dointvec},
63 {SOCKNAL_SYSCTL_TYPED, "typed",
64 &ksocknal_data.ksnd_typed_conns, sizeof (int),
65 0644, NULL, &proc_dointvec},
66 {SOCKNAL_SYSCTL_MIN_BULK, "min_bulk",
67 &ksocknal_data.ksnd_min_bulk, sizeof (int),
68 0644, NULL, &proc_dointvec},
72 static ctl_table ksocknal_top_ctl_table[] = {
73 {SOCKNAL_SYSCTL, "socknal", NULL, 0, 0555, ksocknal_ctl_table},
78 ksocknal_api_forward(nal_t *nal, int id, void *args, size_t args_len,
79 void *ret, size_t ret_len)
85 nal_cb = k->ksnd_nal_cb;
87 lib_dispatch(nal_cb, k, id, args, ret); /* ksocknal_send needs k */
92 ksocknal_api_shutdown(nal_t *nal, int ni)
98 ksocknal_api_yield(nal_t *nal)
105 ksocknal_api_lock(nal_t *nal, unsigned long *flags)
111 nal_cb = k->ksnd_nal_cb;
112 nal_cb->cb_cli(nal_cb,flags);
116 ksocknal_api_unlock(nal_t *nal, unsigned long *flags)
122 nal_cb = k->ksnd_nal_cb;
123 nal_cb->cb_sti(nal_cb,flags);
127 ksocknal_init(int interface, ptl_pt_index_t ptl_size,
128 ptl_ac_index_t ac_size, ptl_pid_t requested_pid)
130 CDEBUG(D_NET, "calling lib_init with nid "LPX64"\n", (ptl_nid_t)0);
131 lib_init(&ksocknal_lib, (ptl_nid_t)0, 0, 10, ptl_size, ac_size);
132 return (&ksocknal_api);
136 * EXTRA functions follow
140 ksocknal_set_mynid(ptl_nid_t nid)
142 lib_ni_t *ni = &ksocknal_lib.ni;
144 /* FIXME: we have to do this because we call lib_init() at module
145 * insertion time, which is before we have 'mynid' available. lib_init
146 * sets the NAL's nid, which it uses to tell other nodes where packets
147 * are coming from. This is not a very graceful solution to this
150 CDEBUG(D_IOCTL, "setting mynid to "LPX64" (old nid="LPX64")\n",
158 ksocknal_bind_irq (unsigned int irq)
160 #if (defined(CONFIG_SMP) && CPU_AFFINITY)
164 ksock_irqinfo_t *info;
165 char *argv[] = {"/bin/sh",
169 char *envp[] = {"HOME=/",
170 "PATH=/sbin:/bin:/usr/sbin:/usr/bin",
173 LASSERT (irq < NR_IRQS);
174 if (irq == 0) /* software NIC */
177 info = &ksocknal_data.ksnd_irqinfo[irq];
179 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
181 LASSERT (info->ksni_valid);
182 bind = !info->ksni_bound;
183 info->ksni_bound = 1;
185 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
187 if (!bind) /* bound already */
190 snprintf (cmdline, sizeof (cmdline),
191 "echo %d > /proc/irq/%u/smp_affinity", 1 << info->ksni_sched, irq);
193 printk (KERN_INFO "Lustre: Binding irq %u to CPU %d with cmd: %s\n",
194 irq, info->ksni_sched, cmdline);
196 /* FIXME: Find a better method of setting IRQ affinity...
199 call_usermodehelper (argv[0], argv, envp);
204 ksocknal_create_route (__u32 ipaddr, int port, int buffer_size,
205 int irq_affinity, int eager)
207 ksock_route_t *route;
209 PORTAL_ALLOC (route, sizeof (*route));
213 atomic_set (&route->ksnr_refcount, 1);
214 route->ksnr_sharecount = 0;
215 route->ksnr_peer = NULL;
216 route->ksnr_timeout = jiffies;
217 route->ksnr_retry_interval = SOCKNAL_MIN_RECONNECT_INTERVAL;
218 route->ksnr_ipaddr = ipaddr;
219 route->ksnr_port = port;
220 route->ksnr_buffer_size = buffer_size;
221 route->ksnr_irq_affinity = irq_affinity;
222 route->ksnr_eager = eager;
223 route->ksnr_connecting = 0;
224 route->ksnr_connected = 0;
225 route->ksnr_deleted = 0;
226 route->ksnr_conn_count = 0;
232 ksocknal_destroy_route (ksock_route_t *route)
234 LASSERT (route->ksnr_sharecount == 0);
236 if (route->ksnr_peer != NULL)
237 ksocknal_put_peer (route->ksnr_peer);
239 PORTAL_FREE (route, sizeof (*route));
243 ksocknal_put_route (ksock_route_t *route)
245 CDEBUG (D_OTHER, "putting route[%p] (%d)\n",
246 route, atomic_read (&route->ksnr_refcount));
248 LASSERT (atomic_read (&route->ksnr_refcount) > 0);
249 if (!atomic_dec_and_test (&route->ksnr_refcount))
252 ksocknal_destroy_route (route);
256 ksocknal_create_peer (ptl_nid_t nid)
260 LASSERT (nid != PTL_NID_ANY);
262 PORTAL_ALLOC (peer, sizeof (*peer));
266 memset (peer, 0, sizeof (*peer));
268 peer->ksnp_nid = nid;
269 atomic_set (&peer->ksnp_refcount, 1); /* 1 ref for caller */
270 peer->ksnp_closing = 0;
271 INIT_LIST_HEAD (&peer->ksnp_conns);
272 INIT_LIST_HEAD (&peer->ksnp_routes);
273 INIT_LIST_HEAD (&peer->ksnp_tx_queue);
275 atomic_inc (&ksocknal_data.ksnd_npeers);
280 ksocknal_destroy_peer (ksock_peer_t *peer)
282 CDEBUG (D_NET, "peer "LPX64" %p deleted\n", peer->ksnp_nid, peer);
284 LASSERT (atomic_read (&peer->ksnp_refcount) == 0);
285 LASSERT (list_empty (&peer->ksnp_conns));
286 LASSERT (list_empty (&peer->ksnp_routes));
287 LASSERT (list_empty (&peer->ksnp_tx_queue));
289 PORTAL_FREE (peer, sizeof (*peer));
291 /* NB a peer's connections and autoconnect routes keep a reference
292 * on their peer until they are destroyed, so we can be assured
293 * that _all_ state to do with this peer has been cleaned up when
294 * its refcount drops to zero. */
295 atomic_dec (&ksocknal_data.ksnd_npeers);
299 ksocknal_put_peer (ksock_peer_t *peer)
301 CDEBUG (D_OTHER, "putting peer[%p] -> "LPX64" (%d)\n",
302 peer, peer->ksnp_nid,
303 atomic_read (&peer->ksnp_refcount));
305 LASSERT (atomic_read (&peer->ksnp_refcount) > 0);
306 if (!atomic_dec_and_test (&peer->ksnp_refcount))
309 ksocknal_destroy_peer (peer);
313 ksocknal_find_peer_locked (ptl_nid_t nid)
315 struct list_head *peer_list = ksocknal_nid2peerlist (nid);
316 struct list_head *tmp;
319 list_for_each (tmp, peer_list) {
321 peer = list_entry (tmp, ksock_peer_t, ksnp_list);
323 LASSERT (!peer->ksnp_closing);
324 LASSERT (!(list_empty (&peer->ksnp_routes) &&
325 list_empty (&peer->ksnp_conns)));
327 if (peer->ksnp_nid != nid)
330 CDEBUG(D_NET, "got peer [%p] -> "LPX64" (%d)\n",
331 peer, nid, atomic_read (&peer->ksnp_refcount));
338 ksocknal_get_peer (ptl_nid_t nid)
342 read_lock (&ksocknal_data.ksnd_global_lock);
343 peer = ksocknal_find_peer_locked (nid);
344 if (peer != NULL) /* +1 ref for caller? */
345 atomic_inc (&peer->ksnp_refcount);
346 read_unlock (&ksocknal_data.ksnd_global_lock);
352 ksocknal_unlink_peer_locked (ksock_peer_t *peer)
354 LASSERT (!peer->ksnp_closing);
355 peer->ksnp_closing = 1;
356 list_del (&peer->ksnp_list);
357 /* lose peerlist's ref */
358 ksocknal_put_peer (peer);
362 ksocknal_get_route_by_idx (int index)
365 struct list_head *ptmp;
366 ksock_route_t *route;
367 struct list_head *rtmp;
370 read_lock (&ksocknal_data.ksnd_global_lock);
372 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++) {
373 list_for_each (ptmp, &ksocknal_data.ksnd_peers[i]) {
374 peer = list_entry (ptmp, ksock_peer_t, ksnp_list);
376 LASSERT (!(list_empty (&peer->ksnp_routes) &&
377 list_empty (&peer->ksnp_conns)));
379 list_for_each (rtmp, &peer->ksnp_routes) {
383 route = list_entry (rtmp, ksock_route_t, ksnr_list);
384 atomic_inc (&route->ksnr_refcount);
385 read_unlock (&ksocknal_data.ksnd_global_lock);
391 read_unlock (&ksocknal_data.ksnd_global_lock);
396 ksocknal_add_route (ptl_nid_t nid, __u32 ipaddr, int port, int bufnob,
397 int bind_irq, int share, int eager)
402 ksock_route_t *route;
403 struct list_head *rtmp;
404 ksock_route_t *route2;
406 if (nid == PTL_NID_ANY)
409 /* Have a brand new peer ready... */
410 peer = ksocknal_create_peer (nid);
414 route = ksocknal_create_route (ipaddr, port, bufnob,
417 ksocknal_put_peer (peer);
421 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
423 peer2 = ksocknal_find_peer_locked (nid);
425 ksocknal_put_peer (peer);
428 /* peer table takes existing ref on peer */
429 list_add (&peer->ksnp_list,
430 ksocknal_nid2peerlist (nid));
435 /* check for existing route to this NID via this ipaddr */
436 list_for_each (rtmp, &peer->ksnp_routes) {
437 route2 = list_entry (rtmp, ksock_route_t, ksnr_list);
439 if (route2->ksnr_ipaddr == ipaddr)
446 if (route2 != NULL) {
447 ksocknal_put_route (route);
450 /* route takes a ref on peer */
451 route->ksnr_peer = peer;
452 atomic_inc (&peer->ksnp_refcount);
453 /* peer's route list takes existing ref on route */
454 list_add_tail (&route->ksnr_list, &peer->ksnp_routes);
457 route->ksnr_sharecount++;
459 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
465 ksocknal_del_route_locked (ksock_route_t *route, int share, int keep_conn)
467 ksock_peer_t *peer = route->ksnr_peer;
469 struct list_head *ctmp;
470 struct list_head *cnxt;
473 route->ksnr_sharecount = 0;
475 route->ksnr_sharecount--;
476 if (route->ksnr_sharecount != 0)
480 list_for_each_safe (ctmp, cnxt, &peer->ksnp_conns) {
481 conn = list_entry(ctmp, ksock_conn_t, ksnc_list);
483 if (conn->ksnc_route != route)
487 ksocknal_close_conn_locked (conn, 0);
491 /* keeping the conn; just dissociate it and route... */
492 conn->ksnc_route = NULL;
493 ksocknal_put_route (route); /* drop conn's ref on route */
496 route->ksnr_deleted = 1;
497 list_del (&route->ksnr_list);
498 ksocknal_put_route (route); /* drop peer's ref */
500 if (list_empty (&peer->ksnp_routes) &&
501 list_empty (&peer->ksnp_conns)) {
502 /* I've just removed the last autoconnect route of a peer
503 * with no active connections */
504 ksocknal_unlink_peer_locked (peer);
509 ksocknal_del_route (ptl_nid_t nid, __u32 ipaddr, int share, int keep_conn)
512 struct list_head *ptmp;
513 struct list_head *pnxt;
515 struct list_head *rtmp;
516 struct list_head *rnxt;
517 ksock_route_t *route;
523 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
525 if (nid != PTL_NID_ANY)
526 lo = hi = ksocknal_nid2peerlist(nid) - ksocknal_data.ksnd_peers;
529 hi = ksocknal_data.ksnd_peer_hash_size - 1;
532 for (i = lo; i <= hi; i++) {
533 list_for_each_safe (ptmp, pnxt, &ksocknal_data.ksnd_peers[i]) {
534 peer = list_entry (ptmp, ksock_peer_t, ksnp_list);
536 if (!(nid == PTL_NID_ANY || peer->ksnp_nid == nid))
539 list_for_each_safe (rtmp, rnxt, &peer->ksnp_routes) {
540 route = list_entry (rtmp, ksock_route_t,
544 route->ksnr_ipaddr == ipaddr))
547 ksocknal_del_route_locked (route, share, keep_conn);
548 rc = 0; /* matched something */
555 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
561 ksocknal_get_conn_by_idx (int index)
564 struct list_head *ptmp;
566 struct list_head *ctmp;
569 read_lock (&ksocknal_data.ksnd_global_lock);
571 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++) {
572 list_for_each (ptmp, &ksocknal_data.ksnd_peers[i]) {
573 peer = list_entry (ptmp, ksock_peer_t, ksnp_list);
575 LASSERT (!(list_empty (&peer->ksnp_routes) &&
576 list_empty (&peer->ksnp_conns)));
578 list_for_each (ctmp, &peer->ksnp_conns) {
582 conn = list_entry (ctmp, ksock_conn_t, ksnc_list);
583 atomic_inc (&conn->ksnc_refcount);
584 read_unlock (&ksocknal_data.ksnd_global_lock);
590 read_unlock (&ksocknal_data.ksnd_global_lock);
595 ksocknal_get_peer_addr (ksock_conn_t *conn)
597 struct sockaddr_in sin;
598 int len = sizeof (sin);
601 rc = conn->ksnc_sock->ops->getname (conn->ksnc_sock,
602 (struct sockaddr *)&sin, &len, 2);
603 /* Didn't need the {get,put}connsock dance to deref ksnc_sock... */
604 LASSERT (!conn->ksnc_closing);
605 LASSERT (len <= sizeof (sin));
608 CERROR ("Error %d getting sock peer IP\n", rc);
612 conn->ksnc_ipaddr = ntohl (sin.sin_addr.s_addr);
613 conn->ksnc_port = ntohs (sin.sin_port);
617 ksocknal_conn_irq (ksock_conn_t *conn)
620 struct dst_entry *dst;
622 dst = sk_dst_get (conn->ksnc_sock->sk);
624 if (dst->dev != NULL) {
626 if (irq >= NR_IRQS) {
627 CERROR ("Unexpected IRQ %x\n", irq);
634 /* Didn't need the {get,put}connsock dance to deref ksnc_sock... */
635 LASSERT (!conn->ksnc_closing);
640 ksocknal_choose_scheduler_locked (unsigned int irq)
642 ksock_sched_t *sched;
643 ksock_irqinfo_t *info;
646 LASSERT (irq < NR_IRQS);
647 info = &ksocknal_data.ksnd_irqinfo[irq];
649 if (irq != 0 && /* hardware NIC */
650 info->ksni_valid) { /* already set up */
651 return (&ksocknal_data.ksnd_schedulers[info->ksni_sched]);
654 /* software NIC (irq == 0) || not associated with a scheduler yet.
655 * Choose the CPU with the fewest connections... */
656 sched = &ksocknal_data.ksnd_schedulers[0];
657 for (i = 1; i < SOCKNAL_N_SCHED; i++)
658 if (sched->kss_nconns >
659 ksocknal_data.ksnd_schedulers[i].kss_nconns)
660 sched = &ksocknal_data.ksnd_schedulers[i];
662 if (irq != 0) { /* Hardware NIC */
663 info->ksni_valid = 1;
664 info->ksni_sched = sched - ksocknal_data.ksnd_schedulers;
667 LASSERT (info->ksni_sched == sched - ksocknal_data.ksnd_schedulers);
674 ksocknal_create_conn (ksock_route_t *route, struct socket *sock,
675 int bind_irq, int type)
683 ksock_sched_t *sched;
688 /* NB, sock has an associated file since (a) this connection might
689 * have been created in userland and (b) we need to refcount the
690 * socket so that we don't close it while I/O is being done on
691 * it, and sock->file has that pre-cooked... */
692 LASSERT (sock->file != NULL);
693 LASSERT (file_count(sock->file) > 0);
695 rc = ksocknal_setup_sock (sock);
700 /* acceptor or explicit connect */
703 LASSERT (type != SOCKNAL_CONN_NONE);
704 /* autoconnect: expect this nid on exchange */
705 nid = route->ksnr_peer->ksnp_nid;
708 rc = ksocknal_hello (sock, &nid, &type, &incarnation);
713 if (route == NULL) { /* not autoconnect */
714 /* Assume this socket connects to a brand new peer */
715 peer = ksocknal_create_peer (nid);
720 PORTAL_ALLOC(conn, sizeof(*conn));
723 ksocknal_put_peer (peer);
727 memset (conn, 0, sizeof (*conn));
728 conn->ksnc_peer = NULL;
729 conn->ksnc_route = NULL;
730 conn->ksnc_sock = sock;
731 conn->ksnc_type = type;
732 conn->ksnc_incarnation = incarnation;
733 conn->ksnc_saved_data_ready = sock->sk->sk_data_ready;
734 conn->ksnc_saved_write_space = sock->sk->sk_write_space;
735 atomic_set (&conn->ksnc_refcount, 1); /* 1 ref for me */
737 conn->ksnc_rx_ready = 0;
738 conn->ksnc_rx_scheduled = 0;
739 ksocknal_new_packet (conn, 0);
741 INIT_LIST_HEAD (&conn->ksnc_tx_queue);
742 conn->ksnc_tx_ready = 0;
743 conn->ksnc_tx_scheduled = 0;
744 atomic_set (&conn->ksnc_tx_nob, 0);
746 ksocknal_get_peer_addr (conn);
748 irq = ksocknal_conn_irq (conn);
750 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
754 LASSERT ((route->ksnr_connected & (1 << type)) == 0);
755 LASSERT ((route->ksnr_connecting & (1 << type)) != 0);
757 if (route->ksnr_deleted) {
758 /* This conn was autoconnected, but the autoconnect
759 * route got deleted while it was being
761 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock,
763 PORTAL_FREE (conn, sizeof (*conn));
768 /* associate conn/route */
769 conn->ksnc_route = route;
770 atomic_inc (&route->ksnr_refcount);
772 route->ksnr_connecting &= ~(1 << type);
773 route->ksnr_connected |= (1 << type);
774 route->ksnr_conn_count++;
775 route->ksnr_retry_interval = SOCKNAL_MIN_RECONNECT_INTERVAL;
777 peer = route->ksnr_peer;
779 /* Not an autoconnected connection; see if there is an
780 * existing peer for this NID */
781 peer2 = ksocknal_find_peer_locked (nid);
783 ksocknal_put_peer (peer);
786 list_add (&peer->ksnp_list,
787 ksocknal_nid2peerlist (nid));
788 /* peer list takes over existing ref */
792 LASSERT (!peer->ksnp_closing);
794 conn->ksnc_peer = peer;
795 atomic_inc (&peer->ksnp_refcount);
796 peer->ksnp_last_alive = jiffies;
797 peer->ksnp_error = 0;
799 /* Set the deadline for the outgoing HELLO to drain */
800 conn->ksnc_tx_deadline = jiffies +
801 ksocknal_data.ksnd_io_timeout * HZ;
803 list_add (&conn->ksnc_list, &peer->ksnp_conns);
804 atomic_inc (&conn->ksnc_refcount);
806 sched = ksocknal_choose_scheduler_locked (irq);
808 conn->ksnc_scheduler = sched;
810 /* NB my callbacks block while I hold ksnd_global_lock */
811 sock->sk->sk_user_data = conn;
812 sock->sk->sk_data_ready = ksocknal_data_ready;
813 sock->sk->sk_write_space = ksocknal_write_space;
815 /* Take all the packets blocking for a connection.
816 * NB, it might be nicer to share these blocked packets among any
817 * other connections that are becoming established, however that
818 * confuses the normal packet launching operation, which selects a
819 * connection and queues the packet on it without needing an
820 * exclusive lock on ksnd_global_lock. */
821 while (!list_empty (&peer->ksnp_tx_queue)) {
822 tx = list_entry (peer->ksnp_tx_queue.next,
823 ksock_tx_t, tx_list);
825 list_del (&tx->tx_list);
826 ksocknal_queue_tx_locked (tx, conn);
829 rc = ksocknal_close_stale_conns_locked (peer, incarnation);
831 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
834 CERROR ("Closed %d stale conns to "LPX64"\n", rc, nid);
836 if (bind_irq) /* irq binding required */
837 ksocknal_bind_irq (irq);
839 /* Call the callbacks right now to get things going. */
840 ksocknal_data_ready (sock->sk, 0);
841 ksocknal_write_space (sock->sk);
843 CDEBUG(D_IOCTL, "conn [%p] registered for nid "LPX64"\n",
844 conn, conn->ksnc_peer->ksnp_nid);
846 ksocknal_put_conn (conn);
851 ksocknal_close_conn_locked (ksock_conn_t *conn, int error)
853 /* This just does the immmediate housekeeping, and queues the
854 * connection for the reaper to terminate.
855 * Caller holds ksnd_global_lock exclusively in irq context */
856 ksock_peer_t *peer = conn->ksnc_peer;
857 ksock_route_t *route;
859 LASSERT (peer->ksnp_error == 0);
860 LASSERT (!conn->ksnc_closing);
861 conn->ksnc_closing = 1;
862 atomic_inc (&ksocknal_data.ksnd_nclosing_conns);
864 route = conn->ksnc_route;
866 /* dissociate conn from route... */
867 LASSERT (!route->ksnr_deleted);
868 LASSERT ((route->ksnr_connecting & (1 << conn->ksnc_type)) == 0);
869 LASSERT ((route->ksnr_connected & (1 << conn->ksnc_type)) != 0);
871 route->ksnr_connected &= ~(1 << conn->ksnc_type);
872 conn->ksnc_route = NULL;
874 list_del (&route->ksnr_list); /* make route least favourite */
875 list_add_tail (&route->ksnr_list, &peer->ksnp_routes);
877 ksocknal_put_route (route); /* drop conn's ref on route */
880 /* ksnd_deathrow_conns takes over peer's ref */
881 list_del (&conn->ksnc_list);
883 if (list_empty (&peer->ksnp_conns)) {
884 /* No more connections to this peer */
886 peer->ksnp_error = error; /* stash last conn close reason */
888 if (list_empty (&peer->ksnp_routes)) {
889 /* I've just closed last conn belonging to a
890 * non-autoconnecting peer */
891 ksocknal_unlink_peer_locked (peer);
895 spin_lock (&ksocknal_data.ksnd_reaper_lock);
897 list_add_tail (&conn->ksnc_list, &ksocknal_data.ksnd_deathrow_conns);
898 wake_up (&ksocknal_data.ksnd_reaper_waitq);
900 spin_unlock (&ksocknal_data.ksnd_reaper_lock);
904 ksocknal_terminate_conn (ksock_conn_t *conn)
906 /* This gets called by the reaper (guaranteed thread context) to
907 * disengage the socket from its callbacks and close it.
908 * ksnc_refcount will eventually hit zero, and then the reaper will
911 ksock_peer_t *peer = conn->ksnc_peer;
912 ksock_sched_t *sched = conn->ksnc_scheduler;
917 LASSERT(conn->ksnc_closing);
919 /* wake up the scheduler to "send" all remaining packets to /dev/null */
920 spin_lock_irqsave(&sched->kss_lock, flags);
922 if (!conn->ksnc_tx_scheduled &&
923 !list_empty(&conn->ksnc_tx_queue)){
924 list_add_tail (&conn->ksnc_tx_list,
925 &sched->kss_tx_conns);
926 /* a closing conn is always ready to tx */
927 conn->ksnc_tx_ready = 1;
928 conn->ksnc_tx_scheduled = 1;
929 /* extra ref for scheduler */
930 atomic_inc (&conn->ksnc_refcount);
932 wake_up (&sched->kss_waitq);
935 spin_unlock_irqrestore (&sched->kss_lock, flags);
937 /* serialise with callbacks */
938 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
940 /* Remove conn's network callbacks.
941 * NB I _have_ to restore the callback, rather than storing a noop,
942 * since the socket could survive past this module being unloaded!! */
943 conn->ksnc_sock->sk->sk_data_ready = conn->ksnc_saved_data_ready;
944 conn->ksnc_sock->sk->sk_write_space = conn->ksnc_saved_write_space;
946 /* A callback could be in progress already; they hold a read lock
947 * on ksnd_global_lock (to serialise with me) and NOOP if
948 * sk_user_data is NULL. */
949 conn->ksnc_sock->sk->sk_user_data = NULL;
951 /* OK, so this conn may not be completely disengaged from its
952 * scheduler yet, but it _has_ committed to terminate... */
953 conn->ksnc_scheduler->kss_nconns--;
955 if (peer->ksnp_error != 0) {
956 /* peer's last conn closed in error */
957 LASSERT (list_empty (&peer->ksnp_conns));
959 /* convert peer's last-known-alive timestamp from jiffies */
960 do_gettimeofday (&now);
961 then = now.tv_sec - (jiffies - peer->ksnp_last_alive)/HZ;
965 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
967 /* The socket is closed on the final put; either here, or in
968 * ksocknal_{send,recv}msg(). Since we set up the linger2 option
969 * when the connection was established, this will close the socket
970 * immediately, aborting anything buffered in it. Any hung
971 * zero-copy transmits will therefore complete in finite time. */
972 ksocknal_putconnsock (conn);
975 kpr_notify (&ksocknal_data.ksnd_router, peer->ksnp_nid,
980 ksocknal_destroy_conn (ksock_conn_t *conn)
982 /* Final coup-de-grace of the reaper */
983 CDEBUG (D_NET, "connection %p\n", conn);
985 LASSERT (atomic_read (&conn->ksnc_refcount) == 0);
986 LASSERT (conn->ksnc_route == NULL);
987 LASSERT (!conn->ksnc_tx_scheduled);
988 LASSERT (!conn->ksnc_rx_scheduled);
989 LASSERT (list_empty(&conn->ksnc_tx_queue));
991 /* complete current receive if any */
992 switch (conn->ksnc_rx_state) {
993 case SOCKNAL_RX_BODY:
995 lib_finalize (&ksocknal_lib, NULL, conn->ksnc_cookie);
997 CERROR ("Refusing to complete a partial receive from "
998 LPX64", ip %08x\n", conn->ksnc_peer->ksnp_nid,
1000 CERROR ("This may hang communications and "
1001 "prevent modules from unloading\n");
1004 case SOCKNAL_RX_BODY_FWD:
1005 ksocknal_fmb_callback (conn->ksnc_cookie, -ECONNABORTED);
1007 case SOCKNAL_RX_HEADER:
1008 case SOCKNAL_RX_SLOP:
1015 ksocknal_put_peer (conn->ksnc_peer);
1017 PORTAL_FREE (conn, sizeof (*conn));
1018 atomic_dec (&ksocknal_data.ksnd_nclosing_conns);
1022 ksocknal_put_conn (ksock_conn_t *conn)
1024 unsigned long flags;
1026 CDEBUG (D_OTHER, "putting conn[%p] -> "LPX64" (%d)\n",
1027 conn, conn->ksnc_peer->ksnp_nid,
1028 atomic_read (&conn->ksnc_refcount));
1030 LASSERT (atomic_read (&conn->ksnc_refcount) > 0);
1031 if (!atomic_dec_and_test (&conn->ksnc_refcount))
1034 spin_lock_irqsave (&ksocknal_data.ksnd_reaper_lock, flags);
1036 list_add (&conn->ksnc_list, &ksocknal_data.ksnd_zombie_conns);
1037 wake_up (&ksocknal_data.ksnd_reaper_waitq);
1039 spin_unlock_irqrestore (&ksocknal_data.ksnd_reaper_lock, flags);
1043 ksocknal_close_peer_conns_locked (ksock_peer_t *peer, __u32 ipaddr, int why)
1046 struct list_head *ctmp;
1047 struct list_head *cnxt;
1050 list_for_each_safe (ctmp, cnxt, &peer->ksnp_conns) {
1051 conn = list_entry (ctmp, ksock_conn_t, ksnc_list);
1054 conn->ksnc_ipaddr == ipaddr) {
1056 ksocknal_close_conn_locked (conn, why);
1064 ksocknal_close_stale_conns_locked (ksock_peer_t *peer, __u64 incarnation)
1067 struct list_head *ctmp;
1068 struct list_head *cnxt;
1071 list_for_each_safe (ctmp, cnxt, &peer->ksnp_conns) {
1072 conn = list_entry (ctmp, ksock_conn_t, ksnc_list);
1074 if (conn->ksnc_incarnation == incarnation)
1078 ksocknal_close_conn_locked (conn, -ESTALE);
1085 ksocknal_close_conn_and_siblings (ksock_conn_t *conn, int why)
1087 ksock_peer_t *peer = conn->ksnc_peer;
1088 __u32 ipaddr = conn->ksnc_ipaddr;
1089 unsigned long flags;
1092 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
1094 count = ksocknal_close_peer_conns_locked (peer, ipaddr, why);
1096 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
1102 ksocknal_close_matching_conns (ptl_nid_t nid, __u32 ipaddr)
1104 unsigned long flags;
1106 struct list_head *ptmp;
1107 struct list_head *pnxt;
1113 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
1115 if (nid != PTL_NID_ANY)
1116 lo = hi = ksocknal_nid2peerlist(nid) - ksocknal_data.ksnd_peers;
1119 hi = ksocknal_data.ksnd_peer_hash_size - 1;
1122 for (i = lo; i <= hi; i++) {
1123 list_for_each_safe (ptmp, pnxt, &ksocknal_data.ksnd_peers[i]) {
1125 peer = list_entry (ptmp, ksock_peer_t, ksnp_list);
1127 if (!(nid == PTL_NID_ANY || nid == peer->ksnp_nid))
1130 count += ksocknal_close_peer_conns_locked (peer, ipaddr, 0);
1134 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
1136 /* wildcards always succeed */
1137 if (nid == PTL_NID_ANY || ipaddr == 0)
1140 return (count == 0 ? -ENOENT : 0);
1144 ksocknal_notify (void *arg, ptl_nid_t gw_nid, int alive)
1146 /* The router is telling me she's been notified of a change in
1147 * gateway state.... */
1149 CDEBUG (D_NET, "gw "LPX64" %s\n", gw_nid, alive ? "up" : "down");
1152 /* If the gateway crashed, close all open connections... */
1153 ksocknal_close_matching_conns (gw_nid, 0);
1157 /* ...otherwise do nothing. We can only establish new connections
1158 * if we have autroutes, and these connect on demand. */
1161 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0))
1162 struct tcp_opt *sock2tcp_opt(struct sock *sk)
1164 return &(sk->tp_pinfo.af_tcp);
1167 struct tcp_opt *sock2tcp_opt(struct sock *sk)
1169 struct tcp_sock *s = (struct tcp_sock *)sk;
1175 ksocknal_push_conn (ksock_conn_t *conn)
1184 rc = ksocknal_getconnsock (conn);
1185 if (rc != 0) /* being shut down */
1188 sk = conn->ksnc_sock->sk;
1189 tp = sock2tcp_opt(sk);
1192 nonagle = tp->nonagle;
1199 rc = sk->sk_prot->setsockopt (sk, SOL_TCP, TCP_NODELAY,
1200 (char *)&val, sizeof (val));
1206 tp->nonagle = nonagle;
1209 ksocknal_putconnsock (conn);
1213 ksocknal_push_peer (ksock_peer_t *peer)
1217 struct list_head *tmp;
1220 for (index = 0; ; index++) {
1221 read_lock (&ksocknal_data.ksnd_global_lock);
1226 list_for_each (tmp, &peer->ksnp_conns) {
1228 conn = list_entry (tmp, ksock_conn_t, ksnc_list);
1229 atomic_inc (&conn->ksnc_refcount);
1234 read_unlock (&ksocknal_data.ksnd_global_lock);
1239 ksocknal_push_conn (conn);
1240 ksocknal_put_conn (conn);
1245 ksocknal_push (ptl_nid_t nid)
1248 struct list_head *tmp;
1254 if (nid != PTL_NID_ANY) {
1255 peer = ksocknal_get_peer (nid);
1259 ksocknal_push_peer (peer);
1260 ksocknal_put_peer (peer);
1265 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++) {
1266 for (j = 0; ; j++) {
1267 read_lock (&ksocknal_data.ksnd_global_lock);
1272 list_for_each (tmp, &ksocknal_data.ksnd_peers[i]) {
1274 peer = list_entry(tmp, ksock_peer_t,
1276 atomic_inc (&peer->ksnp_refcount);
1281 read_unlock (&ksocknal_data.ksnd_global_lock);
1285 ksocknal_push_peer (peer);
1286 ksocknal_put_peer (peer);
1296 ksocknal_cmd(struct portals_cfg *pcfg, void * private)
1300 LASSERT (pcfg != NULL);
1302 switch(pcfg->pcfg_command) {
1303 case NAL_CMD_GET_AUTOCONN: {
1304 ksock_route_t *route = ksocknal_get_route_by_idx (pcfg->pcfg_count);
1310 pcfg->pcfg_nid = route->ksnr_peer->ksnp_nid;
1311 pcfg->pcfg_id = route->ksnr_ipaddr;
1312 pcfg->pcfg_misc = route->ksnr_port;
1313 pcfg->pcfg_count = route->ksnr_conn_count;
1314 pcfg->pcfg_size = route->ksnr_buffer_size;
1315 pcfg->pcfg_wait = route->ksnr_sharecount;
1316 pcfg->pcfg_flags = (route->ksnr_irq_affinity ? 2 : 0) |
1317 (route->ksnr_eager ? 4 : 0);
1318 ksocknal_put_route (route);
1322 case NAL_CMD_ADD_AUTOCONN: {
1323 rc = ksocknal_add_route (pcfg->pcfg_nid, pcfg->pcfg_id,
1324 pcfg->pcfg_misc, pcfg->pcfg_size,
1325 (pcfg->pcfg_flags & 0x02) != 0,
1326 (pcfg->pcfg_flags & 0x04) != 0,
1327 (pcfg->pcfg_flags & 0x08) != 0);
1330 case NAL_CMD_DEL_AUTOCONN: {
1331 rc = ksocknal_del_route (pcfg->pcfg_nid, pcfg->pcfg_id,
1332 (pcfg->pcfg_flags & 1) != 0,
1333 (pcfg->pcfg_flags & 2) != 0);
1336 case NAL_CMD_GET_CONN: {
1337 ksock_conn_t *conn = ksocknal_get_conn_by_idx (pcfg->pcfg_count);
1343 pcfg->pcfg_nid = conn->ksnc_peer->ksnp_nid;
1344 pcfg->pcfg_id = conn->ksnc_ipaddr;
1345 pcfg->pcfg_misc = conn->ksnc_port;
1346 pcfg->pcfg_flags = conn->ksnc_type;
1347 ksocknal_put_conn (conn);
1351 case NAL_CMD_REGISTER_PEER_FD: {
1352 struct socket *sock = sockfd_lookup (pcfg->pcfg_fd, &rc);
1353 int type = pcfg->pcfg_misc;
1359 case SOCKNAL_CONN_NONE:
1360 case SOCKNAL_CONN_ANY:
1361 case SOCKNAL_CONN_CONTROL:
1362 case SOCKNAL_CONN_BULK_IN:
1363 case SOCKNAL_CONN_BULK_OUT:
1364 rc = ksocknal_create_conn(NULL, sock, pcfg->pcfg_flags, type);
1372 case NAL_CMD_CLOSE_CONNECTION: {
1373 rc = ksocknal_close_matching_conns (pcfg->pcfg_nid,
1377 case NAL_CMD_REGISTER_MYNID: {
1378 rc = ksocknal_set_mynid (pcfg->pcfg_nid);
1381 case NAL_CMD_PUSH_CONNECTION: {
1382 rc = ksocknal_push (pcfg->pcfg_nid);
1391 ksocknal_free_fmbs (ksock_fmb_pool_t *p)
1396 LASSERT (list_empty(&p->fmp_blocked_conns));
1397 LASSERT (p->fmp_nactive_fmbs == 0);
1399 while (!list_empty(&p->fmp_idle_fmbs)) {
1401 fmb = list_entry(p->fmp_idle_fmbs.next,
1402 ksock_fmb_t, fmb_list);
1404 for (i = 0; i < fmb->fmb_npages; i++)
1405 if (fmb->fmb_pages[i] != NULL)
1406 __free_page(fmb->fmb_pages[i]);
1408 list_del(&fmb->fmb_list);
1409 PORTAL_FREE(fmb, sizeof(*fmb));
1414 ksocknal_free_buffers (void)
1416 ksocknal_free_fmbs(&ksocknal_data.ksnd_small_fmp);
1417 ksocknal_free_fmbs(&ksocknal_data.ksnd_large_fmp);
1419 LASSERT (atomic_read(&ksocknal_data.ksnd_nactive_ltxs) == 0);
1421 if (ksocknal_data.ksnd_schedulers != NULL)
1422 PORTAL_FREE (ksocknal_data.ksnd_schedulers,
1423 sizeof (ksock_sched_t) * SOCKNAL_N_SCHED);
1425 PORTAL_FREE (ksocknal_data.ksnd_peers,
1426 sizeof (struct list_head) *
1427 ksocknal_data.ksnd_peer_hash_size);
1431 ksocknal_module_fini (void)
1435 CDEBUG(D_MALLOC, "before NAL cleanup: kmem %d\n",
1436 atomic_read (&portal_kmemory));
1438 switch (ksocknal_data.ksnd_init) {
1442 case SOCKNAL_INIT_ALL:
1444 if (ksocknal_data.ksnd_sysctl != NULL)
1445 unregister_sysctl_table (ksocknal_data.ksnd_sysctl);
1447 kportal_nal_unregister(SOCKNAL);
1448 PORTAL_SYMBOL_UNREGISTER (ksocknal_ni);
1451 case SOCKNAL_INIT_PTL:
1452 /* No more calls to ksocknal_cmd() to create new
1453 * autoroutes/connections since we're being unloaded. */
1454 PtlNIFini(ksocknal_ni);
1456 /* Delete all autoroute entries */
1457 ksocknal_del_route(PTL_NID_ANY, 0, 0, 0);
1459 /* Delete all connections */
1460 ksocknal_close_matching_conns (PTL_NID_ANY, 0);
1462 /* Wait for all peer state to clean up */
1464 while (atomic_read (&ksocknal_data.ksnd_npeers) != 0) {
1466 CDEBUG(((i & (-i)) == i) ? D_WARNING : D_NET, /* power of 2? */
1467 "waiting for %d peers to disconnect\n",
1468 atomic_read (&ksocknal_data.ksnd_npeers));
1469 set_current_state (TASK_UNINTERRUPTIBLE);
1470 schedule_timeout (HZ);
1473 /* Tell lib we've stopped calling into her. */
1474 lib_fini(&ksocknal_lib);
1477 case SOCKNAL_INIT_DATA:
1478 /* Module refcount only gets to zero when all peers
1479 * have been closed so all lists must be empty */
1480 LASSERT (atomic_read (&ksocknal_data.ksnd_npeers) == 0);
1481 LASSERT (ksocknal_data.ksnd_peers != NULL);
1482 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++) {
1483 LASSERT (list_empty (&ksocknal_data.ksnd_peers[i]));
1485 LASSERT (list_empty (&ksocknal_data.ksnd_enomem_conns));
1486 LASSERT (list_empty (&ksocknal_data.ksnd_zombie_conns));
1487 LASSERT (list_empty (&ksocknal_data.ksnd_autoconnectd_routes));
1488 LASSERT (list_empty (&ksocknal_data.ksnd_small_fmp.fmp_blocked_conns));
1489 LASSERT (list_empty (&ksocknal_data.ksnd_large_fmp.fmp_blocked_conns));
1491 if (ksocknal_data.ksnd_schedulers != NULL)
1492 for (i = 0; i < SOCKNAL_N_SCHED; i++) {
1493 ksock_sched_t *kss =
1494 &ksocknal_data.ksnd_schedulers[i];
1496 LASSERT (list_empty (&kss->kss_tx_conns));
1497 LASSERT (list_empty (&kss->kss_rx_conns));
1498 LASSERT (kss->kss_nconns == 0);
1501 /* stop router calling me */
1502 kpr_shutdown (&ksocknal_data.ksnd_router);
1504 /* flag threads to terminate; wake and wait for them to die */
1505 ksocknal_data.ksnd_shuttingdown = 1;
1506 wake_up_all (&ksocknal_data.ksnd_autoconnectd_waitq);
1507 wake_up_all (&ksocknal_data.ksnd_reaper_waitq);
1509 for (i = 0; i < SOCKNAL_N_SCHED; i++)
1510 wake_up_all(&ksocknal_data.ksnd_schedulers[i].kss_waitq);
1512 while (atomic_read (&ksocknal_data.ksnd_nthreads) != 0) {
1513 CDEBUG (D_NET, "waitinf for %d threads to terminate\n",
1514 atomic_read (&ksocknal_data.ksnd_nthreads));
1515 set_current_state (TASK_UNINTERRUPTIBLE);
1516 schedule_timeout (HZ);
1519 kpr_deregister (&ksocknal_data.ksnd_router);
1521 ksocknal_free_buffers();
1524 case SOCKNAL_INIT_NOTHING:
1528 CDEBUG(D_MALLOC, "after NAL cleanup: kmem %d\n",
1529 atomic_read (&portal_kmemory));
1531 printk(KERN_INFO "Lustre: Routing socket NAL unloaded (final mem %d)\n",
1532 atomic_read(&portal_kmemory));
1537 ksocknal_init_incarnation (void)
1541 /* The incarnation number is the time this module loaded and it
1542 * identifies this particular instance of the socknal. Hopefully
1543 * we won't be able to reboot more frequently than 1MHz for the
1544 * forseeable future :) */
1546 do_gettimeofday(&tv);
1548 ksocknal_data.ksnd_incarnation =
1549 (((__u64)tv.tv_sec) * 1000000) + tv.tv_usec;
1553 ksocknal_module_init (void)
1555 int pkmem = atomic_read(&portal_kmemory);
1560 /* packet descriptor must fit in a router descriptor's scratchpad */
1561 LASSERT(sizeof (ksock_tx_t) <= sizeof (kprfd_scratch_t));
1562 /* the following must be sizeof(int) for proc_dointvec() */
1563 LASSERT(sizeof (ksocknal_data.ksnd_io_timeout) == sizeof (int));
1564 LASSERT(sizeof (ksocknal_data.ksnd_eager_ack) == sizeof (int));
1565 /* check ksnr_connected/connecting field large enough */
1566 LASSERT(SOCKNAL_CONN_NTYPES <= 4);
1568 LASSERT (ksocknal_data.ksnd_init == SOCKNAL_INIT_NOTHING);
1570 ksocknal_api.forward = ksocknal_api_forward;
1571 ksocknal_api.shutdown = ksocknal_api_shutdown;
1572 ksocknal_api.yield = ksocknal_api_yield;
1573 ksocknal_api.validate = NULL; /* our api validate is a NOOP */
1574 ksocknal_api.lock = ksocknal_api_lock;
1575 ksocknal_api.unlock = ksocknal_api_unlock;
1576 ksocknal_api.nal_data = &ksocknal_data;
1578 ksocknal_lib.nal_data = &ksocknal_data;
1580 memset (&ksocknal_data, 0, sizeof (ksocknal_data)); /* zero pointers */
1582 ksocknal_data.ksnd_io_timeout = SOCKNAL_IO_TIMEOUT;
1583 ksocknal_data.ksnd_eager_ack = SOCKNAL_EAGER_ACK;
1584 ksocknal_data.ksnd_typed_conns = SOCKNAL_TYPED_CONNS;
1585 ksocknal_data.ksnd_min_bulk = SOCKNAL_MIN_BULK;
1587 ksocknal_data.ksnd_zc_min_frag = SOCKNAL_ZC_MIN_FRAG;
1589 ksocknal_init_incarnation();
1591 ksocknal_data.ksnd_peer_hash_size = SOCKNAL_PEER_HASH_SIZE;
1592 PORTAL_ALLOC (ksocknal_data.ksnd_peers,
1593 sizeof (struct list_head) * ksocknal_data.ksnd_peer_hash_size);
1594 if (ksocknal_data.ksnd_peers == NULL)
1597 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++)
1598 INIT_LIST_HEAD(&ksocknal_data.ksnd_peers[i]);
1600 rwlock_init(&ksocknal_data.ksnd_global_lock);
1602 ksocknal_data.ksnd_nal_cb = &ksocknal_lib;
1603 spin_lock_init (&ksocknal_data.ksnd_nal_cb_lock);
1605 spin_lock_init(&ksocknal_data.ksnd_small_fmp.fmp_lock);
1606 INIT_LIST_HEAD(&ksocknal_data.ksnd_small_fmp.fmp_idle_fmbs);
1607 INIT_LIST_HEAD(&ksocknal_data.ksnd_small_fmp.fmp_blocked_conns);
1609 spin_lock_init(&ksocknal_data.ksnd_large_fmp.fmp_lock);
1610 INIT_LIST_HEAD(&ksocknal_data.ksnd_large_fmp.fmp_idle_fmbs);
1611 INIT_LIST_HEAD(&ksocknal_data.ksnd_large_fmp.fmp_blocked_conns);
1613 spin_lock_init (&ksocknal_data.ksnd_reaper_lock);
1614 INIT_LIST_HEAD (&ksocknal_data.ksnd_enomem_conns);
1615 INIT_LIST_HEAD (&ksocknal_data.ksnd_zombie_conns);
1616 INIT_LIST_HEAD (&ksocknal_data.ksnd_deathrow_conns);
1617 init_waitqueue_head(&ksocknal_data.ksnd_reaper_waitq);
1619 spin_lock_init (&ksocknal_data.ksnd_autoconnectd_lock);
1620 INIT_LIST_HEAD (&ksocknal_data.ksnd_autoconnectd_routes);
1621 init_waitqueue_head(&ksocknal_data.ksnd_autoconnectd_waitq);
1623 /* NB memset above zeros whole of ksocknal_data, including
1624 * ksocknal_data.ksnd_irqinfo[all].ksni_valid */
1626 /* flag lists/ptrs/locks initialised */
1627 ksocknal_data.ksnd_init = SOCKNAL_INIT_DATA;
1629 PORTAL_ALLOC(ksocknal_data.ksnd_schedulers,
1630 sizeof(ksock_sched_t) * SOCKNAL_N_SCHED);
1631 if (ksocknal_data.ksnd_schedulers == NULL) {
1632 ksocknal_module_fini ();
1636 for (i = 0; i < SOCKNAL_N_SCHED; i++) {
1637 ksock_sched_t *kss = &ksocknal_data.ksnd_schedulers[i];
1639 spin_lock_init (&kss->kss_lock);
1640 INIT_LIST_HEAD (&kss->kss_rx_conns);
1641 INIT_LIST_HEAD (&kss->kss_tx_conns);
1643 INIT_LIST_HEAD (&kss->kss_zctxdone_list);
1645 init_waitqueue_head (&kss->kss_waitq);
1648 rc = PtlNIInit(ksocknal_init, 32, 4, 0, &ksocknal_ni);
1650 CERROR("ksocknal: PtlNIInit failed: error %d\n", rc);
1651 ksocknal_module_fini ();
1654 PtlNIDebug(ksocknal_ni, ~0);
1656 ksocknal_data.ksnd_init = SOCKNAL_INIT_PTL; // flag PtlNIInit() called
1658 for (i = 0; i < SOCKNAL_N_SCHED; i++) {
1659 rc = ksocknal_thread_start (ksocknal_scheduler,
1660 &ksocknal_data.ksnd_schedulers[i]);
1662 CERROR("Can't spawn socknal scheduler[%d]: %d\n",
1664 ksocknal_module_fini ();
1669 for (i = 0; i < SOCKNAL_N_AUTOCONNECTD; i++) {
1670 rc = ksocknal_thread_start (ksocknal_autoconnectd, (void *)((long)i));
1672 CERROR("Can't spawn socknal autoconnectd: %d\n", rc);
1673 ksocknal_module_fini ();
1678 rc = ksocknal_thread_start (ksocknal_reaper, NULL);
1680 CERROR ("Can't spawn socknal reaper: %d\n", rc);
1681 ksocknal_module_fini ();
1685 rc = kpr_register(&ksocknal_data.ksnd_router,
1686 &ksocknal_router_interface);
1688 CDEBUG(D_NET, "Can't initialise routing interface "
1689 "(rc = %d): not routing\n", rc);
1691 /* Only allocate forwarding buffers if I'm on a gateway */
1693 for (i = 0; i < (SOCKNAL_SMALL_FWD_NMSGS +
1694 SOCKNAL_LARGE_FWD_NMSGS); i++) {
1697 PORTAL_ALLOC(fmb, sizeof(*fmb));
1699 ksocknal_module_fini();
1703 if (i < SOCKNAL_SMALL_FWD_NMSGS) {
1704 fmb->fmb_npages = SOCKNAL_SMALL_FWD_PAGES;
1705 fmb->fmb_pool = &ksocknal_data.ksnd_small_fmp;
1707 fmb->fmb_npages = SOCKNAL_LARGE_FWD_PAGES;
1708 fmb->fmb_pool = &ksocknal_data.ksnd_large_fmp;
1711 for (j = 0; j < fmb->fmb_npages; j++) {
1712 fmb->fmb_pages[j] = alloc_page(GFP_KERNEL);
1714 if (fmb->fmb_pages[j] == NULL) {
1715 ksocknal_module_fini ();
1719 LASSERT(page_address(fmb->fmb_pages[j]) != NULL);
1722 list_add(&fmb->fmb_list, &fmb->fmb_pool->fmp_idle_fmbs);
1726 rc = kportal_nal_register(SOCKNAL, &ksocknal_cmd, NULL);
1728 CERROR ("Can't initialise command interface (rc = %d)\n", rc);
1729 ksocknal_module_fini ();
1733 PORTAL_SYMBOL_REGISTER(ksocknal_ni);
1735 #ifdef CONFIG_SYSCTL
1736 /* Press on regardless even if registering sysctl doesn't work */
1737 ksocknal_data.ksnd_sysctl = register_sysctl_table (ksocknal_top_ctl_table, 0);
1739 /* flag everything initialised */
1740 ksocknal_data.ksnd_init = SOCKNAL_INIT_ALL;
1742 printk(KERN_INFO "Lustre: Routing socket NAL loaded "
1743 "(Routing %s, initial mem %d)\n",
1744 kpr_routing (&ksocknal_data.ksnd_router) ?
1745 "enabled" : "disabled", pkmem);
1750 MODULE_AUTHOR("Cluster File Systems, Inc. <info@clusterfs.com>");
1751 MODULE_DESCRIPTION("Kernel TCP Socket NAL v0.01");
1752 MODULE_LICENSE("GPL");
1754 module_init(ksocknal_module_init);
1755 module_exit(ksocknal_module_fini);
1757 EXPORT_SYMBOL (ksocknal_ni);