1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2 * vim:expandtab:shiftwidth=8:tabstop=8:
4 * Copyright (C) 2002 Cluster File Systems, Inc.
6 * This code is issued under the GNU General Public License.
7 * See the file COPYING in this distribution
9 * by Cluster File Systems, Inc.
12 #define DEBUG_SUBSYSTEM S_LDLM
14 #include <linux/lustre_dlm.h>
16 int ldlm_cli_enqueue(struct ptlrpc_client *cl, struct ptlrpc_connection *conn,
17 struct lustre_handle *connh,
18 struct ptlrpc_request *req,
19 struct ldlm_namespace *ns,
20 struct lustre_handle *parent_lock_handle,
23 void *cookie, int cookielen,
26 ldlm_lock_callback callback,
29 struct lustre_handle *lockh)
31 struct ldlm_lock *lock;
32 struct ldlm_request *body;
33 struct ldlm_reply *reply;
34 int rc, size = sizeof(*body), req_passed_in = 1;
38 lock = ldlm_lock_create(ns, parent_lock_handle, res_id, type, mode,
41 GOTO(out, rc = -ENOMEM);
42 LDLM_DEBUG(lock, "client-side enqueue START");
43 /* for the local lock, add the reference */
44 ldlm_lock_addref_internal(lock, mode);
45 ldlm_lock2handle(lock, lockh);
48 req = ptlrpc_prep_req2(cl, conn, connh,
49 LDLM_ENQUEUE, 1, &size, NULL);
51 GOTO(out, rc = -ENOMEM);
53 } else if (req->rq_reqmsg->buflens[0] != sizeof(*body))
56 /* Dump all of this data into the request buffer */
57 body = lustre_msg_buf(req->rq_reqmsg, 0);
58 ldlm_lock2desc(lock, &body->lock_desc);
59 /* Phil: make this part of ldlm_lock2desc */
60 if (type == LDLM_EXTENT)
61 memcpy(&body->lock_desc.l_extent, cookie,
62 sizeof(body->lock_desc.l_extent));
63 body->lock_flags = *flags;
65 memcpy(&body->lock_handle1, lockh, sizeof(*lockh));
66 if (parent_lock_handle)
67 memcpy(&body->lock_handle2, parent_lock_handle,
68 sizeof(body->lock_handle2));
70 /* Continue as normal. */
72 size = sizeof(*reply);
73 req->rq_replen = lustre_msg_size(1, &size);
76 lock->l_connection = ptlrpc_connection_addref(conn);
79 rc = ptlrpc_queue_wait(req);
80 /* FIXME: status check here? */
81 rc = ptlrpc_check_status(req, rc);
84 LDLM_DEBUG(lock, "client-side enqueue END (%s)",
85 rc == ELDLM_LOCK_ABORTED ? "ABORTED" : "FAILED");
87 ldlm_lock_decref(lockh, mode);
88 /* FIXME: if we've already received a completion AST, this will
90 ldlm_lock_destroy(lock);
94 reply = lustre_msg_buf(req->rq_repmsg, 0);
95 memcpy(&lock->l_remote_handle, &reply->lock_handle,
96 sizeof(lock->l_remote_handle));
97 if (type == LDLM_EXTENT)
98 memcpy(cookie, &reply->lock_extent, sizeof(reply->lock_extent));
99 *flags = reply->lock_flags;
101 CDEBUG(D_INFO, "remote handle: %p, flags: %d\n",
102 (void *)(unsigned long)reply->lock_handle.addr, *flags);
103 CDEBUG(D_INFO, "extent: %Lu -> %Lu\n",
104 (unsigned long long)reply->lock_extent.start,
105 (unsigned long long)reply->lock_extent.end);
107 /* If enqueue returned a blocked lock but the completion handler has
108 * already run, then it fixed up the resource and we don't need to do it
110 if (*flags & LDLM_FL_LOCK_CHANGED &&
111 lock->l_req_mode != lock->l_granted_mode) {
112 CDEBUG(D_INFO, "remote intent success, locking %ld instead of"
113 "%ld\n", (long)reply->lock_resource_name[0],
114 (long)lock->l_resource->lr_name[0]);
116 ldlm_lock_change_resource(lock, reply->lock_resource_name);
117 if (lock->l_resource == NULL) {
121 LDLM_DEBUG(lock, "client-side enqueue, new resource");
125 ptlrpc_free_req(req);
127 rc = ldlm_lock_enqueue(lock, cookie, cookielen, flags, callback,
130 if (*flags & (LDLM_FL_BLOCK_WAIT | LDLM_FL_BLOCK_GRANTED |
131 LDLM_FL_BLOCK_CONV)) {
132 /* Go to sleep until the lock is granted. */
133 /* FIXME: or cancelled. */
134 LDLM_DEBUG(lock, "client-side enqueue returned a blocked lock,"
136 ldlm_lock_dump(lock);
137 wait_event(lock->l_waitq,
138 lock->l_req_mode == lock->l_granted_mode);
139 LDLM_DEBUG(lock, "client-side enqueue waking up: granted");
141 LDLM_DEBUG(lock, "client-side enqueue END");
148 int ldlm_server_ast(struct lustre_handle *lockh, struct ldlm_lock_desc *desc,
149 void *data, __u32 data_len)
151 struct ldlm_lock *lock;
152 struct ldlm_request *body;
153 struct ptlrpc_request *req;
154 struct ptlrpc_client *cl;
155 int rc = 0, size = sizeof(*body);
158 lock = ldlm_handle2lock(lockh);
161 cl = &lock->l_resource->lr_namespace->ns_rpc_client;
162 req = ptlrpc_prep_req(cl, lock->l_connection, LDLM_CALLBACK, 1,
165 GOTO(out, rc = -ENOMEM);
167 body = lustre_msg_buf(req->rq_reqmsg, 0);
168 memcpy(&body->lock_handle1, &lock->l_remote_handle,
169 sizeof(body->lock_handle1));
172 CDEBUG(D_NET, "Sending granted AST\n");
173 ldlm_lock2desc(lock, &body->lock_desc);
175 CDEBUG(D_NET, "Sending blocked AST\n");
176 memcpy(&body->lock_desc, desc, sizeof(*desc));
179 LDLM_DEBUG(lock, "server preparing %s AST",
180 desc == 0 ? "completion" : "blocked");
182 req->rq_replen = lustre_msg_size(0, NULL);
184 rc = ptlrpc_queue_wait(req);
185 rc = ptlrpc_check_status(req, rc);
186 ptlrpc_free_req(req);
194 int ldlm_cli_convert(struct ptlrpc_client *cl, struct lustre_handle *lockh,
195 struct lustre_handle *connh,
196 int new_mode, int *flags)
198 struct ldlm_request *body;
199 struct ldlm_reply *reply;
200 struct ldlm_lock *lock;
201 struct ldlm_resource *res;
202 struct ptlrpc_request *req;
203 int rc, size = sizeof(*body);
206 lock = ldlm_handle2lock(lockh);
211 LDLM_DEBUG(lock, "client-side convert");
213 req = ptlrpc_prep_req(cl, lock->l_connection,
214 LDLM_CONVERT, 1, &size, NULL);
216 GOTO(out, rc = -ENOMEM);
218 body = lustre_msg_buf(req->rq_reqmsg, 0);
219 memcpy(&body->lock_handle1, &lock->l_remote_handle,
220 sizeof(body->lock_handle1));
222 body->lock_desc.l_req_mode = new_mode;
223 body->lock_flags = *flags;
225 size = sizeof(*reply);
226 req->rq_replen = lustre_msg_size(1, &size);
228 rc = ptlrpc_queue_wait(req);
229 rc = ptlrpc_check_status(req, rc);
233 reply = lustre_msg_buf(req->rq_repmsg, 0);
234 res = ldlm_lock_convert(lock, new_mode, &reply->lock_flags);
236 ldlm_reprocess_all(res);
237 if (lock->l_req_mode != lock->l_granted_mode) {
238 /* Go to sleep until the lock is granted. */
239 /* FIXME: or cancelled. */
240 CDEBUG(D_NET, "convert returned a blocked lock, "
241 "going to sleep.\n");
242 wait_event(lock->l_waitq,
243 lock->l_req_mode == lock->l_granted_mode);
244 CDEBUG(D_NET, "waking up, the lock must be granted.\n");
249 ptlrpc_free_req(req);
253 int ldlm_cli_cancel(struct lustre_handle *lockh,
254 struct lustre_handle *connh)
256 struct ptlrpc_request *req;
257 struct ldlm_lock *lock;
258 struct ldlm_request *body;
259 int rc, size = sizeof(*body);
262 lock = ldlm_handle2lock(lockh);
266 LDLM_DEBUG(lock, "client-side cancel");
267 req = ptlrpc_prep_req(lock->l_client, lock->l_connection,
268 LDLM_CANCEL, 1, &size, NULL);
270 GOTO(out, rc = -ENOMEM);
272 body = lustre_msg_buf(req->rq_reqmsg, 0);
273 memcpy(&body->lock_handle1, &lock->l_remote_handle,
274 sizeof(body->lock_handle1));
276 req->rq_replen = lustre_msg_size(0, NULL);
278 rc = ptlrpc_queue_wait(req);
279 rc = ptlrpc_check_status(req, rc);
280 ptlrpc_free_req(req);
284 ldlm_lock_cancel(lock);