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_ZERO_COPY, "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 nid "LPX64" ip %d.%d.%d.%d\n",
835 rc, conn->ksnc_peer->ksnp_nid,
836 HIPQUAD(conn->ksnc_ipaddr));
838 if (bind_irq) /* irq binding required */
839 ksocknal_bind_irq (irq);
841 /* Call the callbacks right now to get things going. */
842 ksocknal_data_ready (sock->sk, 0);
843 ksocknal_write_space (sock->sk);
845 CDEBUG(D_IOCTL, "conn [%p] registered for nid "LPX64" ip %d.%d.%d.%d\n",
846 conn, conn->ksnc_peer->ksnp_nid, HIPQUAD(conn->ksnc_ipaddr));
848 ksocknal_put_conn (conn);
853 ksocknal_close_conn_locked (ksock_conn_t *conn, int error)
855 /* This just does the immmediate housekeeping, and queues the
856 * connection for the reaper to terminate.
857 * Caller holds ksnd_global_lock exclusively in irq context */
858 ksock_peer_t *peer = conn->ksnc_peer;
859 ksock_route_t *route;
861 LASSERT (peer->ksnp_error == 0);
862 LASSERT (!conn->ksnc_closing);
863 conn->ksnc_closing = 1;
864 atomic_inc (&ksocknal_data.ksnd_nclosing_conns);
866 route = conn->ksnc_route;
868 /* dissociate conn from route... */
869 LASSERT (!route->ksnr_deleted);
870 LASSERT ((route->ksnr_connecting & (1 << conn->ksnc_type)) == 0);
871 LASSERT ((route->ksnr_connected & (1 << conn->ksnc_type)) != 0);
873 route->ksnr_connected &= ~(1 << conn->ksnc_type);
874 conn->ksnc_route = NULL;
876 list_del (&route->ksnr_list); /* make route least favourite */
877 list_add_tail (&route->ksnr_list, &peer->ksnp_routes);
879 ksocknal_put_route (route); /* drop conn's ref on route */
882 /* ksnd_deathrow_conns takes over peer's ref */
883 list_del (&conn->ksnc_list);
885 if (list_empty (&peer->ksnp_conns)) {
886 /* No more connections to this peer */
888 peer->ksnp_error = error; /* stash last conn close reason */
890 if (list_empty (&peer->ksnp_routes)) {
891 /* I've just closed last conn belonging to a
892 * non-autoconnecting peer */
893 ksocknal_unlink_peer_locked (peer);
897 spin_lock (&ksocknal_data.ksnd_reaper_lock);
899 list_add_tail (&conn->ksnc_list, &ksocknal_data.ksnd_deathrow_conns);
900 wake_up (&ksocknal_data.ksnd_reaper_waitq);
902 spin_unlock (&ksocknal_data.ksnd_reaper_lock);
906 ksocknal_terminate_conn (ksock_conn_t *conn)
908 /* This gets called by the reaper (guaranteed thread context) to
909 * disengage the socket from its callbacks and close it.
910 * ksnc_refcount will eventually hit zero, and then the reaper will
913 ksock_peer_t *peer = conn->ksnc_peer;
914 ksock_sched_t *sched = conn->ksnc_scheduler;
919 LASSERT(conn->ksnc_closing);
921 /* wake up the scheduler to "send" all remaining packets to /dev/null */
922 spin_lock_irqsave(&sched->kss_lock, flags);
924 if (!conn->ksnc_tx_scheduled &&
925 !list_empty(&conn->ksnc_tx_queue)){
926 list_add_tail (&conn->ksnc_tx_list,
927 &sched->kss_tx_conns);
928 /* a closing conn is always ready to tx */
929 conn->ksnc_tx_ready = 1;
930 conn->ksnc_tx_scheduled = 1;
931 /* extra ref for scheduler */
932 atomic_inc (&conn->ksnc_refcount);
934 wake_up (&sched->kss_waitq);
937 spin_unlock_irqrestore (&sched->kss_lock, flags);
939 /* serialise with callbacks */
940 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
942 /* Remove conn's network callbacks.
943 * NB I _have_ to restore the callback, rather than storing a noop,
944 * since the socket could survive past this module being unloaded!! */
945 conn->ksnc_sock->sk->sk_data_ready = conn->ksnc_saved_data_ready;
946 conn->ksnc_sock->sk->sk_write_space = conn->ksnc_saved_write_space;
948 /* A callback could be in progress already; they hold a read lock
949 * on ksnd_global_lock (to serialise with me) and NOOP if
950 * sk_user_data is NULL. */
951 conn->ksnc_sock->sk->sk_user_data = NULL;
953 /* OK, so this conn may not be completely disengaged from its
954 * scheduler yet, but it _has_ committed to terminate... */
955 conn->ksnc_scheduler->kss_nconns--;
957 if (peer->ksnp_error != 0) {
958 /* peer's last conn closed in error */
959 LASSERT (list_empty (&peer->ksnp_conns));
961 /* convert peer's last-known-alive timestamp from jiffies */
962 do_gettimeofday (&now);
963 then = now.tv_sec - (jiffies - peer->ksnp_last_alive)/HZ;
967 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
969 /* The socket is closed on the final put; either here, or in
970 * ksocknal_{send,recv}msg(). Since we set up the linger2 option
971 * when the connection was established, this will close the socket
972 * immediately, aborting anything buffered in it. Any hung
973 * zero-copy transmits will therefore complete in finite time. */
974 ksocknal_putconnsock (conn);
977 kpr_notify (&ksocknal_data.ksnd_router, peer->ksnp_nid,
982 ksocknal_destroy_conn (ksock_conn_t *conn)
984 /* Final coup-de-grace of the reaper */
985 CDEBUG (D_NET, "connection %p\n", conn);
987 LASSERT (atomic_read (&conn->ksnc_refcount) == 0);
988 LASSERT (conn->ksnc_route == NULL);
989 LASSERT (!conn->ksnc_tx_scheduled);
990 LASSERT (!conn->ksnc_rx_scheduled);
991 LASSERT (list_empty(&conn->ksnc_tx_queue));
993 /* complete current receive if any */
994 switch (conn->ksnc_rx_state) {
995 case SOCKNAL_RX_BODY:
997 lib_finalize (&ksocknal_lib, NULL, conn->ksnc_cookie);
999 CERROR ("Refusing to complete a partial receive from "
1000 LPX64", ip %d.%d.%d.%d:%d\n", conn->ksnc_peer->ksnp_nid,
1001 HIPQUAD(conn->ksnc_ipaddr), conn->ksnc_port);
1002 CERROR ("This may hang communications and "
1003 "prevent modules from unloading\n");
1006 case SOCKNAL_RX_BODY_FWD:
1007 ksocknal_fmb_callback (conn->ksnc_cookie, -ECONNABORTED);
1009 case SOCKNAL_RX_HEADER:
1010 case SOCKNAL_RX_SLOP:
1017 ksocknal_put_peer (conn->ksnc_peer);
1019 PORTAL_FREE (conn, sizeof (*conn));
1020 atomic_dec (&ksocknal_data.ksnd_nclosing_conns);
1024 ksocknal_put_conn (ksock_conn_t *conn)
1026 unsigned long flags;
1028 CDEBUG (D_OTHER, "putting conn[%p] -> "LPX64" (%d)\n",
1029 conn, conn->ksnc_peer->ksnp_nid,
1030 atomic_read (&conn->ksnc_refcount));
1032 LASSERT (atomic_read (&conn->ksnc_refcount) > 0);
1033 if (!atomic_dec_and_test (&conn->ksnc_refcount))
1036 spin_lock_irqsave (&ksocknal_data.ksnd_reaper_lock, flags);
1038 list_add (&conn->ksnc_list, &ksocknal_data.ksnd_zombie_conns);
1039 wake_up (&ksocknal_data.ksnd_reaper_waitq);
1041 spin_unlock_irqrestore (&ksocknal_data.ksnd_reaper_lock, flags);
1045 ksocknal_close_peer_conns_locked (ksock_peer_t *peer, __u32 ipaddr, int why)
1048 struct list_head *ctmp;
1049 struct list_head *cnxt;
1052 list_for_each_safe (ctmp, cnxt, &peer->ksnp_conns) {
1053 conn = list_entry (ctmp, ksock_conn_t, ksnc_list);
1056 conn->ksnc_ipaddr == ipaddr) {
1058 ksocknal_close_conn_locked (conn, why);
1066 ksocknal_close_stale_conns_locked (ksock_peer_t *peer, __u64 incarnation)
1069 struct list_head *ctmp;
1070 struct list_head *cnxt;
1073 list_for_each_safe (ctmp, cnxt, &peer->ksnp_conns) {
1074 conn = list_entry (ctmp, ksock_conn_t, ksnc_list);
1076 if (conn->ksnc_incarnation == incarnation)
1080 ksocknal_close_conn_locked (conn, -ESTALE);
1087 ksocknal_close_conn_and_siblings (ksock_conn_t *conn, int why)
1089 ksock_peer_t *peer = conn->ksnc_peer;
1090 __u32 ipaddr = conn->ksnc_ipaddr;
1091 unsigned long flags;
1094 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
1096 count = ksocknal_close_peer_conns_locked (peer, ipaddr, why);
1098 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
1104 ksocknal_close_matching_conns (ptl_nid_t nid, __u32 ipaddr)
1106 unsigned long flags;
1108 struct list_head *ptmp;
1109 struct list_head *pnxt;
1115 write_lock_irqsave (&ksocknal_data.ksnd_global_lock, flags);
1117 if (nid != PTL_NID_ANY)
1118 lo = hi = ksocknal_nid2peerlist(nid) - ksocknal_data.ksnd_peers;
1121 hi = ksocknal_data.ksnd_peer_hash_size - 1;
1124 for (i = lo; i <= hi; i++) {
1125 list_for_each_safe (ptmp, pnxt, &ksocknal_data.ksnd_peers[i]) {
1127 peer = list_entry (ptmp, ksock_peer_t, ksnp_list);
1129 if (!(nid == PTL_NID_ANY || nid == peer->ksnp_nid))
1132 count += ksocknal_close_peer_conns_locked (peer, ipaddr, 0);
1136 write_unlock_irqrestore (&ksocknal_data.ksnd_global_lock, flags);
1138 /* wildcards always succeed */
1139 if (nid == PTL_NID_ANY || ipaddr == 0)
1142 return (count == 0 ? -ENOENT : 0);
1146 ksocknal_notify (void *arg, ptl_nid_t gw_nid, int alive)
1148 /* The router is telling me she's been notified of a change in
1149 * gateway state.... */
1151 CDEBUG (D_NET, "gw "LPX64" %s\n", gw_nid, alive ? "up" : "down");
1154 /* If the gateway crashed, close all open connections... */
1155 ksocknal_close_matching_conns (gw_nid, 0);
1159 /* ...otherwise do nothing. We can only establish new connections
1160 * if we have autroutes, and these connect on demand. */
1163 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0))
1164 struct tcp_opt *sock2tcp_opt(struct sock *sk)
1166 return &(sk->tp_pinfo.af_tcp);
1169 struct tcp_opt *sock2tcp_opt(struct sock *sk)
1171 struct tcp_sock *s = (struct tcp_sock *)sk;
1177 ksocknal_push_conn (ksock_conn_t *conn)
1186 rc = ksocknal_getconnsock (conn);
1187 if (rc != 0) /* being shut down */
1190 sk = conn->ksnc_sock->sk;
1191 tp = sock2tcp_opt(sk);
1194 nonagle = tp->nonagle;
1201 rc = sk->sk_prot->setsockopt (sk, SOL_TCP, TCP_NODELAY,
1202 (char *)&val, sizeof (val));
1208 tp->nonagle = nonagle;
1211 ksocknal_putconnsock (conn);
1215 ksocknal_push_peer (ksock_peer_t *peer)
1219 struct list_head *tmp;
1222 for (index = 0; ; index++) {
1223 read_lock (&ksocknal_data.ksnd_global_lock);
1228 list_for_each (tmp, &peer->ksnp_conns) {
1230 conn = list_entry (tmp, ksock_conn_t, ksnc_list);
1231 atomic_inc (&conn->ksnc_refcount);
1236 read_unlock (&ksocknal_data.ksnd_global_lock);
1241 ksocknal_push_conn (conn);
1242 ksocknal_put_conn (conn);
1247 ksocknal_push (ptl_nid_t nid)
1250 struct list_head *tmp;
1256 if (nid != PTL_NID_ANY) {
1257 peer = ksocknal_get_peer (nid);
1261 ksocknal_push_peer (peer);
1262 ksocknal_put_peer (peer);
1267 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++) {
1268 for (j = 0; ; j++) {
1269 read_lock (&ksocknal_data.ksnd_global_lock);
1274 list_for_each (tmp, &ksocknal_data.ksnd_peers[i]) {
1276 peer = list_entry(tmp, ksock_peer_t,
1278 atomic_inc (&peer->ksnp_refcount);
1283 read_unlock (&ksocknal_data.ksnd_global_lock);
1287 ksocknal_push_peer (peer);
1288 ksocknal_put_peer (peer);
1298 ksocknal_cmd(struct portals_cfg *pcfg, void * private)
1302 LASSERT (pcfg != NULL);
1304 switch(pcfg->pcfg_command) {
1305 case NAL_CMD_GET_AUTOCONN: {
1306 ksock_route_t *route = ksocknal_get_route_by_idx (pcfg->pcfg_count);
1312 pcfg->pcfg_nid = route->ksnr_peer->ksnp_nid;
1313 pcfg->pcfg_id = route->ksnr_ipaddr;
1314 pcfg->pcfg_misc = route->ksnr_port;
1315 pcfg->pcfg_count = route->ksnr_conn_count;
1316 pcfg->pcfg_size = route->ksnr_buffer_size;
1317 pcfg->pcfg_wait = route->ksnr_sharecount;
1318 pcfg->pcfg_flags = (route->ksnr_irq_affinity ? 2 : 0) |
1319 (route->ksnr_eager ? 4 : 0);
1320 ksocknal_put_route (route);
1324 case NAL_CMD_ADD_AUTOCONN: {
1325 rc = ksocknal_add_route (pcfg->pcfg_nid, pcfg->pcfg_id,
1326 pcfg->pcfg_misc, pcfg->pcfg_size,
1327 (pcfg->pcfg_flags & 0x02) != 0,
1328 (pcfg->pcfg_flags & 0x04) != 0,
1329 (pcfg->pcfg_flags & 0x08) != 0);
1332 case NAL_CMD_DEL_AUTOCONN: {
1333 rc = ksocknal_del_route (pcfg->pcfg_nid, pcfg->pcfg_id,
1334 (pcfg->pcfg_flags & 1) != 0,
1335 (pcfg->pcfg_flags & 2) != 0);
1338 case NAL_CMD_GET_CONN: {
1339 ksock_conn_t *conn = ksocknal_get_conn_by_idx (pcfg->pcfg_count);
1345 pcfg->pcfg_nid = conn->ksnc_peer->ksnp_nid;
1346 pcfg->pcfg_id = conn->ksnc_ipaddr;
1347 pcfg->pcfg_misc = conn->ksnc_port;
1348 pcfg->pcfg_flags = conn->ksnc_type;
1349 ksocknal_put_conn (conn);
1353 case NAL_CMD_REGISTER_PEER_FD: {
1354 struct socket *sock = sockfd_lookup (pcfg->pcfg_fd, &rc);
1355 int type = pcfg->pcfg_misc;
1361 case SOCKNAL_CONN_NONE:
1362 case SOCKNAL_CONN_ANY:
1363 case SOCKNAL_CONN_CONTROL:
1364 case SOCKNAL_CONN_BULK_IN:
1365 case SOCKNAL_CONN_BULK_OUT:
1366 rc = ksocknal_create_conn(NULL, sock, pcfg->pcfg_flags, type);
1374 case NAL_CMD_CLOSE_CONNECTION: {
1375 rc = ksocknal_close_matching_conns (pcfg->pcfg_nid,
1379 case NAL_CMD_REGISTER_MYNID: {
1380 rc = ksocknal_set_mynid (pcfg->pcfg_nid);
1383 case NAL_CMD_PUSH_CONNECTION: {
1384 rc = ksocknal_push (pcfg->pcfg_nid);
1393 ksocknal_free_fmbs (ksock_fmb_pool_t *p)
1398 LASSERT (list_empty(&p->fmp_blocked_conns));
1399 LASSERT (p->fmp_nactive_fmbs == 0);
1401 while (!list_empty(&p->fmp_idle_fmbs)) {
1403 fmb = list_entry(p->fmp_idle_fmbs.next,
1404 ksock_fmb_t, fmb_list);
1406 for (i = 0; i < fmb->fmb_npages; i++)
1407 if (fmb->fmb_pages[i] != NULL)
1408 __free_page(fmb->fmb_pages[i]);
1410 list_del(&fmb->fmb_list);
1411 PORTAL_FREE(fmb, sizeof(*fmb));
1416 ksocknal_free_buffers (void)
1418 ksocknal_free_fmbs(&ksocknal_data.ksnd_small_fmp);
1419 ksocknal_free_fmbs(&ksocknal_data.ksnd_large_fmp);
1421 LASSERT (atomic_read(&ksocknal_data.ksnd_nactive_ltxs) == 0);
1423 if (ksocknal_data.ksnd_schedulers != NULL)
1424 PORTAL_FREE (ksocknal_data.ksnd_schedulers,
1425 sizeof (ksock_sched_t) * SOCKNAL_N_SCHED);
1427 PORTAL_FREE (ksocknal_data.ksnd_peers,
1428 sizeof (struct list_head) *
1429 ksocknal_data.ksnd_peer_hash_size);
1433 ksocknal_module_fini (void)
1437 CDEBUG(D_MALLOC, "before NAL cleanup: kmem %d\n",
1438 atomic_read (&portal_kmemory));
1440 switch (ksocknal_data.ksnd_init) {
1444 case SOCKNAL_INIT_ALL:
1446 if (ksocknal_data.ksnd_sysctl != NULL)
1447 unregister_sysctl_table (ksocknal_data.ksnd_sysctl);
1449 kportal_nal_unregister(SOCKNAL);
1450 PORTAL_SYMBOL_UNREGISTER (ksocknal_ni);
1453 case SOCKNAL_INIT_PTL:
1454 /* No more calls to ksocknal_cmd() to create new
1455 * autoroutes/connections since we're being unloaded. */
1456 PtlNIFini(ksocknal_ni);
1458 /* Delete all autoroute entries */
1459 ksocknal_del_route(PTL_NID_ANY, 0, 0, 0);
1461 /* Delete all connections */
1462 ksocknal_close_matching_conns (PTL_NID_ANY, 0);
1464 /* Wait for all peer state to clean up */
1466 while (atomic_read (&ksocknal_data.ksnd_npeers) != 0) {
1468 CDEBUG(((i & (-i)) == i) ? D_WARNING : D_NET, /* power of 2? */
1469 "waiting for %d peers to disconnect\n",
1470 atomic_read (&ksocknal_data.ksnd_npeers));
1471 set_current_state (TASK_UNINTERRUPTIBLE);
1472 schedule_timeout (HZ);
1475 /* Tell lib we've stopped calling into her. */
1476 lib_fini(&ksocknal_lib);
1479 case SOCKNAL_INIT_DATA:
1480 /* Module refcount only gets to zero when all peers
1481 * have been closed so all lists must be empty */
1482 LASSERT (atomic_read (&ksocknal_data.ksnd_npeers) == 0);
1483 LASSERT (ksocknal_data.ksnd_peers != NULL);
1484 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++) {
1485 LASSERT (list_empty (&ksocknal_data.ksnd_peers[i]));
1487 LASSERT (list_empty (&ksocknal_data.ksnd_enomem_conns));
1488 LASSERT (list_empty (&ksocknal_data.ksnd_zombie_conns));
1489 LASSERT (list_empty (&ksocknal_data.ksnd_autoconnectd_routes));
1490 LASSERT (list_empty (&ksocknal_data.ksnd_small_fmp.fmp_blocked_conns));
1491 LASSERT (list_empty (&ksocknal_data.ksnd_large_fmp.fmp_blocked_conns));
1493 if (ksocknal_data.ksnd_schedulers != NULL)
1494 for (i = 0; i < SOCKNAL_N_SCHED; i++) {
1495 ksock_sched_t *kss =
1496 &ksocknal_data.ksnd_schedulers[i];
1498 LASSERT (list_empty (&kss->kss_tx_conns));
1499 LASSERT (list_empty (&kss->kss_rx_conns));
1500 LASSERT (kss->kss_nconns == 0);
1503 /* stop router calling me */
1504 kpr_shutdown (&ksocknal_data.ksnd_router);
1506 /* flag threads to terminate; wake and wait for them to die */
1507 ksocknal_data.ksnd_shuttingdown = 1;
1508 wake_up_all (&ksocknal_data.ksnd_autoconnectd_waitq);
1509 wake_up_all (&ksocknal_data.ksnd_reaper_waitq);
1511 for (i = 0; i < SOCKNAL_N_SCHED; i++)
1512 wake_up_all(&ksocknal_data.ksnd_schedulers[i].kss_waitq);
1514 while (atomic_read (&ksocknal_data.ksnd_nthreads) != 0) {
1515 CDEBUG (D_NET, "waitinf for %d threads to terminate\n",
1516 atomic_read (&ksocknal_data.ksnd_nthreads));
1517 set_current_state (TASK_UNINTERRUPTIBLE);
1518 schedule_timeout (HZ);
1521 kpr_deregister (&ksocknal_data.ksnd_router);
1523 ksocknal_free_buffers();
1526 case SOCKNAL_INIT_NOTHING:
1530 CDEBUG(D_MALLOC, "after NAL cleanup: kmem %d\n",
1531 atomic_read (&portal_kmemory));
1533 printk(KERN_INFO "Lustre: Routing socket NAL unloaded (final mem %d)\n",
1534 atomic_read(&portal_kmemory));
1539 ksocknal_init_incarnation (void)
1543 /* The incarnation number is the time this module loaded and it
1544 * identifies this particular instance of the socknal. Hopefully
1545 * we won't be able to reboot more frequently than 1MHz for the
1546 * forseeable future :) */
1548 do_gettimeofday(&tv);
1550 ksocknal_data.ksnd_incarnation =
1551 (((__u64)tv.tv_sec) * 1000000) + tv.tv_usec;
1555 ksocknal_module_init (void)
1557 int pkmem = atomic_read(&portal_kmemory);
1562 /* packet descriptor must fit in a router descriptor's scratchpad */
1563 LASSERT(sizeof (ksock_tx_t) <= sizeof (kprfd_scratch_t));
1564 /* the following must be sizeof(int) for proc_dointvec() */
1565 LASSERT(sizeof (ksocknal_data.ksnd_io_timeout) == sizeof (int));
1566 LASSERT(sizeof (ksocknal_data.ksnd_eager_ack) == sizeof (int));
1567 /* check ksnr_connected/connecting field large enough */
1568 LASSERT(SOCKNAL_CONN_NTYPES <= 4);
1570 LASSERT (ksocknal_data.ksnd_init == SOCKNAL_INIT_NOTHING);
1572 ksocknal_api.forward = ksocknal_api_forward;
1573 ksocknal_api.shutdown = ksocknal_api_shutdown;
1574 ksocknal_api.yield = ksocknal_api_yield;
1575 ksocknal_api.validate = NULL; /* our api validate is a NOOP */
1576 ksocknal_api.lock = ksocknal_api_lock;
1577 ksocknal_api.unlock = ksocknal_api_unlock;
1578 ksocknal_api.nal_data = &ksocknal_data;
1580 ksocknal_lib.nal_data = &ksocknal_data;
1582 memset (&ksocknal_data, 0, sizeof (ksocknal_data)); /* zero pointers */
1584 ksocknal_data.ksnd_io_timeout = SOCKNAL_IO_TIMEOUT;
1585 ksocknal_data.ksnd_eager_ack = SOCKNAL_EAGER_ACK;
1586 ksocknal_data.ksnd_typed_conns = SOCKNAL_TYPED_CONNS;
1587 ksocknal_data.ksnd_min_bulk = SOCKNAL_MIN_BULK;
1589 ksocknal_data.ksnd_zc_min_frag = SOCKNAL_ZC_MIN_FRAG;
1591 ksocknal_init_incarnation();
1593 ksocknal_data.ksnd_peer_hash_size = SOCKNAL_PEER_HASH_SIZE;
1594 PORTAL_ALLOC (ksocknal_data.ksnd_peers,
1595 sizeof (struct list_head) * ksocknal_data.ksnd_peer_hash_size);
1596 if (ksocknal_data.ksnd_peers == NULL)
1599 for (i = 0; i < ksocknal_data.ksnd_peer_hash_size; i++)
1600 INIT_LIST_HEAD(&ksocknal_data.ksnd_peers[i]);
1602 rwlock_init(&ksocknal_data.ksnd_global_lock);
1604 ksocknal_data.ksnd_nal_cb = &ksocknal_lib;
1605 spin_lock_init (&ksocknal_data.ksnd_nal_cb_lock);
1607 spin_lock_init(&ksocknal_data.ksnd_small_fmp.fmp_lock);
1608 INIT_LIST_HEAD(&ksocknal_data.ksnd_small_fmp.fmp_idle_fmbs);
1609 INIT_LIST_HEAD(&ksocknal_data.ksnd_small_fmp.fmp_blocked_conns);
1611 spin_lock_init(&ksocknal_data.ksnd_large_fmp.fmp_lock);
1612 INIT_LIST_HEAD(&ksocknal_data.ksnd_large_fmp.fmp_idle_fmbs);
1613 INIT_LIST_HEAD(&ksocknal_data.ksnd_large_fmp.fmp_blocked_conns);
1615 spin_lock_init (&ksocknal_data.ksnd_reaper_lock);
1616 INIT_LIST_HEAD (&ksocknal_data.ksnd_enomem_conns);
1617 INIT_LIST_HEAD (&ksocknal_data.ksnd_zombie_conns);
1618 INIT_LIST_HEAD (&ksocknal_data.ksnd_deathrow_conns);
1619 init_waitqueue_head(&ksocknal_data.ksnd_reaper_waitq);
1621 spin_lock_init (&ksocknal_data.ksnd_autoconnectd_lock);
1622 INIT_LIST_HEAD (&ksocknal_data.ksnd_autoconnectd_routes);
1623 init_waitqueue_head(&ksocknal_data.ksnd_autoconnectd_waitq);
1625 /* NB memset above zeros whole of ksocknal_data, including
1626 * ksocknal_data.ksnd_irqinfo[all].ksni_valid */
1628 /* flag lists/ptrs/locks initialised */
1629 ksocknal_data.ksnd_init = SOCKNAL_INIT_DATA;
1631 PORTAL_ALLOC(ksocknal_data.ksnd_schedulers,
1632 sizeof(ksock_sched_t) * SOCKNAL_N_SCHED);
1633 if (ksocknal_data.ksnd_schedulers == NULL) {
1634 ksocknal_module_fini ();
1638 for (i = 0; i < SOCKNAL_N_SCHED; i++) {
1639 ksock_sched_t *kss = &ksocknal_data.ksnd_schedulers[i];
1641 spin_lock_init (&kss->kss_lock);
1642 INIT_LIST_HEAD (&kss->kss_rx_conns);
1643 INIT_LIST_HEAD (&kss->kss_tx_conns);
1645 INIT_LIST_HEAD (&kss->kss_zctxdone_list);
1647 init_waitqueue_head (&kss->kss_waitq);
1650 rc = PtlNIInit(ksocknal_init, 32, 4, 0, &ksocknal_ni);
1652 CERROR("ksocknal: PtlNIInit failed: error %d\n", rc);
1653 ksocknal_module_fini ();
1656 PtlNIDebug(ksocknal_ni, ~0);
1658 ksocknal_data.ksnd_init = SOCKNAL_INIT_PTL; // flag PtlNIInit() called
1660 for (i = 0; i < SOCKNAL_N_SCHED; i++) {
1661 rc = ksocknal_thread_start (ksocknal_scheduler,
1662 &ksocknal_data.ksnd_schedulers[i]);
1664 CERROR("Can't spawn socknal scheduler[%d]: %d\n",
1666 ksocknal_module_fini ();
1671 for (i = 0; i < SOCKNAL_N_AUTOCONNECTD; i++) {
1672 rc = ksocknal_thread_start (ksocknal_autoconnectd, (void *)((long)i));
1674 CERROR("Can't spawn socknal autoconnectd: %d\n", rc);
1675 ksocknal_module_fini ();
1680 rc = ksocknal_thread_start (ksocknal_reaper, NULL);
1682 CERROR ("Can't spawn socknal reaper: %d\n", rc);
1683 ksocknal_module_fini ();
1687 rc = kpr_register(&ksocknal_data.ksnd_router,
1688 &ksocknal_router_interface);
1690 CDEBUG(D_NET, "Can't initialise routing interface "
1691 "(rc = %d): not routing\n", rc);
1693 /* Only allocate forwarding buffers if I'm on a gateway */
1695 for (i = 0; i < (SOCKNAL_SMALL_FWD_NMSGS +
1696 SOCKNAL_LARGE_FWD_NMSGS); i++) {
1699 PORTAL_ALLOC(fmb, sizeof(*fmb));
1701 ksocknal_module_fini();
1705 if (i < SOCKNAL_SMALL_FWD_NMSGS) {
1706 fmb->fmb_npages = SOCKNAL_SMALL_FWD_PAGES;
1707 fmb->fmb_pool = &ksocknal_data.ksnd_small_fmp;
1709 fmb->fmb_npages = SOCKNAL_LARGE_FWD_PAGES;
1710 fmb->fmb_pool = &ksocknal_data.ksnd_large_fmp;
1713 for (j = 0; j < fmb->fmb_npages; j++) {
1714 fmb->fmb_pages[j] = alloc_page(GFP_KERNEL);
1716 if (fmb->fmb_pages[j] == NULL) {
1717 ksocknal_module_fini ();
1721 LASSERT(page_address(fmb->fmb_pages[j]) != NULL);
1724 list_add(&fmb->fmb_list, &fmb->fmb_pool->fmp_idle_fmbs);
1728 rc = kportal_nal_register(SOCKNAL, &ksocknal_cmd, NULL);
1730 CERROR ("Can't initialise command interface (rc = %d)\n", rc);
1731 ksocknal_module_fini ();
1735 PORTAL_SYMBOL_REGISTER(ksocknal_ni);
1737 #ifdef CONFIG_SYSCTL
1738 /* Press on regardless even if registering sysctl doesn't work */
1739 ksocknal_data.ksnd_sysctl = register_sysctl_table (ksocknal_top_ctl_table, 0);
1741 /* flag everything initialised */
1742 ksocknal_data.ksnd_init = SOCKNAL_INIT_ALL;
1744 printk(KERN_INFO "Lustre: Routing socket NAL loaded "
1745 "(Routing %s, initial mem %d)\n",
1746 kpr_routing (&ksocknal_data.ksnd_router) ?
1747 "enabled" : "disabled", pkmem);
1752 MODULE_AUTHOR("Cluster File Systems, Inc. <info@clusterfs.com>");
1753 MODULE_DESCRIPTION("Kernel TCP Socket NAL v0.01");
1754 MODULE_LICENSE("GPL");
1756 module_init(ksocknal_module_init);
1757 module_exit(ksocknal_module_fini);
1759 EXPORT_SYMBOL (ksocknal_ni);