Whamcloud - gitweb
* changed ptlrpc_unregister_reply(), ptlrpc_unregister_bulk() and
[fs/lustre-release.git] / lustre / ptlrpc / niobuf.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  *  Copyright (c) 2002, 2003 Cluster File Systems, Inc.
5  *
6  *   This file is part of Lustre, http://www.lustre.org.
7  *
8  *   Lustre is free software; you can redistribute it and/or
9  *   modify it under the terms of version 2 of the GNU General Public
10  *   License as published by the Free Software Foundation.
11  *
12  *   Lustre is distributed in the hope that it will be useful,
13  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *   GNU General Public License for more details.
16  *
17  *   You should have received a copy of the GNU General Public License
18  *   along with Lustre; if not, write to the Free Software
19  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20  *
21  */
22
23 #define DEBUG_SUBSYSTEM S_RPC
24 #ifndef __KERNEL__
25 #include <liblustre.h>
26 #include <portals/lib-types.h>
27 #endif
28 #include <linux/obd_support.h>
29 #include <linux/lustre_net.h>
30 #include <linux/lustre_lib.h>
31 #include <linux/obd.h>
32 #include "ptlrpc_internal.h"
33
34 static int ptl_send_buf (ptl_handle_md_t *mdh, void *base, int len, 
35                          ptl_ack_req_t ack, struct ptlrpc_cb_id *cbid,
36                          struct ptlrpc_connection *conn, int portal, __u64 xid)
37 {
38         ptl_process_id_t remote_id;
39         int              rc;
40         int              rc2;
41         ptl_md_t         md;
42         char str[PTL_NALFMT_SIZE];
43         ENTRY;
44
45         LASSERT (portal != 0);
46         LASSERT (conn != NULL);
47         CDEBUG (D_INFO, "conn=%p ni %s nid "LPX64" (%s) on %s\n",
48                 conn, conn->c_peer.peer_ni->pni_name,
49                 conn->c_peer.peer_nid,
50                 portals_nid2str(conn->c_peer.peer_ni->pni_number,
51                                 conn->c_peer.peer_nid, str),
52                 conn->c_peer.peer_ni->pni_name);
53
54         remote_id.nid = conn->c_peer.peer_nid,
55         remote_id.pid = 0;
56
57         md.start     = base;
58         md.length    = len;
59         md.threshold = (ack == PTL_ACK_REQ) ? 2 : 1;
60         md.options   = PTLRPC_MD_OPTIONS;
61         md.user_ptr  = cbid;
62         md.eventq    = conn->c_peer.peer_ni->pni_eq_h;
63
64         if (ack == PTL_ACK_REQ &&
65             OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_ACK | OBD_FAIL_ONCE)) {
66                 /* don't ask for the ack to simulate failing client */
67                 ack = PTL_NOACK_REQ;
68                 obd_fail_loc |= OBD_FAIL_ONCE | OBD_FAILED;
69         }
70
71         rc = PtlMDBind (conn->c_peer.peer_ni->pni_ni_h, md, 
72                         PTL_UNLINK, mdh);
73         if (rc != PTL_OK) {
74                 CERROR ("PtlMDBind failed: %d\n", rc);
75                 LASSERT (rc == PTL_NO_SPACE);
76                 RETURN (-ENOMEM);
77         }
78
79         CDEBUG(D_NET, "Sending %d bytes to portal %d, xid "LPD64"\n",
80                len, portal, xid);
81
82         rc2 = PtlPut (*mdh, ack, remote_id, portal, 0, xid, 0, 0);
83         if (rc != PTL_OK) {
84                 /* We're going to get an UNLINK event when I unlink below,
85                  * which will complete just like any other failed send, so
86                  * I fall through and return success here! */
87                 CERROR("PtlPut("LPU64", %d, "LPD64") failed: %d\n",
88                        remote_id.nid, portal, xid, rc);
89                 rc2 = PtlMDUnlink(*mdh);
90                 LASSERT (rc2 == PTL_OK);
91         }
92
93         RETURN (0);
94 }
95
96 static void ptlrpc_fill_md(ptl_md_t *md, struct ptlrpc_bulk_desc *desc)
97 {
98         LASSERT(ptl_md_max_iovs() == 0  || 
99                 (desc->bd_iov_count <= ptl_md_max_iovs()));
100
101         if (ptl_requires_iov() || desc->bd_iov_count > 0) {
102                 md->options |= PTLRPC_PTL_MD_IOV;
103                 md->start = &desc->bd_iov[0];
104                 md->niov = desc->bd_iov_count;
105         } else {
106                 md->start = ptl_iov_base(&desc->bd_iov[0]);
107         }
108 }
109
110 int ptlrpc_start_bulk_transfer (struct ptlrpc_bulk_desc *desc)
111 {
112         int                 rc;
113         int                 rc2;
114         struct ptlrpc_peer *peer;
115         ptl_process_id_t    remote_id;
116         ptl_md_t            md;
117         __u64               xid;
118         ENTRY;
119
120         if (OBD_FAIL_CHECK_ONCE(OBD_FAIL_PTLRPC_BULK_PUT_NET)) 
121                 RETURN(0);
122
123         /* NB no locking required until desc is on the network */
124         LASSERT (!desc->bd_network_rw);
125         LASSERT (desc->bd_type == BULK_PUT_SOURCE ||
126                  desc->bd_type == BULK_GET_SINK);
127         desc->bd_success = 0;
128         peer = &desc->bd_export->exp_connection->c_peer;
129
130         md.length = desc->bd_nob;
131         md.eventq = peer->peer_ni->pni_eq_h;
132         md.threshold = 2; /* SENT and ACK/REPLY */
133         md.options = PTLRPC_MD_OPTIONS;
134
135         ptlrpc_fill_md(&md, desc);
136         md.user_ptr = &desc->bd_cbid;
137         LASSERT (desc->bd_cbid.cbid_fn == server_bulk_callback);
138         LASSERT (desc->bd_cbid.cbid_arg == desc);
139
140         /* NB total length may be 0 for a read past EOF, so we send a 0
141          * length bulk, since the client expects a bulk event. */
142
143         rc = PtlMDBind(peer->peer_ni->pni_ni_h, md,
144                        PTL_UNLINK, &desc->bd_md_h);
145         if (rc != PTL_OK) {
146                 CERROR("PtlMDBind failed: %d\n", rc);
147                 LASSERT (rc == PTL_NO_SPACE);
148                 RETURN(-ENOMEM);
149         }
150
151         /* Client's bulk and reply matchbits are the same */
152         xid = desc->bd_req->rq_xid;
153         remote_id.nid = peer->peer_nid;
154         remote_id.pid = 0;
155
156         CDEBUG(D_NET, "Transferring %u pages %u bytes via portal %d on %s "
157                "nid "LPX64" pid %d xid "LPX64"\n", 
158                md.niov, md.length, desc->bd_portal, peer->peer_ni->pni_name,
159                remote_id.nid, remote_id.pid, xid);
160
161         /* Network is about to get at the memory */
162         desc->bd_network_rw = 1;
163
164         if (desc->bd_type == BULK_PUT_SOURCE)
165                 rc = PtlPut (desc->bd_md_h, PTL_ACK_REQ, remote_id,
166                              desc->bd_portal, 0, xid, 0, 0);
167         else
168                 rc = PtlGet (desc->bd_md_h, remote_id,
169                              desc->bd_portal, 0, xid, 0);
170         
171         if (rc != PTL_OK) {
172                 /* Can't send, so we unlink the MD bound above.  The UNLINK
173                  * event this creates will signal completion with failure,
174                  * so we return SUCCESS here! */
175                 CERROR("Transfer("LPU64", %d, "LPX64") failed: %d\n",
176                        remote_id.nid, desc->bd_portal, xid, rc);
177                 rc2 = PtlMDUnlink(desc->bd_md_h);
178                 LASSERT (rc2 == PTL_OK);
179         }
180
181         RETURN(0);
182 }
183
184 void ptlrpc_abort_bulk (struct ptlrpc_bulk_desc *desc)
185 {
186         /* Server side bulk abort. Idempotent. Not thread-safe (i.e. only
187          * serialises with completion callback) */
188         struct l_wait_info lwi;
189         int                rc;
190
191         LASSERT (!in_interrupt ());             /* might sleep */
192
193         if (!ptlrpc_bulk_active(desc))          /* completed or */
194                 return;                         /* never started */
195         
196         /* The unlink ensures the callback happens ASAP and is the last
197          * one.  If it fails, it must be because completion just happened,
198          * but we must still l_wait_event() in this case, to give liblustre
199          * a chance to run server_bulk_callback()*/
200
201         PtlMDUnlink (desc->bd_md_h);
202
203         for (;;) {
204                 /* Network access will complete in finite time but the HUGE
205                  * timeout lets us CWARN for visibility of sluggish NALs */
206                 lwi = LWI_TIMEOUT (300 * HZ, NULL, NULL);
207                 rc = l_wait_event(desc->bd_waitq, 
208                                   !ptlrpc_bulk_active(desc), &lwi);
209                 if (rc == 0)
210                         return;
211
212                 LASSERT(rc == -ETIMEDOUT);
213                 CWARN("Unexpectedly long timeout: desc %p\n", desc);
214         }
215 }
216
217 int ptlrpc_register_bulk (struct ptlrpc_request *req)
218 {
219         struct ptlrpc_bulk_desc *desc = req->rq_bulk;
220         struct ptlrpc_peer *peer;
221         int rc;
222         int rc2;
223         ptl_process_id_t source_id;
224         ptl_handle_me_t  me_h;
225         ptl_md_t         md;
226         ENTRY;
227
228         if (OBD_FAIL_CHECK_ONCE(OBD_FAIL_PTLRPC_BULK_GET_NET)) 
229                 RETURN(0);
230
231         /* NB no locking required until desc is on the network */
232         LASSERT (desc->bd_nob > 0);
233         LASSERT (!desc->bd_network_rw);
234         LASSERT (desc->bd_iov_count <= PTLRPC_MAX_BRW_PAGES);
235         LASSERT (desc->bd_req != NULL);
236         LASSERT (desc->bd_type == BULK_PUT_SINK ||
237                  desc->bd_type == BULK_GET_SOURCE);
238
239         desc->bd_success = 0;
240
241         peer = &desc->bd_import->imp_connection->c_peer;
242
243         md.length = desc->bd_nob;
244         md.eventq = peer->peer_ni->pni_eq_h;
245         md.threshold = 1;                       /* PUT or GET */
246         md.options = PTLRPC_MD_OPTIONS | 
247                      ((desc->bd_type == BULK_GET_SOURCE) ? 
248                       PTL_MD_OP_GET : PTL_MD_OP_PUT);
249         ptlrpc_fill_md(&md, desc);
250         md.user_ptr = &desc->bd_cbid;
251         LASSERT (desc->bd_cbid.cbid_fn == client_bulk_callback);
252         LASSERT (desc->bd_cbid.cbid_arg == desc);
253
254         /* XXX Registering the same xid on retried bulk makes my head
255          * explode trying to understand how the original request's bulk
256          * might interfere with the retried request -eeb */
257         LASSERT (!desc->bd_registered || req->rq_xid != desc->bd_last_xid);
258         desc->bd_registered = 1;
259         desc->bd_last_xid = req->rq_xid;
260
261         source_id.nid = desc->bd_import->imp_connection->c_peer.peer_nid;
262         source_id.pid = PTL_PID_ANY;
263
264         rc = PtlMEAttach(peer->peer_ni->pni_ni_h,
265                          desc->bd_portal, source_id, req->rq_xid, 0,
266                          PTL_UNLINK, PTL_INS_AFTER, &me_h);
267         if (rc != PTL_OK) {
268                 CERROR("PtlMEAttach failed: %d\n", rc);
269                 LASSERT (rc == PTL_NO_SPACE);
270                 RETURN (-ENOMEM);
271         }
272
273         /* About to let the network at it... */
274         desc->bd_network_rw = 1;
275         rc = PtlMDAttach(me_h, md, PTL_UNLINK, &desc->bd_md_h);
276         if (rc != PTL_OK) {
277                 CERROR("PtlMDAttach failed: %d\n", rc);
278                 LASSERT (rc == PTL_NO_SPACE);
279                 desc->bd_network_rw = 0;
280                 rc2 = PtlMEUnlink (me_h);
281                 LASSERT (rc2 == PTL_OK);
282                 RETURN (-ENOMEM);
283         }
284
285         CDEBUG(D_NET, "Setup bulk %s buffers: %u pages %u bytes, xid "LPX64", "
286                "portal %u on %s\n",
287                desc->bd_type == BULK_GET_SOURCE ? "get-source" : "put-sink",
288                md.niov, md.length,
289                req->rq_xid, desc->bd_portal, peer->peer_ni->pni_name);
290         RETURN(0);
291 }
292
293 void ptlrpc_unregister_bulk (struct ptlrpc_request *req)
294 {
295         /* Disconnect a bulk desc from the network. Idempotent. Not
296          * thread-safe (i.e. only interlocks with completion callback). */
297         struct ptlrpc_bulk_desc *desc = req->rq_bulk;
298         wait_queue_head_t       *wq;
299         struct l_wait_info       lwi;
300         int                      rc;
301
302         LASSERT (!in_interrupt ());             /* might sleep */
303
304         if (!ptlrpc_bulk_active(desc))          /* completed or */
305                 return;                         /* never registered */
306         
307         LASSERT (desc->bd_req == req);          /* bd_req NULL until registered */
308
309         /* the unlink ensures the callback happens ASAP and is the last
310          * one.  If it fails, it must be because completion just happened,
311          * but we must still l_wait_event() in this case to give liblustre
312          * a chance to run client_bulk_callback() */
313
314         PtlMDUnlink (desc->bd_md_h);
315         
316         if (desc->bd_req->rq_set != NULL)
317                 wq = &req->rq_set->set_waitq;
318         else
319                 wq = &req->rq_reply_waitq;
320
321         for (;;) {
322                 /* Network access will complete in finite time but the HUGE
323                  * timeout lets us CWARN for visibility of sluggish NALs */
324                 lwi = LWI_TIMEOUT (300 * HZ, NULL, NULL);
325                 rc = l_wait_event(*wq, !ptlrpc_bulk_active(desc), &lwi);
326                 if (rc == 0)
327                         return;
328                 
329                 LASSERT (rc == -ETIMEDOUT);
330                 CWARN("Unexpectedly long timeout: desc %p\n", desc);
331         }
332 }
333
334 int ptlrpc_send_reply (struct ptlrpc_request *req, int may_be_difficult)
335 {
336         struct ptlrpc_service     *svc = req->rq_rqbd->rqbd_srv_ni->sni_service;
337         struct ptlrpc_reply_state *rs = req->rq_reply_state;
338         struct ptlrpc_connection  *conn;
339         int                        rc;
340
341         /* We must already have a reply buffer (only ptlrpc_error() may be
342          * called without one).  We must also have a request buffer which
343          * is either the actual (swabbed) incoming request, or a saved copy
344          * if this is a req saved in target_queue_final_reply(). */
345         LASSERT (req->rq_reqmsg != NULL);
346         LASSERT (rs != NULL);
347         LASSERT (req->rq_repmsg != NULL);
348         LASSERT (may_be_difficult || !rs->rs_difficult);
349         LASSERT (req->rq_repmsg == &rs->rs_msg);
350         LASSERT (rs->rs_cb_id.cbid_fn == reply_out_callback);
351         LASSERT (rs->rs_cb_id.cbid_arg == rs);
352
353         LASSERT (req->rq_repmsg != NULL);
354         if (req->rq_type != PTL_RPC_MSG_ERR)
355                 req->rq_type = PTL_RPC_MSG_REPLY;
356
357         req->rq_repmsg->type   = req->rq_type;
358         req->rq_repmsg->status = req->rq_status;
359         req->rq_repmsg->opc    = req->rq_reqmsg->opc;
360
361         if (req->rq_export == NULL) 
362                 conn = ptlrpc_get_connection(&req->rq_peer, NULL);
363         else
364                 conn = ptlrpc_connection_addref(req->rq_export->exp_connection);
365
366         atomic_inc (&svc->srv_outstanding_replies);
367
368         rc = ptl_send_buf (&rs->rs_md_h, req->rq_repmsg, req->rq_replen,
369                            rs->rs_difficult ? PTL_ACK_REQ : PTL_NOACK_REQ,
370                            &rs->rs_cb_id, conn,
371                            svc->srv_rep_portal, req->rq_xid);
372         if (rc != 0) {
373                 atomic_dec (&svc->srv_outstanding_replies);
374
375                 if (!rs->rs_difficult) {
376                         /* Callers other than target_send_reply() expect me
377                          * to clean up on a comms error */
378                         lustre_free_reply_state (rs);
379                         req->rq_reply_state = NULL;
380                         req->rq_repmsg = NULL;
381                 }
382         }
383         ptlrpc_put_connection(conn);
384         return rc;
385 }
386
387 int ptlrpc_reply (struct ptlrpc_request *req)
388 {
389         return (ptlrpc_send_reply (req, 0));
390 }
391
392 int ptlrpc_error(struct ptlrpc_request *req)
393 {
394         int rc;
395         ENTRY;
396
397         if (!req->rq_repmsg) {
398                 rc = lustre_pack_reply(req, 0, NULL, NULL);
399                 if (rc)
400                         RETURN(rc);
401         }
402
403         req->rq_type = PTL_RPC_MSG_ERR;
404
405         rc = ptlrpc_send_reply (req, 0);
406         RETURN(rc);
407 }
408
409 int ptl_send_rpc(struct ptlrpc_request *request)
410 {
411         int rc;
412         int rc2;
413         struct ptlrpc_connection *connection;
414         unsigned long flags;
415         ptl_process_id_t source_id;
416         ptl_handle_me_t  reply_me_h;
417         ptl_md_t         reply_md;
418         ENTRY;
419
420         LASSERT (request->rq_type == PTL_RPC_MSG_REQUEST);
421
422         /* If this is a re-transmit, we're required to have disengaged
423          * cleanly from the previous attempt */
424         LASSERT (!request->rq_receiving_reply);
425
426         connection = request->rq_import->imp_connection;
427
428         if (request->rq_bulk != NULL) {
429                 rc = ptlrpc_register_bulk (request);
430                 if (rc != 0)
431                         RETURN(rc);
432         }
433
434         request->rq_reqmsg->handle = request->rq_import->imp_remote_handle;
435         request->rq_reqmsg->type = PTL_RPC_MSG_REQUEST;
436         request->rq_reqmsg->conn_cnt = request->rq_import->imp_conn_cnt;
437
438         source_id.nid = connection->c_peer.peer_nid;
439         source_id.pid = PTL_PID_ANY;
440
441         LASSERT (request->rq_replen != 0);
442         if (request->rq_repmsg == NULL)
443                 OBD_ALLOC(request->rq_repmsg, request->rq_replen);
444         if (request->rq_repmsg == NULL)
445                 GOTO(cleanup_bulk, rc = -ENOMEM);
446
447         rc = PtlMEAttach(connection->c_peer.peer_ni->pni_ni_h,
448                          request->rq_reply_portal, /* XXX FIXME bug 249 */
449                          source_id, request->rq_xid, 0, PTL_UNLINK,
450                          PTL_INS_AFTER, &reply_me_h);
451         if (rc != PTL_OK) {
452                 CERROR("PtlMEAttach failed: %d\n", rc);
453                 LASSERT (rc == PTL_NO_SPACE);
454                 GOTO(cleanup_repmsg, rc = -ENOMEM);
455         }
456
457         spin_lock_irqsave (&request->rq_lock, flags);
458         /* If the MD attach succeeds, there _will_ be a reply_in callback */
459         request->rq_receiving_reply = 1;
460         /* Clear any flags that may be present from previous sends. */
461         request->rq_replied = 0;
462         request->rq_err = 0;
463         request->rq_timedout = 0;
464         request->rq_resend = 0;
465         request->rq_restart = 0;
466         spin_unlock_irqrestore (&request->rq_lock, flags);
467
468         reply_md.start     = request->rq_repmsg;
469         reply_md.length    = request->rq_replen;
470         reply_md.threshold = 1;
471         reply_md.options   = PTLRPC_MD_OPTIONS | PTL_MD_OP_PUT;
472         reply_md.user_ptr  = &request->rq_reply_cbid;
473         reply_md.eventq    = connection->c_peer.peer_ni->pni_eq_h;
474
475         rc = PtlMDAttach(reply_me_h, reply_md, PTL_UNLINK, 
476                          &request->rq_reply_md_h);
477         if (rc != PTL_OK) {
478                 CERROR("PtlMDAttach failed: %d\n", rc);
479                 LASSERT (rc == PTL_NO_SPACE);
480                 GOTO(cleanup_me, rc -ENOMEM);
481         }
482
483         CDEBUG(D_NET, "Setup reply buffer: %u bytes, xid "LPU64
484                ", portal %u on %s\n",
485                request->rq_replen, request->rq_xid,
486                request->rq_reply_portal,
487                connection->c_peer.peer_ni->pni_name);
488
489         ptlrpc_request_addref(request);        /* +1 ref for the SENT callback */
490
491         request->rq_sent = LTIME_S(CURRENT_TIME);
492         ptlrpc_pinger_sending_on_import(request->rq_import);
493         rc = ptl_send_buf(&request->rq_req_md_h, 
494                           request->rq_reqmsg, request->rq_reqlen,
495                           PTL_NOACK_REQ, &request->rq_req_cbid, 
496                           connection,
497                           request->rq_request_portal,
498                           request->rq_xid);
499         if (rc == 0) {
500                 ptlrpc_lprocfs_rpc_sent(request);
501                 RETURN(rc);
502         }
503
504         ptlrpc_req_finished (request);          /* drop callback ref */
505
506  cleanup_me:
507         /* MEUnlink is safe; the PUT didn't even get off the ground, and
508          * nobody apart from the PUT's target has the right nid+XID to
509          * access the reply buffer. */
510         rc2 = PtlMEUnlink(reply_me_h);
511         LASSERT (rc2 == PTL_OK);
512         /* UNLINKED callback called synchronously */
513         LASSERT (!request->rq_receiving_reply);
514
515  cleanup_repmsg:
516         OBD_FREE(request->rq_repmsg, request->rq_replen);
517         request->rq_repmsg = NULL;
518
519  cleanup_bulk:
520         if (request->rq_bulk != NULL)
521                 ptlrpc_unregister_bulk(request);
522
523         return rc;
524 }
525
526 int ptlrpc_register_rqbd (struct ptlrpc_request_buffer_desc *rqbd)
527 {
528         struct ptlrpc_srv_ni    *srv_ni = rqbd->rqbd_srv_ni;
529         struct ptlrpc_service   *service = srv_ni->sni_service;
530         static ptl_process_id_t  match_id = {PTL_NID_ANY, PTL_PID_ANY};
531         int                      rc;
532         ptl_md_t                 md;
533         ptl_handle_me_t          me_h;
534
535         CDEBUG(D_NET, "PtlMEAttach: portal %d on %s\n",
536                service->srv_req_portal, srv_ni->sni_ni->pni_name);
537
538         if (OBD_FAIL_CHECK_ONCE(OBD_FAIL_PTLRPC_RQBD))
539                 return (-ENOMEM);
540
541         rc = PtlMEAttach(srv_ni->sni_ni->pni_ni_h, service->srv_req_portal,
542                          match_id, 0, ~0, PTL_UNLINK, PTL_INS_AFTER, &me_h);
543         if (rc != PTL_OK) {
544                 CERROR("PtlMEAttach failed: %d\n", rc);
545                 return (-ENOMEM);
546         }
547
548         LASSERT(rqbd->rqbd_refcount == 0);
549         rqbd->rqbd_refcount = 1;
550
551         md.start     = rqbd->rqbd_buffer;
552         md.length    = service->srv_buf_size;
553         md.max_size  = service->srv_max_req_size;
554         md.threshold = PTL_MD_THRESH_INF;
555         md.options   = PTLRPC_MD_OPTIONS | PTL_MD_OP_PUT | PTL_MD_MAX_SIZE;
556         md.user_ptr  = &rqbd->rqbd_cbid;
557         md.eventq    = srv_ni->sni_ni->pni_eq_h;
558         
559         rc = PtlMDAttach(me_h, md, PTL_UNLINK, &rqbd->rqbd_md_h);
560         if (rc == PTL_OK)
561                 return (0);
562
563         CERROR("PtlMDAttach failed: %d; \n", rc);
564         LASSERT (rc == PTL_NO_SPACE);
565         rc = PtlMEUnlink (me_h);
566         LASSERT (rc == PTL_OK);
567         rqbd->rqbd_refcount = 0;
568         
569         return (-ENOMEM);
570 }