4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 2 only,
8 * as published by the Free Software Foundation.
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License version 2 for more details (a copy is included
14 * in the LICENSE file that accompanied this code).
16 * You should have received a copy of the GNU General Public License
17 * version 2 along with this program; If not, see
18 * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
20 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21 * CA 95054 USA or visit www.sun.com if you need additional information or
27 * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
28 * Use is subject to license terms.
30 * Copyright (c) 2011, 2012, Intel Corporation.
33 * This file is part of Lustre, http://www.lustre.org/
34 * Lustre is a trademark of Sun Microsystems, Inc.
37 /** Implementation of client-side PortalRPC interfaces */
39 #define DEBUG_SUBSYSTEM S_RPC
41 #include <obd_support.h>
42 #include <obd_class.h>
43 #include <lustre_lib.h>
44 #include <lustre_ha.h>
45 #include <lustre_import.h>
46 #include <lustre_req_layout.h>
48 #include "ptlrpc_internal.h"
50 static int ptlrpc_send_new_req(struct ptlrpc_request
*req
);
51 static int ptlrpcd_check_work(struct ptlrpc_request
*req
);
54 * Initialize passed in client structure \a cl.
56 void ptlrpc_init_client(int req_portal
, int rep_portal
, char *name
,
57 struct ptlrpc_client
*cl
)
59 cl
->cli_request_portal
= req_portal
;
60 cl
->cli_reply_portal
= rep_portal
;
63 EXPORT_SYMBOL(ptlrpc_init_client
);
66 * Return PortalRPC connection for remote uud \a uuid
68 struct ptlrpc_connection
*ptlrpc_uuid_to_connection(struct obd_uuid
*uuid
)
70 struct ptlrpc_connection
*c
;
72 lnet_process_id_t peer
;
75 /* ptlrpc_uuid_to_peer() initializes its 2nd parameter
76 * before accessing its values. */
77 /* coverity[uninit_use_in_call] */
78 err
= ptlrpc_uuid_to_peer(uuid
, &peer
, &self
);
80 CNETERR("cannot find peer %s!\n", uuid
->uuid
);
84 c
= ptlrpc_connection_get(peer
, self
, uuid
);
86 memcpy(c
->c_remote_uuid
.uuid
,
87 uuid
->uuid
, sizeof(c
->c_remote_uuid
.uuid
));
90 CDEBUG(D_INFO
, "%s -> %p\n", uuid
->uuid
, c
);
94 EXPORT_SYMBOL(ptlrpc_uuid_to_connection
);
97 * Allocate and initialize new bulk descriptor on the sender.
98 * Returns pointer to the descriptor or NULL on error.
100 struct ptlrpc_bulk_desc
*ptlrpc_new_bulk(unsigned npages
, unsigned max_brw
,
101 unsigned type
, unsigned portal
)
103 struct ptlrpc_bulk_desc
*desc
;
106 OBD_ALLOC(desc
, offsetof(struct ptlrpc_bulk_desc
, bd_iov
[npages
]));
110 spin_lock_init(&desc
->bd_lock
);
111 init_waitqueue_head(&desc
->bd_waitq
);
112 desc
->bd_max_iov
= npages
;
113 desc
->bd_iov_count
= 0;
114 desc
->bd_portal
= portal
;
115 desc
->bd_type
= type
;
116 desc
->bd_md_count
= 0;
117 LASSERT(max_brw
> 0);
118 desc
->bd_md_max_brw
= min(max_brw
, PTLRPC_BULK_OPS_COUNT
);
119 /* PTLRPC_BULK_OPS_COUNT is the compile-time transfer limit for this
120 * node. Negotiated ocd_brw_size will always be <= this number. */
121 for (i
= 0; i
< PTLRPC_BULK_OPS_COUNT
; i
++)
122 LNetInvalidateHandle(&desc
->bd_mds
[i
]);
128 * Prepare bulk descriptor for specified outgoing request \a req that
129 * can fit \a npages * pages. \a type is bulk type. \a portal is where
130 * the bulk to be sent. Used on client-side.
131 * Returns pointer to newly allocated initialized bulk descriptor or NULL on
134 struct ptlrpc_bulk_desc
*ptlrpc_prep_bulk_imp(struct ptlrpc_request
*req
,
135 unsigned npages
, unsigned max_brw
,
136 unsigned type
, unsigned portal
)
138 struct obd_import
*imp
= req
->rq_import
;
139 struct ptlrpc_bulk_desc
*desc
;
141 LASSERT(type
== BULK_PUT_SINK
|| type
== BULK_GET_SOURCE
);
142 desc
= ptlrpc_new_bulk(npages
, max_brw
, type
, portal
);
146 desc
->bd_import_generation
= req
->rq_import_generation
;
147 desc
->bd_import
= class_import_get(imp
);
150 desc
->bd_cbid
.cbid_fn
= client_bulk_callback
;
151 desc
->bd_cbid
.cbid_arg
= desc
;
153 /* This makes req own desc, and free it when she frees herself */
158 EXPORT_SYMBOL(ptlrpc_prep_bulk_imp
);
161 * Add a page \a page to the bulk descriptor \a desc.
162 * Data to transfer in the page starts at offset \a pageoffset and
163 * amount of data to transfer from the page is \a len
165 void __ptlrpc_prep_bulk_page(struct ptlrpc_bulk_desc
*desc
,
166 struct page
*page
, int pageoffset
, int len
, int pin
)
168 LASSERT(desc
->bd_iov_count
< desc
->bd_max_iov
);
169 LASSERT(page
!= NULL
);
170 LASSERT(pageoffset
>= 0);
172 LASSERT(pageoffset
+ len
<= PAGE_CACHE_SIZE
);
177 page_cache_get(page
);
179 ptlrpc_add_bulk_page(desc
, page
, pageoffset
, len
);
181 EXPORT_SYMBOL(__ptlrpc_prep_bulk_page
);
184 * Uninitialize and free bulk descriptor \a desc.
185 * Works on bulk descriptors both from server and client side.
187 void __ptlrpc_free_bulk(struct ptlrpc_bulk_desc
*desc
, int unpin
)
191 LASSERT(desc
!= NULL
);
192 LASSERT(desc
->bd_iov_count
!= LI_POISON
); /* not freed already */
193 LASSERT(desc
->bd_md_count
== 0); /* network hands off */
194 LASSERT((desc
->bd_export
!= NULL
) ^ (desc
->bd_import
!= NULL
));
196 sptlrpc_enc_pool_put_pages(desc
);
199 class_export_put(desc
->bd_export
);
201 class_import_put(desc
->bd_import
);
204 for (i
= 0; i
< desc
->bd_iov_count
; i
++)
205 page_cache_release(desc
->bd_iov
[i
].kiov_page
);
208 OBD_FREE(desc
, offsetof(struct ptlrpc_bulk_desc
,
209 bd_iov
[desc
->bd_max_iov
]));
211 EXPORT_SYMBOL(__ptlrpc_free_bulk
);
214 * Set server timelimit for this req, i.e. how long are we willing to wait
215 * for reply before timing out this request.
217 void ptlrpc_at_set_req_timeout(struct ptlrpc_request
*req
)
223 LASSERT(req
->rq_import
);
226 /* non-AT settings */
228 * \a imp_server_timeout means this is reverse import and
229 * we send (currently only) ASTs to the client and cannot afford
230 * to wait too long for the reply, otherwise the other client
231 * (because of which we are sending this request) would
232 * timeout waiting for us
234 req
->rq_timeout
= req
->rq_import
->imp_server_timeout
?
235 obd_timeout
/ 2 : obd_timeout
;
237 at
= &req
->rq_import
->imp_at
;
238 idx
= import_at_get_index(req
->rq_import
,
239 req
->rq_request_portal
);
240 serv_est
= at_get(&at
->iat_service_estimate
[idx
]);
241 req
->rq_timeout
= at_est2timeout(serv_est
);
243 /* We could get even fancier here, using history to predict increased
246 /* Let the server know what this RPC timeout is by putting it in the
248 lustre_msg_set_timeout(req
->rq_reqmsg
, req
->rq_timeout
);
250 EXPORT_SYMBOL(ptlrpc_at_set_req_timeout
);
252 /* Adjust max service estimate based on server value */
253 static void ptlrpc_at_adj_service(struct ptlrpc_request
*req
,
254 unsigned int serv_est
)
260 LASSERT(req
->rq_import
);
261 at
= &req
->rq_import
->imp_at
;
263 idx
= import_at_get_index(req
->rq_import
, req
->rq_request_portal
);
264 /* max service estimates are tracked on the server side,
265 so just keep minimal history here */
266 oldse
= at_measured(&at
->iat_service_estimate
[idx
], serv_est
);
268 CDEBUG(D_ADAPTTO
, "The RPC service estimate for %s ptl %d "
269 "has changed from %d to %d\n",
270 req
->rq_import
->imp_obd
->obd_name
,req
->rq_request_portal
,
271 oldse
, at_get(&at
->iat_service_estimate
[idx
]));
274 /* Expected network latency per remote node (secs) */
275 int ptlrpc_at_get_net_latency(struct ptlrpc_request
*req
)
277 return AT_OFF
? 0 : at_get(&req
->rq_import
->imp_at
.iat_net_latency
);
280 /* Adjust expected network latency */
281 static void ptlrpc_at_adj_net_latency(struct ptlrpc_request
*req
,
282 unsigned int service_time
)
284 unsigned int nl
, oldnl
;
286 time_t now
= cfs_time_current_sec();
288 LASSERT(req
->rq_import
);
289 at
= &req
->rq_import
->imp_at
;
291 /* Network latency is total time less server processing time */
292 nl
= max_t(int, now
- req
->rq_sent
- service_time
, 0) +1/*st rounding*/;
293 if (service_time
> now
- req
->rq_sent
+ 3 /* bz16408 */)
294 CWARN("Reported service time %u > total measured time "
295 CFS_DURATION_T
"\n", service_time
,
296 cfs_time_sub(now
, req
->rq_sent
));
298 oldnl
= at_measured(&at
->iat_net_latency
, nl
);
300 CDEBUG(D_ADAPTTO
, "The network latency for %s (nid %s) "
301 "has changed from %d to %d\n",
302 req
->rq_import
->imp_obd
->obd_name
,
304 &req
->rq_import
->imp_connection
->c_remote_uuid
),
305 oldnl
, at_get(&at
->iat_net_latency
));
308 static int unpack_reply(struct ptlrpc_request
*req
)
312 if (SPTLRPC_FLVR_POLICY(req
->rq_flvr
.sf_rpc
) != SPTLRPC_POLICY_NULL
) {
313 rc
= ptlrpc_unpack_rep_msg(req
, req
->rq_replen
);
315 DEBUG_REQ(D_ERROR
, req
, "unpack_rep failed: %d", rc
);
320 rc
= lustre_unpack_rep_ptlrpc_body(req
, MSG_PTLRPC_BODY_OFF
);
322 DEBUG_REQ(D_ERROR
, req
, "unpack ptlrpc body failed: %d", rc
);
329 * Handle an early reply message, called with the rq_lock held.
330 * If anything goes wrong just ignore it - same as if it never happened
332 static int ptlrpc_at_recv_early_reply(struct ptlrpc_request
*req
)
334 struct ptlrpc_request
*early_req
;
339 spin_unlock(&req
->rq_lock
);
341 rc
= sptlrpc_cli_unwrap_early_reply(req
, &early_req
);
343 spin_lock(&req
->rq_lock
);
347 rc
= unpack_reply(early_req
);
349 /* Expecting to increase the service time estimate here */
350 ptlrpc_at_adj_service(req
,
351 lustre_msg_get_timeout(early_req
->rq_repmsg
));
352 ptlrpc_at_adj_net_latency(req
,
353 lustre_msg_get_service_time(early_req
->rq_repmsg
));
356 sptlrpc_cli_finish_early_reply(early_req
);
359 spin_lock(&req
->rq_lock
);
363 /* Adjust the local timeout for this req */
364 ptlrpc_at_set_req_timeout(req
);
366 spin_lock(&req
->rq_lock
);
367 olddl
= req
->rq_deadline
;
368 /* server assumes it now has rq_timeout from when it sent the
369 * early reply, so client should give it at least that long. */
370 req
->rq_deadline
= cfs_time_current_sec() + req
->rq_timeout
+
371 ptlrpc_at_get_net_latency(req
);
373 DEBUG_REQ(D_ADAPTTO
, req
,
374 "Early reply #%d, new deadline in "CFS_DURATION_T
"s "
375 "("CFS_DURATION_T
"s)", req
->rq_early_count
,
376 cfs_time_sub(req
->rq_deadline
, cfs_time_current_sec()),
377 cfs_time_sub(req
->rq_deadline
, olddl
));
382 struct kmem_cache
*request_cache
;
384 int ptlrpc_request_cache_init(void)
386 request_cache
= kmem_cache_create("ptlrpc_cache",
387 sizeof(struct ptlrpc_request
),
388 0, SLAB_HWCACHE_ALIGN
, NULL
);
389 return request_cache
== NULL
? -ENOMEM
: 0;
392 void ptlrpc_request_cache_fini(void)
394 kmem_cache_destroy(request_cache
);
397 struct ptlrpc_request
*ptlrpc_request_cache_alloc(int flags
)
399 struct ptlrpc_request
*req
;
401 OBD_SLAB_ALLOC_PTR_GFP(req
, request_cache
, flags
);
405 void ptlrpc_request_cache_free(struct ptlrpc_request
*req
)
407 OBD_SLAB_FREE_PTR(req
, request_cache
);
411 * Wind down request pool \a pool.
412 * Frees all requests from the pool too
414 void ptlrpc_free_rq_pool(struct ptlrpc_request_pool
*pool
)
416 struct list_head
*l
, *tmp
;
417 struct ptlrpc_request
*req
;
419 LASSERT(pool
!= NULL
);
421 spin_lock(&pool
->prp_lock
);
422 list_for_each_safe(l
, tmp
, &pool
->prp_req_list
) {
423 req
= list_entry(l
, struct ptlrpc_request
, rq_list
);
424 list_del(&req
->rq_list
);
425 LASSERT(req
->rq_reqbuf
);
426 LASSERT(req
->rq_reqbuf_len
== pool
->prp_rq_size
);
427 OBD_FREE_LARGE(req
->rq_reqbuf
, pool
->prp_rq_size
);
428 ptlrpc_request_cache_free(req
);
430 spin_unlock(&pool
->prp_lock
);
431 OBD_FREE(pool
, sizeof(*pool
));
433 EXPORT_SYMBOL(ptlrpc_free_rq_pool
);
436 * Allocates, initializes and adds \a num_rq requests to the pool \a pool
438 void ptlrpc_add_rqs_to_pool(struct ptlrpc_request_pool
*pool
, int num_rq
)
443 while (size
< pool
->prp_rq_size
)
446 LASSERTF(list_empty(&pool
->prp_req_list
) ||
447 size
== pool
->prp_rq_size
,
448 "Trying to change pool size with nonempty pool "
449 "from %d to %d bytes\n", pool
->prp_rq_size
, size
);
451 spin_lock(&pool
->prp_lock
);
452 pool
->prp_rq_size
= size
;
453 for (i
= 0; i
< num_rq
; i
++) {
454 struct ptlrpc_request
*req
;
455 struct lustre_msg
*msg
;
457 spin_unlock(&pool
->prp_lock
);
458 req
= ptlrpc_request_cache_alloc(GFP_NOFS
);
461 OBD_ALLOC_LARGE(msg
, size
);
463 ptlrpc_request_cache_free(req
);
466 req
->rq_reqbuf
= msg
;
467 req
->rq_reqbuf_len
= size
;
469 spin_lock(&pool
->prp_lock
);
470 list_add_tail(&req
->rq_list
, &pool
->prp_req_list
);
472 spin_unlock(&pool
->prp_lock
);
475 EXPORT_SYMBOL(ptlrpc_add_rqs_to_pool
);
478 * Create and initialize new request pool with given attributes:
479 * \a num_rq - initial number of requests to create for the pool
480 * \a msgsize - maximum message size possible for requests in thid pool
481 * \a populate_pool - function to be called when more requests need to be added
483 * Returns pointer to newly created pool or NULL on error.
485 struct ptlrpc_request_pool
*
486 ptlrpc_init_rq_pool(int num_rq
, int msgsize
,
487 void (*populate_pool
)(struct ptlrpc_request_pool
*, int))
489 struct ptlrpc_request_pool
*pool
;
491 OBD_ALLOC(pool
, sizeof(struct ptlrpc_request_pool
));
495 /* Request next power of two for the allocation, because internally
496 kernel would do exactly this */
498 spin_lock_init(&pool
->prp_lock
);
499 INIT_LIST_HEAD(&pool
->prp_req_list
);
500 pool
->prp_rq_size
= msgsize
+ SPTLRPC_MAX_PAYLOAD
;
501 pool
->prp_populate
= populate_pool
;
503 populate_pool(pool
, num_rq
);
505 if (list_empty(&pool
->prp_req_list
)) {
506 /* have not allocated a single request for the pool */
507 OBD_FREE(pool
, sizeof(struct ptlrpc_request_pool
));
512 EXPORT_SYMBOL(ptlrpc_init_rq_pool
);
515 * Fetches one request from pool \a pool
517 static struct ptlrpc_request
*
518 ptlrpc_prep_req_from_pool(struct ptlrpc_request_pool
*pool
)
520 struct ptlrpc_request
*request
;
521 struct lustre_msg
*reqbuf
;
526 spin_lock(&pool
->prp_lock
);
528 /* See if we have anything in a pool, and bail out if nothing,
529 * in writeout path, where this matters, this is safe to do, because
530 * nothing is lost in this case, and when some in-flight requests
531 * complete, this code will be called again. */
532 if (unlikely(list_empty(&pool
->prp_req_list
))) {
533 spin_unlock(&pool
->prp_lock
);
537 request
= list_entry(pool
->prp_req_list
.next
, struct ptlrpc_request
,
539 list_del_init(&request
->rq_list
);
540 spin_unlock(&pool
->prp_lock
);
542 LASSERT(request
->rq_reqbuf
);
543 LASSERT(request
->rq_pool
);
545 reqbuf
= request
->rq_reqbuf
;
546 memset(request
, 0, sizeof(*request
));
547 request
->rq_reqbuf
= reqbuf
;
548 request
->rq_reqbuf_len
= pool
->prp_rq_size
;
549 request
->rq_pool
= pool
;
555 * Returns freed \a request to pool.
557 static void __ptlrpc_free_req_to_pool(struct ptlrpc_request
*request
)
559 struct ptlrpc_request_pool
*pool
= request
->rq_pool
;
561 spin_lock(&pool
->prp_lock
);
562 LASSERT(list_empty(&request
->rq_list
));
563 LASSERT(!request
->rq_receiving_reply
);
564 list_add_tail(&request
->rq_list
, &pool
->prp_req_list
);
565 spin_unlock(&pool
->prp_lock
);
568 static int __ptlrpc_request_bufs_pack(struct ptlrpc_request
*request
,
569 __u32 version
, int opcode
,
570 int count
, __u32
*lengths
, char **bufs
,
571 struct ptlrpc_cli_ctx
*ctx
)
573 struct obd_import
*imp
= request
->rq_import
;
577 request
->rq_cli_ctx
= sptlrpc_cli_ctx_get(ctx
);
579 rc
= sptlrpc_req_get_ctx(request
);
584 sptlrpc_req_set_flavor(request
, opcode
);
586 rc
= lustre_pack_request(request
, imp
->imp_msg_magic
, count
,
589 LASSERT(!request
->rq_pool
);
593 lustre_msg_add_version(request
->rq_reqmsg
, version
);
594 request
->rq_send_state
= LUSTRE_IMP_FULL
;
595 request
->rq_type
= PTL_RPC_MSG_REQUEST
;
596 request
->rq_export
= NULL
;
598 request
->rq_req_cbid
.cbid_fn
= request_out_callback
;
599 request
->rq_req_cbid
.cbid_arg
= request
;
601 request
->rq_reply_cbid
.cbid_fn
= reply_in_callback
;
602 request
->rq_reply_cbid
.cbid_arg
= request
;
604 request
->rq_reply_deadline
= 0;
605 request
->rq_phase
= RQ_PHASE_NEW
;
606 request
->rq_next_phase
= RQ_PHASE_UNDEFINED
;
608 request
->rq_request_portal
= imp
->imp_client
->cli_request_portal
;
609 request
->rq_reply_portal
= imp
->imp_client
->cli_reply_portal
;
611 ptlrpc_at_set_req_timeout(request
);
613 spin_lock_init(&request
->rq_lock
);
614 INIT_LIST_HEAD(&request
->rq_list
);
615 INIT_LIST_HEAD(&request
->rq_timed_list
);
616 INIT_LIST_HEAD(&request
->rq_replay_list
);
617 INIT_LIST_HEAD(&request
->rq_ctx_chain
);
618 INIT_LIST_HEAD(&request
->rq_set_chain
);
619 INIT_LIST_HEAD(&request
->rq_history_list
);
620 INIT_LIST_HEAD(&request
->rq_exp_list
);
621 init_waitqueue_head(&request
->rq_reply_waitq
);
622 init_waitqueue_head(&request
->rq_set_waitq
);
623 request
->rq_xid
= ptlrpc_next_xid();
624 atomic_set(&request
->rq_refcount
, 1);
626 lustre_msg_set_opc(request
->rq_reqmsg
, opcode
);
630 sptlrpc_cli_ctx_put(request
->rq_cli_ctx
, 1);
632 class_import_put(imp
);
636 int ptlrpc_request_bufs_pack(struct ptlrpc_request
*request
,
637 __u32 version
, int opcode
, char **bufs
,
638 struct ptlrpc_cli_ctx
*ctx
)
642 count
= req_capsule_filled_sizes(&request
->rq_pill
, RCL_CLIENT
);
643 return __ptlrpc_request_bufs_pack(request
, version
, opcode
, count
,
644 request
->rq_pill
.rc_area
[RCL_CLIENT
],
647 EXPORT_SYMBOL(ptlrpc_request_bufs_pack
);
650 * Pack request buffers for network transfer, performing necessary encryption
651 * steps if necessary.
653 int ptlrpc_request_pack(struct ptlrpc_request
*request
,
654 __u32 version
, int opcode
)
657 rc
= ptlrpc_request_bufs_pack(request
, version
, opcode
, NULL
, NULL
);
661 /* For some old 1.8 clients (< 1.8.7), they will LASSERT the size of
662 * ptlrpc_body sent from server equal to local ptlrpc_body size, so we
663 * have to send old ptlrpc_body to keep interoperability with these
666 * Only three kinds of server->client RPCs so far:
671 * XXX This should be removed whenever we drop the interoperability with
672 * the these old clients.
674 if (opcode
== LDLM_BL_CALLBACK
|| opcode
== LDLM_CP_CALLBACK
||
675 opcode
== LDLM_GL_CALLBACK
)
676 req_capsule_shrink(&request
->rq_pill
, &RMF_PTLRPC_BODY
,
677 sizeof(struct ptlrpc_body_v2
), RCL_CLIENT
);
681 EXPORT_SYMBOL(ptlrpc_request_pack
);
684 * Helper function to allocate new request on import \a imp
685 * and possibly using existing request from pool \a pool if provided.
686 * Returns allocated request structure with import field filled or
690 struct ptlrpc_request
*__ptlrpc_request_alloc(struct obd_import
*imp
,
691 struct ptlrpc_request_pool
*pool
)
693 struct ptlrpc_request
*request
= NULL
;
696 request
= ptlrpc_prep_req_from_pool(pool
);
699 request
= ptlrpc_request_cache_alloc(GFP_NOFS
);
702 LASSERTF((unsigned long)imp
> 0x1000, "%p", imp
);
703 LASSERT(imp
!= LP_POISON
);
704 LASSERTF((unsigned long)imp
->imp_client
> 0x1000, "%p",
706 LASSERT(imp
->imp_client
!= LP_POISON
);
708 request
->rq_import
= class_import_get(imp
);
710 CERROR("request allocation out of memory\n");
717 * Helper function for creating a request.
718 * Calls __ptlrpc_request_alloc to allocate new request structure and inits
719 * buffer structures according to capsule template \a format.
720 * Returns allocated request structure pointer or NULL on error.
722 static struct ptlrpc_request
*
723 ptlrpc_request_alloc_internal(struct obd_import
*imp
,
724 struct ptlrpc_request_pool
* pool
,
725 const struct req_format
*format
)
727 struct ptlrpc_request
*request
;
729 request
= __ptlrpc_request_alloc(imp
, pool
);
733 req_capsule_init(&request
->rq_pill
, request
, RCL_CLIENT
);
734 req_capsule_set(&request
->rq_pill
, format
);
739 * Allocate new request structure for import \a imp and initialize its
740 * buffer structure according to capsule template \a format.
742 struct ptlrpc_request
*ptlrpc_request_alloc(struct obd_import
*imp
,
743 const struct req_format
*format
)
745 return ptlrpc_request_alloc_internal(imp
, NULL
, format
);
747 EXPORT_SYMBOL(ptlrpc_request_alloc
);
750 * Allocate new request structure for import \a imp from pool \a pool and
751 * initialize its buffer structure according to capsule template \a format.
753 struct ptlrpc_request
*ptlrpc_request_alloc_pool(struct obd_import
*imp
,
754 struct ptlrpc_request_pool
* pool
,
755 const struct req_format
*format
)
757 return ptlrpc_request_alloc_internal(imp
, pool
, format
);
759 EXPORT_SYMBOL(ptlrpc_request_alloc_pool
);
762 * For requests not from pool, free memory of the request structure.
763 * For requests obtained from a pool earlier, return request back to pool.
765 void ptlrpc_request_free(struct ptlrpc_request
*request
)
767 if (request
->rq_pool
)
768 __ptlrpc_free_req_to_pool(request
);
770 ptlrpc_request_cache_free(request
);
772 EXPORT_SYMBOL(ptlrpc_request_free
);
775 * Allocate new request for operation \a opcode and immediately pack it for
777 * Only used for simple requests like OBD_PING where the only important
778 * part of the request is operation itself.
779 * Returns allocated request or NULL on error.
781 struct ptlrpc_request
*ptlrpc_request_alloc_pack(struct obd_import
*imp
,
782 const struct req_format
*format
,
783 __u32 version
, int opcode
)
785 struct ptlrpc_request
*req
= ptlrpc_request_alloc(imp
, format
);
789 rc
= ptlrpc_request_pack(req
, version
, opcode
);
791 ptlrpc_request_free(req
);
797 EXPORT_SYMBOL(ptlrpc_request_alloc_pack
);
800 * Prepare request (fetched from pool \a pool if not NULL) on import \a imp
801 * for operation \a opcode. Request would contain \a count buffers.
802 * Sizes of buffers are described in array \a lengths and buffers themselves
803 * are provided by a pointer \a bufs.
804 * Returns prepared request structure pointer or NULL on error.
806 struct ptlrpc_request
*
807 ptlrpc_prep_req_pool(struct obd_import
*imp
,
808 __u32 version
, int opcode
,
809 int count
, __u32
*lengths
, char **bufs
,
810 struct ptlrpc_request_pool
*pool
)
812 struct ptlrpc_request
*request
;
815 request
= __ptlrpc_request_alloc(imp
, pool
);
819 rc
= __ptlrpc_request_bufs_pack(request
, version
, opcode
, count
,
820 lengths
, bufs
, NULL
);
822 ptlrpc_request_free(request
);
827 EXPORT_SYMBOL(ptlrpc_prep_req_pool
);
830 * Same as ptlrpc_prep_req_pool, but without pool
832 struct ptlrpc_request
*
833 ptlrpc_prep_req(struct obd_import
*imp
, __u32 version
, int opcode
, int count
,
834 __u32
*lengths
, char **bufs
)
836 return ptlrpc_prep_req_pool(imp
, version
, opcode
, count
, lengths
, bufs
,
839 EXPORT_SYMBOL(ptlrpc_prep_req
);
842 * Allocate and initialize new request set structure.
843 * Returns a pointer to the newly allocated set structure or NULL on error.
845 struct ptlrpc_request_set
*ptlrpc_prep_set(void)
847 struct ptlrpc_request_set
*set
;
849 OBD_ALLOC(set
, sizeof(*set
));
852 atomic_set(&set
->set_refcount
, 1);
853 INIT_LIST_HEAD(&set
->set_requests
);
854 init_waitqueue_head(&set
->set_waitq
);
855 atomic_set(&set
->set_new_count
, 0);
856 atomic_set(&set
->set_remaining
, 0);
857 spin_lock_init(&set
->set_new_req_lock
);
858 INIT_LIST_HEAD(&set
->set_new_requests
);
859 INIT_LIST_HEAD(&set
->set_cblist
);
860 set
->set_max_inflight
= UINT_MAX
;
861 set
->set_producer
= NULL
;
862 set
->set_producer_arg
= NULL
;
867 EXPORT_SYMBOL(ptlrpc_prep_set
);
870 * Allocate and initialize new request set structure with flow control
871 * extension. This extension allows to control the number of requests in-flight
872 * for the whole set. A callback function to generate requests must be provided
873 * and the request set will keep the number of requests sent over the wire to
875 * Returns a pointer to the newly allocated set structure or NULL on error.
877 struct ptlrpc_request_set
*ptlrpc_prep_fcset(int max
, set_producer_func func
,
881 struct ptlrpc_request_set
*set
;
883 set
= ptlrpc_prep_set();
887 set
->set_max_inflight
= max
;
888 set
->set_producer
= func
;
889 set
->set_producer_arg
= arg
;
893 EXPORT_SYMBOL(ptlrpc_prep_fcset
);
896 * Wind down and free request set structure previously allocated with
898 * Ensures that all requests on the set have completed and removes
899 * all requests from the request list in a set.
900 * If any unsent request happen to be on the list, pretends that they got
901 * an error in flight and calls their completion handler.
903 void ptlrpc_set_destroy(struct ptlrpc_request_set
*set
)
905 struct list_head
*tmp
;
906 struct list_head
*next
;
910 /* Requests on the set should either all be completed, or all be new */
911 expected_phase
= (atomic_read(&set
->set_remaining
) == 0) ?
912 RQ_PHASE_COMPLETE
: RQ_PHASE_NEW
;
913 list_for_each(tmp
, &set
->set_requests
) {
914 struct ptlrpc_request
*req
=
915 list_entry(tmp
, struct ptlrpc_request
,
918 LASSERT(req
->rq_phase
== expected_phase
);
922 LASSERTF(atomic_read(&set
->set_remaining
) == 0 ||
923 atomic_read(&set
->set_remaining
) == n
, "%d / %d\n",
924 atomic_read(&set
->set_remaining
), n
);
926 list_for_each_safe(tmp
, next
, &set
->set_requests
) {
927 struct ptlrpc_request
*req
=
928 list_entry(tmp
, struct ptlrpc_request
,
930 list_del_init(&req
->rq_set_chain
);
932 LASSERT(req
->rq_phase
== expected_phase
);
934 if (req
->rq_phase
== RQ_PHASE_NEW
) {
935 ptlrpc_req_interpret(NULL
, req
, -EBADR
);
936 atomic_dec(&set
->set_remaining
);
939 spin_lock(&req
->rq_lock
);
941 req
->rq_invalid_rqset
= 0;
942 spin_unlock(&req
->rq_lock
);
944 ptlrpc_req_finished(req
);
947 LASSERT(atomic_read(&set
->set_remaining
) == 0);
949 ptlrpc_reqset_put(set
);
951 EXPORT_SYMBOL(ptlrpc_set_destroy
);
954 * Add a callback function \a fn to the set.
955 * This function would be called when all requests on this set are completed.
956 * The function will be passed \a data argument.
958 int ptlrpc_set_add_cb(struct ptlrpc_request_set
*set
,
959 set_interpreter_func fn
, void *data
)
961 struct ptlrpc_set_cbdata
*cbdata
;
963 OBD_ALLOC_PTR(cbdata
);
967 cbdata
->psc_interpret
= fn
;
968 cbdata
->psc_data
= data
;
969 list_add_tail(&cbdata
->psc_item
, &set
->set_cblist
);
973 EXPORT_SYMBOL(ptlrpc_set_add_cb
);
976 * Add a new request to the general purpose request set.
977 * Assumes request reference from the caller.
979 void ptlrpc_set_add_req(struct ptlrpc_request_set
*set
,
980 struct ptlrpc_request
*req
)
982 LASSERT(list_empty(&req
->rq_set_chain
));
984 /* The set takes over the caller's request reference */
985 list_add_tail(&req
->rq_set_chain
, &set
->set_requests
);
987 atomic_inc(&set
->set_remaining
);
988 req
->rq_queued_time
= cfs_time_current();
990 if (req
->rq_reqmsg
!= NULL
)
991 lustre_msg_set_jobid(req
->rq_reqmsg
, NULL
);
993 if (set
->set_producer
!= NULL
)
994 /* If the request set has a producer callback, the RPC must be
995 * sent straight away */
996 ptlrpc_send_new_req(req
);
998 EXPORT_SYMBOL(ptlrpc_set_add_req
);
1001 * Add a request to a request with dedicated server thread
1002 * and wake the thread to make any necessary processing.
1003 * Currently only used for ptlrpcd.
1005 void ptlrpc_set_add_new_req(struct ptlrpcd_ctl
*pc
,
1006 struct ptlrpc_request
*req
)
1008 struct ptlrpc_request_set
*set
= pc
->pc_set
;
1011 LASSERT(req
->rq_set
== NULL
);
1012 LASSERT(test_bit(LIOD_STOP
, &pc
->pc_flags
) == 0);
1014 spin_lock(&set
->set_new_req_lock
);
1016 * The set takes over the caller's request reference.
1019 req
->rq_queued_time
= cfs_time_current();
1020 list_add_tail(&req
->rq_set_chain
, &set
->set_new_requests
);
1021 count
= atomic_inc_return(&set
->set_new_count
);
1022 spin_unlock(&set
->set_new_req_lock
);
1024 /* Only need to call wakeup once for the first entry. */
1026 wake_up(&set
->set_waitq
);
1028 /* XXX: It maybe unnecessary to wakeup all the partners. But to
1029 * guarantee the async RPC can be processed ASAP, we have
1030 * no other better choice. It maybe fixed in future. */
1031 for (i
= 0; i
< pc
->pc_npartners
; i
++)
1032 wake_up(&pc
->pc_partners
[i
]->pc_set
->set_waitq
);
1035 EXPORT_SYMBOL(ptlrpc_set_add_new_req
);
1038 * Based on the current state of the import, determine if the request
1039 * can be sent, is an error, or should be delayed.
1041 * Returns true if this request should be delayed. If false, and
1042 * *status is set, then the request can not be sent and *status is the
1043 * error code. If false and status is 0, then request can be sent.
1045 * The imp->imp_lock must be held.
1047 static int ptlrpc_import_delay_req(struct obd_import
*imp
,
1048 struct ptlrpc_request
*req
, int *status
)
1052 LASSERT(status
!= NULL
);
1055 if (req
->rq_ctx_init
|| req
->rq_ctx_fini
) {
1056 /* always allow ctx init/fini rpc go through */
1057 } else if (imp
->imp_state
== LUSTRE_IMP_NEW
) {
1058 DEBUG_REQ(D_ERROR
, req
, "Uninitialized import.");
1060 } else if (imp
->imp_state
== LUSTRE_IMP_CLOSED
) {
1061 /* pings may safely race with umount */
1062 DEBUG_REQ(lustre_msg_get_opc(req
->rq_reqmsg
) == OBD_PING
?
1063 D_HA
: D_ERROR
, req
, "IMP_CLOSED ");
1065 } else if (ptlrpc_send_limit_expired(req
)) {
1066 /* probably doesn't need to be a D_ERROR after initial testing */
1067 DEBUG_REQ(D_ERROR
, req
, "send limit expired ");
1069 } else if (req
->rq_send_state
== LUSTRE_IMP_CONNECTING
&&
1070 imp
->imp_state
== LUSTRE_IMP_CONNECTING
) {
1071 /* allow CONNECT even if import is invalid */
1072 if (atomic_read(&imp
->imp_inval_count
) != 0) {
1073 DEBUG_REQ(D_ERROR
, req
, "invalidate in flight");
1076 } else if (imp
->imp_invalid
|| imp
->imp_obd
->obd_no_recov
) {
1077 if (!imp
->imp_deactive
)
1078 DEBUG_REQ(D_NET
, req
, "IMP_INVALID");
1079 *status
= -ESHUTDOWN
; /* bz 12940 */
1080 } else if (req
->rq_import_generation
!= imp
->imp_generation
) {
1081 DEBUG_REQ(D_ERROR
, req
, "req wrong generation:");
1083 } else if (req
->rq_send_state
!= imp
->imp_state
) {
1084 /* invalidate in progress - any requests should be drop */
1085 if (atomic_read(&imp
->imp_inval_count
) != 0) {
1086 DEBUG_REQ(D_ERROR
, req
, "invalidate in flight");
1088 } else if (imp
->imp_dlm_fake
|| req
->rq_no_delay
) {
1089 *status
= -EWOULDBLOCK
;
1090 } else if (req
->rq_allow_replay
&&
1091 (imp
->imp_state
== LUSTRE_IMP_REPLAY
||
1092 imp
->imp_state
== LUSTRE_IMP_REPLAY_LOCKS
||
1093 imp
->imp_state
== LUSTRE_IMP_REPLAY_WAIT
||
1094 imp
->imp_state
== LUSTRE_IMP_RECOVER
)) {
1095 DEBUG_REQ(D_HA
, req
, "allow during recovery.\n");
1105 * Decide if the error message regarding provided request \a req
1106 * should be printed to the console or not.
1107 * Makes it's decision on request status and other properties.
1108 * Returns 1 to print error on the system console or 0 if not.
1110 static int ptlrpc_console_allow(struct ptlrpc_request
*req
)
1115 LASSERT(req
->rq_reqmsg
!= NULL
);
1116 opc
= lustre_msg_get_opc(req
->rq_reqmsg
);
1118 /* Suppress particular reconnect errors which are to be expected. No
1119 * errors are suppressed for the initial connection on an import */
1120 if ((lustre_handle_is_used(&req
->rq_import
->imp_remote_handle
)) &&
1121 (opc
== OST_CONNECT
|| opc
== MDS_CONNECT
|| opc
== MGS_CONNECT
)) {
1123 /* Suppress timed out reconnect requests */
1124 if (req
->rq_timedout
)
1127 /* Suppress unavailable/again reconnect requests */
1128 err
= lustre_msg_get_status(req
->rq_repmsg
);
1129 if (err
== -ENODEV
|| err
== -EAGAIN
)
1137 * Check request processing status.
1138 * Returns the status.
1140 static int ptlrpc_check_status(struct ptlrpc_request
*req
)
1144 err
= lustre_msg_get_status(req
->rq_repmsg
);
1145 if (lustre_msg_get_type(req
->rq_repmsg
) == PTL_RPC_MSG_ERR
) {
1146 struct obd_import
*imp
= req
->rq_import
;
1147 __u32 opc
= lustre_msg_get_opc(req
->rq_reqmsg
);
1148 if (ptlrpc_console_allow(req
))
1149 LCONSOLE_ERROR_MSG(0x011, "%s: Communicating with %s,"
1150 " operation %s failed with %d.\n",
1151 imp
->imp_obd
->obd_name
,
1153 imp
->imp_connection
->c_peer
.nid
),
1154 ll_opcode2str(opc
), err
);
1155 return err
< 0 ? err
: -EINVAL
;
1159 DEBUG_REQ(D_INFO
, req
, "status is %d", err
);
1160 } else if (err
> 0) {
1161 /* XXX: translate this error from net to host */
1162 DEBUG_REQ(D_INFO
, req
, "status is %d", err
);
1169 * save pre-versions of objects into request for replay.
1170 * Versions are obtained from server reply.
1173 static void ptlrpc_save_versions(struct ptlrpc_request
*req
)
1175 struct lustre_msg
*repmsg
= req
->rq_repmsg
;
1176 struct lustre_msg
*reqmsg
= req
->rq_reqmsg
;
1177 __u64
*versions
= lustre_msg_get_versions(repmsg
);
1179 if (lustre_msg_get_flags(req
->rq_reqmsg
) & MSG_REPLAY
)
1183 lustre_msg_set_versions(reqmsg
, versions
);
1184 CDEBUG(D_INFO
, "Client save versions ["LPX64
"/"LPX64
"]\n",
1185 versions
[0], versions
[1]);
1189 * Callback function called when client receives RPC reply for \a req.
1190 * Returns 0 on success or error code.
1191 * The return value would be assigned to req->rq_status by the caller
1192 * as request processing status.
1193 * This function also decides if the request needs to be saved for later replay.
1195 static int after_reply(struct ptlrpc_request
*req
)
1197 struct obd_import
*imp
= req
->rq_import
;
1198 struct obd_device
*obd
= req
->rq_import
->imp_obd
;
1200 struct timeval work_start
;
1203 LASSERT(obd
!= NULL
);
1204 /* repbuf must be unlinked */
1205 LASSERT(!req
->rq_receiving_reply
&& !req
->rq_reply_unlink
);
1207 if (req
->rq_reply_truncate
) {
1208 if (ptlrpc_no_resend(req
)) {
1209 DEBUG_REQ(D_ERROR
, req
, "reply buffer overflow,"
1210 " expected: %d, actual size: %d",
1211 req
->rq_nob_received
, req
->rq_repbuf_len
);
1215 sptlrpc_cli_free_repbuf(req
);
1216 /* Pass the required reply buffer size (include
1217 * space for early reply).
1218 * NB: no need to roundup because alloc_repbuf
1219 * will roundup it */
1220 req
->rq_replen
= req
->rq_nob_received
;
1221 req
->rq_nob_received
= 0;
1222 spin_lock(&req
->rq_lock
);
1224 spin_unlock(&req
->rq_lock
);
1229 * NB Until this point, the whole of the incoming message,
1230 * including buflens, status etc is in the sender's byte order.
1232 rc
= sptlrpc_cli_unwrap_reply(req
);
1234 DEBUG_REQ(D_ERROR
, req
, "unwrap reply failed (%d):", rc
);
1239 * Security layer unwrap might ask resend this request.
1244 rc
= unpack_reply(req
);
1248 /* retry indefinitely on EINPROGRESS */
1249 if (lustre_msg_get_status(req
->rq_repmsg
) == -EINPROGRESS
&&
1250 ptlrpc_no_resend(req
) == 0 && !req
->rq_no_retry_einprogress
) {
1251 time_t now
= cfs_time_current_sec();
1253 DEBUG_REQ(D_RPCTRACE
, req
, "Resending request on EINPROGRESS");
1255 req
->rq_nr_resend
++;
1257 /* allocate new xid to avoid reply reconstruction */
1258 if (!req
->rq_bulk
) {
1259 /* new xid is already allocated for bulk in
1260 * ptlrpc_check_set() */
1261 req
->rq_xid
= ptlrpc_next_xid();
1262 DEBUG_REQ(D_RPCTRACE
, req
, "Allocating new xid for "
1263 "resend on EINPROGRESS");
1266 /* Readjust the timeout for current conditions */
1267 ptlrpc_at_set_req_timeout(req
);
1268 /* delay resend to give a chance to the server to get ready.
1269 * The delay is increased by 1s on every resend and is capped to
1270 * the current request timeout (i.e. obd_timeout if AT is off,
1271 * or AT service time x 125% + 5s, see at_est2timeout) */
1272 if (req
->rq_nr_resend
> req
->rq_timeout
)
1273 req
->rq_sent
= now
+ req
->rq_timeout
;
1275 req
->rq_sent
= now
+ req
->rq_nr_resend
;
1280 do_gettimeofday(&work_start
);
1281 timediff
= cfs_timeval_sub(&work_start
, &req
->rq_arrival_time
, NULL
);
1282 if (obd
->obd_svc_stats
!= NULL
) {
1283 lprocfs_counter_add(obd
->obd_svc_stats
, PTLRPC_REQWAIT_CNTR
,
1285 ptlrpc_lprocfs_rpc_sent(req
, timediff
);
1288 if (lustre_msg_get_type(req
->rq_repmsg
) != PTL_RPC_MSG_REPLY
&&
1289 lustre_msg_get_type(req
->rq_repmsg
) != PTL_RPC_MSG_ERR
) {
1290 DEBUG_REQ(D_ERROR
, req
, "invalid packet received (type=%u)",
1291 lustre_msg_get_type(req
->rq_repmsg
));
1295 if (lustre_msg_get_opc(req
->rq_reqmsg
) != OBD_PING
)
1296 CFS_FAIL_TIMEOUT(OBD_FAIL_PTLRPC_PAUSE_REP
, cfs_fail_val
);
1297 ptlrpc_at_adj_service(req
, lustre_msg_get_timeout(req
->rq_repmsg
));
1298 ptlrpc_at_adj_net_latency(req
,
1299 lustre_msg_get_service_time(req
->rq_repmsg
));
1301 rc
= ptlrpc_check_status(req
);
1302 imp
->imp_connect_error
= rc
;
1306 * Either we've been evicted, or the server has failed for
1307 * some reason. Try to reconnect, and if that fails, punt to
1310 if (ll_rpc_recoverable_error(rc
)) {
1311 if (req
->rq_send_state
!= LUSTRE_IMP_FULL
||
1312 imp
->imp_obd
->obd_no_recov
|| imp
->imp_dlm_fake
) {
1315 ptlrpc_request_handle_notconn(req
);
1320 * Let's look if server sent slv. Do it only for RPC with
1323 ldlm_cli_update_pool(req
);
1327 * Store transno in reqmsg for replay.
1329 if (!(lustre_msg_get_flags(req
->rq_reqmsg
) & MSG_REPLAY
)) {
1330 req
->rq_transno
= lustre_msg_get_transno(req
->rq_repmsg
);
1331 lustre_msg_set_transno(req
->rq_reqmsg
, req
->rq_transno
);
1334 if (imp
->imp_replayable
) {
1335 spin_lock(&imp
->imp_lock
);
1337 * No point in adding already-committed requests to the replay
1338 * list, we will just remove them immediately. b=9829
1340 if (req
->rq_transno
!= 0 &&
1342 lustre_msg_get_last_committed(req
->rq_repmsg
) ||
1344 /** version recovery */
1345 ptlrpc_save_versions(req
);
1346 ptlrpc_retain_replayable_request(req
, imp
);
1347 } else if (req
->rq_commit_cb
!= NULL
&&
1348 list_empty(&req
->rq_replay_list
)) {
1349 /* NB: don't call rq_commit_cb if it's already on
1350 * rq_replay_list, ptlrpc_free_committed() will call
1351 * it later, see LU-3618 for details */
1352 spin_unlock(&imp
->imp_lock
);
1353 req
->rq_commit_cb(req
);
1354 spin_lock(&imp
->imp_lock
);
1358 * Replay-enabled imports return commit-status information.
1360 if (lustre_msg_get_last_committed(req
->rq_repmsg
)) {
1361 imp
->imp_peer_committed_transno
=
1362 lustre_msg_get_last_committed(req
->rq_repmsg
);
1365 ptlrpc_free_committed(imp
);
1367 if (!list_empty(&imp
->imp_replay_list
)) {
1368 struct ptlrpc_request
*last
;
1370 last
= list_entry(imp
->imp_replay_list
.prev
,
1371 struct ptlrpc_request
,
1374 * Requests with rq_replay stay on the list even if no
1375 * commit is expected.
1377 if (last
->rq_transno
> imp
->imp_peer_committed_transno
)
1378 ptlrpc_pinger_commit_expected(imp
);
1381 spin_unlock(&imp
->imp_lock
);
1388 * Helper function to send request \a req over the network for the first time
1389 * Also adjusts request phase.
1390 * Returns 0 on success or error code.
1392 static int ptlrpc_send_new_req(struct ptlrpc_request
*req
)
1394 struct obd_import
*imp
= req
->rq_import
;
1397 LASSERT(req
->rq_phase
== RQ_PHASE_NEW
);
1398 if (req
->rq_sent
&& (req
->rq_sent
> cfs_time_current_sec()) &&
1399 (!req
->rq_generation_set
||
1400 req
->rq_import_generation
== imp
->imp_generation
))
1403 ptlrpc_rqphase_move(req
, RQ_PHASE_RPC
);
1405 spin_lock(&imp
->imp_lock
);
1407 if (!req
->rq_generation_set
)
1408 req
->rq_import_generation
= imp
->imp_generation
;
1410 if (ptlrpc_import_delay_req(imp
, req
, &rc
)) {
1411 spin_lock(&req
->rq_lock
);
1412 req
->rq_waiting
= 1;
1413 spin_unlock(&req
->rq_lock
);
1415 DEBUG_REQ(D_HA
, req
, "req from PID %d waiting for recovery: "
1416 "(%s != %s)", lustre_msg_get_status(req
->rq_reqmsg
),
1417 ptlrpc_import_state_name(req
->rq_send_state
),
1418 ptlrpc_import_state_name(imp
->imp_state
));
1419 LASSERT(list_empty(&req
->rq_list
));
1420 list_add_tail(&req
->rq_list
, &imp
->imp_delayed_list
);
1421 atomic_inc(&req
->rq_import
->imp_inflight
);
1422 spin_unlock(&imp
->imp_lock
);
1427 spin_unlock(&imp
->imp_lock
);
1428 req
->rq_status
= rc
;
1429 ptlrpc_rqphase_move(req
, RQ_PHASE_INTERPRET
);
1433 LASSERT(list_empty(&req
->rq_list
));
1434 list_add_tail(&req
->rq_list
, &imp
->imp_sending_list
);
1435 atomic_inc(&req
->rq_import
->imp_inflight
);
1436 spin_unlock(&imp
->imp_lock
);
1438 lustre_msg_set_status(req
->rq_reqmsg
, current_pid());
1440 rc
= sptlrpc_req_refresh_ctx(req
, -1);
1443 req
->rq_status
= rc
;
1446 spin_lock(&req
->rq_lock
);
1447 req
->rq_wait_ctx
= 1;
1448 spin_unlock(&req
->rq_lock
);
1453 CDEBUG(D_RPCTRACE
, "Sending RPC pname:cluuid:pid:xid:nid:opc"
1454 " %s:%s:%d:"LPU64
":%s:%d\n", current_comm(),
1455 imp
->imp_obd
->obd_uuid
.uuid
,
1456 lustre_msg_get_status(req
->rq_reqmsg
), req
->rq_xid
,
1457 libcfs_nid2str(imp
->imp_connection
->c_peer
.nid
),
1458 lustre_msg_get_opc(req
->rq_reqmsg
));
1460 rc
= ptl_send_rpc(req
, 0);
1462 DEBUG_REQ(D_HA
, req
, "send failed (%d); expect timeout", rc
);
1463 spin_lock(&req
->rq_lock
);
1464 req
->rq_net_err
= 1;
1465 spin_unlock(&req
->rq_lock
);
1471 static inline int ptlrpc_set_producer(struct ptlrpc_request_set
*set
)
1475 LASSERT(set
->set_producer
!= NULL
);
1477 remaining
= atomic_read(&set
->set_remaining
);
1479 /* populate the ->set_requests list with requests until we
1480 * reach the maximum number of RPCs in flight for this set */
1481 while (atomic_read(&set
->set_remaining
) < set
->set_max_inflight
) {
1482 rc
= set
->set_producer(set
, set
->set_producer_arg
);
1483 if (rc
== -ENOENT
) {
1484 /* no more RPC to produce */
1485 set
->set_producer
= NULL
;
1486 set
->set_producer_arg
= NULL
;
1491 return (atomic_read(&set
->set_remaining
) - remaining
);
1495 * this sends any unsent RPCs in \a set and returns 1 if all are sent
1496 * and no more replies are expected.
1497 * (it is possible to get less replies than requests sent e.g. due to timed out
1498 * requests or requests that we had trouble to send out)
1500 * NOTE: This function contains a potential schedule point (cond_resched()).
1502 int ptlrpc_check_set(const struct lu_env
*env
, struct ptlrpc_request_set
*set
)
1504 struct list_head
*tmp
, *next
;
1505 int force_timer_recalc
= 0;
1507 if (atomic_read(&set
->set_remaining
) == 0)
1510 list_for_each_safe(tmp
, next
, &set
->set_requests
) {
1511 struct ptlrpc_request
*req
=
1512 list_entry(tmp
, struct ptlrpc_request
,
1514 struct obd_import
*imp
= req
->rq_import
;
1515 int unregistered
= 0;
1518 /* This schedule point is mainly for the ptlrpcd caller of this
1519 * function. Most ptlrpc sets are not long-lived and unbounded
1520 * in length, but at the least the set used by the ptlrpcd is.
1521 * Since the processing time is unbounded, we need to insert an
1522 * explicit schedule point to make the thread well-behaved.
1526 if (req
->rq_phase
== RQ_PHASE_NEW
&&
1527 ptlrpc_send_new_req(req
)) {
1528 force_timer_recalc
= 1;
1531 /* delayed send - skip */
1532 if (req
->rq_phase
== RQ_PHASE_NEW
&& req
->rq_sent
)
1535 /* delayed resend - skip */
1536 if (req
->rq_phase
== RQ_PHASE_RPC
&& req
->rq_resend
&&
1537 req
->rq_sent
> cfs_time_current_sec())
1540 if (!(req
->rq_phase
== RQ_PHASE_RPC
||
1541 req
->rq_phase
== RQ_PHASE_BULK
||
1542 req
->rq_phase
== RQ_PHASE_INTERPRET
||
1543 req
->rq_phase
== RQ_PHASE_UNREGISTERING
||
1544 req
->rq_phase
== RQ_PHASE_COMPLETE
)) {
1545 DEBUG_REQ(D_ERROR
, req
, "bad phase %x", req
->rq_phase
);
1549 if (req
->rq_phase
== RQ_PHASE_UNREGISTERING
) {
1550 LASSERT(req
->rq_next_phase
!= req
->rq_phase
);
1551 LASSERT(req
->rq_next_phase
!= RQ_PHASE_UNDEFINED
);
1554 * Skip processing until reply is unlinked. We
1555 * can't return to pool before that and we can't
1556 * call interpret before that. We need to make
1557 * sure that all rdma transfers finished and will
1558 * not corrupt any data.
1560 if (ptlrpc_client_recv_or_unlink(req
) ||
1561 ptlrpc_client_bulk_active(req
))
1565 * Turn fail_loc off to prevent it from looping
1568 if (OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_LONG_REPL_UNLINK
)) {
1569 OBD_FAIL_CHECK_ORSET(OBD_FAIL_PTLRPC_LONG_REPL_UNLINK
,
1572 if (OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_LONG_BULK_UNLINK
)) {
1573 OBD_FAIL_CHECK_ORSET(OBD_FAIL_PTLRPC_LONG_BULK_UNLINK
,
1578 * Move to next phase if reply was successfully
1581 ptlrpc_rqphase_move(req
, req
->rq_next_phase
);
1584 if (req
->rq_phase
== RQ_PHASE_COMPLETE
)
1587 if (req
->rq_phase
== RQ_PHASE_INTERPRET
)
1588 GOTO(interpret
, req
->rq_status
);
1591 * Note that this also will start async reply unlink.
1593 if (req
->rq_net_err
&& !req
->rq_timedout
) {
1594 ptlrpc_expire_one_request(req
, 1);
1597 * Check if we still need to wait for unlink.
1599 if (ptlrpc_client_recv_or_unlink(req
) ||
1600 ptlrpc_client_bulk_active(req
))
1602 /* If there is no need to resend, fail it now. */
1603 if (req
->rq_no_resend
) {
1604 if (req
->rq_status
== 0)
1605 req
->rq_status
= -EIO
;
1606 ptlrpc_rqphase_move(req
, RQ_PHASE_INTERPRET
);
1607 GOTO(interpret
, req
->rq_status
);
1614 spin_lock(&req
->rq_lock
);
1615 req
->rq_replied
= 0;
1616 spin_unlock(&req
->rq_lock
);
1617 if (req
->rq_status
== 0)
1618 req
->rq_status
= -EIO
;
1619 ptlrpc_rqphase_move(req
, RQ_PHASE_INTERPRET
);
1620 GOTO(interpret
, req
->rq_status
);
1623 /* ptlrpc_set_wait->l_wait_event sets lwi_allow_intr
1624 * so it sets rq_intr regardless of individual rpc
1625 * timeouts. The synchronous IO waiting path sets
1626 * rq_intr irrespective of whether ptlrpcd
1627 * has seen a timeout. Our policy is to only interpret
1628 * interrupted rpcs after they have timed out, so we
1629 * need to enforce that here.
1632 if (req
->rq_intr
&& (req
->rq_timedout
|| req
->rq_waiting
||
1633 req
->rq_wait_ctx
)) {
1634 req
->rq_status
= -EINTR
;
1635 ptlrpc_rqphase_move(req
, RQ_PHASE_INTERPRET
);
1636 GOTO(interpret
, req
->rq_status
);
1639 if (req
->rq_phase
== RQ_PHASE_RPC
) {
1640 if (req
->rq_timedout
|| req
->rq_resend
||
1641 req
->rq_waiting
|| req
->rq_wait_ctx
) {
1644 if (!ptlrpc_unregister_reply(req
, 1))
1647 spin_lock(&imp
->imp_lock
);
1648 if (ptlrpc_import_delay_req(imp
, req
,
1650 /* put on delay list - only if we wait
1651 * recovery finished - before send */
1652 list_del_init(&req
->rq_list
);
1653 list_add_tail(&req
->rq_list
,
1656 spin_unlock(&imp
->imp_lock
);
1661 req
->rq_status
= status
;
1662 ptlrpc_rqphase_move(req
,
1663 RQ_PHASE_INTERPRET
);
1664 spin_unlock(&imp
->imp_lock
);
1665 GOTO(interpret
, req
->rq_status
);
1667 if (ptlrpc_no_resend(req
) &&
1668 !req
->rq_wait_ctx
) {
1669 req
->rq_status
= -ENOTCONN
;
1670 ptlrpc_rqphase_move(req
,
1671 RQ_PHASE_INTERPRET
);
1672 spin_unlock(&imp
->imp_lock
);
1673 GOTO(interpret
, req
->rq_status
);
1676 list_del_init(&req
->rq_list
);
1677 list_add_tail(&req
->rq_list
,
1678 &imp
->imp_sending_list
);
1680 spin_unlock(&imp
->imp_lock
);
1682 spin_lock(&req
->rq_lock
);
1683 req
->rq_waiting
= 0;
1684 spin_unlock(&req
->rq_lock
);
1686 if (req
->rq_timedout
|| req
->rq_resend
) {
1687 /* This is re-sending anyways,
1688 * let's mark req as resend. */
1689 spin_lock(&req
->rq_lock
);
1691 spin_unlock(&req
->rq_lock
);
1695 if (!ptlrpc_unregister_bulk(req
, 1))
1698 /* ensure previous bulk fails */
1699 old_xid
= req
->rq_xid
;
1700 req
->rq_xid
= ptlrpc_next_xid();
1701 CDEBUG(D_HA
, "resend bulk "
1704 old_xid
, req
->rq_xid
);
1708 * rq_wait_ctx is only touched by ptlrpcd,
1709 * so no lock is needed here.
1711 status
= sptlrpc_req_refresh_ctx(req
, -1);
1714 req
->rq_status
= status
;
1715 spin_lock(&req
->rq_lock
);
1716 req
->rq_wait_ctx
= 0;
1717 spin_unlock(&req
->rq_lock
);
1718 force_timer_recalc
= 1;
1720 spin_lock(&req
->rq_lock
);
1721 req
->rq_wait_ctx
= 1;
1722 spin_unlock(&req
->rq_lock
);
1727 spin_lock(&req
->rq_lock
);
1728 req
->rq_wait_ctx
= 0;
1729 spin_unlock(&req
->rq_lock
);
1732 rc
= ptl_send_rpc(req
, 0);
1734 DEBUG_REQ(D_HA
, req
,
1735 "send failed: rc = %d", rc
);
1736 force_timer_recalc
= 1;
1737 spin_lock(&req
->rq_lock
);
1738 req
->rq_net_err
= 1;
1739 spin_unlock(&req
->rq_lock
);
1742 /* need to reset the timeout */
1743 force_timer_recalc
= 1;
1746 spin_lock(&req
->rq_lock
);
1748 if (ptlrpc_client_early(req
)) {
1749 ptlrpc_at_recv_early_reply(req
);
1750 spin_unlock(&req
->rq_lock
);
1754 /* Still waiting for a reply? */
1755 if (ptlrpc_client_recv(req
)) {
1756 spin_unlock(&req
->rq_lock
);
1760 /* Did we actually receive a reply? */
1761 if (!ptlrpc_client_replied(req
)) {
1762 spin_unlock(&req
->rq_lock
);
1766 spin_unlock(&req
->rq_lock
);
1768 /* unlink from net because we are going to
1769 * swab in-place of reply buffer */
1770 unregistered
= ptlrpc_unregister_reply(req
, 1);
1774 req
->rq_status
= after_reply(req
);
1778 /* If there is no bulk associated with this request,
1779 * then we're done and should let the interpreter
1780 * process the reply. Similarly if the RPC returned
1781 * an error, and therefore the bulk will never arrive.
1783 if (req
->rq_bulk
== NULL
|| req
->rq_status
< 0) {
1784 ptlrpc_rqphase_move(req
, RQ_PHASE_INTERPRET
);
1785 GOTO(interpret
, req
->rq_status
);
1788 ptlrpc_rqphase_move(req
, RQ_PHASE_BULK
);
1791 LASSERT(req
->rq_phase
== RQ_PHASE_BULK
);
1792 if (ptlrpc_client_bulk_active(req
))
1795 if (req
->rq_bulk
->bd_failure
) {
1796 /* The RPC reply arrived OK, but the bulk screwed
1797 * up! Dead weird since the server told us the RPC
1798 * was good after getting the REPLY for her GET or
1799 * the ACK for her PUT. */
1800 DEBUG_REQ(D_ERROR
, req
, "bulk transfer failed");
1801 req
->rq_status
= -EIO
;
1804 ptlrpc_rqphase_move(req
, RQ_PHASE_INTERPRET
);
1807 LASSERT(req
->rq_phase
== RQ_PHASE_INTERPRET
);
1809 /* This moves to "unregistering" phase we need to wait for
1811 if (!unregistered
&& !ptlrpc_unregister_reply(req
, 1)) {
1812 /* start async bulk unlink too */
1813 ptlrpc_unregister_bulk(req
, 1);
1817 if (!ptlrpc_unregister_bulk(req
, 1))
1820 /* When calling interpret receiving already should be
1822 LASSERT(!req
->rq_receiving_reply
);
1824 ptlrpc_req_interpret(env
, req
, req
->rq_status
);
1826 if (ptlrpcd_check_work(req
)) {
1827 atomic_dec(&set
->set_remaining
);
1830 ptlrpc_rqphase_move(req
, RQ_PHASE_COMPLETE
);
1832 CDEBUG(req
->rq_reqmsg
!= NULL
? D_RPCTRACE
: 0,
1833 "Completed RPC pname:cluuid:pid:xid:nid:"
1834 "opc %s:%s:%d:"LPU64
":%s:%d\n",
1835 current_comm(), imp
->imp_obd
->obd_uuid
.uuid
,
1836 lustre_msg_get_status(req
->rq_reqmsg
), req
->rq_xid
,
1837 libcfs_nid2str(imp
->imp_connection
->c_peer
.nid
),
1838 lustre_msg_get_opc(req
->rq_reqmsg
));
1840 spin_lock(&imp
->imp_lock
);
1841 /* Request already may be not on sending or delaying list. This
1842 * may happen in the case of marking it erroneous for the case
1843 * ptlrpc_import_delay_req(req, status) find it impossible to
1844 * allow sending this rpc and returns *status != 0. */
1845 if (!list_empty(&req
->rq_list
)) {
1846 list_del_init(&req
->rq_list
);
1847 atomic_dec(&imp
->imp_inflight
);
1849 spin_unlock(&imp
->imp_lock
);
1851 atomic_dec(&set
->set_remaining
);
1852 wake_up_all(&imp
->imp_recovery_waitq
);
1854 if (set
->set_producer
) {
1855 /* produce a new request if possible */
1856 if (ptlrpc_set_producer(set
) > 0)
1857 force_timer_recalc
= 1;
1859 /* free the request that has just been completed
1860 * in order not to pollute set->set_requests */
1861 list_del_init(&req
->rq_set_chain
);
1862 spin_lock(&req
->rq_lock
);
1864 req
->rq_invalid_rqset
= 0;
1865 spin_unlock(&req
->rq_lock
);
1867 /* record rq_status to compute the final status later */
1868 if (req
->rq_status
!= 0)
1869 set
->set_rc
= req
->rq_status
;
1870 ptlrpc_req_finished(req
);
1874 /* If we hit an error, we want to recover promptly. */
1875 return atomic_read(&set
->set_remaining
) == 0 || force_timer_recalc
;
1877 EXPORT_SYMBOL(ptlrpc_check_set
);
1880 * Time out request \a req. is \a async_unlink is set, that means do not wait
1881 * until LNet actually confirms network buffer unlinking.
1882 * Return 1 if we should give up further retrying attempts or 0 otherwise.
1884 int ptlrpc_expire_one_request(struct ptlrpc_request
*req
, int async_unlink
)
1886 struct obd_import
*imp
= req
->rq_import
;
1889 spin_lock(&req
->rq_lock
);
1890 req
->rq_timedout
= 1;
1891 spin_unlock(&req
->rq_lock
);
1893 DEBUG_REQ(D_WARNING
, req
, "Request sent has %s: [sent "CFS_DURATION_T
1894 "/real "CFS_DURATION_T
"]",
1895 req
->rq_net_err
? "failed due to network error" :
1896 ((req
->rq_real_sent
== 0 ||
1897 cfs_time_before(req
->rq_real_sent
, req
->rq_sent
) ||
1898 cfs_time_aftereq(req
->rq_real_sent
, req
->rq_deadline
)) ?
1899 "timed out for sent delay" : "timed out for slow reply"),
1900 req
->rq_sent
, req
->rq_real_sent
);
1902 if (imp
!= NULL
&& obd_debug_peer_on_timeout
)
1903 LNetCtl(IOC_LIBCFS_DEBUG_PEER
, &imp
->imp_connection
->c_peer
);
1905 ptlrpc_unregister_reply(req
, async_unlink
);
1906 ptlrpc_unregister_bulk(req
, async_unlink
);
1908 if (obd_dump_on_timeout
)
1909 libcfs_debug_dumplog();
1912 DEBUG_REQ(D_HA
, req
, "NULL import: already cleaned up?");
1916 atomic_inc(&imp
->imp_timeouts
);
1918 /* The DLM server doesn't want recovery run on its imports. */
1919 if (imp
->imp_dlm_fake
)
1922 /* If this request is for recovery or other primordial tasks,
1923 * then error it out here. */
1924 if (req
->rq_ctx_init
|| req
->rq_ctx_fini
||
1925 req
->rq_send_state
!= LUSTRE_IMP_FULL
||
1926 imp
->imp_obd
->obd_no_recov
) {
1927 DEBUG_REQ(D_RPCTRACE
, req
, "err -110, sent_state=%s (now=%s)",
1928 ptlrpc_import_state_name(req
->rq_send_state
),
1929 ptlrpc_import_state_name(imp
->imp_state
));
1930 spin_lock(&req
->rq_lock
);
1931 req
->rq_status
= -ETIMEDOUT
;
1933 spin_unlock(&req
->rq_lock
);
1937 /* if a request can't be resent we can't wait for an answer after
1939 if (ptlrpc_no_resend(req
)) {
1940 DEBUG_REQ(D_RPCTRACE
, req
, "TIMEOUT-NORESEND:");
1944 ptlrpc_fail_import(imp
, lustre_msg_get_conn_cnt(req
->rq_reqmsg
));
1950 * Time out all uncompleted requests in request set pointed by \a data
1951 * Callback used when waiting on sets with l_wait_event.
1954 int ptlrpc_expired_set(void *data
)
1956 struct ptlrpc_request_set
*set
= data
;
1957 struct list_head
*tmp
;
1958 time_t now
= cfs_time_current_sec();
1960 LASSERT(set
!= NULL
);
1963 * A timeout expired. See which reqs it applies to...
1965 list_for_each(tmp
, &set
->set_requests
) {
1966 struct ptlrpc_request
*req
=
1967 list_entry(tmp
, struct ptlrpc_request
,
1970 /* don't expire request waiting for context */
1971 if (req
->rq_wait_ctx
)
1974 /* Request in-flight? */
1975 if (!((req
->rq_phase
== RQ_PHASE_RPC
&&
1976 !req
->rq_waiting
&& !req
->rq_resend
) ||
1977 (req
->rq_phase
== RQ_PHASE_BULK
)))
1980 if (req
->rq_timedout
|| /* already dealt with */
1981 req
->rq_deadline
> now
) /* not expired */
1984 /* Deal with this guy. Do it asynchronously to not block
1985 * ptlrpcd thread. */
1986 ptlrpc_expire_one_request(req
, 1);
1990 * When waiting for a whole set, we always break out of the
1991 * sleep so we can recalculate the timeout, or enable interrupts
1992 * if everyone's timed out.
1996 EXPORT_SYMBOL(ptlrpc_expired_set
);
1999 * Sets rq_intr flag in \a req under spinlock.
2001 void ptlrpc_mark_interrupted(struct ptlrpc_request
*req
)
2003 spin_lock(&req
->rq_lock
);
2005 spin_unlock(&req
->rq_lock
);
2007 EXPORT_SYMBOL(ptlrpc_mark_interrupted
);
2010 * Interrupts (sets interrupted flag) all uncompleted requests in
2011 * a set \a data. Callback for l_wait_event for interruptible waits.
2013 void ptlrpc_interrupted_set(void *data
)
2015 struct ptlrpc_request_set
*set
= data
;
2016 struct list_head
*tmp
;
2018 LASSERT(set
!= NULL
);
2019 CDEBUG(D_RPCTRACE
, "INTERRUPTED SET %p\n", set
);
2021 list_for_each(tmp
, &set
->set_requests
) {
2022 struct ptlrpc_request
*req
=
2023 list_entry(tmp
, struct ptlrpc_request
,
2026 if (req
->rq_phase
!= RQ_PHASE_RPC
&&
2027 req
->rq_phase
!= RQ_PHASE_UNREGISTERING
)
2030 ptlrpc_mark_interrupted(req
);
2033 EXPORT_SYMBOL(ptlrpc_interrupted_set
);
2036 * Get the smallest timeout in the set; this does NOT set a timeout.
2038 int ptlrpc_set_next_timeout(struct ptlrpc_request_set
*set
)
2040 struct list_head
*tmp
;
2041 time_t now
= cfs_time_current_sec();
2043 struct ptlrpc_request
*req
;
2046 SIGNAL_MASK_ASSERT(); /* XXX BUG 1511 */
2048 list_for_each(tmp
, &set
->set_requests
) {
2049 req
= list_entry(tmp
, struct ptlrpc_request
, rq_set_chain
);
2052 * Request in-flight?
2054 if (!(((req
->rq_phase
== RQ_PHASE_RPC
) && !req
->rq_waiting
) ||
2055 (req
->rq_phase
== RQ_PHASE_BULK
) ||
2056 (req
->rq_phase
== RQ_PHASE_NEW
)))
2060 * Already timed out.
2062 if (req
->rq_timedout
)
2068 if (req
->rq_wait_ctx
)
2071 if (req
->rq_phase
== RQ_PHASE_NEW
)
2072 deadline
= req
->rq_sent
;
2073 else if (req
->rq_phase
== RQ_PHASE_RPC
&& req
->rq_resend
)
2074 deadline
= req
->rq_sent
;
2076 deadline
= req
->rq_sent
+ req
->rq_timeout
;
2078 if (deadline
<= now
) /* actually expired already */
2079 timeout
= 1; /* ASAP */
2080 else if (timeout
== 0 || timeout
> deadline
- now
)
2081 timeout
= deadline
- now
;
2085 EXPORT_SYMBOL(ptlrpc_set_next_timeout
);
2088 * Send all unset request from the set and then wait until all
2089 * requests in the set complete (either get a reply, timeout, get an
2090 * error or otherwise be interrupted).
2091 * Returns 0 on success or error code otherwise.
2093 int ptlrpc_set_wait(struct ptlrpc_request_set
*set
)
2095 struct list_head
*tmp
;
2096 struct ptlrpc_request
*req
;
2097 struct l_wait_info lwi
;
2100 if (set
->set_producer
)
2101 (void)ptlrpc_set_producer(set
);
2103 list_for_each(tmp
, &set
->set_requests
) {
2104 req
= list_entry(tmp
, struct ptlrpc_request
,
2106 if (req
->rq_phase
== RQ_PHASE_NEW
)
2107 (void)ptlrpc_send_new_req(req
);
2110 if (list_empty(&set
->set_requests
))
2114 timeout
= ptlrpc_set_next_timeout(set
);
2116 /* wait until all complete, interrupted, or an in-flight
2118 CDEBUG(D_RPCTRACE
, "set %p going to sleep for %d seconds\n",
2121 if (timeout
== 0 && !cfs_signal_pending())
2123 * No requests are in-flight (ether timed out
2124 * or delayed), so we can allow interrupts.
2125 * We still want to block for a limited time,
2126 * so we allow interrupts during the timeout.
2128 lwi
= LWI_TIMEOUT_INTR_ALL(cfs_time_seconds(1),
2130 ptlrpc_interrupted_set
, set
);
2133 * At least one request is in flight, so no
2134 * interrupts are allowed. Wait until all
2135 * complete, or an in-flight req times out.
2137 lwi
= LWI_TIMEOUT(cfs_time_seconds(timeout
? timeout
: 1),
2138 ptlrpc_expired_set
, set
);
2140 rc
= l_wait_event(set
->set_waitq
, ptlrpc_check_set(NULL
, set
), &lwi
);
2142 /* LU-769 - if we ignored the signal because it was already
2143 * pending when we started, we need to handle it now or we risk
2144 * it being ignored forever */
2145 if (rc
== -ETIMEDOUT
&& !lwi
.lwi_allow_intr
&&
2146 cfs_signal_pending()) {
2147 sigset_t blocked_sigs
=
2148 cfs_block_sigsinv(LUSTRE_FATAL_SIGS
);
2150 /* In fact we only interrupt for the "fatal" signals
2151 * like SIGINT or SIGKILL. We still ignore less
2152 * important signals since ptlrpc set is not easily
2153 * reentrant from userspace again */
2154 if (cfs_signal_pending())
2155 ptlrpc_interrupted_set(set
);
2156 cfs_restore_sigs(blocked_sigs
);
2159 LASSERT(rc
== 0 || rc
== -EINTR
|| rc
== -ETIMEDOUT
);
2161 /* -EINTR => all requests have been flagged rq_intr so next
2163 * -ETIMEDOUT => someone timed out. When all reqs have
2164 * timed out, signals are enabled allowing completion with
2166 * I don't really care if we go once more round the loop in
2167 * the error cases -eeb. */
2168 if (rc
== 0 && atomic_read(&set
->set_remaining
) == 0) {
2169 list_for_each(tmp
, &set
->set_requests
) {
2170 req
= list_entry(tmp
, struct ptlrpc_request
,
2172 spin_lock(&req
->rq_lock
);
2173 req
->rq_invalid_rqset
= 1;
2174 spin_unlock(&req
->rq_lock
);
2177 } while (rc
!= 0 || atomic_read(&set
->set_remaining
) != 0);
2179 LASSERT(atomic_read(&set
->set_remaining
) == 0);
2181 rc
= set
->set_rc
; /* rq_status of already freed requests if any */
2182 list_for_each(tmp
, &set
->set_requests
) {
2183 req
= list_entry(tmp
, struct ptlrpc_request
, rq_set_chain
);
2185 LASSERT(req
->rq_phase
== RQ_PHASE_COMPLETE
);
2186 if (req
->rq_status
!= 0)
2187 rc
= req
->rq_status
;
2190 if (set
->set_interpret
!= NULL
) {
2191 int (*interpreter
)(struct ptlrpc_request_set
*set
,void *,int) =
2193 rc
= interpreter (set
, set
->set_arg
, rc
);
2195 struct ptlrpc_set_cbdata
*cbdata
, *n
;
2198 list_for_each_entry_safe(cbdata
, n
,
2199 &set
->set_cblist
, psc_item
) {
2200 list_del_init(&cbdata
->psc_item
);
2201 err
= cbdata
->psc_interpret(set
, cbdata
->psc_data
, rc
);
2204 OBD_FREE_PTR(cbdata
);
2210 EXPORT_SYMBOL(ptlrpc_set_wait
);
2213 * Helper function for request freeing.
2214 * Called when request count reached zero and request needs to be freed.
2215 * Removes request from all sorts of sending/replay lists it might be on,
2216 * frees network buffers if any are present.
2217 * If \a locked is set, that means caller is already holding import imp_lock
2218 * and so we no longer need to reobtain it (for certain lists manipulations)
2220 static void __ptlrpc_free_req(struct ptlrpc_request
*request
, int locked
)
2222 if (request
== NULL
) {
2226 LASSERTF(!request
->rq_receiving_reply
, "req %p\n", request
);
2227 LASSERTF(request
->rq_rqbd
== NULL
, "req %p\n",request
);/* client-side */
2228 LASSERTF(list_empty(&request
->rq_list
), "req %p\n", request
);
2229 LASSERTF(list_empty(&request
->rq_set_chain
), "req %p\n", request
);
2230 LASSERTF(list_empty(&request
->rq_exp_list
), "req %p\n", request
);
2231 LASSERTF(!request
->rq_replay
, "req %p\n", request
);
2233 req_capsule_fini(&request
->rq_pill
);
2235 /* We must take it off the imp_replay_list first. Otherwise, we'll set
2236 * request->rq_reqmsg to NULL while osc_close is dereferencing it. */
2237 if (request
->rq_import
!= NULL
) {
2239 spin_lock(&request
->rq_import
->imp_lock
);
2240 list_del_init(&request
->rq_replay_list
);
2242 spin_unlock(&request
->rq_import
->imp_lock
);
2244 LASSERTF(list_empty(&request
->rq_replay_list
), "req %p\n", request
);
2246 if (atomic_read(&request
->rq_refcount
) != 0) {
2247 DEBUG_REQ(D_ERROR
, request
,
2248 "freeing request with nonzero refcount");
2252 if (request
->rq_repbuf
!= NULL
)
2253 sptlrpc_cli_free_repbuf(request
);
2254 if (request
->rq_export
!= NULL
) {
2255 class_export_put(request
->rq_export
);
2256 request
->rq_export
= NULL
;
2258 if (request
->rq_import
!= NULL
) {
2259 class_import_put(request
->rq_import
);
2260 request
->rq_import
= NULL
;
2262 if (request
->rq_bulk
!= NULL
)
2263 ptlrpc_free_bulk_pin(request
->rq_bulk
);
2265 if (request
->rq_reqbuf
!= NULL
|| request
->rq_clrbuf
!= NULL
)
2266 sptlrpc_cli_free_reqbuf(request
);
2268 if (request
->rq_cli_ctx
)
2269 sptlrpc_req_put_ctx(request
, !locked
);
2271 if (request
->rq_pool
)
2272 __ptlrpc_free_req_to_pool(request
);
2274 ptlrpc_request_cache_free(request
);
2277 static int __ptlrpc_req_finished(struct ptlrpc_request
*request
, int locked
);
2279 * Drop one request reference. Must be called with import imp_lock held.
2280 * When reference count drops to zero, request is freed.
2282 void ptlrpc_req_finished_with_imp_lock(struct ptlrpc_request
*request
)
2284 assert_spin_locked(&request
->rq_import
->imp_lock
);
2285 (void)__ptlrpc_req_finished(request
, 1);
2287 EXPORT_SYMBOL(ptlrpc_req_finished_with_imp_lock
);
2291 * Drops one reference count for request \a request.
2292 * \a locked set indicates that caller holds import imp_lock.
2293 * Frees the request when reference count reaches zero.
2295 static int __ptlrpc_req_finished(struct ptlrpc_request
*request
, int locked
)
2297 if (request
== NULL
)
2300 if (request
== LP_POISON
||
2301 request
->rq_reqmsg
== LP_POISON
) {
2302 CERROR("dereferencing freed request (bug 575)\n");
2307 DEBUG_REQ(D_INFO
, request
, "refcount now %u",
2308 atomic_read(&request
->rq_refcount
) - 1);
2310 if (atomic_dec_and_test(&request
->rq_refcount
)) {
2311 __ptlrpc_free_req(request
, locked
);
2319 * Drops one reference count for a request.
2321 void ptlrpc_req_finished(struct ptlrpc_request
*request
)
2323 __ptlrpc_req_finished(request
, 0);
2325 EXPORT_SYMBOL(ptlrpc_req_finished
);
2328 * Returns xid of a \a request
2330 __u64
ptlrpc_req_xid(struct ptlrpc_request
*request
)
2332 return request
->rq_xid
;
2334 EXPORT_SYMBOL(ptlrpc_req_xid
);
2337 * Disengage the client's reply buffer from the network
2338 * NB does _NOT_ unregister any client-side bulk.
2339 * IDEMPOTENT, but _not_ safe against concurrent callers.
2340 * The request owner (i.e. the thread doing the I/O) must call...
2341 * Returns 0 on success or 1 if unregistering cannot be made.
2343 int ptlrpc_unregister_reply(struct ptlrpc_request
*request
, int async
)
2346 wait_queue_head_t
*wq
;
2347 struct l_wait_info lwi
;
2352 LASSERT(!in_interrupt());
2355 * Let's setup deadline for reply unlink.
2357 if (OBD_FAIL_CHECK(OBD_FAIL_PTLRPC_LONG_REPL_UNLINK
) &&
2358 async
&& request
->rq_reply_deadline
== 0)
2359 request
->rq_reply_deadline
= cfs_time_current_sec()+LONG_UNLINK
;
2362 * Nothing left to do.
2364 if (!ptlrpc_client_recv_or_unlink(request
))
2367 LNetMDUnlink(request
->rq_reply_md_h
);
2370 * Let's check it once again.
2372 if (!ptlrpc_client_recv_or_unlink(request
))
2376 * Move to "Unregistering" phase as reply was not unlinked yet.
2378 ptlrpc_rqphase_move(request
, RQ_PHASE_UNREGISTERING
);
2381 * Do not wait for unlink to finish.
2387 * We have to l_wait_event() whatever the result, to give liblustre
2388 * a chance to run reply_in_callback(), and to make sure we've
2389 * unlinked before returning a req to the pool.
2391 if (request
->rq_set
!= NULL
)
2392 wq
= &request
->rq_set
->set_waitq
;
2394 wq
= &request
->rq_reply_waitq
;
2397 /* Network access will complete in finite time but the HUGE
2398 * timeout lets us CWARN for visibility of sluggish NALs */
2399 lwi
= LWI_TIMEOUT_INTERVAL(cfs_time_seconds(LONG_UNLINK
),
2400 cfs_time_seconds(1), NULL
, NULL
);
2401 rc
= l_wait_event(*wq
, !ptlrpc_client_recv_or_unlink(request
),
2404 ptlrpc_rqphase_move(request
, request
->rq_next_phase
);
2408 LASSERT(rc
== -ETIMEDOUT
);
2409 DEBUG_REQ(D_WARNING
, request
,
2410 "Unexpectedly long timeout rvcng=%d unlnk=%d/%d",
2411 request
->rq_receiving_reply
,
2412 request
->rq_req_unlink
, request
->rq_reply_unlink
);
2416 EXPORT_SYMBOL(ptlrpc_unregister_reply
);
2418 static void ptlrpc_free_request(struct ptlrpc_request
*req
)
2420 spin_lock(&req
->rq_lock
);
2422 spin_unlock(&req
->rq_lock
);
2424 if (req
->rq_commit_cb
!= NULL
)
2425 req
->rq_commit_cb(req
);
2426 list_del_init(&req
->rq_replay_list
);
2428 __ptlrpc_req_finished(req
, 1);
2432 * the request is committed and dropped from the replay list of its import
2434 void ptlrpc_request_committed(struct ptlrpc_request
*req
, int force
)
2436 struct obd_import
*imp
= req
->rq_import
;
2438 spin_lock(&imp
->imp_lock
);
2439 if (list_empty(&req
->rq_replay_list
)) {
2440 spin_unlock(&imp
->imp_lock
);
2444 if (force
|| req
->rq_transno
<= imp
->imp_peer_committed_transno
)
2445 ptlrpc_free_request(req
);
2447 spin_unlock(&imp
->imp_lock
);
2449 EXPORT_SYMBOL(ptlrpc_request_committed
);
2452 * Iterates through replay_list on import and prunes
2453 * all requests have transno smaller than last_committed for the
2454 * import and don't have rq_replay set.
2455 * Since requests are sorted in transno order, stops when meeting first
2456 * transno bigger than last_committed.
2457 * caller must hold imp->imp_lock
2459 void ptlrpc_free_committed(struct obd_import
*imp
)
2461 struct ptlrpc_request
*req
, *saved
;
2462 struct ptlrpc_request
*last_req
= NULL
; /* temporary fire escape */
2463 bool skip_committed_list
= true;
2465 LASSERT(imp
!= NULL
);
2466 assert_spin_locked(&imp
->imp_lock
);
2468 if (imp
->imp_peer_committed_transno
== imp
->imp_last_transno_checked
&&
2469 imp
->imp_generation
== imp
->imp_last_generation_checked
) {
2470 CDEBUG(D_INFO
, "%s: skip recheck: last_committed "LPU64
"\n",
2471 imp
->imp_obd
->obd_name
, imp
->imp_peer_committed_transno
);
2474 CDEBUG(D_RPCTRACE
, "%s: committing for last_committed "LPU64
" gen %d\n",
2475 imp
->imp_obd
->obd_name
, imp
->imp_peer_committed_transno
,
2476 imp
->imp_generation
);
2478 if (imp
->imp_generation
!= imp
->imp_last_generation_checked
)
2479 skip_committed_list
= false;
2481 imp
->imp_last_transno_checked
= imp
->imp_peer_committed_transno
;
2482 imp
->imp_last_generation_checked
= imp
->imp_generation
;
2484 list_for_each_entry_safe(req
, saved
, &imp
->imp_replay_list
,
2486 /* XXX ok to remove when 1357 resolved - rread 05/29/03 */
2487 LASSERT(req
!= last_req
);
2490 if (req
->rq_transno
== 0) {
2491 DEBUG_REQ(D_EMERG
, req
, "zero transno during replay");
2494 if (req
->rq_import_generation
< imp
->imp_generation
) {
2495 DEBUG_REQ(D_RPCTRACE
, req
, "free request with old gen");
2499 /* not yet committed */
2500 if (req
->rq_transno
> imp
->imp_peer_committed_transno
) {
2501 DEBUG_REQ(D_RPCTRACE
, req
, "stopping search");
2505 if (req
->rq_replay
) {
2506 DEBUG_REQ(D_RPCTRACE
, req
, "keeping (FL_REPLAY)");
2507 list_move_tail(&req
->rq_replay_list
,
2508 &imp
->imp_committed_list
);
2512 DEBUG_REQ(D_INFO
, req
, "commit (last_committed "LPU64
")",
2513 imp
->imp_peer_committed_transno
);
2515 ptlrpc_free_request(req
);
2517 if (skip_committed_list
)
2520 list_for_each_entry_safe(req
, saved
, &imp
->imp_committed_list
,
2522 LASSERT(req
->rq_transno
!= 0);
2523 if (req
->rq_import_generation
< imp
->imp_generation
) {
2524 DEBUG_REQ(D_RPCTRACE
, req
, "free stale open request");
2525 ptlrpc_free_request(req
);
2530 void ptlrpc_cleanup_client(struct obd_import
*imp
)
2533 EXPORT_SYMBOL(ptlrpc_cleanup_client
);
2536 * Schedule previously sent request for resend.
2537 * For bulk requests we assign new xid (to avoid problems with
2538 * lost replies and therefore several transfers landing into same buffer
2539 * from different sending attempts).
2541 void ptlrpc_resend_req(struct ptlrpc_request
*req
)
2543 DEBUG_REQ(D_HA
, req
, "going to resend");
2544 spin_lock(&req
->rq_lock
);
2546 /* Request got reply but linked to the import list still.
2547 Let ptlrpc_check_set() to process it. */
2548 if (ptlrpc_client_replied(req
)) {
2549 spin_unlock(&req
->rq_lock
);
2550 DEBUG_REQ(D_HA
, req
, "it has reply, so skip it");
2554 lustre_msg_set_handle(req
->rq_reqmsg
, &(struct lustre_handle
){ 0 });
2555 req
->rq_status
= -EAGAIN
;
2558 req
->rq_net_err
= 0;
2559 req
->rq_timedout
= 0;
2561 __u64 old_xid
= req
->rq_xid
;
2563 /* ensure previous bulk fails */
2564 req
->rq_xid
= ptlrpc_next_xid();
2565 CDEBUG(D_HA
, "resend bulk old x"LPU64
" new x"LPU64
"\n",
2566 old_xid
, req
->rq_xid
);
2568 ptlrpc_client_wake_req(req
);
2569 spin_unlock(&req
->rq_lock
);
2571 EXPORT_SYMBOL(ptlrpc_resend_req
);
2573 /* XXX: this function and rq_status are currently unused */
2574 void ptlrpc_restart_req(struct ptlrpc_request
*req
)
2576 DEBUG_REQ(D_HA
, req
, "restarting (possibly-)completed request");
2577 req
->rq_status
= -ERESTARTSYS
;
2579 spin_lock(&req
->rq_lock
);
2580 req
->rq_restart
= 1;
2581 req
->rq_timedout
= 0;
2582 ptlrpc_client_wake_req(req
);
2583 spin_unlock(&req
->rq_lock
);
2585 EXPORT_SYMBOL(ptlrpc_restart_req
);
2588 * Grab additional reference on a request \a req
2590 struct ptlrpc_request
*ptlrpc_request_addref(struct ptlrpc_request
*req
)
2592 atomic_inc(&req
->rq_refcount
);
2595 EXPORT_SYMBOL(ptlrpc_request_addref
);
2598 * Add a request to import replay_list.
2599 * Must be called under imp_lock
2601 void ptlrpc_retain_replayable_request(struct ptlrpc_request
*req
,
2602 struct obd_import
*imp
)
2604 struct list_head
*tmp
;
2606 assert_spin_locked(&imp
->imp_lock
);
2608 if (req
->rq_transno
== 0) {
2609 DEBUG_REQ(D_EMERG
, req
, "saving request with zero transno");
2613 /* clear this for new requests that were resent as well
2614 as resent replayed requests. */
2615 lustre_msg_clear_flags(req
->rq_reqmsg
, MSG_RESENT
);
2617 /* don't re-add requests that have been replayed */
2618 if (!list_empty(&req
->rq_replay_list
))
2621 lustre_msg_add_flags(req
->rq_reqmsg
, MSG_REPLAY
);
2623 LASSERT(imp
->imp_replayable
);
2624 /* Balanced in ptlrpc_free_committed, usually. */
2625 ptlrpc_request_addref(req
);
2626 list_for_each_prev(tmp
, &imp
->imp_replay_list
) {
2627 struct ptlrpc_request
*iter
=
2628 list_entry(tmp
, struct ptlrpc_request
,
2631 /* We may have duplicate transnos if we create and then
2632 * open a file, or for closes retained if to match creating
2633 * opens, so use req->rq_xid as a secondary key.
2634 * (See bugs 684, 685, and 428.)
2635 * XXX no longer needed, but all opens need transnos!
2637 if (iter
->rq_transno
> req
->rq_transno
)
2640 if (iter
->rq_transno
== req
->rq_transno
) {
2641 LASSERT(iter
->rq_xid
!= req
->rq_xid
);
2642 if (iter
->rq_xid
> req
->rq_xid
)
2646 list_add(&req
->rq_replay_list
, &iter
->rq_replay_list
);
2650 list_add(&req
->rq_replay_list
, &imp
->imp_replay_list
);
2652 EXPORT_SYMBOL(ptlrpc_retain_replayable_request
);
2655 * Send request and wait until it completes.
2656 * Returns request processing status.
2658 int ptlrpc_queue_wait(struct ptlrpc_request
*req
)
2660 struct ptlrpc_request_set
*set
;
2663 LASSERT(req
->rq_set
== NULL
);
2664 LASSERT(!req
->rq_receiving_reply
);
2666 set
= ptlrpc_prep_set();
2668 CERROR("Unable to allocate ptlrpc set.");
2672 /* for distributed debugging */
2673 lustre_msg_set_status(req
->rq_reqmsg
, current_pid());
2675 /* add a ref for the set (see comment in ptlrpc_set_add_req) */
2676 ptlrpc_request_addref(req
);
2677 ptlrpc_set_add_req(set
, req
);
2678 rc
= ptlrpc_set_wait(set
);
2679 ptlrpc_set_destroy(set
);
2683 EXPORT_SYMBOL(ptlrpc_queue_wait
);
2685 struct ptlrpc_replay_async_args
{
2687 int praa_old_status
;
2691 * Callback used for replayed requests reply processing.
2692 * In case of successful reply calls registered request replay callback.
2693 * In case of error restart replay process.
2695 static int ptlrpc_replay_interpret(const struct lu_env
*env
,
2696 struct ptlrpc_request
*req
,
2697 void * data
, int rc
)
2699 struct ptlrpc_replay_async_args
*aa
= data
;
2700 struct obd_import
*imp
= req
->rq_import
;
2702 atomic_dec(&imp
->imp_replay_inflight
);
2704 if (!ptlrpc_client_replied(req
)) {
2705 CERROR("request replay timed out, restarting recovery\n");
2706 GOTO(out
, rc
= -ETIMEDOUT
);
2709 if (lustre_msg_get_type(req
->rq_repmsg
) == PTL_RPC_MSG_ERR
&&
2710 (lustre_msg_get_status(req
->rq_repmsg
) == -ENOTCONN
||
2711 lustre_msg_get_status(req
->rq_repmsg
) == -ENODEV
))
2712 GOTO(out
, rc
= lustre_msg_get_status(req
->rq_repmsg
));
2714 /** VBR: check version failure */
2715 if (lustre_msg_get_status(req
->rq_repmsg
) == -EOVERFLOW
) {
2716 /** replay was failed due to version mismatch */
2717 DEBUG_REQ(D_WARNING
, req
, "Version mismatch during replay\n");
2718 spin_lock(&imp
->imp_lock
);
2719 imp
->imp_vbr_failed
= 1;
2720 imp
->imp_no_lock_replay
= 1;
2721 spin_unlock(&imp
->imp_lock
);
2722 lustre_msg_set_status(req
->rq_repmsg
, aa
->praa_old_status
);
2724 /** The transno had better not change over replay. */
2725 LASSERTF(lustre_msg_get_transno(req
->rq_reqmsg
) ==
2726 lustre_msg_get_transno(req
->rq_repmsg
) ||
2727 lustre_msg_get_transno(req
->rq_repmsg
) == 0,
2729 lustre_msg_get_transno(req
->rq_reqmsg
),
2730 lustre_msg_get_transno(req
->rq_repmsg
));
2733 spin_lock(&imp
->imp_lock
);
2734 /** if replays by version then gap occur on server, no trust to locks */
2735 if (lustre_msg_get_flags(req
->rq_repmsg
) & MSG_VERSION_REPLAY
)
2736 imp
->imp_no_lock_replay
= 1;
2737 imp
->imp_last_replay_transno
= lustre_msg_get_transno(req
->rq_reqmsg
);
2738 spin_unlock(&imp
->imp_lock
);
2739 LASSERT(imp
->imp_last_replay_transno
);
2741 /* transaction number shouldn't be bigger than the latest replayed */
2742 if (req
->rq_transno
> lustre_msg_get_transno(req
->rq_reqmsg
)) {
2743 DEBUG_REQ(D_ERROR
, req
,
2744 "Reported transno "LPU64
" is bigger than the "
2745 "replayed one: "LPU64
, req
->rq_transno
,
2746 lustre_msg_get_transno(req
->rq_reqmsg
));
2747 GOTO(out
, rc
= -EINVAL
);
2750 DEBUG_REQ(D_HA
, req
, "got rep");
2752 /* let the callback do fixups, possibly including in the request */
2753 if (req
->rq_replay_cb
)
2754 req
->rq_replay_cb(req
);
2756 if (ptlrpc_client_replied(req
) &&
2757 lustre_msg_get_status(req
->rq_repmsg
) != aa
->praa_old_status
) {
2758 DEBUG_REQ(D_ERROR
, req
, "status %d, old was %d",
2759 lustre_msg_get_status(req
->rq_repmsg
),
2760 aa
->praa_old_status
);
2762 /* Put it back for re-replay. */
2763 lustre_msg_set_status(req
->rq_repmsg
, aa
->praa_old_status
);
2767 * Errors while replay can set transno to 0, but
2768 * imp_last_replay_transno shouldn't be set to 0 anyway
2770 if (req
->rq_transno
== 0)
2771 CERROR("Transno is 0 during replay!\n");
2773 /* continue with recovery */
2774 rc
= ptlrpc_import_recovery_state_machine(imp
);
2776 req
->rq_send_state
= aa
->praa_old_state
;
2779 /* this replay failed, so restart recovery */
2780 ptlrpc_connect_import(imp
);
2786 * Prepares and queues request for replay.
2787 * Adds it to ptlrpcd queue for actual sending.
2788 * Returns 0 on success.
2790 int ptlrpc_replay_req(struct ptlrpc_request
*req
)
2792 struct ptlrpc_replay_async_args
*aa
;
2794 LASSERT(req
->rq_import
->imp_state
== LUSTRE_IMP_REPLAY
);
2796 LASSERT(sizeof(*aa
) <= sizeof(req
->rq_async_args
));
2797 aa
= ptlrpc_req_async_args(req
);
2798 memset(aa
, 0, sizeof(*aa
));
2800 /* Prepare request to be resent with ptlrpcd */
2801 aa
->praa_old_state
= req
->rq_send_state
;
2802 req
->rq_send_state
= LUSTRE_IMP_REPLAY
;
2803 req
->rq_phase
= RQ_PHASE_NEW
;
2804 req
->rq_next_phase
= RQ_PHASE_UNDEFINED
;
2806 aa
->praa_old_status
= lustre_msg_get_status(req
->rq_repmsg
);
2808 req
->rq_interpret_reply
= ptlrpc_replay_interpret
;
2809 /* Readjust the timeout for current conditions */
2810 ptlrpc_at_set_req_timeout(req
);
2812 /* Tell server the net_latency, so the server can calculate how long
2813 * it should wait for next replay */
2814 lustre_msg_set_service_time(req
->rq_reqmsg
,
2815 ptlrpc_at_get_net_latency(req
));
2816 DEBUG_REQ(D_HA
, req
, "REPLAY");
2818 atomic_inc(&req
->rq_import
->imp_replay_inflight
);
2819 ptlrpc_request_addref(req
); /* ptlrpcd needs a ref */
2821 ptlrpcd_add_req(req
, PDL_POLICY_LOCAL
, -1);
2824 EXPORT_SYMBOL(ptlrpc_replay_req
);
2827 * Aborts all in-flight request on import \a imp sending and delayed lists
2829 void ptlrpc_abort_inflight(struct obd_import
*imp
)
2831 struct list_head
*tmp
, *n
;
2833 /* Make sure that no new requests get processed for this import.
2834 * ptlrpc_{queue,set}_wait must (and does) hold imp_lock while testing
2835 * this flag and then putting requests on sending_list or delayed_list.
2837 spin_lock(&imp
->imp_lock
);
2839 /* XXX locking? Maybe we should remove each request with the list
2840 * locked? Also, how do we know if the requests on the list are
2841 * being freed at this time?
2843 list_for_each_safe(tmp
, n
, &imp
->imp_sending_list
) {
2844 struct ptlrpc_request
*req
=
2845 list_entry(tmp
, struct ptlrpc_request
, rq_list
);
2847 DEBUG_REQ(D_RPCTRACE
, req
, "inflight");
2849 spin_lock(&req
->rq_lock
);
2850 if (req
->rq_import_generation
< imp
->imp_generation
) {
2852 req
->rq_status
= -EIO
;
2853 ptlrpc_client_wake_req(req
);
2855 spin_unlock(&req
->rq_lock
);
2858 list_for_each_safe(tmp
, n
, &imp
->imp_delayed_list
) {
2859 struct ptlrpc_request
*req
=
2860 list_entry(tmp
, struct ptlrpc_request
, rq_list
);
2862 DEBUG_REQ(D_RPCTRACE
, req
, "aborting waiting req");
2864 spin_lock(&req
->rq_lock
);
2865 if (req
->rq_import_generation
< imp
->imp_generation
) {
2867 req
->rq_status
= -EIO
;
2868 ptlrpc_client_wake_req(req
);
2870 spin_unlock(&req
->rq_lock
);
2873 /* Last chance to free reqs left on the replay list, but we
2874 * will still leak reqs that haven't committed. */
2875 if (imp
->imp_replayable
)
2876 ptlrpc_free_committed(imp
);
2878 spin_unlock(&imp
->imp_lock
);
2880 EXPORT_SYMBOL(ptlrpc_abort_inflight
);
2883 * Abort all uncompleted requests in request set \a set
2885 void ptlrpc_abort_set(struct ptlrpc_request_set
*set
)
2887 struct list_head
*tmp
, *pos
;
2889 LASSERT(set
!= NULL
);
2891 list_for_each_safe(pos
, tmp
, &set
->set_requests
) {
2892 struct ptlrpc_request
*req
=
2893 list_entry(pos
, struct ptlrpc_request
,
2896 spin_lock(&req
->rq_lock
);
2897 if (req
->rq_phase
!= RQ_PHASE_RPC
) {
2898 spin_unlock(&req
->rq_lock
);
2903 req
->rq_status
= -EINTR
;
2904 ptlrpc_client_wake_req(req
);
2905 spin_unlock(&req
->rq_lock
);
2909 static __u64 ptlrpc_last_xid
;
2910 static spinlock_t ptlrpc_last_xid_lock
;
2913 * Initialize the XID for the node. This is common among all requests on
2914 * this node, and only requires the property that it is monotonically
2915 * increasing. It does not need to be sequential. Since this is also used
2916 * as the RDMA match bits, it is important that a single client NOT have
2917 * the same match bits for two different in-flight requests, hence we do
2918 * NOT want to have an XID per target or similar.
2920 * To avoid an unlikely collision between match bits after a client reboot
2921 * (which would deliver old data into the wrong RDMA buffer) initialize
2922 * the XID based on the current time, assuming a maximum RPC rate of 1M RPC/s.
2923 * If the time is clearly incorrect, we instead use a 62-bit random number.
2924 * In the worst case the random number will overflow 1M RPCs per second in
2925 * 9133 years, or permutations thereof.
2927 #define YEAR_2004 (1ULL << 30)
2928 void ptlrpc_init_xid(void)
2930 time_t now
= cfs_time_current_sec();
2932 spin_lock_init(&ptlrpc_last_xid_lock
);
2933 if (now
< YEAR_2004
) {
2934 cfs_get_random_bytes(&ptlrpc_last_xid
, sizeof(ptlrpc_last_xid
));
2935 ptlrpc_last_xid
>>= 2;
2936 ptlrpc_last_xid
|= (1ULL << 61);
2938 ptlrpc_last_xid
= (__u64
)now
<< 20;
2941 /* Always need to be aligned to a power-of-two for multi-bulk BRW */
2942 CLASSERT((PTLRPC_BULK_OPS_COUNT
& (PTLRPC_BULK_OPS_COUNT
- 1)) == 0);
2943 ptlrpc_last_xid
&= PTLRPC_BULK_OPS_MASK
;
2947 * Increase xid and returns resulting new value to the caller.
2949 * Multi-bulk BRW RPCs consume multiple XIDs for each bulk transfer, starting
2950 * at the returned xid, up to xid + PTLRPC_BULK_OPS_COUNT - 1. The BRW RPC
2951 * itself uses the last bulk xid needed, so the server can determine the
2952 * the number of bulk transfers from the RPC XID and a bitmask. The starting
2953 * xid must align to a power-of-two value.
2955 * This is assumed to be true due to the initial ptlrpc_last_xid
2956 * value also being initialized to a power-of-two value. LU-1431
2958 __u64
ptlrpc_next_xid(void)
2962 spin_lock(&ptlrpc_last_xid_lock
);
2963 next
= ptlrpc_last_xid
+ PTLRPC_BULK_OPS_COUNT
;
2964 ptlrpc_last_xid
= next
;
2965 spin_unlock(&ptlrpc_last_xid_lock
);
2969 EXPORT_SYMBOL(ptlrpc_next_xid
);
2972 * Get a glimpse at what next xid value might have been.
2973 * Returns possible next xid.
2975 __u64
ptlrpc_sample_next_xid(void)
2977 #if BITS_PER_LONG == 32
2978 /* need to avoid possible word tearing on 32-bit systems */
2981 spin_lock(&ptlrpc_last_xid_lock
);
2982 next
= ptlrpc_last_xid
+ PTLRPC_BULK_OPS_COUNT
;
2983 spin_unlock(&ptlrpc_last_xid_lock
);
2987 /* No need to lock, since returned value is racy anyways */
2988 return ptlrpc_last_xid
+ PTLRPC_BULK_OPS_COUNT
;
2991 EXPORT_SYMBOL(ptlrpc_sample_next_xid
);
2994 * Functions for operating ptlrpc workers.
2996 * A ptlrpc work is a function which will be running inside ptlrpc context.
2997 * The callback shouldn't sleep otherwise it will block that ptlrpcd thread.
2999 * 1. after a work is created, it can be used many times, that is:
3000 * handler = ptlrpcd_alloc_work();
3001 * ptlrpcd_queue_work();
3003 * queue it again when necessary:
3004 * ptlrpcd_queue_work();
3005 * ptlrpcd_destroy_work();
3006 * 2. ptlrpcd_queue_work() can be called by multiple processes meanwhile, but
3007 * it will only be queued once in any time. Also as its name implies, it may
3008 * have delay before it really runs by ptlrpcd thread.
3010 struct ptlrpc_work_async_args
{
3011 int (*cb
)(const struct lu_env
*, void *);
3015 static void ptlrpcd_add_work_req(struct ptlrpc_request
*req
)
3017 /* re-initialize the req */
3018 req
->rq_timeout
= obd_timeout
;
3019 req
->rq_sent
= cfs_time_current_sec();
3020 req
->rq_deadline
= req
->rq_sent
+ req
->rq_timeout
;
3021 req
->rq_reply_deadline
= req
->rq_deadline
;
3022 req
->rq_phase
= RQ_PHASE_INTERPRET
;
3023 req
->rq_next_phase
= RQ_PHASE_COMPLETE
;
3024 req
->rq_xid
= ptlrpc_next_xid();
3025 req
->rq_import_generation
= req
->rq_import
->imp_generation
;
3027 ptlrpcd_add_req(req
, PDL_POLICY_ROUND
, -1);
3030 static int work_interpreter(const struct lu_env
*env
,
3031 struct ptlrpc_request
*req
, void *data
, int rc
)
3033 struct ptlrpc_work_async_args
*arg
= data
;
3035 LASSERT(ptlrpcd_check_work(req
));
3036 LASSERT(arg
->cb
!= NULL
);
3038 rc
= arg
->cb(env
, arg
->cbdata
);
3040 list_del_init(&req
->rq_set_chain
);
3043 if (atomic_dec_return(&req
->rq_refcount
) > 1) {
3044 atomic_set(&req
->rq_refcount
, 2);
3045 ptlrpcd_add_work_req(req
);
3050 static int worker_format
;
3052 static int ptlrpcd_check_work(struct ptlrpc_request
*req
)
3054 return req
->rq_pill
.rc_fmt
== (void *)&worker_format
;
3058 * Create a work for ptlrpc.
3060 void *ptlrpcd_alloc_work(struct obd_import
*imp
,
3061 int (*cb
)(const struct lu_env
*, void *), void *cbdata
)
3063 struct ptlrpc_request
*req
= NULL
;
3064 struct ptlrpc_work_async_args
*args
;
3069 return ERR_PTR(-EINVAL
);
3071 /* copy some code from deprecated fakereq. */
3072 req
= ptlrpc_request_cache_alloc(GFP_NOFS
);
3074 CERROR("ptlrpc: run out of memory!\n");
3075 return ERR_PTR(-ENOMEM
);
3078 req
->rq_send_state
= LUSTRE_IMP_FULL
;
3079 req
->rq_type
= PTL_RPC_MSG_REQUEST
;
3080 req
->rq_import
= class_import_get(imp
);
3081 req
->rq_export
= NULL
;
3082 req
->rq_interpret_reply
= work_interpreter
;
3083 /* don't want reply */
3084 req
->rq_receiving_reply
= 0;
3085 req
->rq_req_unlink
= req
->rq_reply_unlink
= 0;
3086 req
->rq_no_delay
= req
->rq_no_resend
= 1;
3087 req
->rq_pill
.rc_fmt
= (void *)&worker_format
;
3089 spin_lock_init(&req
->rq_lock
);
3090 INIT_LIST_HEAD(&req
->rq_list
);
3091 INIT_LIST_HEAD(&req
->rq_replay_list
);
3092 INIT_LIST_HEAD(&req
->rq_set_chain
);
3093 INIT_LIST_HEAD(&req
->rq_history_list
);
3094 INIT_LIST_HEAD(&req
->rq_exp_list
);
3095 init_waitqueue_head(&req
->rq_reply_waitq
);
3096 init_waitqueue_head(&req
->rq_set_waitq
);
3097 atomic_set(&req
->rq_refcount
, 1);
3099 CLASSERT(sizeof(*args
) <= sizeof(req
->rq_async_args
));
3100 args
= ptlrpc_req_async_args(req
);
3102 args
->cbdata
= cbdata
;
3106 EXPORT_SYMBOL(ptlrpcd_alloc_work
);
3108 void ptlrpcd_destroy_work(void *handler
)
3110 struct ptlrpc_request
*req
= handler
;
3113 ptlrpc_req_finished(req
);
3115 EXPORT_SYMBOL(ptlrpcd_destroy_work
);
3117 int ptlrpcd_queue_work(void *handler
)
3119 struct ptlrpc_request
*req
= handler
;
3122 * Check if the req is already being queued.
3124 * Here comes a trick: it lacks a way of checking if a req is being
3125 * processed reliably in ptlrpc. Here I have to use refcount of req
3126 * for this purpose. This is okay because the caller should use this
3127 * req as opaque data. - Jinshan
3129 LASSERT(atomic_read(&req
->rq_refcount
) > 0);
3130 if (atomic_inc_return(&req
->rq_refcount
) == 2)
3131 ptlrpcd_add_work_req(req
);
3134 EXPORT_SYMBOL(ptlrpcd_queue_work
);