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: Isaac Huang <isaac@clusterfs.com>
9 #define DEBUG_SUBSYSTEM S_LNET
14 #define SRPC_PEER_HASH_SIZE 101 /* # peer lists */
25 struct smoketest_rpc {
26 spinlock_t rpc_glock; /* global lock */
27 srpc_service_t *rpc_services[SRPC_SERVICE_MAX_ID + 1];
28 struct list_head *rpc_peers; /* hash table of known peers */
29 lnet_handle_eq_t rpc_lnet_eq; /* _the_ LNet event queue */
30 srpc_state_t rpc_state;
31 srpc_counters_t rpc_counters;
32 __u64 rpc_matchbits; /* matchbits counter */
35 static int srpc_peer_credits = 16;
36 CFS_MODULE_PARM(srpc_peer_credits, "i", int, 0444,
37 "# in-flight RPCs per peer (16 by default)");
40 int srpc_handle_rpc (swi_workitem_t *wi);
42 void srpc_get_counters (srpc_counters_t *cnt)
44 spin_lock(&srpc_data.rpc_glock);
45 *cnt = srpc_data.rpc_counters;
46 spin_unlock(&srpc_data.rpc_glock);
49 void srpc_set_counters (const srpc_counters_t *cnt)
51 spin_lock(&srpc_data.rpc_glock);
52 srpc_data.rpc_counters = *cnt;
53 spin_unlock(&srpc_data.rpc_glock);
57 srpc_add_bulk_page (srpc_bulk_t *bk, cfs_page_t *pg, int i)
59 LASSERT (i >= 0 && i < bk->bk_niov);
62 bk->bk_iovs[i].kiov_offset = 0;
63 bk->bk_iovs[i].kiov_page = pg;
64 bk->bk_iovs[i].kiov_len = CFS_PAGE_SIZE;
66 LASSERT (bk->bk_pages != NULL);
69 bk->bk_iovs[i].iov_len = CFS_PAGE_SIZE;
70 bk->bk_iovs[i].iov_base = cfs_page_address(pg);
76 srpc_free_bulk (srpc_bulk_t *bk)
83 LASSERT (bk->bk_pages != NULL);
86 for (i = 0; i < bk->bk_niov; i++) {
88 pg = bk->bk_iovs[i].kiov_page;
92 if (pg == NULL) break;
98 LIBCFS_FREE(bk->bk_pages, sizeof(cfs_page_t *) * bk->bk_niov);
100 LIBCFS_FREE(bk, offsetof(srpc_bulk_t, bk_iovs[bk->bk_niov]));
105 srpc_alloc_bulk (int npages, int sink)
111 LASSERT (npages > 0 && npages <= LNET_MAX_IOV);
113 LIBCFS_ALLOC(bk, offsetof(srpc_bulk_t, bk_iovs[npages]));
115 CERROR ("Can't allocate descriptor for %d pages\n", npages);
119 memset(bk, 0, offsetof(srpc_bulk_t, bk_iovs[npages]));
121 bk->bk_niov = npages;
122 bk->bk_len = npages * CFS_PAGE_SIZE;
124 LIBCFS_ALLOC(pages, sizeof(cfs_page_t *) * npages);
126 LIBCFS_FREE(bk, offsetof(srpc_bulk_t, bk_iovs[npages]));
127 CERROR ("Can't allocate page array for %d pages\n", npages);
131 memset(pages, 0, sizeof(cfs_page_t *) * npages);
132 bk->bk_pages = pages;
137 for (i = 0; i < npages; i++) {
138 cfs_page_t *pg = cfs_alloc_page(CFS_ALLOC_STD);
141 CERROR ("Can't allocate page %d of %d\n", i, npages);
146 srpc_add_bulk_page(bk, pg, i);
153 static inline struct list_head *
154 srpc_nid2peerlist (lnet_nid_t nid)
156 unsigned int hash = ((unsigned int)nid) % SRPC_PEER_HASH_SIZE;
158 return &srpc_data.rpc_peers[hash];
161 static inline srpc_peer_t *
162 srpc_create_peer (lnet_nid_t nid)
166 LASSERT (nid != LNET_NID_ANY);
168 LIBCFS_ALLOC(peer, sizeof(srpc_peer_t));
170 CERROR ("Failed to allocate peer structure for %s\n",
171 libcfs_nid2str(nid));
175 memset(peer, 0, sizeof(srpc_peer_t));
177 peer->stp_credits = srpc_peer_credits;
179 spin_lock_init(&peer->stp_lock);
180 CFS_INIT_LIST_HEAD(&peer->stp_rpcq);
181 CFS_INIT_LIST_HEAD(&peer->stp_ctl_rpcq);
186 srpc_find_peer_locked (lnet_nid_t nid)
188 struct list_head *peer_list = srpc_nid2peerlist(nid);
191 LASSERT (nid != LNET_NID_ANY);
193 list_for_each_entry (peer, peer_list, stp_list) {
194 if (peer->stp_nid == nid)
202 srpc_nid2peer (lnet_nid_t nid)
205 srpc_peer_t *new_peer;
207 spin_lock(&srpc_data.rpc_glock);
208 peer = srpc_find_peer_locked(nid);
209 spin_unlock(&srpc_data.rpc_glock);
214 new_peer = srpc_create_peer(nid);
216 spin_lock(&srpc_data.rpc_glock);
218 peer = srpc_find_peer_locked(nid);
220 spin_unlock(&srpc_data.rpc_glock);
221 if (new_peer != NULL)
222 LIBCFS_FREE(new_peer, sizeof(srpc_peer_t));
227 if (new_peer == NULL) {
228 spin_unlock(&srpc_data.rpc_glock);
232 list_add_tail(&new_peer->stp_list, srpc_nid2peerlist(nid));
233 spin_unlock(&srpc_data.rpc_glock);
242 spin_lock(&srpc_data.rpc_glock);
243 id = srpc_data.rpc_matchbits++;
244 spin_unlock(&srpc_data.rpc_glock);
249 srpc_init_server_rpc (srpc_server_rpc_t *rpc,
250 srpc_service_t *sv, srpc_buffer_t *buffer)
252 memset(rpc, 0, sizeof(*rpc));
253 swi_init_workitem(&rpc->srpc_wi, rpc, srpc_handle_rpc);
255 rpc->srpc_ev.ev_fired = 1; /* no event expected now */
257 rpc->srpc_service = sv;
258 rpc->srpc_reqstbuf = buffer;
259 rpc->srpc_peer = buffer->buf_peer;
260 rpc->srpc_self = buffer->buf_self;
261 rpc->srpc_replymdh = LNET_INVALID_HANDLE;
265 srpc_add_service (srpc_service_t *sv)
269 srpc_server_rpc_t *rpc;
271 LASSERT (sv->sv_concur > 0);
272 LASSERT (0 <= id && id <= SRPC_SERVICE_MAX_ID);
274 spin_lock(&srpc_data.rpc_glock);
276 LASSERT (srpc_data.rpc_state == SRPC_STATE_RUNNING);
278 if (srpc_data.rpc_services[id] != NULL) {
279 spin_unlock(&srpc_data.rpc_glock);
283 srpc_data.rpc_services[id] = sv;
284 spin_unlock(&srpc_data.rpc_glock);
287 sv->sv_nposted_msg = 0;
288 sv->sv_shuttingdown = 0;
289 spin_lock_init(&sv->sv_lock);
290 CFS_INIT_LIST_HEAD(&sv->sv_free_rpcq);
291 CFS_INIT_LIST_HEAD(&sv->sv_active_rpcq);
292 CFS_INIT_LIST_HEAD(&sv->sv_posted_msgq);
293 CFS_INIT_LIST_HEAD(&sv->sv_blocked_msgq);
295 sv->sv_ev.ev_data = sv;
296 sv->sv_ev.ev_type = SRPC_REQUEST_RCVD;
298 for (i = 0; i < sv->sv_concur; i++) {
299 LIBCFS_ALLOC(rpc, sizeof(*rpc));
300 if (rpc == NULL) goto enomem;
302 list_add(&rpc->srpc_list, &sv->sv_free_rpcq);
305 CDEBUG (D_NET, "Adding service: id %d, name %s, concurrency %d\n",
306 id, sv->sv_name, sv->sv_concur);
310 while (!list_empty(&sv->sv_free_rpcq)) {
311 rpc = list_entry(sv->sv_free_rpcq.next,
312 srpc_server_rpc_t, srpc_list);
313 list_del(&rpc->srpc_list);
314 LIBCFS_FREE(rpc, sizeof(*rpc));
317 spin_lock(&srpc_data.rpc_glock);
318 srpc_data.rpc_services[id] = NULL;
319 spin_unlock(&srpc_data.rpc_glock);
324 srpc_remove_service (srpc_service_t *sv)
328 spin_lock(&srpc_data.rpc_glock);
330 if (srpc_data.rpc_services[id] != sv) {
331 spin_unlock(&srpc_data.rpc_glock);
335 srpc_data.rpc_services[id] = NULL;
336 spin_unlock(&srpc_data.rpc_glock);
341 srpc_post_passive_rdma(int portal, __u64 matchbits, void *buf,
342 int len, int options, lnet_process_id_t peer,
343 lnet_handle_md_t *mdh, srpc_event_t *ev)
347 lnet_handle_me_t meh;
349 rc = LNetMEAttach(portal, peer, matchbits, 0,
350 LNET_UNLINK, LNET_INS_AFTER, &meh);
352 CERROR ("LNetMEAttach failed: %d\n", rc);
353 LASSERT (rc == -ENOMEM);
361 md.options = options;
362 md.eq_handle = srpc_data.rpc_lnet_eq;
364 rc = LNetMDAttach(meh, md, LNET_UNLINK, mdh);
366 CERROR ("LNetMDAttach failed: %d\n", rc);
367 LASSERT (rc == -ENOMEM);
369 rc = LNetMEUnlink(meh);
375 "Posted passive RDMA: peer %s, portal %d, matchbits "LPX64"\n",
376 libcfs_id2str(peer), portal, matchbits);
381 srpc_post_active_rdma(int portal, __u64 matchbits, void *buf, int len,
382 int options, lnet_process_id_t peer, lnet_nid_t self,
383 lnet_handle_md_t *mdh, srpc_event_t *ev)
391 md.eq_handle = srpc_data.rpc_lnet_eq;
392 md.threshold = ((options & LNET_MD_OP_GET) != 0) ? 2 : 1;
393 md.options = options & ~(LNET_MD_OP_PUT | LNET_MD_OP_GET);
395 rc = LNetMDBind(md, LNET_UNLINK, mdh);
397 CERROR ("LNetMDBind failed: %d\n", rc);
398 LASSERT (rc == -ENOMEM);
402 /* this is kind of an abuse of the LNET_MD_OP_{PUT,GET} options.
403 * they're only meaningful for MDs attached to an ME (i.e. passive
405 if ((options & LNET_MD_OP_PUT) != 0) {
406 rc = LNetPut(self, *mdh, LNET_NOACK_REQ, peer,
407 portal, matchbits, 0, 0);
409 LASSERT ((options & LNET_MD_OP_GET) != 0);
411 rc = LNetGet(self, *mdh, peer, portal, matchbits, 0);
415 CERROR ("LNet%s(%s, %d, "LPD64") failed: %d\n",
416 ((options & LNET_MD_OP_PUT) != 0) ? "Put" : "Get",
417 libcfs_id2str(peer), portal, matchbits, rc);
419 /* The forthcoming unlink event will complete this operation
420 * with failure, so fall through and return success here.
422 rc = LNetMDUnlink(*mdh);
426 "Posted active RDMA: peer %s, portal %u, matchbits "LPX64"\n",
427 libcfs_id2str(peer), portal, matchbits);
433 srpc_post_active_rqtbuf(lnet_process_id_t peer, int service, void *buf,
434 int len, lnet_handle_md_t *mdh, srpc_event_t *ev)
439 if (service > SRPC_FRAMEWORK_SERVICE_MAX_ID)
440 portal = SRPC_REQUEST_PORTAL;
442 portal = SRPC_FRAMEWORK_REQUEST_PORTAL;
444 rc = srpc_post_active_rdma(portal, service, buf, len,
445 LNET_MD_OP_PUT, peer,
446 LNET_NID_ANY, mdh, ev);
451 srpc_post_passive_rqtbuf(int service, void *buf, int len,
452 lnet_handle_md_t *mdh, srpc_event_t *ev)
456 lnet_process_id_t any = {.nid = LNET_NID_ANY,
457 .pid = LNET_PID_ANY};
459 if (service > SRPC_FRAMEWORK_SERVICE_MAX_ID)
460 portal = SRPC_REQUEST_PORTAL;
462 portal = SRPC_FRAMEWORK_REQUEST_PORTAL;
464 rc = srpc_post_passive_rdma(portal, service, buf, len,
465 LNET_MD_OP_PUT, any, mdh, ev);
470 srpc_service_post_buffer (srpc_service_t *sv, srpc_buffer_t *buf)
472 srpc_msg_t *msg = &buf->buf_msg;
475 LASSERT (!sv->sv_shuttingdown);
477 buf->buf_mdh = LNET_INVALID_HANDLE;
478 list_add(&buf->buf_list, &sv->sv_posted_msgq);
479 sv->sv_nposted_msg++;
480 spin_unlock(&sv->sv_lock);
482 rc = srpc_post_passive_rqtbuf(sv->sv_id, msg, sizeof(*msg),
483 &buf->buf_mdh, &sv->sv_ev);
485 /* At this point, a RPC (new or delayed) may have arrived in
486 * msg and its event handler has been called. So we must add
487 * buf to sv_posted_msgq _before_ dropping sv_lock */
489 spin_lock(&sv->sv_lock);
492 if (sv->sv_shuttingdown) {
493 spin_unlock(&sv->sv_lock);
495 /* srpc_shutdown_service might have tried to unlink me
496 * when my buf_mdh was still invalid */
497 LNetMDUnlink(buf->buf_mdh);
499 spin_lock(&sv->sv_lock);
504 sv->sv_nposted_msg--;
505 if (sv->sv_shuttingdown) return rc;
507 list_del(&buf->buf_list);
509 spin_unlock(&sv->sv_lock);
510 LIBCFS_FREE(buf, sizeof(*buf));
511 spin_lock(&sv->sv_lock);
516 srpc_service_add_buffers (srpc_service_t *sv, int nbuffer)
522 LASSERTF (nbuffer > 0,
523 "nbuffer must be positive: %d\n", nbuffer);
525 for (posted = 0; posted < nbuffer; posted++) {
526 LIBCFS_ALLOC(buf, sizeof(*buf));
527 if (buf == NULL) break;
529 spin_lock(&sv->sv_lock);
530 rc = srpc_service_post_buffer(sv, buf);
531 spin_unlock(&sv->sv_lock);
540 srpc_service_remove_buffers (srpc_service_t *sv, int nbuffer)
542 LASSERTF (nbuffer > 0,
543 "nbuffer must be positive: %d\n", nbuffer);
545 spin_lock(&sv->sv_lock);
547 LASSERT (sv->sv_nprune >= 0);
548 LASSERT (!sv->sv_shuttingdown);
550 sv->sv_nprune += nbuffer;
552 spin_unlock(&sv->sv_lock);
556 /* returns 1 if sv has finished, otherwise 0 */
558 srpc_finish_service (srpc_service_t *sv)
560 srpc_server_rpc_t *rpc;
563 spin_lock(&sv->sv_lock);
565 LASSERT (sv->sv_shuttingdown); /* srpc_shutdown_service called */
567 if (sv->sv_nposted_msg != 0 || !list_empty(&sv->sv_active_rpcq)) {
569 "waiting for %d posted buffers to unlink and "
570 "in-flight RPCs to die.\n",
573 if (!list_empty(&sv->sv_active_rpcq)) {
574 rpc = list_entry(sv->sv_active_rpcq.next,
575 srpc_server_rpc_t, srpc_list);
577 "Active RPC on shutdown: sv %s, peer %s, "
578 "wi %s scheduled %d running %d, "
579 "ev fired %d type %d status %d lnet %d\n",
580 sv->sv_name, libcfs_id2str(rpc->srpc_peer),
581 swi_state2str(rpc->srpc_wi.wi_state),
582 rpc->srpc_wi.wi_scheduled,
583 rpc->srpc_wi.wi_running,
584 rpc->srpc_ev.ev_fired,
585 rpc->srpc_ev.ev_type,
586 rpc->srpc_ev.ev_status,
587 rpc->srpc_ev.ev_lnet);
590 spin_unlock(&sv->sv_lock);
594 spin_unlock(&sv->sv_lock); /* no lock needed from now on */
599 if (!list_empty(&sv->sv_posted_msgq))
600 q = &sv->sv_posted_msgq;
601 else if (!list_empty(&sv->sv_blocked_msgq))
602 q = &sv->sv_blocked_msgq;
606 buf = list_entry(q->next, srpc_buffer_t, buf_list);
607 list_del(&buf->buf_list);
609 LIBCFS_FREE(buf, sizeof(*buf));
612 while (!list_empty(&sv->sv_free_rpcq)) {
613 rpc = list_entry(sv->sv_free_rpcq.next,
614 srpc_server_rpc_t, srpc_list);
615 list_del(&rpc->srpc_list);
616 LIBCFS_FREE(rpc, sizeof(*rpc));
622 /* called with sv->sv_lock held */
624 srpc_service_recycle_buffer (srpc_service_t *sv, srpc_buffer_t *buf)
626 if (sv->sv_shuttingdown) goto free;
628 if (sv->sv_nprune == 0) {
629 if (srpc_service_post_buffer(sv, buf) != 0)
630 CWARN ("Failed to post %s buffer\n", sv->sv_name);
636 spin_unlock(&sv->sv_lock);
637 LIBCFS_FREE(buf, sizeof(*buf));
638 spin_lock(&sv->sv_lock);
642 srpc_shutdown_service (srpc_service_t *sv)
644 srpc_server_rpc_t *rpc;
647 spin_lock(&sv->sv_lock);
649 CDEBUG (D_NET, "Shutting down service: id %d, name %s\n",
650 sv->sv_id, sv->sv_name);
652 sv->sv_shuttingdown = 1; /* i.e. no new active RPC */
654 /* schedule in-flight RPCs to notice the shutdown */
655 list_for_each_entry (rpc, &sv->sv_active_rpcq, srpc_list) {
656 swi_schedule_workitem(&rpc->srpc_wi);
659 spin_unlock(&sv->sv_lock);
661 /* OK to traverse sv_posted_msgq without lock, since no one
662 * touches sv_posted_msgq now */
663 list_for_each_entry (buf, &sv->sv_posted_msgq, buf_list)
664 LNetMDUnlink(buf->buf_mdh);
670 srpc_send_request (srpc_client_rpc_t *rpc)
672 srpc_event_t *ev = &rpc->crpc_reqstev;
677 ev->ev_type = SRPC_REQUEST_SENT;
679 rc = srpc_post_active_rqtbuf(rpc->crpc_dest, rpc->crpc_service,
680 &rpc->crpc_reqstmsg, sizeof(srpc_msg_t),
681 &rpc->crpc_reqstmdh, ev);
683 LASSERT (rc == -ENOMEM);
684 ev->ev_fired = 1; /* no more event expected */
690 srpc_prepare_reply (srpc_client_rpc_t *rpc)
692 srpc_event_t *ev = &rpc->crpc_replyev;
693 __u64 *id = &rpc->crpc_reqstmsg.msg_body.reqst.rpyid;
698 ev->ev_type = SRPC_REPLY_RCVD;
700 *id = srpc_next_id();
702 rc = srpc_post_passive_rdma(SRPC_RDMA_PORTAL, *id,
703 &rpc->crpc_replymsg, sizeof(srpc_msg_t),
704 LNET_MD_OP_PUT, rpc->crpc_dest,
705 &rpc->crpc_replymdh, ev);
707 LASSERT (rc == -ENOMEM);
708 ev->ev_fired = 1; /* no more event expected */
714 srpc_prepare_bulk (srpc_client_rpc_t *rpc)
716 srpc_bulk_t *bk = &rpc->crpc_bulk;
717 srpc_event_t *ev = &rpc->crpc_bulkev;
718 __u64 *id = &rpc->crpc_reqstmsg.msg_body.reqst.bulkid;
722 LASSERT (bk->bk_niov <= LNET_MAX_IOV);
724 if (bk->bk_niov == 0) return 0; /* nothing to do */
726 opt = bk->bk_sink ? LNET_MD_OP_PUT : LNET_MD_OP_GET;
730 opt |= LNET_MD_IOVEC;
735 ev->ev_type = SRPC_BULK_REQ_RCVD;
737 *id = srpc_next_id();
739 rc = srpc_post_passive_rdma(SRPC_RDMA_PORTAL, *id,
740 &bk->bk_iovs[0], bk->bk_niov, opt,
741 rpc->crpc_dest, &bk->bk_mdh, ev);
743 LASSERT (rc == -ENOMEM);
744 ev->ev_fired = 1; /* no more event expected */
750 srpc_do_bulk (srpc_server_rpc_t *rpc)
752 srpc_event_t *ev = &rpc->srpc_ev;
753 srpc_bulk_t *bk = rpc->srpc_bulk;
754 __u64 id = rpc->srpc_reqstbuf->buf_msg.msg_body.reqst.bulkid;
758 LASSERT (bk != NULL);
760 opt = bk->bk_sink ? LNET_MD_OP_GET : LNET_MD_OP_PUT;
764 opt |= LNET_MD_IOVEC;
769 ev->ev_type = bk->bk_sink ? SRPC_BULK_GET_RPLD : SRPC_BULK_PUT_SENT;
771 rc = srpc_post_active_rdma(SRPC_RDMA_PORTAL, id,
772 &bk->bk_iovs[0], bk->bk_niov, opt,
773 rpc->srpc_peer, rpc->srpc_self,
776 ev->ev_fired = 1; /* no more event expected */
780 /* called with srpc_service_t::sv_lock held */
782 srpc_schedule_server_rpc (srpc_server_rpc_t *rpc)
784 srpc_service_t *sv = rpc->srpc_service;
786 if (sv->sv_id > SRPC_FRAMEWORK_SERVICE_MAX_ID)
787 swi_schedule_workitem(&rpc->srpc_wi);
788 else /* framework RPCs are handled one by one */
789 swi_schedule_serial_workitem(&rpc->srpc_wi);
794 /* only called from srpc_handle_rpc */
796 srpc_server_rpc_done (srpc_server_rpc_t *rpc, int status)
798 srpc_service_t *sv = rpc->srpc_service;
799 srpc_buffer_t *buffer;
801 LASSERT (status != 0 || rpc->srpc_wi.wi_state == SWI_STATE_DONE);
803 rpc->srpc_status = status;
805 CDEBUG (status == 0 ? D_NET : D_NETERROR,
806 "Server RPC done: service %s, peer %s, status %s:%d\n",
807 sv->sv_name, libcfs_id2str(rpc->srpc_peer),
808 swi_state2str(rpc->srpc_wi.wi_state), status);
811 spin_lock(&srpc_data.rpc_glock);
812 srpc_data.rpc_counters.rpcs_dropped++;
813 spin_unlock(&srpc_data.rpc_glock);
816 if (rpc->srpc_done != NULL)
817 (*rpc->srpc_done) (rpc);
818 LASSERT (rpc->srpc_bulk == NULL);
820 spin_lock(&sv->sv_lock);
822 if (rpc->srpc_reqstbuf != NULL) {
823 /* NB might drop sv_lock in srpc_service_recycle_buffer, but
824 * sv won't go away for sv_active_rpcq must not be empty */
825 srpc_service_recycle_buffer(sv, rpc->srpc_reqstbuf);
826 rpc->srpc_reqstbuf = NULL;
829 list_del(&rpc->srpc_list); /* from sv->sv_active_rpcq */
832 * No one can schedule me now since:
833 * - I'm not on sv_active_rpcq.
834 * - all LNet events have been fired.
835 * Cancel pending schedules and prevent future schedule attempts:
837 LASSERT (rpc->srpc_ev.ev_fired);
838 swi_kill_workitem(&rpc->srpc_wi);
840 if (!sv->sv_shuttingdown && !list_empty(&sv->sv_blocked_msgq)) {
841 buffer = list_entry(sv->sv_blocked_msgq.next,
842 srpc_buffer_t, buf_list);
843 list_del(&buffer->buf_list);
845 srpc_init_server_rpc(rpc, sv, buffer);
846 list_add_tail(&rpc->srpc_list, &sv->sv_active_rpcq);
847 srpc_schedule_server_rpc(rpc);
849 list_add(&rpc->srpc_list, &sv->sv_free_rpcq);
852 spin_unlock(&sv->sv_lock);
856 /* handles an incoming RPC */
858 srpc_handle_rpc (swi_workitem_t *wi)
860 srpc_server_rpc_t *rpc = wi->wi_data;
861 srpc_service_t *sv = rpc->srpc_service;
862 srpc_event_t *ev = &rpc->srpc_ev;
865 LASSERT (wi == &rpc->srpc_wi);
867 spin_lock(&sv->sv_lock);
869 if (sv->sv_shuttingdown) {
870 spin_unlock(&sv->sv_lock);
872 if (rpc->srpc_bulk != NULL)
873 LNetMDUnlink(rpc->srpc_bulk->bk_mdh);
874 LNetMDUnlink(rpc->srpc_replymdh);
876 if (ev->ev_fired) { /* no more event, OK to finish */
877 srpc_server_rpc_done(rpc, -ESHUTDOWN);
883 spin_unlock(&sv->sv_lock);
885 switch (wi->wi_state) {
888 case SWI_STATE_NEWBORN: {
890 srpc_generic_reply_t *reply;
892 msg = &rpc->srpc_reqstbuf->buf_msg;
893 reply = &rpc->srpc_replymsg.msg_body.reply;
895 if (msg->msg_version != SRPC_MSG_VERSION &&
896 msg->msg_version != __swab32(SRPC_MSG_VERSION)) {
897 CWARN ("Version mismatch: %u, %u expected, from %s\n",
898 msg->msg_version, SRPC_MSG_VERSION,
899 libcfs_id2str(rpc->srpc_peer));
900 reply->status = EPROTO;
903 rc = (*sv->sv_handler) (rpc);
904 LASSERT (reply->status == 0 || !rpc->srpc_bulk);
908 srpc_server_rpc_done(rpc, rc);
912 wi->wi_state = SWI_STATE_BULK_STARTED;
914 if (rpc->srpc_bulk != NULL) {
915 rc = srpc_do_bulk(rpc);
917 return 0; /* wait for bulk */
919 LASSERT (ev->ev_fired);
923 case SWI_STATE_BULK_STARTED:
924 /* we cannot LASSERT ev_fired right here because it
925 * may be set only upon an event with unlinked==1 */
927 if (rpc->srpc_bulk != NULL) {
930 if (sv->sv_bulk_ready != NULL)
931 rc = (*sv->sv_bulk_ready) (rpc, rc);
935 srpc_server_rpc_done(rpc, rc);
939 rpc->srpc_status = rc;
940 wi->wi_state = SWI_STATE_BULK_ERRORED;
941 LNetMDUnlink(rpc->srpc_bulk->bk_mdh);
942 return 0; /* wait for UNLINK event */
946 LASSERT (rpc->srpc_bulk == NULL || ev->ev_fired);
948 wi->wi_state = SWI_STATE_REPLY_SUBMITTED;
949 rc = srpc_send_reply(rpc);
951 return 0; /* wait for reply */
952 srpc_server_rpc_done(rpc, rc);
955 case SWI_STATE_REPLY_SUBMITTED:
956 LASSERT (ev->ev_fired);
958 wi->wi_state = SWI_STATE_DONE;
959 srpc_server_rpc_done(rpc, ev->ev_status);
962 case SWI_STATE_BULK_ERRORED:
963 LASSERT (rpc->srpc_bulk != NULL && ev->ev_fired);
964 LASSERT (rpc->srpc_status != 0);
966 srpc_server_rpc_done(rpc, rpc->srpc_status);
974 srpc_client_rpc_expired (void *data)
976 srpc_client_rpc_t *rpc = data;
978 CWARN ("Client RPC expired: service %d, peer %s, timeout %d.\n",
979 rpc->crpc_service, libcfs_id2str(rpc->crpc_dest),
982 spin_lock(&rpc->crpc_lock);
984 rpc->crpc_timeout = 0;
985 srpc_abort_rpc(rpc, -ETIMEDOUT);
987 spin_unlock(&rpc->crpc_lock);
989 spin_lock(&srpc_data.rpc_glock);
990 srpc_data.rpc_counters.rpcs_expired++;
991 spin_unlock(&srpc_data.rpc_glock);
996 srpc_add_client_rpc_timer (srpc_client_rpc_t *rpc)
998 stt_timer_t *timer = &rpc->crpc_timer;
1000 if (rpc->crpc_timeout == 0) return;
1002 CFS_INIT_LIST_HEAD(&timer->stt_list);
1003 timer->stt_data = rpc;
1004 timer->stt_func = srpc_client_rpc_expired;
1005 timer->stt_expires = cfs_time_add(rpc->crpc_timeout,
1006 cfs_time_current_sec());
1007 stt_add_timer(timer);
1012 * Called with rpc->crpc_lock held.
1014 * Upon exit the RPC expiry timer is not queued and the handler is not
1015 * running on any CPU. */
1017 srpc_del_client_rpc_timer (srpc_client_rpc_t *rpc)
1019 /* timer not planted or already exploded */
1020 if (rpc->crpc_timeout == 0) return;
1022 /* timer sucessfully defused */
1023 if (stt_del_timer(&rpc->crpc_timer)) return;
1026 /* timer detonated, wait for it to explode */
1027 while (rpc->crpc_timeout != 0) {
1028 spin_unlock(&rpc->crpc_lock);
1032 spin_lock(&rpc->crpc_lock);
1035 LBUG(); /* impossible in single-threaded runtime */
1041 srpc_check_sends (srpc_peer_t *peer, int credits)
1043 struct list_head *q;
1044 srpc_client_rpc_t *rpc;
1046 LASSERT (credits >= 0);
1047 LASSERT (srpc_data.rpc_state == SRPC_STATE_RUNNING);
1049 spin_lock(&peer->stp_lock);
1050 peer->stp_credits += credits;
1052 while (peer->stp_credits) {
1053 if (!list_empty(&peer->stp_ctl_rpcq))
1054 q = &peer->stp_ctl_rpcq;
1055 else if (!list_empty(&peer->stp_rpcq))
1056 q = &peer->stp_rpcq;
1060 peer->stp_credits--;
1062 rpc = list_entry(q->next, srpc_client_rpc_t, crpc_privl);
1063 list_del_init(&rpc->crpc_privl);
1064 srpc_client_rpc_decref(rpc); /* --ref for peer->*rpcq */
1066 swi_schedule_workitem(&rpc->crpc_wi);
1069 spin_unlock(&peer->stp_lock);
1074 srpc_client_rpc_done (srpc_client_rpc_t *rpc, int status)
1076 swi_workitem_t *wi = &rpc->crpc_wi;
1077 srpc_peer_t *peer = rpc->crpc_peer;
1079 LASSERT (status != 0 || wi->wi_state == SWI_STATE_DONE);
1081 spin_lock(&rpc->crpc_lock);
1083 rpc->crpc_closed = 1;
1084 if (rpc->crpc_status == 0)
1085 rpc->crpc_status = status;
1087 srpc_del_client_rpc_timer(rpc);
1089 CDEBUG ((status == 0) ? D_NET : D_NETERROR,
1090 "Client RPC done: service %d, peer %s, status %s:%d:%d\n",
1091 rpc->crpc_service, libcfs_id2str(rpc->crpc_dest),
1092 swi_state2str(wi->wi_state), rpc->crpc_aborted, status);
1095 * No one can schedule me now since:
1096 * - RPC timer has been defused.
1097 * - all LNet events have been fired.
1098 * - crpc_closed has been set, preventing srpc_abort_rpc from
1100 * Cancel pending schedules and prevent future schedule attempts:
1102 LASSERT (!srpc_event_pending(rpc));
1103 swi_kill_workitem(wi);
1105 spin_unlock(&rpc->crpc_lock);
1107 (*rpc->crpc_done) (rpc);
1110 srpc_check_sends(peer, 1);
1114 /* sends an outgoing RPC */
1116 srpc_send_rpc (swi_workitem_t *wi)
1119 srpc_client_rpc_t *rpc = wi->wi_data;
1120 srpc_msg_t *reply = &rpc->crpc_replymsg;
1121 int do_bulk = rpc->crpc_bulk.bk_niov > 0;
1123 LASSERT (rpc != NULL);
1124 LASSERT (wi == &rpc->crpc_wi);
1126 spin_lock(&rpc->crpc_lock);
1128 if (rpc->crpc_aborted) {
1129 spin_unlock(&rpc->crpc_lock);
1133 spin_unlock(&rpc->crpc_lock);
1135 switch (wi->wi_state) {
1138 case SWI_STATE_NEWBORN:
1139 LASSERT (!srpc_event_pending(rpc));
1141 rc = srpc_prepare_reply(rpc);
1143 srpc_client_rpc_done(rpc, rc);
1147 rc = srpc_prepare_bulk(rpc);
1150 wi->wi_state = SWI_STATE_REQUEST_SUBMITTED;
1151 rc = srpc_send_request(rpc);
1154 case SWI_STATE_REQUEST_SUBMITTED:
1155 /* CAVEAT EMPTOR: rqtev, rpyev, and bulkev may come in any
1156 * order; however, they're processed in a strict order:
1157 * rqt, rpy, and bulk. */
1158 if (!rpc->crpc_reqstev.ev_fired) break;
1160 rc = rpc->crpc_reqstev.ev_status;
1163 wi->wi_state = SWI_STATE_REQUEST_SENT;
1164 /* perhaps more events, fall thru */
1165 case SWI_STATE_REQUEST_SENT: {
1166 srpc_msg_type_t type = srpc_service2reply(rpc->crpc_service);
1168 if (!rpc->crpc_replyev.ev_fired) break;
1170 rc = rpc->crpc_replyev.ev_status;
1173 if ((reply->msg_type != type &&
1174 reply->msg_type != __swab32(type)) ||
1175 (reply->msg_magic != SRPC_MSG_MAGIC &&
1176 reply->msg_magic != __swab32(SRPC_MSG_MAGIC))) {
1177 CWARN ("Bad message from %s: type %u (%d expected),"
1178 " magic %u (%d expected).\n",
1179 libcfs_id2str(rpc->crpc_dest),
1180 reply->msg_type, type,
1181 reply->msg_magic, SRPC_MSG_MAGIC);
1186 if (do_bulk && reply->msg_body.reply.status != 0) {
1187 CWARN ("Remote error %d at %s, unlink bulk buffer in "
1188 "case peer didn't initiate bulk transfer\n",
1189 reply->msg_body.reply.status,
1190 libcfs_id2str(rpc->crpc_dest));
1191 LNetMDUnlink(rpc->crpc_bulk.bk_mdh);
1194 wi->wi_state = SWI_STATE_REPLY_RECEIVED;
1196 case SWI_STATE_REPLY_RECEIVED:
1197 if (do_bulk && !rpc->crpc_bulkev.ev_fired) break;
1199 rc = do_bulk ? rpc->crpc_bulkev.ev_status : 0;
1201 /* Bulk buffer was unlinked due to remote error. Clear error
1202 * since reply buffer still contains valid data.
1203 * NB rpc->crpc_done shouldn't look into bulk data in case of
1205 if (do_bulk && rpc->crpc_bulkev.ev_lnet == LNET_EVENT_UNLINK &&
1206 rpc->crpc_status == 0 && reply->msg_body.reply.status != 0)
1209 wi->wi_state = SWI_STATE_DONE;
1210 srpc_client_rpc_done(rpc, rc);
1215 spin_lock(&rpc->crpc_lock);
1216 srpc_abort_rpc(rpc, rc);
1217 spin_unlock(&rpc->crpc_lock);
1221 if (rpc->crpc_aborted) {
1222 LNetMDUnlink(rpc->crpc_reqstmdh);
1223 LNetMDUnlink(rpc->crpc_replymdh);
1224 LNetMDUnlink(rpc->crpc_bulk.bk_mdh);
1226 if (!srpc_event_pending(rpc)) {
1227 srpc_client_rpc_done(rpc, -EINTR);
1235 srpc_create_client_rpc (lnet_process_id_t peer, int service,
1236 int nbulkiov, int bulklen,
1237 void (*rpc_done)(srpc_client_rpc_t *),
1238 void (*rpc_fini)(srpc_client_rpc_t *), void *priv)
1240 srpc_client_rpc_t *rpc;
1242 LIBCFS_ALLOC(rpc, offsetof(srpc_client_rpc_t,
1243 crpc_bulk.bk_iovs[nbulkiov]));
1247 srpc_init_client_rpc(rpc, peer, service, nbulkiov,
1248 bulklen, rpc_done, rpc_fini, priv);
1252 /* called with rpc->crpc_lock held */
1254 srpc_queue_rpc (srpc_peer_t *peer, srpc_client_rpc_t *rpc)
1256 int service = rpc->crpc_service;
1258 LASSERT (peer->stp_nid == rpc->crpc_dest.nid);
1259 LASSERT (srpc_data.rpc_state == SRPC_STATE_RUNNING);
1261 rpc->crpc_peer = peer;
1263 spin_lock(&peer->stp_lock);
1265 /* Framework RPCs that alter session state shall take precedence
1266 * over test RPCs and framework query RPCs */
1267 if (service <= SRPC_FRAMEWORK_SERVICE_MAX_ID &&
1268 service != SRPC_SERVICE_DEBUG &&
1269 service != SRPC_SERVICE_QUERY_STAT)
1270 list_add_tail(&rpc->crpc_privl, &peer->stp_ctl_rpcq);
1272 list_add_tail(&rpc->crpc_privl, &peer->stp_rpcq);
1274 srpc_client_rpc_addref(rpc); /* ++ref for peer->*rpcq */
1275 spin_unlock(&peer->stp_lock);
1279 /* called with rpc->crpc_lock held */
1281 srpc_abort_rpc (srpc_client_rpc_t *rpc, int why)
1283 srpc_peer_t *peer = rpc->crpc_peer;
1287 if (rpc->crpc_aborted || /* already aborted */
1288 rpc->crpc_closed) /* callback imminent */
1292 "Aborting RPC: service %d, peer %s, state %s, why %d\n",
1293 rpc->crpc_service, libcfs_id2str(rpc->crpc_dest),
1294 swi_state2str(rpc->crpc_wi.wi_state), why);
1296 rpc->crpc_aborted = 1;
1297 rpc->crpc_status = why;
1300 spin_lock(&peer->stp_lock);
1302 if (!list_empty(&rpc->crpc_privl)) { /* still queued */
1303 list_del_init(&rpc->crpc_privl);
1304 srpc_client_rpc_decref(rpc); /* --ref for peer->*rpcq */
1305 rpc->crpc_peer = NULL; /* no credit taken */
1308 spin_unlock(&peer->stp_lock);
1311 swi_schedule_workitem(&rpc->crpc_wi);
1315 /* called with rpc->crpc_lock held */
1317 srpc_post_rpc (srpc_client_rpc_t *rpc)
1321 LASSERT (!rpc->crpc_aborted);
1322 LASSERT (rpc->crpc_peer == NULL);
1323 LASSERT (srpc_data.rpc_state == SRPC_STATE_RUNNING);
1324 LASSERT ((rpc->crpc_bulk.bk_len & ~CFS_PAGE_MASK) == 0);
1326 CDEBUG (D_NET, "Posting RPC: peer %s, service %d, timeout %d\n",
1327 libcfs_id2str(rpc->crpc_dest), rpc->crpc_service,
1330 srpc_add_client_rpc_timer(rpc);
1332 peer = srpc_nid2peer(rpc->crpc_dest.nid);
1334 srpc_abort_rpc(rpc, -ENOMEM);
1338 srpc_queue_rpc(peer, rpc);
1340 spin_unlock(&rpc->crpc_lock);
1341 srpc_check_sends(peer, 0);
1342 spin_lock(&rpc->crpc_lock);
1348 srpc_send_reply (srpc_server_rpc_t *rpc)
1350 srpc_event_t *ev = &rpc->srpc_ev;
1351 srpc_msg_t *msg = &rpc->srpc_replymsg;
1352 srpc_buffer_t *buffer = rpc->srpc_reqstbuf;
1353 srpc_service_t *sv = rpc->srpc_service;
1357 LASSERT (buffer != NULL);
1358 rpyid = buffer->buf_msg.msg_body.reqst.rpyid;
1360 spin_lock(&sv->sv_lock);
1362 if (!sv->sv_shuttingdown &&
1363 sv->sv_id > SRPC_FRAMEWORK_SERVICE_MAX_ID) {
1364 /* Repost buffer before replying since test client
1365 * might send me another RPC once it gets the reply */
1366 if (srpc_service_post_buffer(sv, buffer) != 0)
1367 CWARN ("Failed to repost %s buffer\n", sv->sv_name);
1368 rpc->srpc_reqstbuf = NULL;
1371 spin_unlock(&sv->sv_lock);
1375 ev->ev_type = SRPC_REPLY_SENT;
1377 msg->msg_magic = SRPC_MSG_MAGIC;
1378 msg->msg_version = SRPC_MSG_VERSION;
1379 msg->msg_type = srpc_service2reply(sv->sv_id);
1381 rc = srpc_post_active_rdma(SRPC_RDMA_PORTAL, rpyid, msg,
1382 sizeof(*msg), LNET_MD_OP_PUT,
1383 rpc->srpc_peer, rpc->srpc_self,
1384 &rpc->srpc_replymdh, ev);
1386 ev->ev_fired = 1; /* no more event expected */
1390 /* when in kernel always called with LNET_LOCK() held, and in thread context */
1392 srpc_lnet_ev_handler (lnet_event_t *ev)
1394 srpc_event_t *rpcev = ev->md.user_ptr;
1395 srpc_client_rpc_t *crpc;
1396 srpc_server_rpc_t *srpc;
1397 srpc_buffer_t *buffer;
1400 srpc_msg_type_t type;
1403 LASSERT (!in_interrupt());
1405 if (ev->status != 0) {
1406 spin_lock(&srpc_data.rpc_glock);
1407 srpc_data.rpc_counters.errors++;
1408 spin_unlock(&srpc_data.rpc_glock);
1411 rpcev->ev_lnet = ev->type;
1413 switch (rpcev->ev_type) {
1416 case SRPC_REQUEST_SENT:
1417 if (ev->status == 0 && ev->type != LNET_EVENT_UNLINK) {
1418 spin_lock(&srpc_data.rpc_glock);
1419 srpc_data.rpc_counters.rpcs_sent++;
1420 spin_unlock(&srpc_data.rpc_glock);
1422 case SRPC_REPLY_RCVD:
1423 case SRPC_BULK_REQ_RCVD:
1424 crpc = rpcev->ev_data;
1426 LASSERT (rpcev == &crpc->crpc_reqstev ||
1427 rpcev == &crpc->crpc_replyev ||
1428 rpcev == &crpc->crpc_bulkev);
1430 spin_lock(&crpc->crpc_lock);
1432 LASSERT (rpcev->ev_fired == 0);
1433 rpcev->ev_fired = 1;
1434 rpcev->ev_status = (ev->type == LNET_EVENT_UNLINK) ?
1435 -EINTR : ev->status;
1436 swi_schedule_workitem(&crpc->crpc_wi);
1438 spin_unlock(&crpc->crpc_lock);
1441 case SRPC_REQUEST_RCVD:
1442 sv = rpcev->ev_data;
1444 LASSERT (rpcev == &sv->sv_ev);
1446 spin_lock(&sv->sv_lock);
1448 LASSERT (ev->unlinked);
1449 LASSERT (ev->type == LNET_EVENT_PUT ||
1450 ev->type == LNET_EVENT_UNLINK);
1451 LASSERT (ev->type != LNET_EVENT_UNLINK ||
1452 sv->sv_shuttingdown);
1454 buffer = container_of(ev->md.start, srpc_buffer_t, buf_msg);
1455 buffer->buf_peer = ev->initiator;
1456 buffer->buf_self = ev->target.nid;
1458 sv->sv_nposted_msg--;
1459 LASSERT (sv->sv_nposted_msg >= 0);
1461 if (sv->sv_shuttingdown) {
1462 /* Leave buffer on sv->sv_posted_msgq since
1463 * srpc_finish_service needs to traverse it. */
1464 spin_unlock(&sv->sv_lock);
1468 list_del(&buffer->buf_list); /* from sv->sv_posted_msgq */
1469 msg = &buffer->buf_msg;
1470 type = srpc_service2request(sv->sv_id);
1472 if (ev->status != 0 || ev->mlength != sizeof(*msg) ||
1473 (msg->msg_type != type &&
1474 msg->msg_type != __swab32(type)) ||
1475 (msg->msg_magic != SRPC_MSG_MAGIC &&
1476 msg->msg_magic != __swab32(SRPC_MSG_MAGIC))) {
1477 CERROR ("Dropping RPC (%s) from %s: "
1478 "status %d mlength %d type %u magic %u.\n",
1479 sv->sv_name, libcfs_id2str(ev->initiator),
1480 ev->status, ev->mlength,
1481 msg->msg_type, msg->msg_magic);
1483 /* NB might drop sv_lock in srpc_service_recycle_buffer,
1484 * sv_nposted_msg++ as an implicit reference to prevent
1485 * sv from disappearing under me */
1486 sv->sv_nposted_msg++;
1487 srpc_service_recycle_buffer(sv, buffer);
1488 sv->sv_nposted_msg--;
1489 spin_unlock(&sv->sv_lock);
1491 if (ev->status == 0) { /* status!=0 counted already */
1492 spin_lock(&srpc_data.rpc_glock);
1493 srpc_data.rpc_counters.errors++;
1494 spin_unlock(&srpc_data.rpc_glock);
1499 if (!list_empty(&sv->sv_free_rpcq)) {
1500 srpc = list_entry(sv->sv_free_rpcq.next,
1501 srpc_server_rpc_t, srpc_list);
1502 list_del(&srpc->srpc_list);
1504 srpc_init_server_rpc(srpc, sv, buffer);
1505 list_add_tail(&srpc->srpc_list, &sv->sv_active_rpcq);
1506 srpc_schedule_server_rpc(srpc);
1508 list_add_tail(&buffer->buf_list, &sv->sv_blocked_msgq);
1511 spin_unlock(&sv->sv_lock);
1513 spin_lock(&srpc_data.rpc_glock);
1514 srpc_data.rpc_counters.rpcs_rcvd++;
1515 spin_unlock(&srpc_data.rpc_glock);
1518 case SRPC_BULK_GET_RPLD:
1519 LASSERT (ev->type == LNET_EVENT_SEND ||
1520 ev->type == LNET_EVENT_REPLY ||
1521 ev->type == LNET_EVENT_UNLINK);
1523 if (ev->type == LNET_EVENT_SEND && !ev->unlinked) {
1524 if (ev->status == 0)
1525 break; /* wait for the final LNET_EVENT_REPLY */
1527 fired_flag = 0; /* LNET_EVENT_REPLY may arrive
1528 (optimized GET case) */
1530 case SRPC_BULK_PUT_SENT:
1531 if (ev->status == 0 && ev->type != LNET_EVENT_UNLINK) {
1532 spin_lock(&srpc_data.rpc_glock);
1534 if (rpcev->ev_type == SRPC_BULK_GET_RPLD)
1535 srpc_data.rpc_counters.bulk_get += ev->mlength;
1537 srpc_data.rpc_counters.bulk_put += ev->mlength;
1539 spin_unlock(&srpc_data.rpc_glock);
1541 case SRPC_REPLY_SENT:
1542 srpc = rpcev->ev_data;
1543 sv = srpc->srpc_service;
1545 LASSERT (rpcev == &srpc->srpc_ev);
1547 spin_lock(&sv->sv_lock);
1549 rpcev->ev_fired = 1;
1551 rpcev->ev_status = (ev->type == LNET_EVENT_UNLINK) ?
1552 -EINTR : ev->status;
1554 srpc_schedule_server_rpc(srpc);
1555 spin_unlock(&sv->sv_lock);
1565 srpc_check_event (int timeout)
1571 rc = LNetEQPoll(&srpc_data.rpc_lnet_eq, 1,
1572 timeout * 1000, &ev, &i);
1573 if (rc == 0) return 0;
1575 LASSERT (rc == -EOVERFLOW || rc == 1);
1577 /* We can't affort to miss any events... */
1578 if (rc == -EOVERFLOW) {
1579 CERROR ("Dropped an event!!!\n");
1583 srpc_lnet_ev_handler(&ev);
1598 s = getenv("SRPC_PEER_CREDITS");
1599 srpc_peer_credits = (s != NULL) ? atoi(s) : srpc_peer_credits;
1602 if (srpc_peer_credits <= 0) {
1603 CERROR("Peer credits must be positive: %d\n", srpc_peer_credits);
1607 memset(&srpc_data, 0, sizeof(struct smoketest_rpc));
1608 spin_lock_init(&srpc_data.rpc_glock);
1610 /* 1 second pause to avoid timestamp reuse */
1611 cfs_pause(cfs_time_seconds(1));
1612 srpc_data.rpc_matchbits = ((__u64) cfs_time_current_sec()) << 48;
1614 srpc_data.rpc_state = SRPC_STATE_NONE;
1616 LIBCFS_ALLOC(srpc_data.rpc_peers,
1617 sizeof(struct list_head) * SRPC_PEER_HASH_SIZE);
1618 if (srpc_data.rpc_peers == NULL) {
1619 CERROR ("Failed to alloc peer hash.\n");
1623 for (i = 0; i < SRPC_PEER_HASH_SIZE; i++)
1624 CFS_INIT_LIST_HEAD(&srpc_data.rpc_peers[i]);
1627 rc = LNetNIInit(LUSTRE_SRV_LNET_PID);
1629 if (the_lnet.ln_server_mode_flag)
1630 rc = LNetNIInit(LUSTRE_SRV_LNET_PID);
1632 rc = LNetNIInit(getpid() | LNET_PID_USERFLAG);
1635 CERROR ("LNetNIInit() has failed: %d\n", rc);
1636 LIBCFS_FREE(srpc_data.rpc_peers,
1637 sizeof(struct list_head) * SRPC_PEER_HASH_SIZE);
1641 srpc_data.rpc_state = SRPC_STATE_NI_INIT;
1643 srpc_data.rpc_lnet_eq = LNET_EQ_NONE;
1645 rc = LNetEQAlloc(16, srpc_lnet_ev_handler, &srpc_data.rpc_lnet_eq);
1647 rc = LNetEQAlloc(10240, LNET_EQ_HANDLER_NONE, &srpc_data.rpc_lnet_eq);
1650 CERROR("LNetEQAlloc() has failed: %d\n", rc);
1654 rc = LNetSetLazyPortal(SRPC_FRAMEWORK_REQUEST_PORTAL);
1657 srpc_data.rpc_state = SRPC_STATE_EQ_INIT;
1663 srpc_data.rpc_state = SRPC_STATE_WI_INIT;
1671 srpc_data.rpc_state = SRPC_STATE_RUNNING;
1677 srpc_shutdown (void)
1683 state = srpc_data.rpc_state;
1684 srpc_data.rpc_state = SRPC_STATE_STOPPING;
1689 case SRPC_STATE_RUNNING:
1690 spin_lock(&srpc_data.rpc_glock);
1692 for (i = 0; i <= SRPC_SERVICE_MAX_ID; i++) {
1693 srpc_service_t *sv = srpc_data.rpc_services[i];
1695 LASSERTF (sv == NULL,
1696 "service not empty: id %d, name %s\n",
1700 spin_unlock(&srpc_data.rpc_glock);
1704 case SRPC_STATE_WI_INIT:
1707 case SRPC_STATE_EQ_INIT:
1708 rc = LNetClearLazyPortal(SRPC_FRAMEWORK_REQUEST_PORTAL);
1710 rc = LNetEQFree(srpc_data.rpc_lnet_eq);
1711 LASSERT (rc == 0); /* the EQ should have no user by now */
1713 case SRPC_STATE_NI_INIT:
1718 /* srpc_peer_t's are kept in hash until shutdown */
1719 for (i = 0; i < SRPC_PEER_HASH_SIZE; i++) {
1722 while (!list_empty(&srpc_data.rpc_peers[i])) {
1723 peer = list_entry(srpc_data.rpc_peers[i].next,
1724 srpc_peer_t, stp_list);
1725 list_del(&peer->stp_list);
1727 LASSERT (list_empty(&peer->stp_rpcq));
1728 LASSERT (list_empty(&peer->stp_ctl_rpcq));
1729 LASSERT (peer->stp_credits == srpc_peer_credits);
1731 LIBCFS_FREE(peer, sizeof(srpc_peer_t));
1735 LIBCFS_FREE(srpc_data.rpc_peers,
1736 sizeof(struct list_head) * SRPC_PEER_HASH_SIZE);