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.gnu.org/licenses/gpl-2.0.html
23 * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
24 * Use is subject to license terms.
26 * Copyright (c) 2010, 2015, Intel Corporation.
29 * This file is part of Lustre, http://www.lustre.org/
30 * Lustre is a trademark of Sun Microsystems, Inc.
34 * This file deals with various client/target related logic including recovery.
36 * TODO: This code more logically belongs in the ptlrpc module than in ldlm and
40 #define DEBUG_SUBSYSTEM S_LDLM
42 #include <linux/libcfs/libcfs.h>
44 #include <obd_class.h>
45 #include <lustre_dlm.h>
46 #include <lustre_net.h>
47 #include <lustre_sec.h>
48 #include "ldlm_internal.h"
50 /* @priority: If non-zero, move the selected connection to the list head.
51 * @create: If zero, only search in existing connections.
53 static int import_set_conn(struct obd_import *imp, struct obd_uuid *uuid,
54 int priority, int create)
56 struct ptlrpc_connection *ptlrpc_conn;
57 struct obd_import_conn *imp_conn = NULL, *item;
60 if (!create && !priority) {
61 CDEBUG(D_HA, "Nothing to do\n");
65 ptlrpc_conn = ptlrpc_uuid_to_connection(uuid);
67 CDEBUG(D_HA, "can't find connection %s\n", uuid->uuid);
72 imp_conn = kzalloc(sizeof(*imp_conn), GFP_NOFS);
79 spin_lock(&imp->imp_lock);
80 list_for_each_entry(item, &imp->imp_conn_list, oic_item) {
81 if (obd_uuid_equals(uuid, &item->oic_uuid)) {
83 list_del(&item->oic_item);
84 list_add(&item->oic_item,
86 item->oic_last_attempt = 0;
88 CDEBUG(D_HA, "imp %p@%s: found existing conn %s%s\n",
89 imp, imp->imp_obd->obd_name, uuid->uuid,
90 (priority ? ", moved to head" : ""));
91 spin_unlock(&imp->imp_lock);
96 /* No existing import connection found for \a uuid. */
98 imp_conn->oic_conn = ptlrpc_conn;
99 imp_conn->oic_uuid = *uuid;
100 imp_conn->oic_last_attempt = 0;
102 list_add(&imp_conn->oic_item, &imp->imp_conn_list);
104 list_add_tail(&imp_conn->oic_item,
105 &imp->imp_conn_list);
106 CDEBUG(D_HA, "imp %p@%s: add connection %s at %s\n",
107 imp, imp->imp_obd->obd_name, uuid->uuid,
108 (priority ? "head" : "tail"));
110 spin_unlock(&imp->imp_lock);
115 spin_unlock(&imp->imp_lock);
120 ptlrpc_connection_put(ptlrpc_conn);
124 int import_set_conn_priority(struct obd_import *imp, struct obd_uuid *uuid)
126 return import_set_conn(imp, uuid, 1, 0);
129 int client_import_add_conn(struct obd_import *imp, struct obd_uuid *uuid,
132 return import_set_conn(imp, uuid, priority, 1);
134 EXPORT_SYMBOL(client_import_add_conn);
136 int client_import_del_conn(struct obd_import *imp, struct obd_uuid *uuid)
138 struct obd_import_conn *imp_conn;
139 struct obd_export *dlmexp;
142 spin_lock(&imp->imp_lock);
143 if (list_empty(&imp->imp_conn_list)) {
144 LASSERT(!imp->imp_connection);
148 list_for_each_entry(imp_conn, &imp->imp_conn_list, oic_item) {
149 if (!obd_uuid_equals(uuid, &imp_conn->oic_uuid))
151 LASSERT(imp_conn->oic_conn);
153 if (imp_conn == imp->imp_conn_current) {
154 LASSERT(imp_conn->oic_conn == imp->imp_connection);
156 if (imp->imp_state != LUSTRE_IMP_CLOSED &&
157 imp->imp_state != LUSTRE_IMP_DISCON) {
158 CERROR("can't remove current connection\n");
163 ptlrpc_connection_put(imp->imp_connection);
164 imp->imp_connection = NULL;
166 dlmexp = class_conn2export(&imp->imp_dlm_handle);
167 if (dlmexp && dlmexp->exp_connection) {
168 LASSERT(dlmexp->exp_connection ==
170 ptlrpc_connection_put(dlmexp->exp_connection);
171 dlmexp->exp_connection = NULL;
175 class_export_put(dlmexp);
178 list_del(&imp_conn->oic_item);
179 ptlrpc_connection_put(imp_conn->oic_conn);
181 CDEBUG(D_HA, "imp %p@%s: remove connection %s\n",
182 imp, imp->imp_obd->obd_name, uuid->uuid);
187 spin_unlock(&imp->imp_lock);
189 CERROR("connection %s not found\n", uuid->uuid);
192 EXPORT_SYMBOL(client_import_del_conn);
195 * Find conn UUID by peer NID. \a peer is a server NID. This function is used
196 * to find a conn uuid of \a imp which can reach \a peer.
198 int client_import_find_conn(struct obd_import *imp, lnet_nid_t peer,
199 struct obd_uuid *uuid)
201 struct obd_import_conn *conn;
204 spin_lock(&imp->imp_lock);
205 list_for_each_entry(conn, &imp->imp_conn_list, oic_item) {
206 /* Check if conn UUID does have this peer NID. */
207 if (class_check_uuid(&conn->oic_uuid, peer)) {
208 *uuid = conn->oic_uuid;
213 spin_unlock(&imp->imp_lock);
216 EXPORT_SYMBOL(client_import_find_conn);
218 void client_destroy_import(struct obd_import *imp)
220 /* Drop security policy instance after all RPCs have finished/aborted
221 * to let all busy contexts be released.
223 class_import_get(imp);
224 class_destroy_import(imp);
225 sptlrpc_import_sec_put(imp);
226 class_import_put(imp);
228 EXPORT_SYMBOL(client_destroy_import);
230 /* Configure an RPC client OBD device.
235 * 3 - inactive-on-startup
237 int client_obd_setup(struct obd_device *obddev, struct lustre_cfg *lcfg)
239 struct client_obd *cli = &obddev->u.cli;
240 struct obd_import *imp;
241 struct obd_uuid server_uuid;
242 int rq_portal, rp_portal, connect_op;
243 char *name = obddev->obd_type->typ_name;
244 enum ldlm_ns_type ns_type = LDLM_NS_TYPE_UNKNOWN;
247 /* In a more perfect world, we would hang a ptlrpc_client off of
248 * obd_type and just use the values from there.
250 if (!strcmp(name, LUSTRE_OSC_NAME)) {
251 rq_portal = OST_REQUEST_PORTAL;
252 rp_portal = OSC_REPLY_PORTAL;
253 connect_op = OST_CONNECT;
254 cli->cl_sp_me = LUSTRE_SP_CLI;
255 cli->cl_sp_to = LUSTRE_SP_OST;
256 ns_type = LDLM_NS_TYPE_OSC;
257 } else if (!strcmp(name, LUSTRE_MDC_NAME) ||
258 !strcmp(name, LUSTRE_LWP_NAME)) {
259 rq_portal = MDS_REQUEST_PORTAL;
260 rp_portal = MDC_REPLY_PORTAL;
261 connect_op = MDS_CONNECT;
262 cli->cl_sp_me = LUSTRE_SP_CLI;
263 cli->cl_sp_to = LUSTRE_SP_MDT;
264 ns_type = LDLM_NS_TYPE_MDC;
265 } else if (!strcmp(name, LUSTRE_MGC_NAME)) {
266 rq_portal = MGS_REQUEST_PORTAL;
267 rp_portal = MGC_REPLY_PORTAL;
268 connect_op = MGS_CONNECT;
269 cli->cl_sp_me = LUSTRE_SP_MGC;
270 cli->cl_sp_to = LUSTRE_SP_MGS;
271 cli->cl_flvr_mgc.sf_rpc = SPTLRPC_FLVR_INVALID;
272 ns_type = LDLM_NS_TYPE_MGC;
274 CERROR("unknown client OBD type \"%s\", can't setup\n",
279 if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1) {
280 CERROR("requires a TARGET UUID\n");
284 if (LUSTRE_CFG_BUFLEN(lcfg, 1) > 37) {
285 CERROR("client UUID must be less than 38 characters\n");
289 if (LUSTRE_CFG_BUFLEN(lcfg, 2) < 1) {
290 CERROR("setup requires a SERVER UUID\n");
294 if (LUSTRE_CFG_BUFLEN(lcfg, 2) > 37) {
295 CERROR("target UUID must be less than 38 characters\n");
299 init_rwsem(&cli->cl_sem);
300 cli->cl_conn_count = 0;
301 memcpy(server_uuid.uuid, lustre_cfg_buf(lcfg, 2),
302 min_t(unsigned int, LUSTRE_CFG_BUFLEN(lcfg, 2),
303 sizeof(server_uuid)));
305 cli->cl_dirty_pages = 0;
306 cli->cl_avail_grant = 0;
307 /* FIXME: Should limit this for the sum of all cl_dirty_max_pages. */
309 * cl_dirty_max_pages may be changed at connect time in
310 * ptlrpc_connect_interpret().
312 client_adjust_max_dirty(cli);
313 INIT_LIST_HEAD(&cli->cl_cache_waiters);
314 INIT_LIST_HEAD(&cli->cl_loi_ready_list);
315 INIT_LIST_HEAD(&cli->cl_loi_hp_ready_list);
316 INIT_LIST_HEAD(&cli->cl_loi_write_list);
317 INIT_LIST_HEAD(&cli->cl_loi_read_list);
318 spin_lock_init(&cli->cl_loi_list_lock);
319 atomic_set(&cli->cl_pending_w_pages, 0);
320 atomic_set(&cli->cl_pending_r_pages, 0);
321 cli->cl_r_in_flight = 0;
322 cli->cl_w_in_flight = 0;
324 spin_lock_init(&cli->cl_read_rpc_hist.oh_lock);
325 spin_lock_init(&cli->cl_write_rpc_hist.oh_lock);
326 spin_lock_init(&cli->cl_read_page_hist.oh_lock);
327 spin_lock_init(&cli->cl_write_page_hist.oh_lock);
328 spin_lock_init(&cli->cl_read_offset_hist.oh_lock);
329 spin_lock_init(&cli->cl_write_offset_hist.oh_lock);
332 INIT_LIST_HEAD(&cli->cl_lru_osc);
333 atomic_set(&cli->cl_lru_shrinkers, 0);
334 atomic_long_set(&cli->cl_lru_busy, 0);
335 atomic_long_set(&cli->cl_lru_in_list, 0);
336 INIT_LIST_HEAD(&cli->cl_lru_list);
337 spin_lock_init(&cli->cl_lru_list_lock);
338 atomic_long_set(&cli->cl_unstable_count, 0);
339 INIT_LIST_HEAD(&cli->cl_shrink_list);
341 init_waitqueue_head(&cli->cl_destroy_waitq);
342 atomic_set(&cli->cl_destroy_in_flight, 0);
343 /* Turn on checksumming by default. */
344 cli->cl_checksum = 1;
346 * The supported checksum types will be worked out at connect time
347 * Set cl_chksum* to CRC32 for now to avoid returning screwed info
350 cli->cl_cksum_type = OBD_CKSUM_CRC32;
351 cli->cl_supp_cksum_types = OBD_CKSUM_CRC32;
352 atomic_set(&cli->cl_resends, OSC_DEFAULT_RESENDS);
355 * Set it to possible maximum size. It may be reduced by ocd_brw_size
356 * from OFD after connecting.
358 cli->cl_max_pages_per_rpc = PTLRPC_MAX_BRW_PAGES;
361 * set cl_chunkbits default value to PAGE_CACHE_SHIFT,
362 * it will be updated at OSC connection time.
364 cli->cl_chunkbits = PAGE_SHIFT;
366 if (!strcmp(name, LUSTRE_MDC_NAME))
367 cli->cl_max_rpcs_in_flight = OBD_MAX_RIF_DEFAULT;
368 else if (totalram_pages >> (20 - PAGE_SHIFT) <= 128 /* MB */)
369 cli->cl_max_rpcs_in_flight = 2;
370 else if (totalram_pages >> (20 - PAGE_SHIFT) <= 256 /* MB */)
371 cli->cl_max_rpcs_in_flight = 3;
372 else if (totalram_pages >> (20 - PAGE_SHIFT) <= 512 /* MB */)
373 cli->cl_max_rpcs_in_flight = 4;
375 cli->cl_max_rpcs_in_flight = OBD_MAX_RIF_DEFAULT;
377 spin_lock_init(&cli->cl_mod_rpcs_lock);
378 spin_lock_init(&cli->cl_mod_rpcs_hist.oh_lock);
379 cli->cl_max_mod_rpcs_in_flight = 0;
380 cli->cl_mod_rpcs_in_flight = 0;
381 cli->cl_close_rpcs_in_flight = 0;
382 init_waitqueue_head(&cli->cl_mod_rpcs_waitq);
383 cli->cl_mod_tag_bitmap = NULL;
385 if (connect_op == MDS_CONNECT) {
386 cli->cl_max_mod_rpcs_in_flight = cli->cl_max_rpcs_in_flight - 1;
387 cli->cl_mod_tag_bitmap = kcalloc(BITS_TO_LONGS(OBD_MAX_RIF_MAX),
388 sizeof(long), GFP_NOFS);
389 if (!cli->cl_mod_tag_bitmap) {
397 CERROR("ldlm_get_ref failed: %d\n", rc);
401 ptlrpc_init_client(rq_portal, rp_portal, name,
402 &obddev->obd_ldlm_client);
404 imp = class_new_import(obddev);
409 imp->imp_client = &obddev->obd_ldlm_client;
410 imp->imp_connect_op = connect_op;
411 memcpy(cli->cl_target_uuid.uuid, lustre_cfg_buf(lcfg, 1),
412 LUSTRE_CFG_BUFLEN(lcfg, 1));
413 class_import_put(imp);
415 rc = client_import_add_conn(imp, &server_uuid, 1);
417 CERROR("can't add initial connection\n");
421 cli->cl_import = imp;
422 /* cli->cl_max_mds_easize updated by mdc_init_ea_size() */
423 cli->cl_max_mds_easize = sizeof(struct lov_mds_md_v3);
425 if (LUSTRE_CFG_BUFLEN(lcfg, 3) > 0) {
426 if (!strcmp(lustre_cfg_string(lcfg, 3), "inactive")) {
427 CDEBUG(D_HA, "marking %s %s->%s as inactive\n",
428 name, obddev->obd_name,
429 cli->cl_target_uuid.uuid);
430 spin_lock(&imp->imp_lock);
431 imp->imp_deactive = 1;
432 spin_unlock(&imp->imp_lock);
436 obddev->obd_namespace = ldlm_namespace_new(obddev, obddev->obd_name,
437 LDLM_NAMESPACE_CLIENT,
438 LDLM_NAMESPACE_GREEDY,
440 if (!obddev->obd_namespace) {
441 CERROR("Unable to create client namespace - %s\n",
450 class_destroy_import(imp);
454 kfree(cli->cl_mod_tag_bitmap);
455 cli->cl_mod_tag_bitmap = NULL;
458 EXPORT_SYMBOL(client_obd_setup);
460 int client_obd_cleanup(struct obd_device *obddev)
462 struct client_obd *cli = &obddev->u.cli;
464 ldlm_namespace_free_post(obddev->obd_namespace);
465 obddev->obd_namespace = NULL;
467 obd_cleanup_client_import(obddev);
468 LASSERT(!obddev->u.cli.cl_import);
472 kfree(cli->cl_mod_tag_bitmap);
473 cli->cl_mod_tag_bitmap = NULL;
477 EXPORT_SYMBOL(client_obd_cleanup);
479 /* ->o_connect() method for client side (OSC and MDC and MGC) */
480 int client_connect_import(const struct lu_env *env,
481 struct obd_export **exp,
482 struct obd_device *obd, struct obd_uuid *cluuid,
483 struct obd_connect_data *data, void *localdata)
485 struct client_obd *cli = &obd->u.cli;
486 struct obd_import *imp = cli->cl_import;
487 struct obd_connect_data *ocd;
488 struct lustre_handle conn = { 0 };
493 down_write(&cli->cl_sem);
494 if (cli->cl_conn_count > 0) {
499 rc = class_connect(&conn, obd, cluuid);
503 cli->cl_conn_count++;
504 *exp = class_conn2export(&conn);
506 LASSERT(obd->obd_namespace);
508 imp->imp_dlm_handle = conn;
509 rc = ptlrpc_init_import(imp);
513 ocd = &imp->imp_connect_data;
516 is_mdc = !strncmp(imp->imp_obd->obd_type->typ_name,
519 data->ocd_connect_flags |= OBD_CONNECT_MULTIMODRPCS;
520 imp->imp_connect_flags_orig = data->ocd_connect_flags;
523 rc = ptlrpc_connect_import(imp);
526 data->ocd_connect_flags &= ~OBD_CONNECT_MULTIMODRPCS;
527 LASSERT(imp->imp_state == LUSTRE_IMP_DISCON);
530 LASSERT(*exp && (*exp)->exp_connection);
533 LASSERTF((ocd->ocd_connect_flags & data->ocd_connect_flags) ==
534 ocd->ocd_connect_flags, "old %#llx, new %#llx\n",
535 data->ocd_connect_flags, ocd->ocd_connect_flags);
536 data->ocd_connect_flags = ocd->ocd_connect_flags;
537 /* clear the flag as it was not set and is not known
541 data->ocd_connect_flags &= ~OBD_CONNECT_MULTIMODRPCS;
544 ptlrpc_pinger_add_import(imp);
548 cli->cl_conn_count--;
549 class_disconnect(*exp);
553 up_write(&cli->cl_sem);
557 EXPORT_SYMBOL(client_connect_import);
559 int client_disconnect_export(struct obd_export *exp)
561 struct obd_device *obd = class_exp2obd(exp);
562 struct client_obd *cli;
563 struct obd_import *imp;
567 CERROR("invalid export for disconnect: exp %p cookie %#llx\n",
568 exp, exp ? exp->exp_handle.h_cookie : -1);
573 imp = cli->cl_import;
575 down_write(&cli->cl_sem);
576 CDEBUG(D_INFO, "disconnect %s - %zu\n", obd->obd_name,
579 if (!cli->cl_conn_count) {
580 CERROR("disconnecting disconnected device (%s)\n",
586 cli->cl_conn_count--;
587 if (cli->cl_conn_count) {
592 /* Mark import deactivated now, so we don't try to reconnect if any
593 * of the cleanup RPCs fails (e.g. LDLM cancel, etc). We don't
594 * fully deactivate the import, or that would drop all requests.
596 spin_lock(&imp->imp_lock);
597 imp->imp_deactive = 1;
598 spin_unlock(&imp->imp_lock);
600 /* Some non-replayable imports (MDS's OSCs) are pinged, so just
601 * delete it regardless. (It's safe to delete an import that was
604 (void)ptlrpc_pinger_del_import(imp);
606 if (obd->obd_namespace) {
607 /* obd_force == local only */
608 ldlm_cli_cancel_unused(obd->obd_namespace, NULL,
609 obd->obd_force ? LCF_LOCAL : 0, NULL);
610 ldlm_namespace_free_prior(obd->obd_namespace, imp,
614 /* There's no need to hold sem while disconnecting an import,
615 * and it may actually cause deadlock in GSS.
617 up_write(&cli->cl_sem);
618 rc = ptlrpc_disconnect_import(imp, 0);
619 down_write(&cli->cl_sem);
621 ptlrpc_invalidate_import(imp);
624 /* Use server style - class_disconnect should be always called for
627 err = class_disconnect(exp);
631 up_write(&cli->cl_sem);
635 EXPORT_SYMBOL(client_disconnect_export);
638 * Packs current SLV and Limit into \a req.
640 int target_pack_pool_reply(struct ptlrpc_request *req)
642 struct obd_device *obd;
644 /* Check that we still have all structures alive as this may
645 * be some late RPC at shutdown time.
647 if (unlikely(!req->rq_export || !req->rq_export->exp_obd ||
648 !exp_connect_lru_resize(req->rq_export))) {
649 lustre_msg_set_slv(req->rq_repmsg, 0);
650 lustre_msg_set_limit(req->rq_repmsg, 0);
654 /* OBD is alive here as export is alive, which we checked above. */
655 obd = req->rq_export->exp_obd;
657 read_lock(&obd->obd_pool_lock);
658 lustre_msg_set_slv(req->rq_repmsg, obd->obd_pool_slv);
659 lustre_msg_set_limit(req->rq_repmsg, obd->obd_pool_limit);
660 read_unlock(&obd->obd_pool_lock);
664 EXPORT_SYMBOL(target_pack_pool_reply);
667 target_send_reply_msg(struct ptlrpc_request *req, int rc, int fail_id)
669 if (OBD_FAIL_CHECK_ORSET(fail_id & ~OBD_FAIL_ONCE, OBD_FAIL_ONCE)) {
670 DEBUG_REQ(D_ERROR, req, "dropping reply");
675 DEBUG_REQ(D_NET, req, "processing error (%d)", rc);
677 return ptlrpc_send_error(req, 1);
680 DEBUG_REQ(D_NET, req, "sending reply");
681 return ptlrpc_send_reply(req, PTLRPC_REPLY_MAYBE_DIFFICULT);
684 void target_send_reply(struct ptlrpc_request *req, int rc, int fail_id)
686 struct ptlrpc_service_part *svcpt;
688 struct ptlrpc_reply_state *rs;
689 struct obd_export *exp;
691 if (req->rq_no_reply)
694 svcpt = req->rq_rqbd->rqbd_svcpt;
695 rs = req->rq_reply_state;
696 if (!rs || !rs->rs_difficult) {
698 target_send_reply_msg(req, rc, fail_id);
702 /* must be an export if locks saved */
703 LASSERT(req->rq_export);
704 /* req/reply consistent */
705 LASSERT(rs->rs_svcpt == svcpt);
708 LASSERT(!rs->rs_scheduled);
709 LASSERT(!rs->rs_scheduled_ever);
710 LASSERT(!rs->rs_handled);
711 LASSERT(!rs->rs_on_net);
712 LASSERT(!rs->rs_export);
713 LASSERT(list_empty(&rs->rs_obd_list));
714 LASSERT(list_empty(&rs->rs_exp_list));
716 exp = class_export_get(req->rq_export);
718 /* disable reply scheduling while I'm setting up */
719 rs->rs_scheduled = 1;
721 rs->rs_xid = req->rq_xid;
722 rs->rs_transno = req->rq_transno;
724 rs->rs_opc = lustre_msg_get_opc(req->rq_reqmsg);
726 spin_lock(&exp->exp_uncommitted_replies_lock);
727 CDEBUG(D_NET, "rs transno = %llu, last committed = %llu\n",
728 rs->rs_transno, exp->exp_last_committed);
729 if (rs->rs_transno > exp->exp_last_committed) {
730 /* not committed already */
731 list_add_tail(&rs->rs_obd_list,
732 &exp->exp_uncommitted_replies);
734 spin_unlock(&exp->exp_uncommitted_replies_lock);
736 spin_lock(&exp->exp_lock);
737 list_add_tail(&rs->rs_exp_list, &exp->exp_outstanding_replies);
738 spin_unlock(&exp->exp_lock);
740 netrc = target_send_reply_msg(req, rc, fail_id);
742 spin_lock(&svcpt->scp_rep_lock);
744 atomic_inc(&svcpt->scp_nreps_difficult);
747 /* error sending: reply is off the net. Also we need +1
748 * reply ref until ptlrpc_handle_rs() is done
749 * with the reply state (if the send was successful, there
750 * would have been +1 ref for the net, which
751 * reply_out_callback leaves alone)
754 ptlrpc_rs_addref(rs);
757 spin_lock(&rs->rs_lock);
758 if (rs->rs_transno <= exp->exp_last_committed ||
759 (!rs->rs_on_net && !rs->rs_no_ack) ||
760 list_empty(&rs->rs_exp_list) || /* completed already */
761 list_empty(&rs->rs_obd_list)) {
762 CDEBUG(D_HA, "Schedule reply immediately\n");
763 ptlrpc_dispatch_difficult_reply(rs);
765 list_add(&rs->rs_list, &svcpt->scp_rep_active);
766 rs->rs_scheduled = 0; /* allow notifier to schedule */
768 spin_unlock(&rs->rs_lock);
769 spin_unlock(&svcpt->scp_rep_lock);
771 EXPORT_SYMBOL(target_send_reply);
773 enum ldlm_mode lck_compat_array[] = {
774 [LCK_EX] = LCK_COMPAT_EX,
775 [LCK_PW] = LCK_COMPAT_PW,
776 [LCK_PR] = LCK_COMPAT_PR,
777 [LCK_CW] = LCK_COMPAT_CW,
778 [LCK_CR] = LCK_COMPAT_CR,
779 [LCK_NL] = LCK_COMPAT_NL,
780 [LCK_GROUP] = LCK_COMPAT_GROUP,
781 [LCK_COS] = LCK_COMPAT_COS,
785 * Rather arbitrary mapping from LDLM error codes to errno values. This should
786 * not escape to the user level.
788 int ldlm_error2errno(enum ldlm_error error)
794 case ELDLM_LOCK_MATCHED:
797 case ELDLM_LOCK_CHANGED:
800 case ELDLM_LOCK_ABORTED:
803 case ELDLM_LOCK_REPLACED:
806 case ELDLM_NO_LOCK_DATA:
809 case ELDLM_NAMESPACE_EXISTS:
812 case ELDLM_BAD_NAMESPACE:
816 if (((int)error) < 0) /* cast to signed type */
817 result = error; /* as enum ldlm_error can be unsigned */
819 CERROR("Invalid DLM result code: %d\n", error);
825 EXPORT_SYMBOL(ldlm_error2errno);
827 #if LUSTRE_TRACKS_LOCK_EXP_REFS
828 void ldlm_dump_export_locks(struct obd_export *exp)
830 spin_lock(&exp->exp_locks_list_guard);
831 if (!list_empty(&exp->exp_locks_list)) {
832 struct ldlm_lock *lock;
834 CERROR("dumping locks for export %p,ignore if the unmount doesn't hang\n",
836 list_for_each_entry(lock, &exp->exp_locks_list,
838 LDLM_ERROR(lock, "lock:");
840 spin_unlock(&exp->exp_locks_list_guard);