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 file is part of Lustre, http://www.lustre.org.
8 * Lustre is free software; you can redistribute it and/or
9 * modify it under the terms of version 2 of the GNU General Public
10 * License as published by the Free Software Foundation.
12 * Lustre is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with Lustre; if not, write to the Free Software
19 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 #include <linux/config.h>
26 #include <linux/module.h>
27 #include <linux/kernel.h>
29 #define DEBUG_SUBSYSTEM S_RPC
31 #include <linux/obd_support.h>
32 #include <linux/obd_class.h>
33 #include <linux/lustre_net.h>
35 int ptlrpc_enqueue(struct ptlrpc_client *peer, struct ptlrpc_request *req)
37 struct ptlrpc_request *srv_req;
44 OBD_ALLOC(srv_req, sizeof(*srv_req));
50 CDEBUG(0, "peer obd minor %d, incoming req %p, srv_req %p\n",
51 peer->cli_obd->obd_minor, req, srv_req);
53 memset(srv_req, 0, sizeof(*req));
55 /* move the request buffer */
56 srv_req->rq_reqbuf = req->rq_reqbuf;
57 srv_req->rq_reqlen = req->rq_reqlen;
58 srv_req->rq_obd = peer->cli_obd;
60 /* remember where it came from */
61 srv_req->rq_reply_handle = req;
63 spin_lock(&peer->cli_lock);
64 list_add(&srv_req->rq_list, &peer->cli_obd->obd_req_list);
65 spin_unlock(&peer->cli_lock);
66 wake_up(&peer->cli_obd->obd_req_waitq);
70 int ptlrpc_connect_client(int dev, char *uuid, int req_portal, int rep_portal,
71 req_pack_t req_pack, rep_unpack_t rep_unpack,
72 struct ptlrpc_client *cl)
76 memset(cl, 0, sizeof(*cl));
77 spin_lock_init(&cl->cli_lock);
80 cl->cli_request_portal = req_portal;
81 cl->cli_reply_portal = rep_portal;
82 cl->cli_rep_unpack = rep_unpack;
83 cl->cli_req_pack = req_pack;
85 /* non networked client */
86 if (dev >= 0 && dev < MAX_OBD_DEVICES) {
87 struct obd_device *obd = &obd_dev[dev];
89 if ((!obd->obd_flags & OBD_ATTACHED) ||
90 (!obd->obd_flags & OBD_SET_UP)) {
91 CERROR("target device %d not att or setup\n", dev);
94 if (strcmp(obd->obd_type->typ_name, "ost") &&
95 strcmp(obd->obd_type->typ_name, "mds")) {
99 cl->cli_obd = &obd_dev[dev];
104 err = kportal_uuid_to_peer(uuid, &cl->cli_server);
106 CERROR("cannot find peer %s!\n", uuid);
111 struct ptlrpc_bulk_desc *ptlrpc_prep_bulk(struct lustre_peer *peer)
113 struct ptlrpc_bulk_desc *bulk;
115 OBD_ALLOC(bulk, sizeof(*bulk));
117 memset(bulk, 0, sizeof(*bulk));
118 memcpy(&bulk->b_peer, peer, sizeof(*peer));
119 init_waitqueue_head(&bulk->b_waitq);
125 struct ptlrpc_request *ptlrpc_prep_req(struct ptlrpc_client *cl,
126 int opcode, int namelen, char *name,
127 int tgtlen, char *tgt)
129 struct ptlrpc_request *request;
133 OBD_ALLOC(request, sizeof(*request));
135 CERROR("request allocation out of memory\n");
139 memset(request, 0, sizeof(*request));
140 //spin_lock_init(&request->rq_lock);
142 spin_lock(&cl->cli_lock);
143 request->rq_xid = cl->cli_xid++;
144 spin_unlock(&cl->cli_lock);
146 rc = cl->cli_req_pack(name, namelen, tgt, tgtlen,
147 &request->rq_reqhdr, &request->rq_req,
148 &request->rq_reqlen, &request->rq_reqbuf);
150 CERROR("cannot pack request %d\n", rc);
153 request->rq_reqhdr->opc = opcode;
154 request->rq_reqhdr->xid = request->rq_xid;
160 void ptlrpc_free_req(struct ptlrpc_request *request)
165 if (request->rq_repbuf != NULL)
166 OBD_FREE(request->rq_repbuf, request->rq_replen);
167 OBD_FREE(request, sizeof(*request));
170 static int ptlrpc_check_reply(struct ptlrpc_request *req)
174 //spin_lock(&req->rq_lock);
175 if (req->rq_repbuf != NULL) {
176 req->rq_flags = PTL_RPC_REPLY;
182 if (sigismember(&(current->pending.signal), SIGKILL) ||
183 sigismember(&(current->pending.signal), SIGTERM) ||
184 sigismember(&(current->pending.signal), SIGSTOP) ||
185 sigismember(&(current->pending.signal), SIGINT)) {
186 req->rq_flags = PTL_RPC_INTR;
193 //spin_unlock(&req->rq_lock);
197 int ptlrpc_check_status(struct ptlrpc_request *req, int err)
202 CERROR("err is %d\n", err);
208 CERROR("req == NULL\n");
213 if (req->rq_rephdr == NULL) {
214 CERROR("req->rq_rephdr == NULL\n");
219 if (req->rq_rephdr->status != 0) {
220 CERROR("req->rq_rephdr->status is %d\n",
221 req->rq_rephdr->status);
223 /* XXX: translate this error from net to host */
224 return req->rq_rephdr->status;
231 /* Abort this request and cleanup any resources associated with it. */
232 int ptlrpc_abort(struct ptlrpc_request *request)
234 /* First remove the ME for the reply; in theory, this means
235 * that we can tear down the buffer safely. */
236 //spin_lock(&request->rq_lock);
237 PtlMEUnlink(request->rq_reply_me_h);
238 OBD_FREE(request->rq_repbuf, request->rq_replen);
239 request->rq_repbuf = NULL;
240 request->rq_replen = 0;
241 //spin_unlock(&request->rq_lock);
247 int ptlrpc_queue_wait(struct ptlrpc_client *cl, struct ptlrpc_request *req)
252 init_waitqueue_head(&req->rq_wait_for_rep);
256 rc = ptlrpc_enqueue(cl, req);
258 /* Remote delivery via portals. */
259 req->rq_req_portal = cl->cli_request_portal;
260 req->rq_reply_portal = cl->cli_reply_portal;
261 rc = ptl_send_rpc(req, &cl->cli_server);
264 CERROR("error %d, opcode %d\n", rc, req->rq_reqhdr->opc);
268 CDEBUG(D_OTHER, "-- sleeping\n");
269 wait_event_interruptible(req->rq_wait_for_rep, ptlrpc_check_reply(req));
270 CDEBUG(D_OTHER, "-- done\n");
271 //spin_lock(&req->rq_lock);
272 if (req->rq_flags == PTL_RPC_INTR) {
273 /* Clean up the dangling reply buffers */
280 if (req->rq_flags != PTL_RPC_REPLY) {
281 CERROR("Unknown reason for wakeup\n");
282 /* XXX Phil - I end up here when I kill obdctl */
290 rc = cl->cli_rep_unpack(req->rq_repbuf, req->rq_replen,
291 &req->rq_rephdr, &req->rq_rep);
293 CERROR("unpack_rep failed: %d\n", rc);
296 CDEBUG(D_NET, "got rep %d\n", req->rq_rephdr->xid);
298 if ( req->rq_rephdr->status == 0 )
299 CDEBUG(D_NET, "--> buf %p len %d status %d\n", req->rq_repbuf,
300 req->rq_replen, req->rq_rephdr->status);
304 //spin_unlock(&req->rq_lock);